Directory of image this file is from
This file as a plain text file
[PLOTXMAG [SPECIAL PLOTTER TEST $20 JMP 4Q CLR STC 1D SETi1 1A+3777 #1B LDHi1 SHDi 7700 JMP 1F AZEi JMP 1C MULi #1G 14 STC p+6 LDHi1 MUL 1G STC p+3 JMP 4P 0 0 JMP 1B #1C SROi #1D 0000 JMP 1E JMP 3L CLR COM STC 1D JMP 1B #1E JMP 3R CLR STC 1D JMP 1B #1F JMP 4Q LDA 1G MULi 3 SCR 3 JMP 3S SETi1 1H+3777 #1K LDHi1 SHDi 1200 JMP 1L JMP 4U JMP 1K #1L LDA 1G MULi 120 STC p+2 JMP 4P 1400 0000 JMP 4Q HLT RSW BCLi 7760 STC 1G JMP 20 #1H"HO? HO? HO= ; [ADD SIMPLOT [SIMPLOT [CALL AS FOLLOWS- [JMP 4P [ X [ Y [NEXT INSTRUCTION [AJH, JUNE 1967 #4P LDA 0 BCLi 6000 STC 14 LDA 14 STC 4X LDAi14 STC 4Y LDAi14 LDA 14 ADD 4P+3 STC p+2 JMP 4Z JMP 000 [CLOSEOUT PLOT #4Q SET 17 0 CLR STC 3X STC 3Y JMP 3R+2 [SET PLOTTER WIDE #3W LDA 0 STC 3U+20 LDAi OPR 10 STC 4J+6 LDAi OPR 7 STC 4J+12 LDAi OPR 12 STA 3U+12 STC 4K+6 LDAi OPR 11 STA 3U+3 STC 4K+12 JMP 3U [SET PLOTTER TALL #3T LDA 0 STC 3U+20 ADD 3W+17 STA 3U+12 STC 4J+6 ADD 3W+12 STA 3U+3 STC 4J+12 ADD 3W+4 STC 4K+6 ADD 3W+7 STC 4K+12 [RESET PEN POSITION BEFORE STARTING. #3U JMP 4Q LDAi -3000 OPR 11 JMP 4L ADD 4E APO JMP p-4 LDAi -62 OPR 12 JMP 4L ADD 4E APO JMP p-4 JMP 4Q JMP 0000 [INTERPOL JMP 000 #4Z LDA 0 STC 4Z-1 STC 15 ADD 3X COM ADD 4X STAi #4A 0 APO COM STC 4B ADD 3Y COM ADD 4Y STAi #4C 0 APO COM STC 4D ADD 4D COM ADD 4B APO CLR ADD 4D AZEi JMP 4Z-1 ROL 1 XSKi15 APOi JMP p-3 LDAi 240 ADD 15 STC 4H ADD 15 COM ADAi 254 STC 4G ADD 4E #4G ROL 10 ADD 4E COM STC 15 ADD 4B JMP 4H STC 4B ADD 4D JMP 4H STC 4D STC 4M+3 STC 4M+11 #4M CLR ADD 4B LAMi 0 LZE JMP 4J CLR ADD 4D LAMi 0 LZE JMP 4K LDAi #4I 0 APOi JMP 4L COM STC 4I ADD 4E ADM 15 AZE JMP 4M JMP 4Z-1 #4X 0 #4Y 0 #4B 0 #4D 0 #4H ROL 4 JMP 0 #4J SET 17 0 LDA 4A APO JMP p+5 OPR 10 LDAi #4E 1 JMP p+4 OPR 7 LDAi #4F -1 ADMi #3X 0 CLR STC 4I JMP 17 #4K SET 17 0 LDA 4C APO JMP p+5 OPR 12 LDA 4E JMP p+4 OPR 11 LDA 4F ADMi #3Y 0 CLR STC 4I JMP 17 #4L SET 17 0 SETi16 1640 XSKi16 JMP p-1 JMP 17 [LOWER PEN #3L SET 17 0 LDAi #4R 7777 APO JMP 17 OPR 14 CLR COM STC 4R SETi16 0 XSKi16 JMP p-1 SROi 3333 JMP 3L+12 JMP 17 [RAISE PEN #3R SET 17 0 LDA 4R APOi JMP 17 OPR 13 CLR STC 4R JMP 3L+12 [END OF INTERPOL [SIMPALPH [CHARACTER SET FOR [CALCOMP PLOTTER. [CALL AS FOLLOWS- [JMP 4U, WITH THE [CHARACTER IN [ACCUMULATOR FOR [REGULAR OUTPUT. [COMPLEMENT ACCUM. [FOR GRAPH SYMBOLS. LDAi 0000 APO JMP 3L JMP 000 #4U BCLi 7700 STAi 0 LDA 0 STC 4U-1 ADD 3X STC 3C ADD 3Y STC 3D ADD 4U+3 ADAi -67 APOi JMP p+4 LDAi -1 JMP p+3 LDAi -4 STC 3Z ADD 4U+3 ADAi 4S STC p+2 LDA 0 ADAi 3777 STC 14 ADD 4R STC 4U-4 [DRAW CHARACTER JMP 3R JMP p+2 JMP 3L #3A LDHi14 AZEi JMP 4U-1 SHDi 0100 JMP 3A-3 SHDi 0200 JMP 3A-1 JMP 3P STAi #3N 0000 LDH 14 SCR 3 JMP 3P STAi #3M 0000 LDAi #4T 0000 [FLAG FOR HORIZONTAL OR VERTICAL APO JMP p+10 ADD 3N ADD 3D STC 4Y ADD 3M ADD 3C STC 4X JMP p+10 ADD 3N COM ADD 3C STC 4X ADD 3M ADD 3D STC 4Y JMP 4Z JMP 3A [SCALE AND OFFSET #3P BCLi 7770 ADD 3Z MULi #3B 0000 JMP 0 [STORAGE #3Z -4 #3C 0 #3D 0 [SET CHARACTERS ON VERTICAL #3V CLR COM STC 4T JMP 0 [SET CHARACTERS ON HORIZONTAL #3H CLR STC 4T JMP 0 [SET CHARACTER SIZE #3S BCLi 7700 AZEi ADD 4E STC 3B JMP 0 [MATRIX ACCESS TABLE [EVERYTHING FROM THIS POINT ON MAY BE ANYWHERE IN MEMORY, INCLUDING UPPER HALF. #4S 6A 6B 6C 6D 6E 6F 6G 6H 6I 6J 6S 6S 6K 6S 6S 6N 6O 6P 6Q 6S 5A 5B 5C 5D 5E 5F 5G 5H 5I 5J 5K 5L 5M 5N 5O 5P 5Q 5R 5S 5T 5U 5V 5W 5X 5Y 5Z 6R 6S 6T 6U 6L 6W 6S 6S 6S 6S 3E 3F 3K 3G 3I 3J 3O 6S [END OF TABLE [DIGIT MATRICES #6A 1202 1627 3746 4231 2112 0151 #6S 0000 #6B 0231 2127 1601 4100 #6C 1602 2737 4645 1211 4101 5100 #6D 1602 2737 4634 2434 4342 3121 1201 5100 #6E 3102 3713 4301 5100 #6F 1202 2131 4243 3414 1747 0151 0000 #6G 1302 2434 4342 3121 1216 2737 4601 5100 #6H 1702 4746 1101 5100 #6I 1202 1324 3445 4637 2716 1524 3443 4231 2112 0151 0000 #6J 1202 2131 4246 3727 1615 2434 4501 [SPACE #6K 5100 [END DIGITS [ALPHABETIC MATRICES #5A 0216 2747 5654 1454 5101 6100 #5B 0217 3746 4534 1444 5352 4111 0161 0000 #5C 5202 4121 1216 2747 5601 6100 #5D 0217 4756 5241 1101 6100 #5E 5102 1114 4414 1757 0161 0000 #5F 0214 4414 1757 0161 0000 #5G 4302 5351 2112 1627 4756 0161 0000 #5H 0217 1454 5751 0161 0000 #5I 0231 2127 1737 0141 0000 #5J 1202 2131 4247 3757 0161 0000 #5K 0217 1447 1441 0151 0000 #5L 1702 1141 0151 0000 #5M 0217 3457 5101 6100 #5N 0217 4147 0151 0000 #5O 1202 1627 4756 5241 2112 0161 0000 #5P 0217 4756 5544 1401 6100 #5Q 2102 1216 2747 5652 4121 4251 0161 0000 #5R 0217 4756 5544 1434 5101 6100 #5S 1202 2141 5253 4424 1516 2747 5601 6100 #5T 1702 5737 3101 6100 #5U 1702 1221 4152 5701 6100 #5V 1702 3157 0161 0000 #5W 1702 2134 4157 0161 0000 #5X 0234 1734 5734 5101 6100 #5Y 1702 3457 3431 0161 0000 #5Z 1702 5711 5101 6100 [-,+,|, #6N 1402 5401 6100 #6O 1402 3436 3234 5401 6100 #6P 0247 0151 0000 [TAG = , . #6Q 2102 4701 6702 4101 1302 6301 2502 7501 7100 #6R 1402 5401 1302 5301 6100 #6T 0222 2313 1222 0131 0000 #6U 0221 2212 1101 3100 [LEFT,RIGHT [PARENTHESES #6W 2102 1315 2701 3100 #6L 0223 2517 0131 0000 [SYMBOL MATRICES [OMITTED [END OF SIMPLOT. [AJH, JUNE 1967 [TABLE FOR XMAG #1A 0402 0006 1111 1615 2022 2127 2224 2723 3322 4321 4420 4220 4021 3522 3323 3322 4321 5022 5324 5727 6231 6435 6140 5744 5650 5650 5344 5340 5434 5631 6027 6231 #2A 6434 6641 7050 6754 6756 6656 6455 6054 6053 5654 5456 5460 5560 5755 6054 6054 6252 6350 5650 5351 5051 4550 4347 4246 4246 4545 4744 5340 5436 5333 5327 5525 #2B 5423 5022 4324 4326 4430 4432 4234 4236 4441 4443 4350 4450 4352 4453 4351 3450 3347 3347 3350 3650 4050 3651 3652 4152 4351 4347 4047 4247 3150 2753 2364 1670 #2C 1372 1073 0204 0200 2722 0030 1530 0230 1531 1134 1435 1440 1046 1650 2350 2747 3145 2641 2235 2031 2027 2231 1734 1435 1440 1544 2050 2700 4616 0040 0234 0235 1036 1235 1032 1132 1232 1131 0630 0200 4327 0042 3400 #2D 4131 0041 3040 2600 3024 0031 2132 2000 3521 0037 2400 3727 0035 3033 2731 3027 3032 2634 2637 2732 2727 3000 2733 0026 3125 3100 2432 0025 2700 2235 0021 4021 4322 4200 2443 0024 4125 #2E 3731 3732 4234 4235 4036 3741 3743 4043 4300 2743 0027 4130 4327 4325 4227 4131 4230 4300 3141 0027 4026 4000 3542 0037 4340 4241 4241 4337 4341 4342 4241 4137 #2F 4135 4200 3541 0037 4041 4000 4344 0041 4536 4534 4300 2444 0026 4531 4432 4332 3731 3432 3333 3334 3435 3336 3435 3636 3435 3331 3331 3400 1165 0010 6605 #2G 6603 6501 6201 6002 6104 6406 6507 6507 6410 6410 6507 6510 6511 6511 6410 6410 6311 6311 6411 6110 5706 5606 5510 5512 6012 6411 6513 6615 6615 6511 6500 7602 #2H 7777 [END TABLE XMAG