File 8AD0BB.PA (PAL assembler source file)

Directory of image this file is from
This file as a plain text file

/8ED0BB PATCH TO RUN ON 8/A W/O FRONT PANEL


*111
TYPE,	0		/ROUTINE TO OUTPUT DOUBLE PACKED CHARACTERS
	DCA CHARTP	/STORE THE WORD
	TAD CHARTP
	BSW		/GET FIRST CHARACTER
	AND C77
	SNA
	JMP I TYPE
	TAD N37
	SPA
	TAD C100
	TAD C237
	JMS PRINT
	TAD CHARTP
	AND C77
	SNA
	JMP I TYPE
	TAD N37
	SPA
	TAD C100
	TAD C237
	JMS PRINT
	JMP I TYPE
CHARTP,	0		/TEMPORARY CHARCATER STORAGE
C77,	77
C100,	100		/NUMBER TO ADD TO EACH CHARACTER
PRINT,	0		/ROUTINE TO PRINT A CHARACTER
	TLS
	TSF
	JMP .-1
	CLA
	JMP I PRINT

C237,	237
N37,	-37

ERROR=JMS I TERROR
TERROR,	EERROR		/POINTER TO ERROR ROUTINE

*200
	CAF		/JUST FOR SAFETY

*206
	ERROR

*215
	ERROR

*222
	ERROR

*227
	ERROR

*234
	ERROR

*240
	ERROR

*245 ERROR *250 ERROR *255 ERROR *262 ERROR *267 ERROR *274 ERROR *301 ERROR *306 ERROR *313 ERROR *320 ERROR *325 ERROR *332 ERROR *337 ERROR *344 ERROR *351 ERROR *356 ERROR *363 ERROR *370 ERROR *405 ERROR *416 ERROR *423 ERROR *426 ERROR *434 ERROR *443 ERROR *451 ERROR *457 ERROR *465 ERROR *474 ERROR *502 ERROR *510 ERROR *516 ERROR *525 ERROR *533 ERROR *541 ERROR *547 ERROR *556 ERROR *564 ERROR *572 ERROR *605 ERROR *616 ERROR *627 ERROR *640 ERROR *652 ERROR *663 ERROR *674 ERROR *705 ERROR *716 ERROR *727 ERROR *740 ERROR *751 ERROR *763 ERROR *774 ERROR *1012 ERROR *1023 ERROR *1034 ERROR *1045 ERROR *1057 ERROR *1070 ERROR *1101 ERROR *1112 ERROR *1123 ERROR *1134 ERROR *1145 ERROR *1156 ERROR *1170 ERROR *1210 ERROR *1221 ERROR *1232 ERROR *1243 ERROR *1254 ERROR *1266 ERROR *1277 ERROR *1310 ERROR *1321 ERROR *1332 ERROR *1343 ERROR *1354 ERROR *1365 ERROR *1377 ERROR *1410 ERROR *1421 ERROR *1432 ERROR *1443 ERROR *1454 ERROR *1466 ERROR *1477 ERROR *1510 ERROR *1521 ERROR *1532 ERROR *1543 ERROR *1554 ERROR *1565 ERROR *1577 ERROR *1610 ERROR *1621 ERROR *1632 ERROR *1643 ERROR *1654 ERROR *1666 ERROR *1677 ERROR *1710 ERROR *1721 ERROR *1732 ERROR *1743 ERROR *1754 ERROR *1765 ERROR *1777 ERROR *2012 ERROR *2023 ERROR *2034 ERROR *2045 ERROR *2056 ERROR *2070 ERROR *2101 ERROR *2112 ERROR *2123 ERROR *2134 ERROR *2145 ERROR *2156 ERROR *2167 ERROR *2211 ERROR *2222 ERROR *2233 ERROR *2244 ERROR *2255 ERROR *2266 ERROR *2300 ERROR *2311 ERROR *2322 ERROR *2333 ERROR *2344 ERROR *2355 ERROR *2366 ERROR *2377 ERROR *2411 ERROR *2422 ERROR *2433 ERROR *2444 ERROR *2455 ERROR *2466 ERROR *2500 ERROR *2511 ERROR *2522 ERROR *2533 ERROR *2544 ERROR *2555 ERROR *2566 ERROR *2577 ERROR *2611 ERROR *2622 ERROR *2633 ERROR *2635 ERROR *2643 ERROR *2644 ERROR *2646 ERROR *2647 ERROR *2656 ERROR *2664 ERROR *2665 ERROR *2674 ERROR *2676 ENDTST
*3000 ENDTST, ISZ TCOUNT JMP FLAGCK TAD (7 JMS PRINT FLAGCK, KSF JMP I (201 KRS AND (177 TAD (-3 SZA CLA JMP I (201 JMP I (7605 TCOUNT, 0 /TEST COUNT, RING BELL AFTER 4096 TESTS CCHECK, KSF JMP I (RETURN KRS AND (177 TAD (-17 SNA JMP I (NEXIT TAD (14 SZA CLA JMP I (RETURN JMP I (7605 *5000 EERROR, 0 /ROUTINE TO PRINT FAILURES CLA JMP I .+1 CCHECK RETURN, TAD BTBLE /SET UP TABLE COUNT DCA COUNT RETRY, TAD I COUNT IAC CIA /FIGURE NEGATIVE ADDRESS PLUS 1 TAD EERROR SNA CLA JMP GOTIT /GOT THE ERROR ISZ COUNT JMP RETRY GOTIT, TAD COUNT TAD MD DCA TEMP TAD I TEMP DCA TEMP NEXT, CDF 10 TAD I TEMP CDF JMS TYPE CDF 10 TAD I TEMP SNA JMP EXIT /LEAVE, END OF LIST AND C77 SNA CLA JMP EXIT ISZ TEMP JMP NEXT EXIT, CDF CLA CLL TAD C15 JMS PRINT TAD C12 JMS PRINT NEXIT, JMP I EERROR /LEAVE C15, 15 /CR C12, 12 /LF COUNT, 0 TEMP, 0 MD, MESS1-BTBLE BTBLE, .+1 /POINTER TO BEGINNING OF TABLE BTABLE, 206 215 222 227 234 240 245 250 255 262 267 274 301 306 313 320 325 332 337 344 351 356 363 370 405 416 423 426 434 443 451 457 465 474 502 510 516 525 533 541 547 556 564 572 605 616 627 640 652 663 674 705 716 727 740 751 763 774 1012 1023 1034 1045 1057 1070 1101 1112 1123 1134 1145 1156 1170 1210 1221 1232 1243 1254 1266 1277 1310 1321 1332 1343 1354 1365 1377 1410 1421 1432 1443 1454 1466 1477 1510 1521 1532 1543 1554 1565 1577 1610 1621 1632 1643 1654 1666 1677 1710 1721 1732 1743 1754 1765 1777 2012 2023 2034 2045 2056 2070 2101 2112 2123 2134 2145 2156 2167 2211 2222 2233 2244 2255 2266 2300 2311 2322 2333 2344 2355 2366 2377 2411 2422 2433 2444 2455 2466 2500 2511 2522 2533 2544 2555 2566 2577 2611 2622 2633 2635 2643 2644 2646 2647 2657 2664 2665 2674
MESS1, .+1 MESS, ME1 ME2 ME3 ME4 ME5 ME6 ME7 ME8 ME9 ME10 ME11 ME12 ME13 ME14 ME15 ME16 ME17 ME18 ME19 ME20 ME21 ME22 ME23 ME24 ME25 ME26 ME27 ME28 ME29 ME30 ME31 ME32 ME33 ME34 ME35 ME36 ME37 ME38 ME39 ME40 ME41 ME42 ME43 ME44 ME45 ME46 ME47 ME48 ME49 ME50 ME51 ME52 ME53 ME54 ME55 ME56 ME57 ME58 ME59 ME60 ME61 ME62 ME63 ME64 ME65 ME66 ME67 ME68 ME69 ME70 ME71 ME72 ME73 ME74 ME75 ME76 ME77 ME78 ME79 ME80 ME81 ME82 ME83 ME84 ME85 ME86 ME87 ME88 ME89 ME90 ME91 ME92 ME93 ME94 ME95 ME96 ME97 ME98 ME99 ME100 ME101 ME102 ME103 ME104 ME105 ME106 ME107 ME108 ME109 ME110 ME111 ME112 ME113 ME114 ME115 ME116 ME117 ME118 ME119 ME120 ME121 ME122 ME123 ME124 ME125 ME126 ME127 ME128 ME129 ME130 ME131 ME132 ME133 ME134 ME135 ME136 ME137 ME138 ME139 ME140 ME141 ME142 ME143 ME144 ME145 ME146 ME147 ME148 ME149 ME150 ME151 ME152 ME153 ME154 ME155 ME156 ME157 ME158 ME159 ME160 ME161 ME162 ME163 ME164 ME165 ME166 FIELD 1 *0 ME1, TEXT %DCA TEST 1% ME2, TEXT %DCA TEST 1% ME3, TEXT %DCA TEST 2% ME4, TEXT %DCA TEST 2% ME5, TEXT %DCA TEST 3% ME6, TEXT %DCA TEST 3% ME7, TEXT %DCA TEST 4% ME8, TEXT %DCA TEST 4% ME9, TEXT %DCA TEST 5% ME10, TEXT %DCA TEST 5% ME11, TEXT %DCA TEST 6% ME12, TEXT %DCA TEST 6% ME13, TEXT %DCA TEST 7% ME14, TEXT %DCA TEST 7% ME15, TEXT %DCA TEST 8% ME16, TEXT %DCA TEST 8% ME17, TEXT %DCA TEST 9% ME18, TEXT %DCA TEST 9% ME19, TEXT %DCA TEST 10% ME20, TEXT %DCA TEST 10% ME21, TEXT %DCA TEST 11% ME22, TEXT %DCA TEST 11% ME23, TEXT %DCA TEST 12% ME24, TEXT %DCA TEST 12% ME25, TEXT %INDIRECT ADDRESSING TEST 2% ME26, TEXT %INDIRECT ADDRESSING TEST 2% ME27, TEXT %INDIRECT ADDRESSING TEST 3% ME28, TEXT %INDIRECT ADDRESSING TEST 3% ME29, TEXT %INDIRECT ADDRESSING TEST 4% ME30, TEXT %INDIRECT ADDRESSING TEST 5% ME31, TEXT %INDIRECT ADDRESSING TEST 6% ME32, TEXT %INDIRECT ADDRESSING TEST 6% ME33, TEXT %INDIRECT ADDRESSING TEST 7% ME34, TEXT %INDIRECT ADDRESSING TEST 8% ME35, TEXT %INDIRECT ADDRESSING TEST 9% ME36, TEXT %INDIRECT ADDRESSING TEST 9% ME37, TEXT %INDIRECT ADDRESSING TEST 10% ME38, TEXT %INDIRECT ADDRESSING TEST 11% ME39, TEXT %INDIRECT ADDRESSING TEST 12% ME40, TEXT %INDIRECT ADDRESSING TEST 12% ME41, TEXT %INDIRECT ADDRESSING TEST 13% ME42, TEXT %INDIRECT ADDRESSING TEST 14% ME43, TEXT %INDIRECT ADDRESSING TEST 15% ME44, TEXT %INDIRECT ADDRESSING TEST 15% ME45, TEXT %INDIRECT ADDRESSING TEST 16% ME46, TEXT %INDIRECT ADDRESSING TEST 17% ME47, TEXT %AUTO INDEX TEST 2% ME48, TEXT %AUTO INDEX TEST 3% ME49, TEXT %AUTO INDEX TEST 4% ME50, TEXT %AUTO INDEX TEST 5% ME51, TEXT %AUTO INDEX TEST 6% ME52, TEXT %AUTO INDEX TEST 7% ME53, TEXT %AUTO INDEX TEST 8% ME54, TEXT %AUTO INDEX TEST 9% ME55, TEXT %AUTO INDEX TEST 10% ME56, TEXT %AUTO INDEX TEST 11% ME57, TEXT %AUTO INDEX TEST 12% ME58, TEXT %AUTO INDEX TEST 13% ME59, TEXT %AUTO INDEX TEST 14% ME60, TEXT %AUTO INDEX TEST 15% ME61, TEXT %AUTO INDEX TEST 16% ME62, TEXT %AUTO INDEX TEST 17% ME63, TEXT %AUTO INDEX TEST 18% ME64, TEXT %AUTO INDEX TEST 19% ME65, TEXT %AUTO INDEX TEST 20% ME66, TEXT %AUTO INDEX TEST 21% ME67, TEXT %AUTO INDEX TEST 22% ME68, TEXT %AUTO INDEX TEST 23% ME69, TEXT %AUTO INDEX TEST 24% ME70, TEXT %AUTO INDEX TEST 25% ME71, TEXT %AUTO INDEX TEST 26% ME72, TEXT %AUTO INDEX TEST 27% ME73, TEXT %AUTO INDEX TEST 28% ME74, TEXT %AUTO INDEX TEST 29% ME75, TEXT %AUTO INDEX TEST 30% ME76, TEXT %AUTO INDEX TEST 31% ME77, TEXT %AUTO INDEX TEST 32% ME78, TEXT %AUTO INDEX TEST 33% ME79, TEXT %AUTO INDEX TEST 34% ME80, TEXT %AUTO INDEX TEST 35% ME81, TEXT %AUTO INDEX TEST 36% ME82, TEXT %AUTO INDEX TEST 37% ME83, TEXT %AUTO INDEX TEST 38% ME84, TEXT %AUTO INDEX TEST 39% ME85, TEXT %AUTO INDEX TEST 40% ME86, TEXT %AUTO INDEX TEST 41% ME87, TEXT %AUTO INDEX TEST 42% ME88, TEXT %AUTO INDEX TEST 43% ME89, TEXT %AUTO INDEX TEST 44% ME90, TEXT %AUTO INDEX TEST 45% ME91, TEXT %AUTO INDEX TEST 46% ME92, TEXT %AUTO INDEX TEST 47% ME93, TEXT %AUTO INDEX TEST 48% ME94, TEXT %AUTO INDEX TEST 49% ME95, TEXT %AUTO INDEX TEST 50% ME96, TEXT %AUTO INDEX TEST 51% ME97, TEXT %AUTO INDEX TEST 52% ME98, TEXT %AUTO INDEX TEST 53% ME99, TEXT %AUTO INDEX TEST 54% ME100, TEXT %AUTO INDEX TEST 55% ME101, TEXT %AUTO INDEX TEST 56% ME102, TEXT %AUTO INDEX TEST 57% ME103, TEXT %AUTO INDEX TEST 58% ME104, TEXT %AUTO INDEX TEST 59% ME105, TEXT %AUTO INDEX TEST 60% ME106, TEXT %AUTO INDEX TEST 61% ME107, TEXT %AUTO INDEX TEST 62% ME108, TEXT %AUTO INDEX TEST 63% ME109, TEXT %AUTO INDEX TEST 64% ME110, TEXT %AUTO INDEX TEST 65% ME111, TEXT %AUTO INDEX TEST 66% ME112, TEXT %AUTO INDEX TEST 67% ME113, TEXT %AUTO INDEX TEST 68% ME114, TEXT %AUTO INDEX TEST 69% ME115, TEXT %AUTO INDEX TEST 70%
ME116, TEXT %AUTO INDEX TEST 71%
ME117, TEXT %AUTO INDEX TEST 72% ME118, TEXT %AUTO INDEX TEST 73% ME119, TEXT %AUTO INDEX TEST 74% ME120, TEXT %AUTO INDEX TEST 75% ME121, TEXT %AUTO INDEX TEST 76% ME122, TEXT %AUTO INDEX TEST 77% ME123, TEXT %AUTO INDEX TEST 78% ME124, TEXT %AUTO INDEX TEST 79% ME125, TEXT %AUTO INDEX TEST 80% ME126, TEXT %AUTO INDEX TEST 81% ME127, TEXT %AUTO INDEX TEST 82% ME128, TEXT %AUTO INDEX TEST 83% ME129, TEXT %AUTO INDEX TEST 84% ME130, TEXT %AUTO INDEX TEST 85% ME131, TEXT %AUTO INDEX TEST 86% ME132, TEXT %AUTO INDEX TEST 87% ME133, TEXT %AUTO INDEX TEST 88% ME134, TEXT %AUTO INDEX TEST 89% ME135, TEXT %AUTO INDEX TEST 90% ME136, TEXT %AUTO INDEX TEST 91% ME137, TEXT %AUTO INDEX TEST 92% ME138, TEXT %AUTO INDEX TEST 93% ME139, TEXT %AUTO INDEX TEST 94% ME140, TEXT %AUTO INDEX TEST 95% ME141, TEXT %AUTO INDEX TEST 96% ME142, TEXT %AUTO INDEX TEST 97% ME143, TEXT %AUTO INDEX TEST 98% ME144, TEXT %AUTO INDEX TEST 99% ME145, TEXT %AUTO INDEX TEST 100% ME146, TEXT %AUTO INDEX TEST 101% ME147, TEXT %AUTO INDEX TEST 102% ME148, TEXT %AUTO INDEX TEST 103% ME149, TEXT %AUTO INDEX TEST 104% ME150, TEXT %AUTO INDEX TEST 105% ME151, TEXT %AUTO INDEX TEST 106% ME152, TEXT %AUTO INDEX TEST 107% ME153, TEXT %AUTO INDEX TEST 108% ME154, TEXT %AUTO INDEX TEST 109% ME155, TEXT %AUTO INDEX TEST 110% ME156, TEXT %AUTO INDEX TEST 111% ME157, TEXT %AUTO INDEX TEST 112% ME158, TEXT %AUTO INDEX TEST 113% ME159, TEXT %AUTO INDEX TEST 113% ME160, TEXT %AUTO INDEX TEST 113% ME161, TEXT %AUTO INDEX TEST 114% ME162, TEXT %AUTO INDEX TEST 114% ME163, TEXT %AUTO INDEX TEST 114% ME164, TEXT %AUTO INDEX TEST 114% ME165, TEXT %AUTO INDEX TEST 114% ME166, TEXT %AUTO INDEX TEST 114%



Feel free to contact me, David Gesswein djg@pdp8online.com with any questions, comments on the web site, or if you have related equipment, documentation, software etc. you are willing to part with.  I am interested in anything PDP-8 related, computers, peripherals used with them, DEC or third party, or documentation. 

PDP-8 Home Page   PDP-8 Site Map   PDP-8 Site Search