C1520 HOW TO
FILE INFORMATION
FILENAME(S): C1520 HOW TO
FILE TYPE(S): PRG
FILE SIZE: 28.7K
FIRST SEEN: 2025-10-19 22:48:39
APPEARS ON: 2 disk(s)
FILE HASH
a16f25c30bd1419b56405b038ab6c7ae44132c521dc6dbc017683fd927c43652
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TERMINAL PRGS | C1520 HOW TO | PRG | Radd Maxx | 11 | 0 | DOWNLOAD FILE |
| PB DOMAIN 0054GR | C1520 HOW TO | PRG | Treasure Chest - Klaus Der Suhler | 24 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 25 08 E8 03 8F 22 20 D5 C0 C0 C0 C0 C0 C0 |..%...." .......|
00000010: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000020: C0 C0 C0 C0 C9 00 49 08 E9 03 8F 22 20 DD 20 D5 |......I...." . .|
00000030: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000040: C0 C0 C0 C0 C0 C0 C9 20 DD 00 6D 08 EA 03 8F 22 |....... ..m...."|
00000050: 20 DD 20 DD 20 50 4C 4F 54 54 45 52 20 20 50 52 | . . PLOTTER PR|
00000060: 4F 47 52 41 4D 4D 49 4E 47 20 DD 20 DD 00 91 08 |OGRAMMING . ....|
00000070: EB 03 8F 22 20 DD 20 CA C0 C0 C0 C0 C0 C0 C0 C0 |..." . .........|
00000080: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 CB 20 |............... |
00000090: DD 00 B5 08 EC 03 8F 22 20 CA C0 C0 C0 C0 C0 C0 |......." .......|
000000A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000000B0: C0 C0 C0 C0 CB 00 BB 08 ED 03 3A 00 C1 08 EE 03 |..........:.....|
000000C0: 3A 00 E5 08 EF 03 8F 22 20 D5 C0 C0 C0 C0 C0 C0 |:......" .......|
000000D0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000000E0: C0 C0 C0 C0 C9 00 09 09 F0 03 8F 22 A0 DD 20 46 |...........".. F|
000000F0: 49 4C 45 20 4F 50 45 4E 49 4E 47 20 43 4F 4E 56 |ILE OPENING CONV|
00000100: 45 4E 54 49 4F 4E 53 20 DD 00 2D 09 F1 03 8F 22 |ENTIONS ..-...."|
00000110: 20 CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 | ...............|
00000120: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 CB 00 33 09 |..............3.|
00000130: F2 03 3A 00 4E 09 F3 03 8F 22 20 20 D5 C0 C0 C0 |..:.N...." ....|
00000140: C0 C0 20 46 49 4C 45 20 4E 55 4D 42 45 52 00 58 |.. FILE NUMBER.X|
00000150: 09 F4 03 8F 22 20 20 DD 00 76 09 F5 03 8F 22 20 |...." ..v...." |
00000160: 20 DD 20 D5 C0 C0 C0 20 44 45 56 49 43 45 20 41 | . .... DEVICE A|
00000170: 44 44 52 45 53 53 00 82 09 F6 03 8F 22 20 20 DD |DDRESS......" .|
00000180: 20 DD 00 A3 09 F7 03 8F 22 20 20 DD 20 DD 20 D5 | ......." . . .|
00000190: C0 20 53 45 43 4F 4E 44 41 52 59 20 41 44 44 52 |. SECONDARY ADDR|
000001A0: 45 53 53 00 C2 09 F8 03 8F 22 20 20 DD 20 DD 20 |ESS......" . . |
000001B0: DD 20 20 20 20 28 50 4F 52 54 20 53 45 4C 45 43 |. (PORT SELEC|
000001C0: 54 29 00 D0 09 F9 03 8F 22 20 20 DD 20 DD 20 DD |T)......" . . .|
000001D0: 00 DE 09 FA 03 8F 22 20 20 DD 20 DD 20 DD 00 01 |......" . . ...|
000001E0: 0A FB 03 8F 22 20 20 DD 20 DD 20 DD 20 20 20 20 |...." . . . |
000001F0: 20 20 20 20 50 4F 52 54 20 46 55 4E 43 54 49 4F | PORT FUNCTIO|
00000200: 4E 00 26 0A FC 03 8F 22 20 20 B1 20 B1 20 B1 20 |N.&...." . . . |
00000210: 20 20 20 20 20 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 | ...........|
00000220: C0 C0 C0 C0 C0 C0 00 48 0A FD 03 9F 20 20 34 2C |.......H.... 4,|
00000230: 36 20 20 20 3A 8F 20 41 53 43 49 49 20 44 41 54 |6 :. ASCII DAT|
00000240: 41 20 53 54 52 49 4E 47 00 66 0A FE 03 9F 20 20 |A STRING.f.... |
00000250: 31 2C 36 2C 31 20 3A 8F 20 50 4C 4F 54 20 43 4F |1,6,1 :. PLOT CO|
00000260: 4D 4D 41 4E 44 53 00 87 0A FF 03 9F 20 20 32 2C |MMANDS...... 2,|
00000270: 36 2C 32 20 3A 8F 20 50 45 4E 20 43 4F 4C 4F 52 |6,2 :. PEN COLOR|
00000280: 20 53 45 4C 45 43 54 00 A8 0A 00 04 9F 20 20 33 | SELECT...... 3|
00000290: 2C 36 2C 33 20 3A 8F 20 53 45 4C 45 43 54 20 43 |,6,3 :. SELECT C|
000002A0: 48 41 52 20 53 49 5A 45 00 C6 0A 01 04 9F 20 34 |HAR SIZE...... 4|
000002B0: 34 2C 36 2C 34 20 3A 8F 20 43 48 41 52 20 52 4F |4,6,4 :. CHAR RO|
000002C0: 54 41 54 49 4F 4E 00 E7 0A 02 04 9F 20 20 35 2C |TATION...... 5,|
000002D0: 36 2C 35 20 3A 8F 20 44 41 53 48 20 4C 49 4E 45 |6,5 :. DASH LINE|
000002E0: 20 53 45 4C 45 43 54 00 08 0B 03 04 9F 20 20 36 | SELECT...... 6|
000002F0: 2C 36 2C 36 20 3A 8F 20 55 50 50 45 52 2F 4C 4F |,6,6 :. UPPER/LO|
00000300: 57 45 52 20 43 41 53 45 00 26 0B 04 04 9F 20 20 |WER CASE.&.... |
00000310: 37 2C 36 2C 37 20 3A 8F 20 50 4C 4F 54 54 45 52 |7,6,7 :. PLOTTER|
00000320: 20 52 45 53 45 54 00 2C 0B 05 04 3A 00 50 0B 06 | RESET.,...:.P..|
00000330: 04 8F 22 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |.." ............|
00000340: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 |................|
00000350: 00 74 0B 07 04 8F 22 20 DD 20 20 20 20 43 48 41 |.t...." . CHA|
00000360: 52 41 43 54 45 52 20 50 52 49 4E 54 49 4E 47 20 |RACTER PRINTING |
00000370: 20 20 20 DD 00 98 0B 08 04 8F 22 20 CA C0 C0 C0 | ......." ....|
00000380: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000390: C0 C0 C0 C0 C0 C0 C0 CB 00 9E 0B 09 04 3A 00 C2 |.............:..|
000003A0: 0B 0A 04 8F 20 20 20 50 52 49 4E 54 49 4E 47 20 |.... PRINTING |
000003B0: 49 53 20 54 48 52 4F 55 47 48 20 50 4F 52 54 20 |IS THROUGH PORT |
000003C0: 30 2C 00 E4 0B 0B 04 8F 20 20 20 55 53 49 4E 47 |0,...... USING|
000003D0: 20 46 49 4C 45 20 4E 55 4D 42 45 52 20 23 34 2E | FILE NUMBER #4.|
000003E0: 20 54 48 45 00 06 0C 0C 04 8F 20 20 20 53 59 4E | THE...... SYN|
000003F0: 54 41 58 20 49 53 20 54 48 45 20 53 41 4D 45 20 |TAX IS THE SAME |
00000400: 41 53 20 46 4F 52 00 24 0C 0D 04 8F 20 20 20 54 |AS FOR.$.... T|
00000410: 48 45 20 53 54 41 4E 44 41 52 44 20 50 52 49 4E |HE STANDARD PRIN|
00000420: 54 45 52 2E 00 2A 0C 0E 04 3A 00 4D 0C 0F 04 8F |TER..*...:.M....|
00000430: 20 50 52 49 4E 54 49 4E 47 20 57 49 54 48 20 51 | PRINTING WITH Q|
00000440: 55 4F 54 45 44 20 53 54 52 49 4E 47 53 00 53 0C |UOTED STRINGS.S.|
00000450: 10 04 3A 00 73 0C 11 04 3A 20 20 20 98 34 2C 22 |..:.s...: .4,"|
00000460: 51 55 4F 54 45 44 20 54 45 58 54 20 53 54 52 49 |QUOTED TEXT STRI|
00000470: 4E 47 22 00 79 0C 12 04 3A 00 9E 0C 13 04 8F 20 |NG".y...:...... |
00000480: 50 52 49 4E 54 49 4E 47 20 57 49 54 48 20 53 54 |PRINTING WITH ST|
00000490: 52 49 4E 47 20 56 41 52 49 41 42 4C 45 53 00 A4 |RING VARIABLES..|
000004A0: 0C 14 04 3A 00 C1 0C 15 04 3A 20 20 20 53 24 B2 |...:.....: S$.|
000004B0: 22 53 54 52 49 4E 47 20 56 41 52 49 41 42 4C 45 |"STRING VARIABLE|
000004C0: 22 00 CF 0C 16 04 3A 20 20 20 98 34 2C 53 24 00 |".....: .4,S$.|
000004D0: D5 0C 17 04 3A 00 F4 0C 18 04 8F 20 50 52 49 4E |....:...... PRIN|
000004E0: 54 49 4E 47 20 57 49 54 48 20 43 48 52 24 20 43 |TING WITH CHR$ C|
000004F0: 4F 44 45 53 00 FA 0C 19 04 3A 00 11 0D 1A 04 3A |ODES.....:.....:|
00000500: 20 20 20 98 34 2C C7 28 36 37 29 C7 28 37 32 29 | .4,.(67).(72)|
00000510: 3B 00 28 0D 1B 04 3A 20 20 20 98 34 2C C7 28 38 |;.(...: .4,.(8|
00000520: 32 29 C7 28 33 36 29 3B 00 3F 0D 1C 04 3A 20 20 |2).(36);.?...: |
00000530: 20 98 34 2C C7 28 33 32 29 C7 28 36 37 29 3B 00 | .4,.(32).(67);.|
00000540: 56 0D 1D 04 3A 20 20 20 98 34 2C C7 28 37 39 29 |V...: .4,.(79)|
00000550: C7 28 36 38 29 3B 00 6C 0D 1E 04 3A 20 20 20 98 |.(68);.l...: .|
00000560: 34 2C C7 28 36 39 29 C7 28 38 33 29 00 72 0D 1F |4,.(69).(83).r..|
00000570: 04 3A 00 92 0D 20 04 8F 20 50 52 49 4E 54 49 4E |.:... .. PRINTIN|
00000580: 47 20 57 49 54 48 20 54 41 42 20 41 4E 44 20 53 |G WITH TAB AND S|
00000590: 50 43 00 98 0D 21 04 3A 00 AC 0D 22 04 3A 20 20 |PC...!.:...".: |
000005A0: 20 98 34 2C 22 3E 22 A3 31 30 29 3B 00 CA 0D 23 | .4,">".10);...#|
000005B0: 04 3A 20 20 20 98 34 2C 22 49 20 54 41 42 42 45 |.: .4,"I TABBE|
000005C0: 44 20 54 4F 20 48 45 52 45 22 00 D0 0D 24 04 3A |D TO HERE"...$.:|
000005D0: 00 E4 0D 25 04 3A 20 20 20 98 34 2C 22 3E 22 A6 |...%.: .4,">".|
000005E0: 31 30 29 3B 00 02 0E 26 04 3A 20 20 20 98 34 2C |10);...&.: .4,|
000005F0: 22 49 20 53 50 41 43 45 44 20 54 4F 20 48 45 52 |"I SPACED TO HER|
00000600: 45 22 00 08 0E 27 04 3A 00 2C 0E 28 04 8F 22 20 |E"...'.:.,.(.." |
00000610: D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000620: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 00 50 0E 29 |.............P.)|
00000630: 04 8F 22 20 DD 20 20 55 53 49 4E 47 20 54 48 45 |.." . USING THE|
00000640: 20 4F 54 48 45 52 20 50 4F 52 54 53 20 20 20 DD | OTHER PORTS .|
00000650: 00 74 0E 2A 04 8F 22 20 DD 20 57 49 54 48 20 43 |.t.*.." . WITH C|
00000660: 48 41 52 41 43 54 45 52 20 50 52 49 4E 54 49 4E |HARACTER PRINTIN|
00000670: 47 20 20 DD 00 98 0E 2B 04 8F 22 20 CA C0 C0 C0 |G ....+.." ....|
00000680: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000690: C0 C0 C0 C0 C0 C0 C0 CB 00 9E 0E 2C 04 3A 00 C2 |...........,.:..|
000006A0: 0E 2D 04 8F 22 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 |.-.." ..........|
000006B0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000006C0: C0 C9 00 E6 0E 2E 04 8F 22 20 DD 20 20 20 53 45 |........" . SE|
000006D0: 4C 45 43 54 49 4E 47 20 50 45 4E 20 43 4F 4C 4F |LECTING PEN COLO|
000006E0: 52 20 20 20 20 DD 00 0A 0F 2F 04 8F 22 A0 CA C0 |R ..../.."...|
000006F0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000700: C0 C0 C0 C0 C0 C0 C0 C0 C0 CB 00 10 0F 30 04 3A |.............0.:|
00000710: 00 30 0F 31 04 8F 20 20 20 53 45 4C 45 43 54 49 |.0.1.. SELECTI|
00000720: 4E 47 20 44 49 46 46 45 52 45 4E 54 20 50 45 4E |NG DIFFERENT PEN|
00000730: 00 53 0F 32 04 8F 20 20 20 43 4F 4C 4F 52 53 20 |.S.2.. COLORS |
00000740: 49 53 20 44 4F 4E 45 20 42 59 20 50 52 49 4E 54 |IS DONE BY PRINT|
00000750: 49 4E 47 00 76 0F 33 04 8F 20 20 20 54 48 45 20 |ING.v.3.. THE |
00000760: 50 45 4E 20 43 4F 4C 4F 52 20 43 4F 44 45 20 54 |PEN COLOR CODE T|
00000770: 48 52 4F 55 47 48 00 94 0F 34 04 8F 20 20 20 50 |HROUGH...4.. P|
00000780: 4F 52 54 20 32 20 55 53 49 4E 47 20 46 49 4C 45 |ORT 2 USING FILE|
00000790: 20 23 32 2E 00 9A 0F 35 04 3A 00 B7 0F 36 04 8F | #2....5.:...6..|
000007A0: 20 20 20 50 45 4E 20 43 4F 4C 4F 52 20 43 4F 44 | PEN COLOR COD|
000007B0: 45 53 20 41 52 45 3A 00 BD 0F 37 04 3A 00 D3 0F |ES ARE:...7.:...|
000007C0: 38 04 8F 20 20 20 20 20 22 30 22 20 3D 20 42 4C |8.. "0" = BL|
000007D0: 41 43 4B 00 E8 0F 39 04 8F 20 20 20 20 20 22 31 |ACK...9.. "1|
000007E0: 22 20 3D 20 42 4C 55 45 00 FE 0F 3A 04 8F 20 20 |" = BLUE...:.. |
000007F0: 20 20 20 22 32 22 20 3D 20 47 52 45 45 4E 00 12 | "2" = GREEN..|
00000800: 10 3B 04 8F 20 20 20 20 20 22 33 22 20 3D 20 52 |.;.. "3" = R|
00000810: 45 44 00 18 10 3C 04 3A 00 37 10 3D 04 3A 20 20 |ED...<.:.7.=.: |
00000820: 20 83 20 42 4C 41 43 4B 2C 42 4C 55 45 2C 47 52 | . BLACK,BLUE,GR|
00000830: 45 45 4E 2C 52 45 44 00 3D 10 3E 04 3A 00 4F 10 |EEN,RED.=.>.:.O.|
00000840: 3F 04 3A 20 20 20 81 20 49 B2 30 20 A4 20 33 00 |?.: . I.0 . 3.|
00000850: 5F 10 40 04 3A 20 20 20 20 20 20 87 20 53 24 00 |_.@.: . S$.|
00000860: 7F 10 41 04 3A 20 20 20 20 20 20 98 32 2C 49 20 |..A.: .2,I |
00000870: 3A 8F 20 43 48 41 4E 47 45 20 43 4F 4C 4F 52 00 |:. CHANGE COLOR.|
00000880: 9E 10 42 04 3A 20 20 20 20 20 20 98 34 2C 22 54 |..B.: .4,"T|
00000890: 48 49 53 20 50 45 4E 20 49 53 20 22 53 24 00 AA |HIS PEN IS "S$..|
000008A0: 10 43 04 3A 20 20 20 82 20 49 00 B0 10 44 04 3A |.C.: . I...D.:|
000008B0: 00 D1 10 45 04 8F 20 52 45 53 45 54 20 50 45 4E |...E.. RESET PEN|
000008C0: 20 43 4F 4C 4F 52 20 54 4F 20 44 45 46 41 55 4C | COLOR TO DEFAUL|
000008D0: 54 00 D7 10 46 04 3A 00 F3 10 47 04 3A 20 20 20 |T...F.:...G.: |
000008E0: 98 32 2C 22 30 22 20 3A 8F 20 42 4C 41 43 4B 20 |.2,"0" :. BLACK |
000008F0: 50 45 4E 00 F9 10 48 04 3A 00 1D 11 49 04 8F 22 |PEN...H.:...I.."|
00000900: 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 | ...............|
00000910: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 00 41 11 |..............A.|
00000920: 4A 04 8F 22 A0 DD 20 53 45 4C 45 43 54 49 4E 47 |J..".. SELECTING|
00000930: 20 43 48 41 52 41 43 54 45 52 20 53 49 5A 45 20 | CHARACTER SIZE |
00000940: DD 00 65 11 4B 04 8F 22 20 CA C0 C0 C0 C0 C0 C0 |..e.K.." .......|
00000950: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000960: C0 C0 C0 C0 CB 00 6B 11 4C 04 3A 00 8D 11 4D 04 |......k.L.:...M.|
00000970: 8F 20 20 20 53 45 4C 45 43 54 49 4E 47 20 4F 54 |. SELECTING OT|
00000980: 48 45 52 20 43 48 41 52 41 43 54 45 52 00 AF 11 |HER CHARACTER...|
00000990: 4E 04 8F 20 20 20 53 49 5A 45 53 20 49 53 20 44 |N.. SIZES IS D|
000009A0: 4F 4E 45 20 42 59 20 50 52 49 4E 54 49 4E 47 00 |ONE BY PRINTING.|
000009B0: D2 11 4F 04 8F 20 20 20 54 48 45 20 43 48 41 52 |..O.. THE CHAR|
000009C0: 41 43 54 45 52 20 53 49 5A 45 20 54 48 52 4F 55 |ACTER SIZE THROU|
000009D0: 47 48 00 F0 11 50 04 8F 20 20 20 50 4F 52 54 20 |GH...P.. PORT |
000009E0: 33 20 55 53 49 4E 47 20 46 49 4C 45 20 23 33 2E |3 USING FILE #3.|
000009F0: 00 F6 11 51 04 3A 00 18 12 52 04 8F 20 20 20 43 |...Q.:...R.. C|
00000A00: 48 41 52 41 43 54 45 52 20 53 49 5A 45 20 43 4F |HARACTER SIZE CO|
00000A10: 44 45 53 20 41 52 45 3A 00 1E 12 53 04 3A 00 41 |DES ARE:...S.:.A|
00000A20: 12 54 04 8F 20 20 20 20 20 22 30 22 20 3D 20 38 |.T.. "0" = 8|
00000A30: 30 20 43 48 41 52 41 43 54 45 52 53 2F 4C 49 4E |0 CHARACTERS/LIN|
00000A40: 45 00 64 12 55 04 8F 20 20 20 20 20 22 31 22 20 |E.d.U.. "1" |
00000A50: 3D 20 34 30 20 43 48 41 52 41 43 54 45 52 53 2F |= 40 CHARACTERS/|
00000A60: 4C 49 4E 45 00 87 12 56 04 8F 20 20 20 20 20 22 |LINE...V.. "|
00000A70: 32 22 20 3D 20 32 30 20 43 48 41 52 41 43 54 45 |2" = 20 CHARACTE|
00000A80: 52 53 2F 4C 49 4E 45 00 AA 12 57 04 8F 20 20 20 |RS/LINE...W.. |
00000A90: 20 20 22 33 22 20 3D 20 31 30 20 43 48 41 52 41 | "3" = 10 CHARA|
00000AA0: 43 54 45 52 53 2F 4C 49 4E 45 00 B0 12 58 04 3A |CTERS/LINE...X.:|
00000AB0: 00 C6 12 59 04 3A 20 20 20 83 20 38 30 2C 34 30 |...Y.: . 80,40|
00000AC0: 2C 32 30 2C 31 30 00 CC 12 5A 04 3A 00 DE 12 5B |,20,10...Z.:...[|
00000AD0: 04 3A 20 20 20 81 20 49 B2 30 20 A4 20 33 00 EE |.: . I.0 . 3..|
00000AE0: 12 5C 04 3A 20 20 20 20 20 20 87 20 53 24 00 0D |.\.: . S$..|
00000AF0: 13 5D 04 3A 20 20 20 20 20 20 98 33 2C 49 20 3A |.].: .3,I :|
00000B00: 8F 20 43 48 41 4E 47 45 20 53 49 5A 45 00 26 13 |. CHANGE SIZE.&.|
00000B10: 5E 04 3A 20 20 20 20 20 20 98 34 2C C9 28 C4 28 |^.: .4,.(.(|
00000B20: 49 29 2C 31 29 3B 00 41 13 5F 04 3A 20 20 20 20 |I),1);.A._.: |
00000B30: 20 20 98 34 2C 22 3D 22 53 24 22 2F 4C 49 4E 45 | .4,"="S$"/LINE|
00000B40: 22 00 4F 13 60 04 3A 20 20 20 20 20 20 98 34 00 |".O.`.: .4.|
00000B50: 5B 13 61 04 3A 20 20 20 82 20 49 00 61 13 62 04 |[.a.: . I.a.b.|
00000B60: 3A 00 7D 13 63 04 8F 20 52 45 53 45 54 20 53 49 |:.}.c.. RESET SI|
00000B70: 5A 45 20 54 4F 20 44 45 46 41 55 4C 54 00 83 13 |ZE TO DEFAULT...|
00000B80: 64 04 3A 00 9D 13 65 04 3A 20 20 20 98 33 2C 22 |d.:...e.: .3,"|
00000B90: 31 22 20 3A 8F 20 34 30 2F 4C 49 4E 45 00 A3 13 |1" :. 40/LINE...|
00000BA0: 66 04 3A 00 C7 13 67 04 8F 22 20 D5 C0 C0 C0 C0 |f.:...g.." .....|
00000BB0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000BC0: C0 C0 C0 C0 C0 C0 C9 00 EB 13 68 04 8F 22 A0 DD |..........h.."..|
00000BD0: 20 20 20 20 43 48 41 52 41 43 54 45 52 20 52 4F | CHARACTER RO|
00000BE0: 54 41 54 49 4F 4E 20 20 20 20 DD 00 0F 14 69 04 |TATION ....i.|
00000BF0: 8F 22 20 CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |." .............|
00000C00: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 CB 00 |................|
00000C10: 15 14 6A 04 3A 00 3A 14 6B 04 8F 20 20 20 43 48 |..j.:.:.k.. CH|
00000C20: 41 52 41 43 54 45 52 53 20 54 4F 20 42 45 20 50 |ARACTERS TO BE P|
00000C30: 52 49 4E 54 45 44 20 4D 41 59 00 5F 14 6C 04 8F |RINTED MAY._.l..|
00000C40: 20 20 20 42 45 20 52 4F 54 41 54 45 44 20 39 30 | BE ROTATED 90|
00000C50: 20 44 45 47 52 45 45 53 20 54 4F 20 54 48 45 00 | DEGREES TO THE.|
00000C60: 83 14 6D 04 8F 20 20 20 52 49 47 48 54 20 42 59 |..m.. RIGHT BY|
00000C70: 20 50 52 49 4E 54 49 4E 47 20 54 48 45 20 56 41 | PRINTING THE VA|
00000C80: 4C 55 45 00 A6 14 6E 04 8F 20 20 20 4F 46 20 52 |LUE...n.. OF R|
00000C90: 4F 54 41 54 49 4F 4E 20 54 48 52 4F 55 47 48 20 |OTATION THROUGH |
00000CA0: 50 4F 52 54 20 34 00 BE 14 6F 04 8F 20 20 20 55 |PORT 4...o.. U|
00000CB0: 53 49 4E 47 20 46 49 4C 45 20 23 34 34 2E 00 C4 |SING FILE #44...|
00000CC0: 14 70 04 3A 00 E0 14 71 04 8F 20 20 20 52 4F 54 |.p.:...q.. ROT|
00000CD0: 41 54 49 4F 4E 20 43 4F 44 45 53 20 41 52 45 3A |ATION CODES ARE:|
00000CE0: 00 E6 14 72 04 3A 00 08 15 73 04 8F 20 20 20 20 |...r.:...s.. |
00000CF0: 20 22 30 22 20 3D 20 4E 4F 52 4D 41 4C 20 48 4F | "0" = NORMAL HO|
00000D00: 52 49 5A 4F 4E 54 41 4C 00 2B 15 74 04 8F 20 20 |RIZONTAL.+.t.. |
00000D10: 20 20 20 22 31 22 20 3D 20 39 30 20 44 45 47 52 | "1" = 90 DEGR|
00000D20: 45 45 20 52 4F 54 41 54 49 4F 4E 00 31 15 75 04 |EE ROTATION.1.u.|
00000D30: 3A 00 49 15 76 04 3A 20 83 20 56 2C 45 2C 52 2C |:.I.v.: . V,E,R,|
00000D40: 54 2C 49 2C 43 2C 41 2C 4C 00 4F 15 77 04 3A 00 |T,I,C,A,L.O.w.:.|
00000D50: 6A 15 78 04 3A 20 98 34 2C 22 48 4F 52 49 5A 4F |j.x.: .4,"HORIZO|
00000D60: 4E 54 41 4C 20 4C 49 4E 45 22 00 70 15 79 04 3A |NTAL LINE".p.y.:|
00000D70: 00 8E 15 7A 04 3A 20 98 34 34 2C 22 31 22 20 3A |...z.: .44,"1" :|
00000D80: 8F 20 53 45 54 20 52 4F 54 41 54 49 4F 4E 00 94 |. SET ROTATION..|
00000D90: 15 7B 04 3A 00 B6 15 7C 04 3A 20 98 34 2C 22 45 |.{.:...|.: .4,"E|
00000DA0: 20 4E 20 49 20 4C 20 20 44 20 45 20 54 20 41 20 | N I L D E T A |
00000DB0: 54 20 4F 20 52 22 00 BC 15 7D 04 3A 00 CC 15 7E |T O R"...}.:...~|
00000DC0: 04 3A 20 81 20 49 B2 31 20 A4 20 38 00 DA 15 7F |.: . I.1 . 8....|
00000DD0: 04 3A 20 20 20 20 87 20 53 24 00 E9 15 80 04 3A |.: . S$.....:|
00000DE0: 20 20 20 20 98 34 2C 53 24 00 F3 15 81 04 3A 20 | .4,S$.....: |
00000DF0: 82 20 49 00 F9 15 82 04 3A 00 1B 16 83 04 8F 20 |. I.....:...... |
00000E00: 52 45 53 54 4F 52 45 20 44 45 46 41 55 4C 54 20 |RESTORE DEFAULT |
00000E10: 4F 52 49 45 4E 54 41 54 49 4F 4E 00 21 16 84 04 |ORIENTATION.!...|
00000E20: 3A 00 3F 16 85 04 3A 20 20 20 98 34 34 2C 22 30 |:.?...: .44,"0|
00000E30: 22 20 3A 8F 20 48 4F 52 49 5A 4F 4E 54 41 4C 00 |" :. HORIZONTAL.|
00000E40: 45 16 86 04 3A 00 69 16 87 04 8F 22 20 D5 C0 C0 |E...:.i...." ...|
00000E50: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000E60: C0 C0 C0 C0 C0 C0 C0 C0 C9 00 8D 16 88 04 8F 22 |..............."|
00000E70: 20 DD 20 20 44 41 53 48 45 44 20 4C 49 4E 45 20 | . DASHED LINE |
00000E80: 43 48 41 52 41 43 54 45 52 53 20 20 DD 00 B1 16 |CHARACTERS ....|
00000E90: 89 04 8F 22 20 CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |..." ...........|
00000EA0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000EB0: CB 00 B7 16 8A 04 3A 00 D9 16 8B 04 8F 20 20 20 |......:...... |
00000EC0: 43 48 41 52 41 43 54 45 52 53 20 4D 41 59 20 42 |CHARACTERS MAY B|
00000ED0: 45 20 50 52 49 4E 54 45 44 00 F7 16 8C 04 8F 20 |E PRINTED...... |
00000EE0: 20 20 55 53 49 4E 47 20 44 41 53 48 45 44 20 4C | USING DASHED L|
00000EF0: 49 4E 45 53 20 42 59 00 19 17 8D 04 8F 20 20 20 |INES BY...... |
00000F00: 50 52 49 4E 54 49 4E 47 20 54 48 45 20 4C 49 4E |PRINTING THE LIN|
00000F10: 45 20 53 45 47 4D 45 4E 54 00 3A 17 8E 04 8F 20 |E SEGMENT.:.... |
00000F20: 20 20 53 49 5A 45 20 43 4F 44 45 20 54 48 52 4F | SIZE CODE THRO|
00000F30: 55 47 48 20 50 4F 52 54 20 35 00 58 17 8F 04 8F |UGH PORT 5.X....|
00000F40: 20 20 20 55 53 49 4E 47 20 46 49 4C 45 20 4E 55 | USING FILE NU|
00000F50: 4D 42 45 52 20 23 35 2E 00 7A 17 90 04 8F 20 20 |MBER #5..z.... |
00000F60: 20 41 4C 4C 4F 57 41 42 4C 45 20 56 41 4C 55 45 | ALLOWABLE VALUE|
00000F70: 53 20 41 52 45 20 30 20 54 4F 00 96 17 91 04 8F |S ARE 0 TO......|
00000F80: 20 20 20 31 35 2E 20 53 49 5A 45 20 43 4F 44 45 | 15. SIZE CODE|
00000F90: 53 20 41 52 45 3A 00 9C 17 92 04 3A 00 B5 17 93 |S ARE:.....:....|
00000FA0: 04 8F 20 20 20 20 20 30 20 3D 20 53 4F 4C 49 44 |.. 0 = SOLID|
00000FB0: 20 4C 49 4E 45 00 D4 17 94 04 8F 20 20 20 20 20 | LINE...... |
00000FC0: 31 20 3D 20 53 4D 41 4C 4C 45 53 54 20 53 45 47 |1 = SMALLEST SEG|
00000FD0: 4D 45 4E 54 00 F1 17 95 04 8F 20 20 20 20 20 32 |MENT...... 2|
00000FE0: 20 3D 20 4C 41 52 47 45 52 20 53 45 47 4D 45 4E | = LARGER SEGMEN|
00000FF0: 54 00 FD 17 96 04 8F 20 20 20 20 20 2E 00 09 18 |T...... ....|
00001000: 97 04 8F 20 20 20 20 20 2E 00 27 18 98 04 8F 20 |... ..'.... |
00001010: 20 20 20 31 35 20 3D 20 4C 41 52 47 45 53 54 20 | 15 = LARGEST |
00001020: 53 45 47 4D 45 4E 54 00 2D 18 99 04 3A 00 48 18 |SEGMENT.-...:.H.|
00001030: 9A 04 8F 20 55 53 45 20 4C 41 52 47 45 20 43 48 |... USE LARGE CH|
00001040: 41 52 41 43 54 45 52 53 00 4E 18 9B 04 3A 00 67 |ARACTERS.N...:.g|
00001050: 18 9C 04 3A 20 20 98 33 2C 22 33 22 20 3A 8F 20 |...: .3,"3" :. |
00001060: 31 30 2F 4C 49 4E 45 00 71 18 9D 04 3A 20 20 98 |10/LINE.q...: .|
00001070: 34 00 77 18 9E 04 3A 00 99 18 9F 04 8F 20 50 52 |4.w...:...... PR|
00001080: 49 4E 54 20 45 56 45 52 59 20 54 48 49 52 44 20 |INT EVERY THIRD |
00001090: 53 49 5A 45 20 4C 49 4E 45 00 9F 18 A0 04 3A 00 |SIZE LINE.....:.|
000010A0: B5 18 A1 04 3A 20 20 81 20 49 B2 30 20 A4 20 31 |....: . I.0 . 1|
000010B0: 35 20 A9 20 33 00 D3 18 A2 04 3A 20 20 20 20 20 |5 . 3.....: |
000010C0: 98 35 2C 49 20 3A 8F 20 43 48 41 4E 47 45 20 4C |.5,I :. CHANGE L|
000010D0: 49 4E 45 00 E9 18 A3 04 3A 20 20 20 20 20 98 34 |INE.....: .4|
000010E0: 2C 22 44 41 53 48 45 44 22 00 F4 18 A4 04 3A 20 |,"DASHED".....: |
000010F0: 20 82 20 49 00 FA 18 A5 04 3A 00 1E 19 A6 04 8F | . I.....:......|
00001100: 20 52 45 53 54 4F 52 45 20 44 45 46 41 55 4C 54 | RESTORE DEFAULT|
00001110: 20 53 49 5A 45 20 41 4E 44 20 4C 49 4E 45 00 24 | SIZE AND LINE.$|
00001120: 19 A7 04 3A 00 3D 19 A8 04 3A 20 20 98 33 2C 22 |...:.=...: .3,"|
00001130: 31 22 20 3A 8F 20 34 30 2F 4C 49 4E 45 00 59 19 |1" :. 40/LINE.Y.|
00001140: A9 04 3A 20 20 98 35 2C 22 30 22 20 3A 8F 20 53 |..: .5,"0" :. S|
00001150: 4F 4C 49 44 20 4C 49 4E 45 00 5F 19 AA 04 3A 00 |OLID LINE._...:.|
00001160: 83 19 AB 04 8F 22 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 |....." .........|
00001170: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001180: C0 C0 C9 00 A7 19 AC 04 8F 22 20 DD 20 20 20 55 |........." . U|
00001190: 50 50 45 52 20 41 4E 44 20 4C 4F 57 45 52 20 43 |PPER AND LOWER C|
000011A0: 41 53 45 20 20 20 DD 00 CB 19 AD 04 8F 22 20 CA |ASE ......." .|
000011B0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000011C0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 CB 00 D1 19 AE 04 |................|
000011D0: 3A 00 F5 19 AF 04 8F 20 20 20 55 50 50 45 52 20 |:...... UPPER |
000011E0: 41 4E 44 20 4C 4F 57 45 52 20 43 41 53 45 20 43 |AND LOWER CASE C|
000011F0: 41 4E 20 42 45 00 17 1A B0 04 8F 20 20 20 50 52 |AN BE...... PR|
00001200: 49 4E 54 45 44 20 41 54 20 41 4C 4C 20 54 49 4D |INTED AT ALL TIM|
00001210: 45 53 2E 20 54 48 45 00 37 1A B1 04 8F 20 20 20 |ES. THE.7.... |
00001220: 44 45 46 41 55 4C 54 20 49 53 20 54 4F 20 50 52 |DEFAULT IS TO PR|
00001230: 49 4E 54 20 41 4C 4C 00 5A 1A B2 04 8F 20 20 20 |INT ALL.Z.... |
00001240: 4E 4F 52 4D 41 4C 20 43 48 41 52 41 43 54 45 52 |NORMAL CHARACTER|
00001250: 53 20 49 4E 20 55 50 50 45 52 00 7E 1A B3 04 8F |S IN UPPER.~....|
00001260: 20 20 20 43 41 53 45 20 41 4E 44 20 53 48 49 46 | CASE AND SHIF|
00001270: 54 45 44 20 43 48 41 52 41 43 54 45 52 53 00 A1 |TED CHARACTERS..|
00001280: 1A B4 04 8F 20 20 20 49 4E 20 4C 4F 57 45 52 20 |.... IN LOWER |
00001290: 43 41 53 45 2E 20 54 48 49 53 20 43 41 4E 20 42 |CASE. THIS CAN B|
000012A0: 45 00 C2 1A B5 04 8F 20 20 20 52 45 56 45 52 53 |E...... REVERS|
000012B0: 45 44 20 42 59 20 50 52 49 4E 54 49 4E 47 20 54 |ED BY PRINTING T|
000012C0: 48 45 00 E3 1A B6 04 8F 20 20 20 43 41 53 45 20 |HE...... CASE |
000012D0: 53 45 4C 45 43 54 20 43 4F 44 45 20 54 48 52 4F |SELECT CODE THRO|
000012E0: 55 47 48 00 08 1B B7 04 8F 20 20 20 50 4F 52 54 |UGH...... PORT|
000012F0: 20 36 20 55 53 49 4E 47 20 46 49 4C 45 20 4E 55 | 6 USING FILE NU|
00001300: 4D 42 45 52 20 23 36 2E 00 0E 1B B8 04 3A 00 2D |MBER #6......:.-|
00001310: 1B B9 04 8F 20 20 20 43 41 53 45 20 53 45 4C 45 |.... CASE SELE|
00001320: 43 54 20 43 4F 44 45 53 20 41 52 45 3A 00 33 1B |CT CODES ARE:.3.|
00001330: BA 04 3A 00 51 1B BB 04 8F 20 20 20 20 20 20 22 |..:.Q.... "|
00001340: 30 22 20 3D 20 44 45 46 41 55 4C 54 20 43 41 53 |0" = DEFAULT CAS|
00001350: 45 00 6F 1B BC 04 8F 20 20 20 20 20 20 22 31 22 |E.o.... "1"|
00001360: 20 3D 20 52 45 56 45 52 53 45 20 43 41 53 45 00 | = REVERSE CASE.|
00001370: 75 1B BD 04 3A 00 80 1B BE 04 3A 20 20 20 98 34 |u...:.....: .4|
00001380: 00 9B 1B BF 04 3A 20 20 20 98 34 2C 22 44 45 46 |.....: .4,"DEF|
00001390: 41 55 4C 54 20 43 41 53 45 3A 22 00 B9 1B C0 04 |AULT CASE:".....|
000013A0: 3A 20 20 20 8D 20 31 32 32 38 20 3A 8F 20 50 52 |: . 1228 :. PR|
000013B0: 49 4E 54 20 43 48 41 52 53 00 BF 1B C1 04 3A 00 |INT CHARS.....:.|
000013C0: DE 1B C2 04 3A 20 20 20 98 36 2C 22 31 22 20 3A |....: .6,"1" :|
000013D0: 8F 20 52 45 56 45 52 53 45 20 43 41 53 45 00 E4 |. REVERSE CASE..|
000013E0: 1B C3 04 3A 00 EF 1B C4 04 3A 20 20 20 98 34 00 |...:.....: .4.|
000013F0: 0A 1C C5 04 3A 20 20 20 98 34 2C 22 52 45 56 45 |....: .4,"REVE|
00001400: 52 53 45 20 43 41 53 45 3A 22 00 28 1C C6 04 3A |RSE CASE:".(...:|
00001410: 20 20 20 8D 20 31 32 32 38 20 3A 8F 20 50 52 49 | . 1228 :. PRI|
00001420: 4E 54 20 43 48 41 52 53 00 2E 1C C7 04 3A 00 50 |NT CHARS.....:.P|
00001430: 1C C8 04 3A 20 20 20 89 20 31 32 34 30 20 3A 8F |...: . 1240 :.|
00001440: 20 4A 55 4D 50 20 53 55 42 52 4F 55 54 49 4E 45 | JUMP SUBROUTINE|
00001450: 00 56 1C C9 04 3A 00 70 1C CA 04 8F 20 50 52 49 |.V...:.p.... PRI|
00001460: 4E 54 20 43 48 41 52 41 43 54 45 52 20 53 45 54 |NT CHARACTER SET|
00001470: 00 76 1C CB 04 3A 00 8A 1C CC 04 3A 20 20 20 81 |.v...:.....: .|
00001480: 20 49 B2 36 34 20 A4 20 39 35 00 9E 1C CD 04 3A | I.64 . 95.....:|
00001490: 20 20 20 20 20 20 98 34 2C C7 28 49 29 3B 00 AA | .4,.(I);..|
000014A0: 1C CE 04 3A 20 20 20 82 20 49 00 B5 1C CF 04 3A |...: . I.....:|
000014B0: 20 20 20 98 34 00 CB 1C D0 04 3A 20 20 20 81 20 | .4.....: . |
000014C0: 49 B2 31 39 32 20 A4 20 32 32 33 00 DF 1C D1 04 |I.192 . 223.....|
000014D0: 3A 20 20 20 20 20 20 98 34 2C C7 28 49 29 3B 00 |: .4,.(I);.|
000014E0: EB 1C D2 04 3A 20 20 20 82 20 49 00 F6 1C D3 04 |....: . I.....|
000014F0: 3A 20 20 20 98 34 00 00 1D D4 04 3A 20 20 20 8E |: .4.....: .|
00001500: 00 06 1D D5 04 3A 00 21 1D D6 04 8F 20 52 45 53 |.....:.!.... RES|
00001510: 54 4F 52 45 20 44 45 46 41 55 4C 54 20 43 41 53 |TORE DEFAULT CAS|
00001520: 45 00 27 1D D7 04 3A 00 46 1D D8 04 3A 20 20 20 |E.'...:.F...: |
00001530: 98 36 2C 22 30 22 20 3A 8F 20 44 45 46 41 55 4C |.6,"0" :. DEFAUL|
00001540: 54 20 43 41 53 45 00 4C 1D D9 04 3A 00 70 1D DA |T CASE.L...:.p..|
00001550: 04 8F 22 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |.." ............|
00001560: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 |................|
00001570: 00 94 1D DB 04 8F 22 20 DD 20 20 20 20 20 50 4C |......" . PL|
00001580: 4F 54 54 49 4E 47 20 4C 49 4E 45 53 20 20 20 20 |OTTING LINES |
00001590: 20 20 20 DD 00 B8 1D DC 04 8F 22 20 CA C0 C0 C0 | ......." ....|
000015A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000015B0: C0 C0 C0 C0 C0 C0 C0 CB 00 BE 1D DD 04 3A 00 E1 |.............:..|
000015C0: 1D DE 04 8F 20 20 20 4C 49 4E 45 53 20 4F 46 20 |.... LINES OF |
000015D0: 41 4E 59 20 4C 45 4E 47 54 48 20 43 41 4E 20 42 |ANY LENGTH CAN B|
000015E0: 45 00 04 1E DF 04 8F 20 20 20 44 52 41 57 4E 20 |E...... DRAWN |
000015F0: 49 4E 20 41 4E 59 20 44 49 52 45 43 54 49 4F 4E |IN ANY DIRECTION|
00001600: 20 41 4E 44 00 28 1E E0 04 8F 20 20 20 54 48 45 | AND.(.... THE|
00001610: 20 50 45 4E 20 43 41 4E 20 42 45 20 4D 4F 56 45 | PEN CAN BE MOVE|
00001620: 44 20 54 4F 20 41 4E 59 00 4B 1E E1 04 8F 20 20 |D TO ANY.K.... |
00001630: 20 50 4F 49 4E 54 20 49 4E 20 54 48 45 20 50 4C | POINT IN THE PL|
00001640: 4F 54 54 49 4E 47 20 41 52 45 41 00 6F 1E E2 04 |OTTING AREA.o...|
00001650: 8F 20 20 20 42 59 20 50 52 49 4E 54 49 4E 47 20 |. BY PRINTING |
00001660: 54 48 45 20 41 50 50 52 4F 50 52 49 41 54 45 00 |THE APPROPRIATE.|
00001670: 94 1E E3 04 8F 20 20 20 43 4F 4D 4D 41 4E 44 20 |..... COMMAND |
00001680: 54 48 52 4F 55 47 48 20 50 4F 52 54 20 31 20 55 |THROUGH PORT 1 U|
00001690: 53 49 4E 47 00 AC 1E E4 04 8F 20 20 20 46 49 4C |SING...... FIL|
000016A0: 45 20 4E 55 4D 42 45 52 20 23 31 2E 00 B2 1E E5 |E NUMBER #1.....|
000016B0: 04 3A 00 D3 1E E6 04 8F 20 20 20 54 48 45 20 46 |.:...... THE F|
000016C0: 4F 52 4D 41 54 20 46 4F 52 20 54 48 45 20 50 52 |ORMAT FOR THE PR|
000016D0: 49 4E 54 00 F6 1E E7 04 8F 20 20 20 53 54 41 54 |INT...... STAT|
000016E0: 45 4D 45 4E 54 20 57 48 45 4E 20 50 52 49 4E 54 |EMENT WHEN PRINT|
000016F0: 49 4E 47 20 54 4F 00 09 1F E8 04 8F 20 20 20 50 |ING TO...... P|
00001700: 4F 52 54 20 31 20 49 53 3A 00 0F 1F E9 04 3A 00 |ORT 1 IS:.....:.|
00001710: 2A 1F EA 04 8F 20 20 20 20 20 20 50 52 49 4E 54 |*.... PRINT|
00001720: 23 31 2C 22 43 22 2C 58 2C 59 00 30 1F EB 04 3A |#1,"C",X,Y.0...:|
00001730: 00 3F 1F EC 04 8F 20 20 20 57 48 45 52 45 3A 00 |.?.... WHERE:.|
00001740: 45 1F ED 04 3A 00 67 1F EE 04 8F 20 20 20 20 20 |E...:.g.... |
00001750: 43 20 3D 20 4F 4E 45 20 4F 46 20 54 48 45 20 43 |C = ONE OF THE C|
00001760: 4F 4D 4D 41 4E 44 53 00 86 1F EF 04 8F 20 20 20 |OMMANDS...... |
00001770: 20 20 58 20 3D 20 54 48 45 20 58 20 43 4F 4F 52 | X = THE X COOR|
00001780: 44 49 4E 41 54 45 00 A5 1F F0 04 8F 20 20 20 20 |DINATE...... |
00001790: 20 59 20 3D 20 54 48 45 20 59 20 43 4F 4F 52 44 | Y = THE Y COORD|
000017A0: 49 4E 41 54 45 00 AB 1F F1 04 3A 00 C1 1F F2 04 |INATE.....:.....|
000017B0: 8F 20 20 20 43 4F 4D 4D 41 4E 44 53 20 41 52 45 |. COMMANDS ARE|
000017C0: 3A 00 C7 1F F3 04 3A 00 EB 1F F4 04 8F 20 20 20 |:.....:...... |
000017D0: 20 20 22 49 22 20 3D 20 53 45 54 20 52 45 4C 41 | "I" = SET RELA|
000017E0: 54 49 56 45 20 4F 52 49 47 49 4E 00 0E 20 F5 04 |TIVE ORIGIN.. ..|
000017F0: 8F 20 20 20 20 20 22 48 22 20 3D 20 4D 4F 56 45 |. "H" = MOVE|
00001800: 20 48 4F 4D 45 20 41 42 53 4F 4C 55 54 45 00 33 | HOME ABSOLUTE.3|
00001810: 20 F6 04 8F 20 20 20 20 20 22 4D 22 20 3D 20 4D | ... "M" = M|
00001820: 4F 56 45 20 41 42 53 4F 4C 55 54 45 20 54 4F 20 |OVE ABSOLUTE TO |
00001830: 58 2C 59 00 58 20 F7 04 8F 20 20 20 20 20 22 52 |X,Y.X ... "R|
00001840: 22 20 3D 20 4D 4F 56 45 20 52 45 4C 41 54 49 56 |" = MOVE RELATIV|
00001850: 45 20 54 4F 20 58 2C 59 00 7D 20 F8 04 8F 20 20 |E TO X,Y.} ... |
00001860: 20 20 20 22 44 22 20 3D 20 44 52 41 57 20 41 42 | "D" = DRAW AB|
00001870: 53 4F 4C 55 54 45 20 54 4F 20 58 2C 59 00 A2 20 |SOLUTE TO X,Y.. |
00001880: F9 04 8F 20 20 20 20 20 22 4A 22 20 3D 20 44 52 |... "J" = DR|
00001890: 41 57 20 52 45 4C 41 54 49 56 45 20 54 4F 20 58 |AW RELATIVE TO X|
000018A0: 2C 59 00 A8 20 FA 04 3A 00 B6 20 FB 04 8F 20 20 |,Y.. ..:.. ... |
000018B0: 20 4E 4F 54 45 3A 00 BC 20 FC 04 3A 00 DC 20 FD | NOTE:.. ..:.. .|
000018C0: 04 8F 20 20 20 20 20 4D 4F 56 45 20 2D 20 49 4D |.. MOVE - IM|
000018D0: 50 4C 49 45 53 20 50 45 4E 20 55 50 00 FE 20 FE |PLIES PEN UP.. .|
000018E0: 04 8F 20 20 20 20 20 44 52 41 57 20 2D 20 49 4D |.. DRAW - IM|
000018F0: 50 4C 49 45 53 20 50 45 4E 20 44 4F 57 4E 00 21 |PLIES PEN DOWN.!|
00001900: 21 FF 04 8F 20 20 20 20 20 41 42 53 4F 4C 55 54 |!... ABSOLUT|
00001910: 45 20 2D 20 52 45 46 45 52 45 4E 43 45 44 20 54 |E - REFERENCED T|
00001920: 4F 00 44 21 00 05 8F 20 20 20 20 20 20 20 20 20 |O.D!... |
00001930: 20 20 20 20 20 20 20 48 4F 4D 45 20 50 4F 53 49 | HOME POSI|
00001940: 54 49 4F 4E 00 67 21 01 05 8F 20 20 20 20 20 52 |TION.g!... R|
00001950: 45 4C 41 54 49 56 45 20 2D 20 52 45 46 45 52 45 |ELATIVE - REFERE|
00001960: 4E 43 45 44 20 54 4F 00 8C 21 02 05 8F 20 20 20 |NCED TO..!... |
00001970: 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 4C | REL|
00001980: 41 54 49 56 45 20 4F 52 49 47 49 4E 00 AE 21 03 |ATIVE ORIGIN..!.|
00001990: 05 8F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
000019A0: 20 20 53 45 54 20 57 49 54 48 20 22 49 22 00 B4 | SET WITH "I"..|
000019B0: 21 04 05 3A 00 D8 21 05 05 8F 22 20 D5 C0 C0 C0 |!..:..!..." ....|
000019C0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000019D0: C0 C0 C0 C0 C0 C0 C0 C9 00 FC 21 06 05 8F 22 20 |..........!..." |
000019E0: DD 20 20 20 50 4C 4F 54 54 49 4E 47 20 41 52 45 |. PLOTTING ARE|
000019F0: 41 20 42 4F 55 4E 44 53 20 20 20 DD 00 20 22 07 |A BOUNDS .. ".|
00001A00: 05 8F 22 20 CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |.." ............|
00001A10: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 CB |................|
00001A20: 00 26 22 08 05 3A 00 49 22 09 05 8F 20 20 20 54 |.&"..:.I"... T|
00001A30: 48 45 20 50 4C 4F 54 54 49 4E 47 20 41 52 45 41 |HE PLOTTING AREA|
00001A40: 20 49 53 20 41 42 4F 55 54 00 6B 22 0A 05 8F 20 | IS ABOUT.k"... |
00001A50: 20 20 33 20 33 2F 34 20 49 4E 43 45 53 20 57 49 | 3 3/4 INCES WI|
00001A60: 44 45 20 42 59 20 41 42 4F 55 54 00 8D 22 0B 05 |DE BY ABOUT.."..|
00001A70: 8F 20 20 20 31 35 20 33 2F 34 20 49 4E 43 48 45 |. 15 3/4 INCHE|
00001A80: 53 20 4C 4F 4E 47 2E 20 49 53 20 49 53 00 AB 22 |S LONG. IS IS.."|
00001A90: 0C 05 8F 20 20 20 47 52 41 44 55 41 54 45 44 20 |... GRADUATED |
00001AA0: 41 53 20 46 4F 4C 4C 4F 57 53 3A 00 B1 22 0D 05 |AS FOLLOWS:.."..|
00001AB0: 3A 00 D4 22 0E 05 8F 20 20 20 20 30 2C 39 39 38 |:.."... 0,998|
00001AC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 34 37 39 | 479|
00001AD0: 2C 39 39 38 00 F8 22 0F 05 8F 22 20 20 B0 C0 C0 |,998.."..." ...|
00001AE0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001AF0: C0 C0 C0 C0 C0 C0 C0 AE 00 1C 23 10 05 8F 22 20 |..........#..." |
00001B00: 20 DD 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | . |
00001B10: 20 20 20 20 20 20 20 20 20 20 20 DD 00 40 23 11 | ..@#.|
00001B20: 05 8F 22 20 20 DD 20 20 20 20 20 20 20 20 20 20 |.." . |
00001B30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DD | .|
00001B40: 00 64 23 12 05 8F 20 20 20 2F 20 20 20 20 20 20 |.d#... / |
00001B50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001B60: 20 20 20 2F 00 88 23 13 05 8F 22 20 20 DD 20 20 | /..#..." . |
00001B70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001B80: 20 20 20 20 20 20 20 DD 00 AC 23 14 05 8F 22 20 | ...#..." |
00001B90: 20 DD 30 2C 30 20 28 48 4F 4D 45 29 20 20 20 20 | .0,0 (HOME) |
00001BA0: 20 20 20 20 20 20 34 37 39 2C 30 DD 00 D0 23 15 | 479,0...#.|
00001BB0: 05 8F 22 20 20 AB C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |.." ...........|
00001BC0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 B3 |................|
00001BD0: 00 F4 23 16 05 8F 22 20 20 DD 20 20 20 20 20 20 |..#..." . |
00001BE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001BF0: 20 20 20 DD 00 18 24 17 05 8F 22 20 20 DD 20 20 | ...$..." . |
00001C00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001C10: 20 20 20 20 20 20 20 DD 00 3C 24 18 05 8F 20 20 | ..<$... |
00001C20: 20 2F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | / |
00001C30: 20 20 20 20 20 20 20 20 20 20 20 2F 00 60 24 19 | /.`$.|
00001C40: 05 8F 22 20 20 DD 20 20 20 20 20 20 20 20 20 20 |.." . |
00001C50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DD | .|
00001C60: 00 84 24 1A 05 8F 22 20 20 DD 30 2C 2D 39 39 38 |..$..." .0,-998|
00001C70: 20 20 20 20 20 20 20 20 20 20 20 34 37 39 2C 2D | 479,-|
00001C80: 39 39 38 DD 00 A8 24 1B 05 8F 22 20 20 AD C0 C0 |998...$..." ...|
00001C90: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001CA0: C0 C0 C0 C0 C0 C0 C0 BD 00 AE 24 1C 05 3A 00 D2 |..........$..:..|
00001CB0: 24 1D 05 8F 22 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 |$..." ..........|
00001CC0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001CD0: C0 C9 00 F6 24 1E 05 8F 22 20 DD 20 20 50 4C 4F |....$..." . PLO|
00001CE0: 54 54 49 4E 47 20 57 49 54 48 20 41 42 53 4F 4C |TTING WITH ABSOL|
00001CF0: 55 54 45 20 20 DD 00 1A 25 1F 05 8F 22 20 DD 20 |UTE ...%..." . |
00001D00: 20 43 4F 4F 52 44 49 4E 41 54 45 20 20 52 45 46 | COORDINATE REF|
00001D10: 45 52 45 4E 43 45 53 20 20 DD 00 3E 25 20 05 8F |ERENCES ..>% ..|
00001D20: 22 20 CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |" ..............|
00001D30: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 CB 00 44 |...............D|
00001D40: 25 21 05 3A 00 67 25 22 05 8F 20 20 20 41 42 53 |%!.:.g%".. ABS|
00001D50: 4F 4C 55 54 45 20 50 4C 4F 54 20 43 4F 4D 4D 41 |OLUTE PLOT COMMA|
00001D60: 4E 44 53 20 41 52 45 00 8A 25 23 05 8F 20 20 20 |NDS ARE..%#.. |
00001D70: 52 45 46 45 52 45 4E 43 45 44 20 52 45 4C 41 54 |REFERENCED RELAT|
00001D80: 49 56 45 20 54 4F 20 54 48 45 00 AC 25 24 05 8F |IVE TO THE..%$..|
00001D90: 20 20 20 48 4F 4D 45 20 50 4F 53 49 54 49 4F 4E | HOME POSITION|
00001DA0: 20 28 58 3D 30 2C 20 59 3D 30 29 2E 00 D1 25 25 | (X=0, Y=0)...%%|
00001DB0: 05 8F 20 20 20 48 4F 4D 45 20 50 4F 53 49 54 49 |.. HOME POSITI|
00001DC0: 4F 4E 20 49 53 20 45 53 54 41 42 4C 49 53 48 45 |ON IS ESTABLISHE|
00001DD0: 44 00 F6 25 26 05 8F 20 20 20 55 50 4F 4E 20 50 |D..%&.. UPON P|
00001DE0: 4F 57 45 52 20 4F 4E 20 4F 52 20 42 59 20 50 52 |OWER ON OR BY PR|
00001DF0: 49 4E 54 49 4E 47 00 18 26 27 05 8F 20 20 20 41 |INTING..&'.. A|
00001E00: 20 43 41 52 52 49 41 47 45 20 52 45 54 55 52 4E | CARRIAGE RETURN|
00001E10: 20 54 48 52 4F 55 47 48 00 37 26 28 05 8F 20 20 | THROUGH.7&(.. |
00001E20: 20 50 4F 52 54 20 30 2C 20 46 49 4C 45 20 4E 55 | PORT 0, FILE NU|
00001E30: 4D 45 52 20 23 34 2E 00 3D 26 29 05 3A 00 5F 26 |MER #4..=&).:._&|
00001E40: 2A 05 8F 20 4D 4F 56 45 20 54 48 45 20 50 45 4E |*.. MOVE THE PEN|
00001E50: 20 54 4F 20 41 52 45 41 20 42 4F 54 54 4F 4D 00 | TO AREA BOTTOM.|
00001E60: 65 26 2B 05 3A 00 7B 26 2C 05 3A 20 20 20 98 31 |e&+.:.{&,.: .1|
00001E70: 2C 22 4D 22 2C 30 2C AB 39 39 38 00 81 26 2D 05 |,"M",0,.998..&-.|
00001E80: 3A 00 A3 26 2E 05 8F 20 45 53 54 41 42 4C 49 53 |:..&... ESTABLIS|
00001E90: 48 20 4E 45 57 20 48 4F 4D 45 20 50 4F 53 49 54 |H NEW HOME POSIT|
00001EA0: 49 4F 4E 00 A9 26 2F 05 3A 00 B4 26 30 05 3A 20 |ION..&/.:..&0.: |
00001EB0: 20 20 98 34 00 BA 26 31 05 3A 00 DE 26 32 05 8F | .4..&1.:..&2..|
00001EC0: 22 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |" ..............|
00001ED0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 00 02 |................|
00001EE0: 27 33 05 8F 22 20 DD 20 44 52 41 57 20 42 4F 55 |'3.." . DRAW BOU|
00001EF0: 4E 44 53 20 4F 46 20 50 4C 4F 54 20 41 52 45 41 |NDS OF PLOT AREA|
00001F00: 20 DD 00 26 27 34 05 8F 22 20 CA C0 C0 C0 C0 C0 | ..&'4.." ......|
00001F10: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001F20: C0 C0 C0 C0 C0 CB 00 2C 27 35 05 3A 00 44 27 36 |.......,'5.:.D'6|
00001F30: 05 3A 20 20 20 98 31 2C 22 44 22 2C 20 20 30 2C |.: .1,"D", 0,|
00001F40: AB 39 39 38 00 5C 27 37 05 3A 20 20 20 98 31 2C |.998.\'7.: .1,|
00001F50: 22 44 22 2C 34 37 39 2C AB 39 39 38 00 74 27 38 |"D",479,.998.t'8|
00001F60: 05 3A 20 20 20 98 31 2C 22 44 22 2C 34 37 39 2C |.: .1,"D",479,|
00001F70: 20 39 39 38 00 8C 27 39 05 3A 20 20 20 98 31 2C | 998..'9.: .1,|
00001F80: 22 44 22 2C 20 20 30 2C 20 39 39 38 00 A4 27 3A |"D", 0, 998..':|
00001F90: 05 3A 20 20 20 98 31 2C 22 44 22 2C 20 20 30 2C |.: .1,"D", 0,|
00001FA0: 20 20 20 30 00 BC 27 3B 05 3A 20 20 20 98 31 2C | 0..';.: .1,|
00001FB0: 22 44 22 2C 34 37 39 2C 20 20 20 30 00 C2 27 3C |"D",479, 0..'<|
00001FC0: 05 3A 00 E6 27 3D 05 8F 22 20 D5 C0 C0 C0 C0 C0 |.:..'=.." ......|
00001FD0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001FE0: C0 C0 C0 C0 C0 C9 00 0A 28 3E 05 8F 22 A0 DD 20 |........(>..".. |
00001FF0: 20 50 4C 4F 54 54 49 4E 47 20 41 4E 44 20 50 52 | PLOTTING AND PR|
00002000: 49 4E 54 49 4E 47 20 20 20 DD 00 2E 28 3F 05 8F |INTING ...(?..|
00002010: 22 20 CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |" ..............|
00002020: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 CB 00 34 |...............4|
00002030: 28 40 05 3A 00 55 28 41 05 8F 20 20 20 43 48 41 |(@.:.U(A.. CHA|
00002040: 52 41 43 54 45 52 20 53 45 54 20 44 49 4D 45 4E |RACTER SET DIMEN|
00002050: 53 49 4F 4E 53 00 5B 28 42 05 3A 00 7B 28 43 05 |SIONS.[(B.:.{(C.|
00002060: 8F 20 20 20 57 48 45 4E 20 43 4F 4D 42 49 4E 49 |. WHEN COMBINI|
00002070: 4E 47 20 50 4C 4F 54 54 49 4E 47 00 9B 28 44 05 |NG PLOTTING..(D.|
00002080: 8F 20 20 20 57 49 54 48 20 50 52 49 4E 54 49 4E |. WITH PRINTIN|
00002090: 47 20 41 53 20 49 4E 20 54 48 45 00 BE 28 45 05 |G AS IN THE..(E.|
000020A0: 8F 20 20 20 45 58 41 4D 50 4C 45 20 42 45 4C 4F |. EXAMPLE BELO|
000020B0: 57 2C 20 54 48 45 20 53 49 5A 45 20 4F 46 00 E2 |W, THE SIZE OF..|
000020C0: 28 46 05 8F 20 20 20 54 48 45 20 50 52 49 4E 54 |(F.. THE PRINT|
000020D0: 45 44 20 43 48 41 52 41 43 54 45 52 53 20 4D 55 |ED CHARACTERS MU|
000020E0: 53 54 00 03 29 47 05 8F 20 20 20 42 45 20 4B 4E |ST..)G.. BE KN|
000020F0: 4F 57 4E 20 49 4E 20 54 45 52 4D 53 20 4F 46 20 |OWN IN TERMS OF |
00002100: 54 48 45 00 28 29 48 05 8F 20 20 20 50 4C 4F 54 |THE.()H.. PLOT|
00002110: 54 49 4E 47 20 41 52 45 41 20 55 4E 49 54 53 2E |TING AREA UNITS.|
00002120: 20 41 20 54 41 42 4C 45 00 4C 29 49 05 8F 20 20 | A TABLE.L)I.. |
00002130: 20 4F 46 20 43 48 41 52 41 43 54 45 52 20 53 49 | OF CHARACTER SI|
00002140: 5A 45 20 43 4F 44 45 53 20 41 4E 44 00 71 29 4A |ZE CODES AND.q)J|
00002150: 05 8F 20 20 20 54 48 45 49 52 20 43 4F 52 52 45 |.. THEIR CORRE|
00002160: 53 50 4F 4E 44 49 4E 47 20 50 4C 4F 54 54 49 4E |SPONDING PLOTTIN|
00002170: 47 00 92 29 4B 05 8F 20 20 20 41 52 45 41 20 44 |G..)K.. AREA D|
00002180: 49 4D 45 4E 53 49 4F 4E 53 20 46 4F 4C 4C 4F 57 |IMENSIONS FOLLOW|
00002190: 53 3A 00 98 29 4C 05 3A 00 B6 29 4D 05 8F 20 20 |S:..)L.:..)M.. |
000021A0: 20 53 49 5A 45 20 20 20 20 20 20 20 20 43 48 41 | SIZE CHA|
000021B0: 52 41 43 54 45 52 00 D4 29 4E 05 8F 20 20 20 43 |RACTER..)N.. C|
000021C0: 4F 44 45 20 20 20 20 20 20 20 20 44 49 4D 45 4E |ODE DIMEN|
000021D0: 53 49 4F 4E 00 F7 29 4F 05 8F 22 20 C0 C0 C0 C0 |SION..)O.." ....|
000021E0: C0 C0 20 20 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |.. ............|
000021F0: C0 C0 C0 C0 C0 C0 C0 00 FD 29 50 05 3A 00 20 2A |.........)P.:. *|
00002200: 51 05 8F 20 20 20 22 30 22 20 20 20 20 20 31 30 |Q.. "0" 10|
00002210: 20 48 49 47 48 20 42 59 20 20 36 20 57 49 44 45 | HIGH BY 6 WIDE|
00002220: 00 43 2A 52 05 8F 20 20 20 22 31 22 20 20 20 20 |.C*R.. "1" |
00002230: 20 32 30 20 48 49 47 48 20 42 59 20 31 32 20 57 | 20 HIGH BY 12 W|
00002240: 49 44 45 00 66 2A 53 05 8F 20 20 20 22 32 22 20 |IDE.f*S.. "2" |
00002250: 20 20 20 20 34 30 20 48 49 47 48 20 42 59 20 32 | 40 HIGH BY 2|
00002260: 34 20 57 49 44 45 00 89 2A 54 05 8F 20 20 20 22 |4 WIDE..*T.. "|
00002270: 33 22 20 20 20 20 20 38 30 20 48 49 47 48 20 42 |3" 80 HIGH B|
00002280: 59 20 34 38 20 57 49 44 45 00 8F 2A 55 05 3A 00 |Y 48 WIDE..*U.:.|
00002290: B3 2A 56 05 8F 22 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 |.*V.." .........|
000022A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000022B0: C0 C0 C9 00 D7 2A 57 05 8F 22 20 DD 20 4C 41 42 |.....*W.." . LAB|
000022C0: 45 4C 20 50 4F 49 4E 54 53 20 4F 46 20 50 4C 4F |EL POINTS OF PLO|
000022D0: 54 20 41 52 45 41 DD 00 FB 2A 58 05 8F 22 20 CA |T AREA...*X.." .|
000022E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000022F0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 CB 00 01 2B 59 05 |.............+Y.|
00002300: 3A 00 20 2B 5A 05 8F 20 4D 4F 56 45 20 54 4F 20 |:. +Z.. MOVE TO |
00002310: 54 4F 50 20 4F 46 20 50 4C 4F 54 20 41 52 45 41 |TOP OF PLOT AREA|
00002320: 00 26 2B 5B 05 3A 00 3E 2B 5C 05 3A 20 20 20 98 |.&+[.:.>+\.: .|
00002330: 31 2C 22 4D 22 2C 20 20 30 2C 20 39 39 38 00 44 |1,"M", 0, 998.D|
00002340: 2B 5D 05 3A 00 60 2B 5E 05 8F 20 50 52 49 4E 54 |+].:.`+^.. PRINT|
00002350: 20 54 4F 50 20 43 4F 4F 52 44 49 4E 41 54 45 53 | TOP COORDINATES|
00002360: 00 66 2B 5F 05 3A 00 71 2B 60 05 3A 20 20 20 98 |.f+_.:.q+`.: .|
00002370: 34 00 86 2B 61 05 3A 20 20 20 98 34 2C 22 20 30 |4..+a.: .4," 0|
00002380: 2C 39 39 38 22 3B 00 9F 2B 62 05 3A 20 20 20 98 |,998";..+b.: .|
00002390: 34 2C A3 32 37 29 22 34 37 39 2C 39 39 38 22 00 |4,.27)"479,998".|
000023A0: A5 2B 63 05 3A 00 C9 2B 64 05 8F 20 50 52 49 4E |.+c.:..+d.. PRIN|
000023B0: 54 49 4E 47 20 57 49 54 48 20 43 41 52 52 49 41 |TING WITH CARRIA|
000023C0: 47 45 20 52 45 54 55 52 4E 00 E7 2B 65 05 8F 20 |GE RETURN..+e.. |
000023D0: 43 41 55 53 45 44 20 41 20 4E 45 57 20 48 4F 4D |CAUSED A NEW HOM|
000023E0: 45 20 54 4F 20 42 45 00 08 2C 66 05 8F 20 44 45 |E TO BE..,f.. DE|
000023F0: 46 49 4E 45 44 2C 20 53 4F 20 4D 4F 56 45 20 54 |FINED, SO MOVE T|
00002400: 4F 20 4D 49 44 44 4C 45 00 2C 2C 67 05 8F 20 4F |O MIDDLE.,,g.. O|
00002410: 46 20 50 4C 4F 54 20 41 52 45 41 20 57 48 49 4C |F PLOT AREA WHIL|
00002420: 45 20 42 41 43 4B 49 4E 47 20 55 50 00 50 2C 68 |E BACKING UP.P,h|
00002430: 05 8F 20 54 48 45 20 48 45 49 47 48 54 20 4F 46 |.. THE HEIGHT OF|
00002440: 20 4F 4E 45 20 50 52 49 4E 54 20 4C 49 4E 45 2E | ONE PRINT LINE.|
00002450: 00 56 2C 69 05 3A 00 71 2C 6A 05 3A 20 20 20 98 |.V,i.:.q,j.: .|
00002460: 31 2C 22 4D 22 2C 20 20 30 2C AB 39 39 38 AA 32 |1,"M", 0,.998.2|
00002470: 30 00 77 2C 6B 05 3A 00 96 2C 6C 05 8F 20 50 52 |0.w,k.:..,l.. PR|
00002480: 49 4E 54 20 4D 49 44 44 4C 45 20 43 4F 4F 52 44 |INT MIDDLE COORD|
00002490: 49 4E 41 54 45 53 00 9C 2C 6D 05 3A 00 B6 2C 6E |INATES..,m.:..,n|
000024A0: 05 3A 20 20 20 98 34 2C 22 20 30 2C 30 20 28 48 |.: .4," 0,0 (H|
000024B0: 4F 4D 45 29 22 3B 00 CD 2C 6F 05 3A 20 20 20 98 |OME)";..,o.: .|
000024C0: 34 2C A3 32 34 29 22 34 37 39 2C 30 22 00 D3 2C |4,.24)"479,0"..,|
000024D0: 70 05 3A 00 F5 2C 71 05 8F 20 4D 4F 56 45 20 54 |p.:..,q.. MOVE T|
000024E0: 4F 20 42 4F 54 54 4F 4D 20 4F 46 20 50 4C 4F 54 |O BOTTOM OF PLOT|
000024F0: 20 41 52 45 41 00 1A 2D 72 05 8F 20 57 48 49 4C | AREA..-r.. WHIL|
00002500: 45 20 42 41 43 4B 49 4E 47 20 55 50 20 54 48 45 |E BACKING UP THE|
00002510: 20 48 45 49 47 48 54 20 4F 46 00 3B 2D 73 05 8F | HEIGHT OF.;-s..|
00002520: 20 4F 4E 45 20 50 52 49 4E 54 20 4C 49 4E 45 2C | ONE PRINT LINE,|
00002530: 20 41 53 20 42 45 46 4F 52 45 2E 00 41 2D 74 05 | AS BEFORE..A-t.|
00002540: 3A 00 5C 2D 75 05 3A 20 20 20 98 31 2C 22 4D 22 |:.\-u.: .1,"M"|
00002550: 2C 20 20 30 2C AB 39 39 38 AA 32 30 00 62 2D 76 |, 0,.998.20.b-v|
00002560: 05 3A 00 85 2D 77 05 8F 20 50 52 49 4E 54 20 54 |.:..-w.. PRINT T|
00002570: 48 45 20 42 4F 54 54 4F 4D 20 43 4F 4F 52 44 49 |HE BOTTOM COORDI|
00002580: 4E 41 54 45 53 00 8B 2D 78 05 3A 00 A1 2D 79 05 |NATES..-x.:..-y.|
00002590: 3A 20 20 20 98 34 2C 22 20 30 2C 2D 39 39 38 22 |: .4," 0,-998"|
000025A0: 3B 00 BB 2D 7A 05 3A 20 20 20 98 34 2C A3 32 35 |;..-z.: .4,.25|
000025B0: 29 22 34 37 39 2C 2D 39 39 38 22 00 C6 2D 7B 05 |)"479,-998"..-{.|
000025C0: 3A 20 20 20 98 34 00 CC 2D 7C 05 3A 00 F0 2D 7D |: .4..-|.:..-}|
000025D0: 05 8F 22 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |.." ............|
000025E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 |................|
000025F0: 00 14 2E 7E 05 8F 22 20 DD 20 20 20 50 4C 4F 54 |...~.." . PLOT|
00002600: 54 49 4E 47 20 46 55 4E 43 54 49 4F 4E 53 20 20 |TING FUNCTIONS |
00002610: 20 20 20 DD 00 38 2E 7F 05 8F 22 20 CA C0 C0 C0 | ..8...." ....|
00002620: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00002630: C0 C0 C0 C0 C0 C0 C0 CB 00 3E 2E 80 05 3A 00 61 |.........>...:.a|
00002640: 2E 81 05 8F 20 20 20 54 48 45 20 46 4F 4C 4C 4F |.... THE FOLLO|
00002650: 57 49 4E 47 20 54 57 4F 20 45 58 41 4D 50 4C 45 |WING TWO EXAMPLE|
00002660: 53 00 81 2E 82 05 8F 20 20 20 44 45 4D 4F 4E 53 |S...... DEMONS|
00002670: 54 52 41 54 45 20 50 4C 4F 54 54 49 4E 47 20 4F |TRATE PLOTTING O|
00002680: 46 00 A6 2E 83 05 8F 20 20 20 46 55 4E 43 54 49 |F...... FUNCTI|
00002690: 4F 4E 53 2E 20 54 48 45 20 46 49 52 53 54 20 45 |ONS. THE FIRST E|
000026A0: 58 41 4D 50 4C 45 00 C7 2E 84 05 8F 20 20 20 50 |XAMPLE...... P|
000026B0: 4C 4F 54 53 20 41 20 53 49 4E 45 20 43 55 52 56 |LOTS A SINE CURV|
000026C0: 45 20 55 53 49 4E 47 00 E7 2E 85 05 8F 20 20 20 |E USING...... |
000026D0: 54 48 45 20 41 42 53 4F 4C 55 54 45 20 43 4F 4F |THE ABSOLUTE COO|
000026E0: 52 44 49 4E 41 54 45 00 0B 2F 86 05 8F 20 20 20 |RDINATE../... |
000026F0: 52 45 46 45 52 45 4E 43 45 20 52 45 4C 41 54 49 |REFERENCE RELATI|
00002700: 56 45 20 54 4F 20 48 4F 4D 45 2E 00 11 2F 87 05 |VE TO HOME.../..|
00002710: 3A 00 35 2F 88 05 8F 22 20 D5 C0 C0 C0 C0 C0 C0 |:.5/..." .......|
00002720: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00002730: C0 C0 C0 C0 C9 00 59 2F 89 05 8F 22 A0 DD 20 20 |......Y/...".. |
00002740: 50 4C 4F 54 54 49 4E 47 20 41 20 53 49 4E 45 20 |PLOTTING A SINE |
00002750: 43 55 52 56 45 20 20 20 DD 00 7D 2F 8A 05 8F 22 |CURVE ..}/..."|
00002760: 20 CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 | ...............|
00002770: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 CB 00 83 2F |.............../|
00002780: 8B 05 3A 00 9C 2F 8C 05 8F 20 45 4A 45 43 54 20 |..:../... EJECT |
00002790: 45 4E 4F 55 47 48 20 50 41 50 45 52 00 A2 2F 8D |ENOUGH PAPER../.|
000027A0: 05 3A 00 BA 2F 8E 05 3A 20 20 20 98 31 2C 22 4D |.:../..: .1,"M|
000027B0: 22 2C 20 20 30 2C AB 32 30 30 00 C0 2F 8F 05 3A |", 0,.200../..:|
000027C0: 00 E2 2F 90 05 8F 20 45 53 54 41 42 4C 49 53 48 |../... ESTABLISH|
000027D0: 20 4E 45 57 20 48 4F 4D 45 20 50 4F 53 49 54 49 | NEW HOME POSITI|
000027E0: 4F 4E 00 E8 2F 91 05 3A 00 F3 2F 92 05 3A 20 20 |ON../..:../..: |
000027F0: 20 98 34 00 F9 2F 93 05 3A 00 1D 30 94 05 8F 20 | .4../..:..0... |
00002800: 44 52 41 57 20 42 4F 58 20 34 30 30 20 48 49 47 |DRAW BOX 400 HIG|
00002810: 48 20 42 59 20 34 37 39 20 57 49 44 45 00 23 30 |H BY 479 WIDE.#0|
00002820: 95 05 3A 00 3B 30 96 05 3A 20 20 20 98 31 2C 22 |..:.;0..: .1,"|
00002830: 44 22 2C 20 20 30 2C 20 32 30 30 00 53 30 97 05 |D", 0, 200.S0..|
00002840: 3A 20 20 20 98 31 2C 22 44 22 2C 34 37 39 2C 20 |: .1,"D",479, |
00002850: 32 30 30 00 6B 30 98 05 3A 20 20 20 98 31 2C 22 |200.k0..: .1,"|
00002860: 44 22 2C 34 37 39 2C AB 32 30 30 00 83 30 99 05 |D",479,.200..0..|
00002870: 3A 20 20 20 98 31 2C 22 44 22 2C 20 20 30 2C AB |: .1,"D", 0,.|
00002880: 32 30 30 00 9B 30 9A 05 3A 20 20 20 98 31 2C 22 |200..0..: .1,"|
00002890: 44 22 2C 20 20 30 2C 20 20 20 30 00 B3 30 9B 05 |D", 0, 0..0..|
000028A0: 3A 20 20 20 98 31 2C 22 44 22 2C 34 37 39 2C 20 |: .1,"D",479, |
000028B0: 20 20 30 00 B9 30 9C 05 3A 00 CE 30 9D 05 8F 20 | 0..0..:..0... |
000028C0: 52 45 54 55 52 4E 20 54 4F 20 48 4F 4D 45 00 D4 |RETURN TO HOME..|
000028D0: 30 9E 05 3A 00 E3 30 9F 05 3A 20 20 20 98 31 2C |0..:..0..: .1,|
000028E0: 22 48 22 00 E9 30 A0 05 3A 00 0C 31 A1 05 8F 20 |"H"..0..:..1... |
000028F0: 44 52 41 57 20 41 20 53 49 4E 45 20 57 41 56 45 |DRAW A SINE WAVE|
00002900: 20 49 4E 20 54 48 45 20 42 4F 58 2E 00 12 31 A2 | IN THE BOX...1.|
00002910: 05 3A 00 31 31 A3 05 8F 20 54 48 45 20 56 41 52 |.:.11... THE VAR|
00002920: 49 41 42 4C 45 20 49 20 57 49 4C 4C 20 54 41 4B |IABLE I WILL TAK|
00002930: 45 00 54 31 A4 05 8F 20 56 41 4C 55 45 53 20 46 |E.T1... VALUES F|
00002940: 52 4F 4D 20 30 20 54 4F 20 33 36 30 20 44 45 47 |ROM 0 TO 360 DEG|
00002950: 52 45 45 53 00 78 31 A5 05 8F 20 28 32 2A FF 20 |REES.x1... (2*. |
00002960: 52 41 44 49 41 4E 53 29 2E 20 54 48 45 20 53 54 |RADIANS). THE ST|
00002970: 45 50 20 56 41 4C 55 45 00 97 31 A6 05 8F 20 57 |EP VALUE..1... W|
00002980: 49 4C 4C 20 50 52 4F 44 55 43 45 20 32 30 30 20 |ILL PRODUCE 200 |
00002990: 53 41 4D 50 4C 45 53 00 BB 31 A7 05 8F 20 41 4C |SAMPLES..1... AL|
000029A0: 4F 4E 47 20 54 48 45 20 58 20 41 58 49 53 20 56 |ONG THE X AXIS V|
000029B0: 41 52 59 49 4E 47 20 46 52 4F 4D 00 DE 31 A8 05 |ARYING FROM..1..|
000029C0: 8F 20 30 20 54 4F 20 34 37 39 2E 20 54 48 45 20 |. 0 TO 479. THE |
000029D0: 53 49 4E 45 20 57 49 4C 4C 20 56 41 52 59 00 01 |SINE WILL VARY..|
000029E0: 32 A9 05 8F 20 42 45 54 57 45 45 4E 20 2B 31 20 |2... BETWEEN +1 |
000029F0: 41 4E 44 20 2D 31 2E 20 54 48 45 20 56 41 4C 55 |AND -1. THE VALU|
00002A00: 45 00 26 32 AA 05 8F 20 4F 46 20 59 2C 20 54 48 |E.&2... OF Y, TH|
00002A10: 45 52 45 46 4F 52 45 20 56 41 52 49 45 53 20 42 |EREFORE VARIES B|
00002A20: 45 54 57 45 45 4E 00 3B 32 AB 05 8F 20 2B 32 30 |ETWEEN.;2... +20|
00002A30: 30 20 41 4E 44 20 2D 32 30 30 2E 00 41 32 AC 05 |0 AND -200..A2..|
00002A40: 3A 00 5D 32 AD 05 3A 20 20 20 81 20 49 B2 30 20 |:.]2..: . I.0 |
00002A50: A4 20 32 AC FF 20 A9 20 FF AD 31 30 30 00 76 32 |. 2.. . ..100.v2|
00002A60: AE 05 3A 20 20 20 20 20 20 58 B2 49 AC 34 37 39 |..: X.I.479|
00002A70: AD 28 32 AC FF 29 00 8C 32 AF 05 3A 20 20 20 20 |.(2..)..2..: |
00002A80: 20 20 59 B2 BF 28 49 29 AC 32 30 30 00 A2 32 B0 | Y..(I).200..2.|
00002A90: 05 3A 20 20 20 20 20 20 98 31 2C 22 44 22 2C 58 |.: .1,"D",X|
00002AA0: 2C 59 00 AE 32 B1 05 3A 20 20 20 82 20 49 00 B4 |,Y..2..: . I..|
00002AB0: 32 B2 05 3A 00 CC 32 B3 05 8F 20 45 4A 45 43 54 |2..:..2... EJECT|
00002AC0: 20 54 48 45 20 44 52 41 57 49 4E 47 00 D2 32 B4 | THE DRAWING..2.|
00002AD0: 05 3A 00 EA 32 B5 05 3A 20 20 20 98 31 2C 22 4D |.:..2..: .1,"M|
00002AE0: 22 2C 20 20 30 2C AB 33 30 30 00 F0 32 B6 05 3A |", 0,.300..2..:|
00002AF0: 00 12 33 B7 05 8F 20 45 53 54 41 42 4C 49 53 48 |..3... ESTABLISH|
00002B00: 20 4E 45 57 20 48 4F 4D 45 20 50 4F 53 49 54 49 | NEW HOME POSITI|
00002B10: 4F 4E 00 18 33 B8 05 3A 00 23 33 B9 05 3A 20 20 |ON..3..:.#3..: |
00002B20: 20 98 34 00 29 33 BA 05 3A 00 4D 33 BB 05 8F 22 | .4.)3..:.M3..."|
00002B30: 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 | ...............|
00002B40: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 00 71 33 |..............q3|
00002B50: BC 05 8F 22 20 DD 20 20 20 20 50 4C 4F 54 54 49 |..." . PLOTTI|
00002B60: 4E 47 20 41 20 43 49 52 43 4C 45 20 20 20 20 20 |NG A CIRCLE |
00002B70: DD 00 95 33 BD 05 8F 22 20 CA C0 C0 C0 C0 C0 C0 |...3..." .......|
00002B80: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00002B90: C0 C0 C0 C0 CB 00 9B 33 BE 05 3A 00 B4 33 BF 05 |.......3..:..3..|
00002BA0: 8F 20 45 4A 45 43 54 20 45 4E 4F 55 47 48 20 50 |. EJECT ENOUGH P|
00002BB0: 41 50 45 52 00 BA 33 C0 05 3A 00 D5 33 C1 05 3A |APER..3..:..3..:|
00002BC0: 20 20 20 98 31 2C 22 4D 22 2C 20 20 30 2C AB 32 | .1,"M", 0,.2|
00002BD0: 33 39 AB 32 30 00 DB 33 C2 05 3A 00 FD 33 C3 05 |39.20..3..:..3..|
00002BE0: 8F 20 45 53 54 41 42 4C 49 53 48 20 4E 45 57 20 |. ESTABLISH NEW |
00002BF0: 48 4F 4D 45 20 50 4F 53 49 54 49 4F 4E 00 03 34 |HOME POSITION..4|
00002C00: C4 05 3A 00 0E 34 C5 05 3A 20 20 20 98 34 00 14 |..:..4..: .4..|
00002C10: 34 C6 05 3A 00 37 34 C7 05 8F 20 44 52 41 57 20 |4..:.74... DRAW |
00002C20: 41 20 53 51 55 41 52 45 20 42 4F 58 20 34 37 39 |A SQUARE BOX 479|
00002C30: 20 42 59 20 34 37 39 00 3D 34 C8 05 3A 00 55 34 | BY 479.=4..:.U4|
00002C40: C9 05 3A 20 20 20 98 31 2C 22 44 22 2C 20 20 30 |..: .1,"D", 0|
00002C50: 2C 20 32 33 39 00 6D 34 CA 05 3A 20 20 20 98 31 |, 239.m4..: .1|
00002C60: 2C 22 44 22 2C 34 37 39 2C 20 32 33 39 00 85 34 |,"D",479, 239..4|
00002C70: CB 05 3A 20 20 20 98 31 2C 22 44 22 2C 34 37 39 |..: .1,"D",479|
00002C80: 2C AB 32 33 39 00 9D 34 CC 05 3A 20 20 20 98 31 |,.239..4..: .1|
00002C90: 2C 22 44 22 2C 20 20 30 2C AB 32 33 39 00 B5 34 |,"D", 0,.239..4|
00002CA0: CD 05 3A 20 20 20 98 31 2C 22 44 22 2C 20 20 30 |..: .1,"D", 0|
00002CB0: 2C 20 20 20 30 00 CD 34 CE 05 3A 20 20 20 98 31 |, 0..4..: .1|
00002CC0: 2C 22 44 22 2C 34 37 39 2C 20 20 20 30 00 D3 34 |,"D",479, 0..4|
00002CD0: CF 05 3A 00 F6 34 D0 05 8F 20 4D 4F 56 45 20 54 |..:..4... MOVE T|
00002CE0: 4F 20 43 45 4E 54 45 52 20 4F 46 20 54 48 45 20 |O CENTER OF THE |
00002CF0: 43 49 52 43 4C 45 00 FC 34 D1 05 3A 00 14 35 D2 |CIRCLE..4..:..5.|
00002D00: 05 3A 20 20 20 98 31 2C 22 4D 22 2C 32 33 39 2C |.: .1,"M",239,|
00002D10: 20 20 20 30 00 1A 35 D3 05 3A 00 3C 35 D4 05 8F | 0..5..:.<5...|
00002D20: 20 45 53 54 41 42 4C 49 53 48 20 41 20 52 45 4C | ESTABLISH A REL|
00002D30: 41 54 49 56 45 20 4F 52 49 47 49 4E 00 42 35 D5 |ATIVE ORIGIN.B5.|
00002D40: 05 3A 00 51 35 D6 05 3A 20 20 20 98 31 2C 22 49 |.:.Q5..: .1,"I|
00002D50: 22 00 57 35 D7 05 3A 00 7C 35 D8 05 8F 20 44 52 |".W5..:.|5... DR|
00002D60: 41 57 20 41 20 43 49 52 43 4C 45 20 49 4E 20 54 |AW A CIRCLE IN T|
00002D70: 48 45 20 42 4F 58 20 55 53 49 4E 47 00 9F 35 D9 |HE BOX USING..5.|
00002D80: 05 8F 20 54 48 45 20 22 4A 22 20 43 4F 4D 4D 41 |.. THE "J" COMMA|
00002D90: 4E 44 2C 20 52 45 46 45 52 45 4E 43 49 4E 47 00 |ND, REFERENCING.|
00002DA0: C1 35 DA 05 8F 20 54 48 45 20 52 45 4C 41 54 49 |.5... THE RELATI|
00002DB0: 56 45 20 4F 52 49 47 49 4E 2E 20 42 45 46 4F 52 |VE ORIGIN. BEFOR|
00002DC0: 45 00 E6 35 DB 05 8F 20 50 4C 4F 54 54 49 4E 47 |E..5... PLOTTING|
00002DD0: 20 54 48 45 20 46 49 52 53 54 20 50 4F 49 4E 54 | THE FIRST POINT|
00002DE0: 20 28 57 48 45 4E 00 08 36 DC 05 8F 20 49 3D 30 | (WHEN..6... I=0|
00002DF0: 29 20 55 53 45 20 54 48 45 20 22 52 22 20 43 4F |) USE THE "R" CO|
00002E00: 4D 4D 41 4E 44 20 54 4F 00 2A 36 DD 05 8F 20 4D |MMAND TO.*6... M|
00002E10: 4F 56 45 20 57 49 54 48 20 54 48 45 20 50 45 4E |OVE WITH THE PEN|
00002E20: 20 55 50 20 54 4F 20 54 48 45 00 4E 36 DE 05 8F | UP TO THE.N6...|
00002E30: 20 46 49 52 53 54 20 50 4F 49 4E 54 20 4F 4E 20 | FIRST POINT ON |
00002E40: 54 48 45 20 43 49 52 43 4C 45 2C 20 53 4F 00 72 |THE CIRCLE, SO.r|
00002E50: 36 DF 05 8F 20 57 45 20 44 4F 4E 27 54 20 44 52 |6... WE DON'T DR|
00002E60: 41 57 20 46 52 4F 4D 20 54 48 45 20 43 45 4E 54 |AW FROM THE CENT|
00002E70: 45 52 00 95 36 E0 05 8F 20 54 4F 20 54 48 45 20 |ER..6... TO THE |
00002E80: 46 49 52 53 54 20 50 4F 49 4E 54 2E 20 54 48 45 |FIRST POINT. THE|
00002E90: 20 53 49 4E 45 00 B8 36 E1 05 8F 20 41 4E 44 20 | SINE..6... AND |
00002EA0: 43 4F 53 49 4E 45 20 57 49 4C 4C 20 56 41 52 59 |COSINE WILL VARY|
00002EB0: 20 42 45 54 57 45 45 4E 00 DC 36 E2 05 8F 20 2B | BETWEEN..6... +|
00002EC0: 31 20 41 4E 44 20 2D 31 20 59 49 45 4C 44 49 4E |1 AND -1 YIELDIN|
00002ED0: 47 20 56 41 4C 55 45 53 20 46 4F 52 00 01 37 E3 |G VALUES FOR..7.|
00002EE0: 05 8F 20 58 20 41 4E 44 20 59 20 42 45 54 57 45 |.. X AND Y BETWE|
00002EF0: 45 4E 20 2B 32 33 39 20 41 4E 44 20 2D 32 33 39 |EN +239 AND -239|
00002F00: 2E 00 07 37 E4 05 3A 00 23 37 E5 05 3A 20 20 20 |...7..:.#7..: |
00002F10: 81 20 49 B2 30 20 A4 20 32 AC FF 20 A9 20 FF AD |. I.0 . 2.. . ..|
00002F20: 31 30 30 00 39 37 E6 05 3A 20 20 20 20 20 20 58 |100.97..: X|
00002F30: B2 BF 28 49 29 AC 32 33 39 00 4F 37 E7 05 3A 20 |..(I).239.O7..: |
00002F40: 20 20 20 20 20 59 B2 BE 28 49 29 AC 32 33 39 00 | Y..(I).239.|
00002F50: 6D 37 E8 05 3A 20 20 20 20 20 20 8B 20 49 B2 30 |m7..: . I.0|
00002F60: 20 A7 20 98 31 2C 22 52 22 2C 58 2C 59 00 83 37 | . .1,"R",X,Y..7|
00002F70: E9 05 3A 20 20 20 20 20 20 98 31 2C 22 4A 22 2C |..: .1,"J",|
00002F80: 58 2C 59 00 8F 37 EA 05 3A 20 20 20 82 20 49 00 |X,Y..7..: . I.|
00002F90: 95 37 EB 05 3A 00 AD 37 EC 05 8F 20 45 4A 45 43 |.7..:..7... EJEC|
00002FA0: 54 20 54 48 45 20 44 52 41 57 49 4E 47 00 B3 37 |T THE DRAWING..7|
00002FB0: ED 05 3A 00 CE 37 EE 05 3A 20 20 20 98 31 2C 22 |..:..7..: .1,"|
00002FC0: 4D 22 2C 20 20 30 2C AB 32 33 39 AB 38 30 00 D4 |M", 0,.239.80..|
00002FD0: 37 EF 05 3A 00 F6 37 F0 05 8F 20 45 53 54 41 42 |7..:..7... ESTAB|
00002FE0: 4C 49 53 48 20 4E 45 57 20 48 4F 4D 45 20 50 4F |LISH NEW HOME PO|
00002FF0: 53 49 54 49 4F 4E 00 FC 37 F1 05 3A 00 07 38 F2 |SITION..7..:..8.|
00003000: 05 3A 20 20 20 98 34 00 0D 38 F3 05 3A 00 31 38 |.: .4..8..:.18|
00003010: F4 05 8F 22 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |..." ...........|
00003020: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00003030: C9 00 55 38 F5 05 8F 22 20 DD 20 20 20 20 20 50 |..U8..." . P|
00003040: 4C 4F 54 20 50 4F 53 49 54 49 4F 4E 49 4E 47 20 |LOT POSITIONING |
00003050: 20 20 20 20 DD 00 79 38 F6 05 8F 22 20 CA C0 C0 | ..y8..." ...|
00003060: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00003070: C0 C0 C0 C0 C0 C0 C0 C0 CB 00 7F 38 F7 05 3A 00 |...........8..:.|
00003080: 9E 38 F8 05 8F 20 20 20 54 48 45 20 46 4F 4C 4C |.8... THE FOLL|
00003090: 4F 57 49 4E 47 20 45 58 41 4D 50 4C 45 53 00 BE |OWING EXAMPLES..|
000030A0: 38 F9 05 8F 20 20 20 44 45 4D 4F 4E 53 54 52 41 |8... DEMONSTRA|
000030B0: 54 45 20 50 4F 53 49 54 49 4F 4E 49 4E 47 00 E3 |TE POSITIONING..|
000030C0: 38 FA 05 8F 20 20 20 54 48 45 20 50 4C 4F 54 20 |8... THE PLOT |
000030D0: 4F 4E 20 54 48 45 20 50 4C 4F 54 54 45 52 20 42 |ON THE PLOTTER B|
000030E0: 45 44 2E 00 E9 38 FB 05 3A 00 0D 39 FC 05 8F 22 |ED...8..:..9..."|
000030F0: 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 | ...............|
00003100: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 00 31 39 |..............19|
00003110: FD 05 8F 22 A0 DD 20 50 4C 4F 54 54 49 4E 47 20 |...".. PLOTTING |
00003120: 41 20 47 49 41 4E 54 20 4C 45 54 54 45 52 20 20 |A GIANT LETTER |
00003130: DD 00 55 39 FE 05 8F 22 20 CA C0 C0 C0 C0 C0 C0 |..U9..." .......|
00003140: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00003150: C0 C0 C0 C0 CB 00 5B 39 FF 05 3A 00 78 39 00 06 |......[9..:.x9..|
00003160: 8F 20 20 20 20 20 28 30 2C 30 29 20 20 20 20 20 |. (0,0) |
00003170: 20 28 32 34 30 2C 30 29 00 96 39 01 06 8F 22 20 | (240,0)..9..." |
00003180: 20 20 CE 20 20 20 20 20 20 20 20 20 20 20 20 20 | . |
00003190: 20 20 20 20 20 CD 00 B5 39 02 06 8F 22 20 20 D1 | ...9..." .|
000031A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000031B0: C0 C0 C0 C0 D1 00 D4 39 03 06 8F 22 20 20 DD 20 |.......9..." . |
000031C0: 20 20 20 20 28 38 30 2C 38 30 29 20 20 20 20 20 | (80,80) |
000031D0: 20 20 20 DD 00 F3 39 04 06 8F 22 20 20 DD 20 20 | ...9..." . |
000031E0: 20 20 CE 20 20 20 20 20 20 20 20 20 20 20 20 20 | . |
000031F0: 20 20 DD 00 12 3A 05 06 8F 22 20 20 DD 20 20 20 | ...:..." . |
00003200: D1 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00003210: C0 D1 00 30 3A 06 06 8F 22 20 20 DD 20 20 20 DD |...0:..." . .|
00003220: 20 28 38 30 2C 31 36 30 29 20 20 20 20 20 20 CE | (80,160) .|
00003230: 00 4D 3A 07 06 8F 22 20 20 DD 20 20 20 DD CE 20 |.M:..." . .. |
00003240: 20 20 20 20 20 28 32 34 30 2C 38 30 29 00 64 3A | (240,80).d:|
00003250: 08 06 8F 22 20 20 DD 20 20 20 D1 C0 C0 C0 C0 C0 |..." . ......|
00003260: C0 C0 C0 D1 00 7C 3A 09 06 8F 22 20 20 DD 20 20 |.....|:..." . |
00003270: 20 20 20 20 20 20 20 20 20 20 DD CD 00 9D 3A 0A | ....:.|
00003280: 06 8F 22 20 20 DD 20 20 20 20 20 20 20 20 20 20 |.." . |
00003290: 20 20 DD 20 28 31 36 30 2C 31 36 30 29 00 B4 3A | . (160,160)..:|
000032A0: 0B 06 8F 22 20 20 DD 20 20 20 D1 C0 C0 C0 C0 C0 |..." . ......|
000032B0: C0 C0 C0 D1 00 CC 3A 0C 06 8F 22 20 20 DD 20 20 |......:..." . |
000032C0: 20 DD CD 20 20 20 20 20 20 20 20 CD 00 ED 3A 0D | .. ...:.|
000032D0: 06 8F 22 20 20 DD 20 20 20 DD 20 28 38 30 2C 32 |.." . . (80,2|
000032E0: 34 30 29 20 28 31 36 30 2C 32 34 30 29 00 FB 3A |40) (160,240)..:|
000032F0: 0E 06 8F 22 20 20 DD 20 20 20 DD 00 12 3B 0F 06 |..." . ...;..|
00003300: 8F 22 20 20 DD 20 20 20 DD 20 28 38 30 2C 34 30 |." . . (80,40|
00003310: 30 29 00 21 3B 10 06 8F 22 20 20 DD 20 20 20 DD |0).!;..." . .|
00003320: CE 00 2F 3B 11 06 8F 22 20 20 D1 C0 C0 C0 D1 00 |../;..." ......|
00003330: 3A 3B 12 06 8F 22 20 20 20 CD 00 4C 3B 13 06 8F |:;..." ..L;...|
00003340: 20 20 20 20 20 28 30 2C 34 30 30 29 00 52 3B 14 | (0,400).R;.|
00003350: 06 3A 00 71 3B 15 06 8F 20 47 49 41 4E 54 20 4C |.:.q;... GIANT L|
00003360: 45 54 54 45 52 20 44 41 54 41 20 50 4F 49 4E 54 |ETTER DATA POINT|
00003370: 53 00 77 3B 16 06 3A 00 89 3B 17 06 8F 20 20 20 |S.w;..:..;... |
00003380: 20 20 20 20 58 20 2C 20 59 00 9C 3B 18 06 8F 22 | X , Y..;..."|
00003390: 20 20 20 20 20 C0 C0 C0 20 C0 C0 C0 00 AE 3B 19 | ... .....;.|
000033A0: 06 3A 20 20 20 83 20 20 20 30 2C 20 20 30 00 C0 |.: . 0, 0..|
000033B0: 3B 1A 06 3A 20 20 20 83 20 32 34 30 2C 20 20 30 |;..: . 240, 0|
000033C0: 00 D2 3B 1B 06 3A 20 20 20 83 20 32 34 30 2C 20 |..;..: . 240, |
000033D0: 38 30 00 E4 3B 1C 06 3A 20 20 20 83 20 20 38 30 |80..;..: . 80|
000033E0: 2C 20 38 30 00 F6 3B 1D 06 3A 20 20 20 83 20 20 |, 80..;..: . |
000033F0: 38 30 2C 31 36 30 00 08 3C 1E 06 3A 20 20 20 83 |80,160..<..: .|
00003400: 20 31 36 30 2C 31 36 30 00 1A 3C 1F 06 3A 20 20 | 160,160..<..: |
00003410: 20 83 20 31 36 30 2C 32 34 30 00 2C 3C 20 06 3A | . 160,240.,< .:|
00003420: 20 20 20 83 20 20 38 30 2C 32 34 30 00 3E 3C 21 | . 80,240.><!|
00003430: 06 3A 20 20 20 83 20 20 38 30 2C 34 30 30 00 50 |.: . 80,400.P|
00003440: 3C 22 06 3A 20 20 20 83 20 20 20 30 2C 34 30 30 |<".: . 0,400|
00003450: 00 62 3C 23 06 3A 20 20 20 83 20 20 20 30 2C 20 |.b<#.: . 0, |
00003460: 20 30 00 68 3C 24 06 3A 00 84 3C 25 06 8F 20 44 | 0.h<$.:..<%.. D|
00003470: 49 4D 45 4E 53 49 4F 4E 20 44 41 54 41 20 41 52 |IMENSION DATA AR|
00003480: 52 41 59 53 00 8A 3C 26 06 3A 00 AB 3C 27 06 3A |RAYS..<&.:..<'.:|
00003490: 20 20 20 86 20 58 28 31 31 29 20 3A 8F 20 58 2D | . X(11) :. X-|
000034A0: 41 58 49 53 20 56 41 4C 55 45 53 00 CC 3C 28 06 |AXIS VALUES..<(.|
000034B0: 3A 20 20 20 86 20 59 28 31 31 29 20 3A 8F 20 59 |: . Y(11) :. Y|
000034C0: 2D 41 58 49 53 20 56 41 4C 55 45 53 00 D2 3C 29 |-AXIS VALUES..<)|
000034D0: 06 3A 00 EE 3C 2A 06 8F 20 4C 4F 41 44 20 44 41 |.:..<*.. LOAD DA|
000034E0: 54 41 20 49 4E 54 4F 20 41 52 52 41 59 53 00 F4 |TA INTO ARRAYS..|
000034F0: 3C 2B 06 3A 00 07 3D 2C 06 3A 20 20 20 81 20 49 |<+.:..=,.: . I|
00003500: B2 31 20 A4 20 31 31 00 17 3D 2D 06 3A 20 20 20 |.1 . 11..=-.: |
00003510: 20 20 87 20 58 2C 59 00 28 3D 2E 06 3A 20 20 20 | . X,Y.(=..: |
00003520: 20 20 58 28 49 29 B2 58 00 39 3D 2F 06 3A 20 20 | X(I).X.9=/.: |
00003530: 20 20 20 59 28 49 29 B2 59 00 43 3D 30 06 3A 20 | Y(I).Y.C=0.: |
00003540: 20 20 82 00 49 3D 31 06 3A 00 6D 3D 32 06 8F 22 | ..I=1.:.m=2.."|
00003550: 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 | ...............|
00003560: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 00 91 3D |...............=|
00003570: 33 06 8F 22 A0 DD 20 20 50 4C 4F 54 20 54 48 45 |3..".. PLOT THE|
00003580: 20 47 49 41 4E 54 20 4C 45 54 54 45 52 20 20 20 | GIANT LETTER |
00003590: DD 00 B5 3D 34 06 8F 22 20 CA C0 C0 C0 C0 C0 C0 |...=4.." .......|
000035A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000035B0: C0 C0 C0 C0 CB 00 BB 3D 35 06 3A 00 DE 3D 36 06 |.......=5.:..=6.|
000035C0: 8F 20 44 52 41 57 20 41 20 53 51 55 41 52 45 20 |. DRAW A SQUARE |
000035D0: 42 4F 58 20 34 37 39 20 42 59 20 34 37 39 00 E4 |BOX 479 BY 479..|
000035E0: 3D 37 06 3A 00 EF 3D 38 06 3A 20 20 20 98 34 00 |=7.:..=8.: .4.|
000035F0: 0E 3E 39 06 3A 20 20 20 98 34 2C 22 49 4E 49 54 |.>9.: .4,"INIT|
00003600: 49 41 4C 20 50 4F 53 49 54 49 4F 4E 3A 22 00 14 |IAL POSITION:"..|
00003610: 3E 3A 06 3A 00 2C 3E 3B 06 3A 20 20 20 98 31 2C |>:.:.,>;.: .1,|
00003620: 22 44 22 2C 34 37 39 2C 20 20 20 30 00 44 3E 3C |"D",479, 0.D><|
00003630: 06 3A 20 20 20 98 31 2C 22 44 22 2C 34 37 39 2C |.: .1,"D",479,|
00003640: AB 34 37 39 00 5C 3E 3D 06 3A 20 20 20 98 31 2C |.479.\>=.: .1,|
00003650: 22 44 22 2C 20 20 30 2C AB 34 37 39 00 74 3E 3E |"D", 0,.479.t>>|
00003660: 06 3A 20 20 20 98 31 2C 22 44 22 2C 20 20 30 2C |.: .1,"D", 0,|
00003670: 20 20 20 30 00 7A 3E 3F 06 3A 00 9A 3E 40 06 8F | 0.z>?.:..>@..|
00003680: 20 4D 4F 56 45 20 54 4F 20 54 48 45 20 49 4E 49 | MOVE TO THE INI|
00003690: 54 49 41 4C 20 50 4F 49 4E 54 00 A0 3E 41 06 3A |TIAL POINT..>A.:|
000036A0: 00 BA 3E 42 06 3A 20 20 20 98 31 2C 22 4D 22 2C |..>B.: .1,"M",|
000036B0: 58 28 31 29 2C AB 59 28 31 29 00 C0 3E 43 06 3A |X(1),.Y(1)..>C.:|
000036C0: 00 E5 3E 44 06 8F 20 50 4C 4F 54 20 54 48 45 20 |..>D.. PLOT THE |
000036D0: 50 4F 49 4E 54 53 20 46 52 4F 4D 20 54 48 45 20 |POINTS FROM THE |
000036E0: 41 52 52 41 59 00 EB 3E 45 06 3A 00 FE 3E 46 06 |ARRAY..>E.:..>F.|
000036F0: 3A 20 20 20 81 20 49 B2 31 20 A4 20 31 31 00 1A |: . I.1 . 11..|
00003700: 3F 47 06 3A 20 20 20 20 20 98 31 2C 22 44 22 2C |?G.: .1,"D",|
00003710: 58 28 49 29 2C AB 59 28 49 29 00 24 3F 48 06 3A |X(I),.Y(I).$?H.:|
00003720: 20 20 20 82 00 2A 3F 49 06 3A 00 42 3F 4A 06 8F | ..*?I.:.B?J..|
00003730: 20 45 4A 45 43 54 20 54 48 45 20 44 52 41 57 49 | EJECT THE DRAWI|
00003740: 4E 47 00 48 3F 4B 06 3A 00 60 3F 4C 06 3A 20 20 |NG.H?K.:.`?L.: |
00003750: 20 98 31 2C 22 4D 22 2C 20 20 30 2C AB 34 37 39 | .1,"M", 0,.479|
00003760: 00 66 3F 4D 06 3A 00 88 3F 4E 06 8F 20 45 53 54 |.f?M.:..?N.. EST|
00003770: 41 42 4C 49 53 48 20 4E 45 57 20 48 4F 4D 45 20 |ABLISH NEW HOME |
00003780: 50 4F 53 49 54 49 4F 4E 00 8E 3F 4F 06 3A 00 99 |POSITION..?O.:..|
00003790: 3F 50 06 3A 20 20 20 98 34 00 9F 3F 51 06 3A 00 |?P.: .4..?Q.:.|
000037A0: C3 3F 52 06 8F 22 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 |.?R.." .........|
000037B0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000037C0: C0 C0 C9 00 E7 3F 53 06 8F 22 A0 DD 20 20 50 4C |.....?S..".. PL|
000037D0: 4F 54 20 54 48 45 20 47 49 41 4E 54 20 4C 45 54 |OT THE GIANT LET|
000037E0: 54 45 52 20 20 20 DD 00 0B 40 54 06 8F 22 20 DD |TER ...@T.." .|
000037F0: 20 20 4F 4E 20 54 48 45 20 52 49 47 48 54 20 53 | ON THE RIGHT S|
00003800: 49 44 45 20 4F 46 20 20 20 20 DD 00 2F 40 55 06 |IDE OF ../@U.|
00003810: 8F 22 20 DD 20 20 54 48 45 20 50 4C 4F 54 54 45 |." . THE PLOTTE|
00003820: 52 20 42 45 44 2E 20 20 20 20 20 20 20 20 DD 00 |R BED. ..|
00003830: 53 40 56 06 8F 22 20 CA C0 C0 C0 C0 C0 C0 C0 C0 |S@V.." .........|
00003840: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00003850: C0 C0 CB 00 59 40 57 06 3A 00 7C 40 58 06 8F 20 |....Y@W.:.|@X.. |
00003860: 44 52 41 57 20 41 20 53 51 55 41 52 45 20 42 4F |DRAW A SQUARE BO|
00003870: 58 20 34 37 39 20 42 59 20 34 37 39 00 82 40 59 |X 479 BY 479..@Y|
00003880: 06 3A 00 8D 40 5A 06 3A 20 20 20 98 34 00 AE 40 |.:..@Z.: .4..@|
00003890: 5B 06 3A 20 20 20 98 34 2C 22 58 2D 41 58 49 53 |[.: .4,"X-AXIS|
000038A0: 20 4D 4F 56 45 44 20 52 49 47 48 54 3A 22 00 B4 | MOVED RIGHT:"..|
000038B0: 40 5C 06 3A 00 CC 40 5D 06 3A 20 20 20 98 31 2C |@\.:..@].: .1,|
000038C0: 22 44 22 2C 34 37 39 2C 20 20 20 30 00 E4 40 5E |"D",479, 0..@^|
000038D0: 06 3A 20 20 20 98 31 2C 22 44 22 2C 34 37 39 2C |.: .1,"D",479,|
000038E0: AB 34 37 39 00 FC 40 5F 06 3A 20 20 20 98 31 2C |.479..@_.: .1,|
000038F0: 22 44 22 2C 20 20 30 2C AB 34 37 39 00 14 41 60 |"D", 0,.479..A`|
00003900: 06 3A 20 20 20 98 31 2C 22 44 22 2C 20 20 30 2C |.: .1,"D", 0,|
00003910: 20 20 20 30 00 1A 41 61 06 3A 00 3F 41 62 06 8F | 0..Aa.:.?Ab..|
00003920: 20 41 44 44 20 32 34 30 20 54 4F 20 54 48 45 20 | ADD 240 TO THE |
00003930: 58 2D 41 58 49 53 20 41 4E 44 20 4D 4F 56 45 00 |X-AXIS AND MOVE.|
00003940: 5B 41 63 06 8F 20 54 4F 20 54 48 45 20 49 4E 49 |[Ac.. TO THE INI|
00003950: 54 49 41 4C 20 50 4F 49 4E 54 2E 00 61 41 64 06 |TIAL POINT..aAd.|
00003960: 3A 00 7F 41 65 06 3A 20 20 20 98 31 2C 22 4D 22 |:..Ae.: .1,"M"|
00003970: 2C 58 28 31 29 AA 32 34 30 2C AB 59 28 31 29 00 |,X(1).240,.Y(1).|
00003980: 85 41 66 06 3A 00 AA 41 67 06 8F 20 50 4C 4F 54 |.Af.:..Ag.. PLOT|
00003990: 20 54 48 45 20 50 4F 49 4E 54 53 20 46 52 4F 4D | THE POINTS FROM|
000039A0: 20 54 48 45 20 41 52 52 41 59 00 CF 41 68 06 8F | THE ARRAY..Ah..|
000039B0: 20 41 44 44 49 4E 47 20 32 34 30 20 54 4F 20 54 | ADDING 240 TO T|
000039C0: 48 45 20 58 2D 41 58 49 53 20 56 41 4C 55 45 00 |HE X-AXIS VALUE.|
000039D0: D5 41 69 06 3A 00 E8 41 6A 06 3A 20 20 20 81 20 |.Ai.:..Aj.: . |
000039E0: 49 B2 31 20 A4 20 31 31 00 08 42 6B 06 3A 20 20 |I.1 . 11..Bk.: |
000039F0: 20 20 20 98 31 2C 22 44 22 2C 58 28 49 29 AA 32 | .1,"D",X(I).2|
00003A00: 34 30 2C AB 59 28 49 29 00 12 42 6C 06 3A 20 20 |40,.Y(I)..Bl.: |
00003A10: 20 82 00 18 42 6D 06 3A 00 30 42 6E 06 8F 20 45 | ...Bm.:.0Bn.. E|
00003A20: 4A 45 43 54 20 54 48 45 20 44 52 41 57 49 4E 47 |JECT THE DRAWING|
00003A30: 00 36 42 6F 06 3A 00 4E 42 70 06 3A 20 20 20 98 |.6Bo.:.NBp.: .|
00003A40: 31 2C 22 4D 22 2C 20 20 30 2C AB 34 37 39 00 54 |1,"M", 0,.479.T|
00003A50: 42 71 06 3A 00 76 42 72 06 8F 20 45 53 54 41 42 |Bq.:.vBr.. ESTAB|
00003A60: 4C 49 53 48 20 4E 45 57 20 48 4F 4D 45 20 50 4F |LISH NEW HOME PO|
00003A70: 53 49 54 49 4F 4E 00 7C 42 73 06 3A 00 87 42 74 |SITION.|Bs.:..Bt|
00003A80: 06 3A 20 20 20 98 34 00 8D 42 75 06 3A 00 B1 42 |.: .4..Bu.:..B|
00003A90: 76 06 8F 22 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |v.." ...........|
00003AA0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00003AB0: C9 00 D5 42 77 06 8F 22 A0 DD 20 20 50 4C 4F 54 |...Bw..".. PLOT|
00003AC0: 20 54 48 45 20 47 49 41 4E 54 20 4C 45 54 54 45 | THE GIANT LETTE|
00003AD0: 52 20 20 20 DD 00 F9 42 78 06 8F 22 20 DD 20 20 |R ...Bx.." . |
00003AE0: 4F 4E 20 54 48 45 20 42 4F 54 54 4F 4D 20 4F 46 |ON THE BOTTOM OF|
00003AF0: 20 54 48 45 20 20 20 20 DD 00 1D 43 79 06 8F 22 | THE ...Cy.."|
00003B00: 20 DD 20 20 50 4C 4F 54 54 45 52 20 42 45 44 2E | . PLOTTER BED.|
00003B10: 20 20 20 20 20 20 20 20 20 20 20 20 DD 00 41 43 | ..AC|
00003B20: 7A 06 8F 22 20 CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |z.." ...........|
00003B30: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00003B40: CB 00 47 43 7B 06 3A 00 6A 43 7C 06 8F 20 44 52 |..GC{.:.jC|.. DR|
00003B50: 41 57 20 41 20 53 51 55 41 52 45 20 42 4F 58 20 |AW A SQUARE BOX |
00003B60: 34 37 39 20 42 59 20 34 37 39 00 70 43 7D 06 3A |479 BY 479.pC}.:|
00003B70: 00 7B 43 7E 06 3A 20 20 20 98 34 00 9B 43 7F 06 |.{C~.: .4..C..|
00003B80: 3A 20 20 20 98 34 2C 22 59 2D 41 58 49 53 20 4D |: .4,"Y-AXIS M|
00003B90: 4F 56 45 44 20 44 4F 57 4E 3A 22 00 A1 43 80 06 |OVED DOWN:"..C..|
00003BA0: 3A 00 B9 43 81 06 3A 20 20 20 98 31 2C 22 44 22 |:..C..: .1,"D"|
00003BB0: 2C 34 37 39 2C 20 20 20 30 00 D1 43 82 06 3A 20 |,479, 0..C..: |
00003BC0: 20 20 98 31 2C 22 44 22 2C 34 37 39 2C AB 34 37 | .1,"D",479,.47|
00003BD0: 39 00 E9 43 83 06 3A 20 20 20 98 31 2C 22 44 22 |9..C..: .1,"D"|
00003BE0: 2C 20 20 30 2C AB 34 37 39 00 01 44 84 06 3A 20 |, 0,.479..D..: |
00003BF0: 20 20 98 31 2C 22 44 22 2C 20 20 30 2C 20 20 20 | .1,"D", 0, |
00003C00: 30 00 07 44 85 06 3A 00 26 44 86 06 8F 20 41 44 |0..D..:.&D... AD|
00003C10: 44 20 38 30 20 54 4F 20 54 48 45 20 59 2D 41 58 |D 80 TO THE Y-AX|
00003C20: 49 53 20 41 4E 44 00 47 44 87 06 8F 20 4D 4F 56 |IS AND.GD... MOV|
00003C30: 45 20 54 4F 20 54 48 45 20 49 4E 49 54 49 41 4C |E TO THE INITIAL|
00003C40: 20 50 4F 49 4E 54 2E 00 4D 44 88 06 3A 00 6C 44 | POINT..MD..:.lD|
00003C50: 89 06 3A 20 20 20 98 31 2C 22 4D 22 2C 58 28 31 |..: .1,"M",X(1|
00003C60: 29 2C AB 28 59 28 31 29 AA 38 30 29 00 72 44 8A |),.(Y(1).80).rD.|
00003C70: 06 3A 00 97 44 8B 06 8F 20 50 4C 4F 54 20 54 48 |.:..D... PLOT TH|
00003C80: 45 20 50 4F 49 4E 54 53 20 46 52 4F 4D 20 54 48 |E POINTS FROM TH|
00003C90: 45 20 41 52 52 41 59 00 B6 44 8C 06 8F 20 41 44 |E ARRAY..D... AD|
00003CA0: 44 49 4E 47 20 38 30 20 54 4F 20 54 48 45 20 59 |DING 80 TO THE Y|
00003CB0: 2D 41 58 49 53 2E 00 BC 44 8D 06 3A 00 CF 44 8E |-AXIS...D..:..D.|
00003CC0: 06 3A 20 20 20 81 20 49 B2 31 20 A4 20 31 31 00 |.: . I.1 . 11.|
00003CD0: F0 44 8F 06 3A 20 20 20 20 20 98 31 2C 22 44 22 |.D..: .1,"D"|
00003CE0: 2C 58 28 49 29 2C AB 28 59 28 49 29 AA 38 30 29 |,X(I),.(Y(I).80)|
00003CF0: 00 FA 44 90 06 3A 20 20 20 82 00 00 45 91 06 3A |..D..: ...E..:|
00003D00: 00 18 45 92 06 8F 20 45 4A 45 43 54 20 54 48 45 |..E... EJECT THE|
00003D10: 20 44 52 41 57 49 4E 47 00 1E 45 93 06 3A 00 36 | DRAWING..E..:.6|
00003D20: 45 94 06 3A 20 20 20 98 31 2C 22 4D 22 2C 20 20 |E..: .1,"M", |
00003D30: 30 2C AB 34 37 39 00 3C 45 95 06 3A 00 5E 45 96 |0,.479.<E..:.^E.|
00003D40: 06 8F 20 45 53 54 41 42 4C 49 53 48 20 4E 45 57 |.. ESTABLISH NEW|
00003D50: 20 48 4F 4D 45 20 50 4F 53 49 54 49 4F 4E 00 64 | HOME POSITION.d|
00003D60: 45 97 06 3A 00 6F 45 98 06 3A 20 20 20 98 34 00 |E..:.oE..: .4.|
00003D70: 75 45 99 06 3A 00 99 45 9A 06 8F 22 20 D5 C0 C0 |uE..:..E..." ...|
00003D80: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00003D90: C0 C0 C0 C0 C0 C0 C0 C0 C9 00 BD 45 9B 06 8F 22 |...........E..."|
00003DA0: A0 DD 20 20 50 4C 4F 54 20 54 48 45 20 47 49 41 |.. PLOT THE GIA|
00003DB0: 4E 54 20 4C 45 54 54 45 52 20 20 20 DD 00 E1 45 |NT LETTER ...E|
00003DC0: 9C 06 8F 22 20 DD 20 20 49 4E 20 54 48 45 20 4C |..." . IN THE L|
00003DD0: 4F 57 45 52 20 52 49 47 48 54 20 48 41 4E 44 20 |OWER RIGHT HAND |
00003DE0: DD 00 05 46 9D 06 8F 22 20 DD 20 20 43 4F 52 4E |...F..." . CORN|
00003DF0: 45 52 20 4F 46 20 54 48 45 20 50 4C 4F 54 20 42 |ER OF THE PLOT B|
00003E00: 45 44 2E 20 DD 00 29 46 9E 06 8F 22 20 CA C0 C0 |ED. ..)F..." ...|
00003E10: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00003E20: C0 C0 C0 C0 C0 C0 C0 C0 CB 00 2F 46 9F 06 3A 00 |........../F..:.|
00003E30: 52 46 A0 06 8F 20 44 52 41 57 20 41 20 53 51 55 |RF... DRAW A SQU|
00003E40: 41 52 45 20 42 4F 58 20 34 37 39 20 42 59 20 34 |ARE BOX 479 BY 4|
00003E50: 37 39 00 58 46 A1 06 3A 00 63 46 A2 06 3A 20 20 |79.XF..:.cF..: |
00003E60: 20 98 34 00 84 46 A3 06 3A 20 20 20 98 34 2C 22 | .4..F..: .4,"|
00003E70: 58 2D 41 58 49 53 20 4D 4F 56 45 44 20 52 49 47 |X-AXIS MOVED RIG|
00003E80: 48 54 2C 22 00 A4 46 A4 06 3A 20 20 20 98 34 2C |HT,"..F..: .4,|
00003E90: 22 59 2D 41 58 49 53 20 4D 4F 56 45 44 20 44 4F |"Y-AXIS MOVED DO|
00003EA0: 57 4E 3A 22 00 AA 46 A5 06 3A 00 C2 46 A6 06 3A |WN:"..F..:..F..:|
00003EB0: 20 20 20 98 31 2C 22 44 22 2C 34 37 39 2C 20 20 | .1,"D",479, |
00003EC0: 20 30 00 DA 46 A7 06 3A 20 20 20 98 31 2C 22 44 | 0..F..: .1,"D|
00003ED0: 22 2C 34 37 39 2C AB 34 37 39 00 F2 46 A8 06 3A |",479,.479..F..:|
00003EE0: 20 20 20 98 31 2C 22 44 22 2C 20 20 30 2C AB 34 | .1,"D", 0,.4|
00003EF0: 37 39 00 0A 47 A9 06 3A 20 20 20 98 31 2C 22 44 |79..G..: .1,"D|
00003F00: 22 2C 20 20 30 2C 20 20 20 30 00 10 47 AA 06 3A |", 0, 0..G..:|
00003F10: 00 30 47 AB 06 8F 20 41 44 44 20 32 34 30 20 54 |.0G... ADD 240 T|
00003F20: 4F 20 54 48 45 20 58 2D 41 58 49 53 20 41 4E 44 |O THE X-AXIS AND|
00003F30: 00 50 47 AC 06 8F 20 41 44 44 20 38 30 20 54 4F |.PG... ADD 80 TO|
00003F40: 20 54 48 45 20 59 2D 41 58 49 53 20 54 48 45 4E | THE Y-AXIS THEN|
00003F50: 00 71 47 AD 06 8F 20 4D 4F 56 45 20 54 4F 20 54 |.qG... MOVE TO T|
00003F60: 48 45 20 49 4E 49 54 49 41 4C 20 50 4F 49 4E 54 |HE INITIAL POINT|
00003F70: 2E 00 77 47 AE 06 3A 00 99 47 AF 06 3A 20 20 98 |..wG..:..G..: .|
00003F80: 31 2C 22 4D 22 2C 58 28 31 29 AA 32 34 30 2C AB |1,"M",X(1).240,.|
00003F90: 28 59 28 31 29 AA 38 30 29 00 9F 47 B0 06 3A 00 |(Y(1).80)..G..:.|
00003FA0: C4 47 B1 06 8F 20 50 4C 4F 54 20 54 48 45 20 50 |.G... PLOT THE P|
00003FB0: 4F 49 4E 54 53 20 46 52 4F 4D 20 54 48 45 20 41 |OINTS FROM THE A|
00003FC0: 52 52 41 59 00 E7 47 B2 06 8F 20 41 44 44 49 4E |RRAY..G... ADDIN|
00003FD0: 47 20 32 34 30 20 54 4F 20 54 48 45 20 58 2D 41 |G 240 TO THE X-A|
00003FE0: 58 49 53 20 41 4E 44 00 06 48 B3 06 8F 20 41 44 |XIS AND..H... AD|
00003FF0: 44 49 4E 47 20 38 30 20 54 4F 20 54 48 45 20 59 |DING 80 TO THE Y|
00004000: 2D 41 58 49 53 2E 00 0C 48 B4 06 3A 00 1E 48 B5 |-AXIS...H..:..H.|
00004010: 06 3A 20 20 81 20 49 B2 31 20 A4 20 31 31 00 40 |.: . I.1 . 11.@|
00004020: 48 B6 06 3A 20 20 98 31 2C 22 44 22 2C 58 28 49 |H..: .1,"D",X(I|
00004030: 29 AA 32 34 30 2C AB 28 59 28 49 29 AA 38 30 29 |).240,.(Y(I).80)|
00004040: 00 49 48 B7 06 3A 20 20 82 00 4F 48 B8 06 3A 00 |.IH..: ..OH..:.|
00004050: 67 48 B9 06 8F 20 45 4A 45 43 54 20 54 48 45 20 |gH... EJECT THE |
00004060: 44 52 41 57 49 4E 47 00 6D 48 BA 06 3A 00 85 48 |DRAWING.mH..:..H|
00004070: BB 06 3A 20 20 20 98 31 2C 22 4D 22 2C 20 20 30 |..: .1,"M", 0|
00004080: 2C AB 34 37 39 00 8B 48 BC 06 3A 00 AD 48 BD 06 |,.479..H..:..H..|
00004090: 8F 20 45 53 54 41 42 4C 49 53 48 20 4E 45 57 20 |. ESTABLISH NEW |
000040A0: 48 4F 4D 45 20 50 4F 53 49 54 49 4F 4E 00 B3 48 |HOME POSITION..H|
000040B0: BE 06 3A 00 BE 48 BF 06 3A 20 20 20 98 34 00 C4 |..:..H..: .4..|
000040C0: 48 C0 06 3A 00 E8 48 C1 06 8F 22 20 D5 C0 C0 C0 |H..:..H..." ....|
000040D0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000040E0: C0 C0 C0 C0 C0 C0 C0 C9 00 0C 49 C2 06 8F 22 20 |..........I..." |
000040F0: DD 20 20 20 20 20 50 4C 4F 54 20 52 45 46 4C 45 |. PLOT REFLE|
00004100: 43 54 49 4F 4E 53 20 20 20 20 20 DD 00 30 49 C3 |CTIONS ..0I.|
00004110: 06 8F 22 20 CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |.." ............|
00004120: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 CB |................|
00004130: 00 36 49 C4 06 3A 00 55 49 C5 06 8F 20 20 20 54 |.6I..:.UI... T|
00004140: 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 20 45 58 41 |HE FOLLOWING EXA|
00004150: 4D 50 4C 45 53 00 76 49 C6 06 8F 20 20 20 44 45 |MPLES.vI... DE|
00004160: 4D 4F 4E 53 54 52 41 54 45 20 50 4C 4F 54 54 49 |MONSTRATE PLOTTI|
00004170: 4E 47 20 54 48 45 00 97 49 C7 06 8F 20 20 20 52 |NG THE..I... R|
00004180: 45 46 4C 45 43 54 49 4F 4E 53 20 4F 46 20 41 20 |EFLECTIONS OF A |
00004190: 46 49 47 55 52 45 2C 00 BC 49 C8 06 8F 20 20 20 |FIGURE,..I... |
000041A0: 54 48 41 54 20 49 53 2C 20 46 4C 49 50 50 49 4E |THAT IS, FLIPPIN|
000041B0: 47 20 54 48 45 20 46 49 47 55 52 45 00 DD 49 C9 |G THE FIGURE..I.|
000041C0: 06 8F 20 20 20 53 49 44 45 57 41 59 53 20 41 4E |.. SIDEWAYS AN|
000041D0: 44 2F 4F 52 20 45 4E 44 57 41 59 53 2E 00 E3 49 |D/OR ENDWAYS...I|
000041E0: CA 06 3A 00 07 4A CB 06 8F 22 20 D5 C0 C0 C0 C0 |..:..J..." .....|
000041F0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00004200: C0 C0 C0 C0 C0 C0 C9 00 2B 4A CC 06 8F 22 A0 DD |........+J..."..|
00004210: 20 20 50 4C 4F 54 20 54 48 45 20 47 49 41 4E 54 | PLOT THE GIANT|
00004220: 20 4C 45 54 54 45 52 20 20 20 DD 00 4F 4A CD 06 | LETTER ..OJ..|
00004230: 8F 22 20 DD 20 20 46 4C 49 50 50 45 44 20 53 49 |." . FLIPPED SI|
00004240: 44 45 20 54 4F 20 53 49 44 45 2E 20 20 20 DD 00 |DE TO SIDE. ..|
00004250: 73 4A CE 06 8F 22 20 CA C0 C0 C0 C0 C0 C0 C0 C0 |sJ..." .........|
00004260: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00004270: C0 C0 CB 00 79 4A CF 06 3A 00 9C 4A D0 06 8F 20 |....yJ..:..J... |
00004280: 44 52 41 57 20 41 20 53 51 55 41 52 45 20 42 4F |DRAW A SQUARE BO|
00004290: 58 20 34 37 39 20 42 59 20 34 37 39 00 A2 4A D1 |X 479 BY 479..J.|
000042A0: 06 3A 00 AC 4A D2 06 3A 20 20 98 34 00 CE 4A D3 |.:..J..: .4..J.|
000042B0: 06 3A 20 20 98 34 2C 22 46 4C 49 50 50 45 44 20 |.: .4,"FLIPPED |
000042C0: 53 49 44 45 20 54 4F 20 53 49 44 45 3A 22 00 D4 |SIDE TO SIDE:"..|
000042D0: 4A D4 06 3A 00 EB 4A D5 06 3A 20 20 98 31 2C 22 |J..:..J..: .1,"|
000042E0: 44 22 2C 34 37 39 2C 20 20 20 30 00 02 4B D6 06 |D",479, 0..K..|
000042F0: 3A 20 20 98 31 2C 22 44 22 2C 34 37 39 2C AB 34 |: .1,"D",479,.4|
00004300: 37 39 00 19 4B D7 06 3A 20 20 98 31 2C 22 44 22 |79..K..: .1,"D"|
00004310: 2C 20 20 30 2C AB 34 37 39 00 30 4B D8 06 3A 20 |, 0,.479.0K..: |
00004320: 20 98 31 2C 22 44 22 2C 20 20 30 2C 20 20 20 30 | .1,"D", 0, 0|
00004330: 00 36 4B D9 06 3A 00 5B 4B DA 06 8F 20 53 55 42 |.6K..:.[K... SUB|
00004340: 54 52 41 43 54 20 54 48 45 20 58 2D 41 58 49 53 |TRACT THE X-AXIS|
00004350: 20 56 41 4C 55 45 20 46 52 4F 4D 00 80 4B DB 06 | VALUE FROM..K..|
00004360: 8F 20 54 48 45 20 50 4C 4F 54 54 45 52 20 42 45 |. THE PLOTTER BE|
00004370: 44 20 57 49 44 54 48 20 41 4E 44 20 4D 4F 56 45 |D WIDTH AND MOVE|
00004380: 00 9F 4B DC 06 8F 20 54 4F 20 54 48 45 20 49 4E |..K... TO THE IN|
00004390: 49 54 49 41 4C 20 50 4F 53 49 54 49 4F 4E 2E 00 |ITIAL POSITION..|
000043A0: A5 4B DD 06 3A 00 C3 4B DE 06 3A 20 20 20 98 31 |.K..:..K..: .1|
000043B0: 2C 22 4D 22 2C 34 37 39 AB 58 28 31 29 2C AB 59 |,"M",479.X(1),.Y|
000043C0: 28 31 29 00 C9 4B DF 06 3A 00 EE 4B E0 06 8F 20 |(1)..K..:..K... |
000043D0: 50 4C 4F 54 20 54 48 45 20 50 4F 49 4E 54 53 20 |PLOT THE POINTS |
000043E0: 46 52 4F 4D 20 54 48 45 20 41 52 52 41 59 00 11 |FROM THE ARRAY..|
000043F0: 4C E1 06 8F 20 53 55 42 54 52 41 43 54 49 4E 47 |L... SUBTRACTING|
00004400: 20 54 48 45 20 58 2D 41 58 49 53 20 56 41 4C 55 | THE X-AXIS VALU|
00004410: 45 00 33 4C E2 06 8F 20 46 52 4F 4D 20 54 48 45 |E.3L... FROM THE|
00004420: 20 50 4C 4F 54 54 45 52 20 42 45 44 20 57 49 44 | PLOTTER BED WID|
00004430: 54 48 2E 00 39 4C E3 06 3A 00 4C 4C E4 06 3A 20 |TH..9L..:.LL..: |
00004440: 20 20 81 20 49 B2 31 20 A4 20 31 31 00 6C 4C E5 | . I.1 . 11.lL.|
00004450: 06 3A 20 20 20 20 20 98 31 2C 22 44 22 2C 34 37 |.: .1,"D",47|
00004460: 39 AB 58 28 49 29 2C AB 59 28 49 29 00 76 4C E6 |9.X(I),.Y(I).vL.|
00004470: 06 3A 20 20 20 82 00 7C 4C E7 06 3A 00 94 4C E8 |.: ..|L..:..L.|
00004480: 06 8F 20 45 4A 45 43 54 20 54 48 45 20 44 52 41 |.. EJECT THE DRA|
00004490: 57 49 4E 47 00 9A 4C E9 06 3A 00 B2 4C EA 06 3A |WING..L..:..L..:|
000044A0: 20 20 20 98 31 2C 22 4D 22 2C 20 20 30 2C AB 34 | .1,"M", 0,.4|
000044B0: 37 39 00 B8 4C EB 06 3A 00 DA 4C EC 06 8F 20 45 |79..L..:..L... E|
000044C0: 53 54 41 42 4C 49 53 48 20 4E 45 57 20 48 4F 4D |STABLISH NEW HOM|
000044D0: 45 20 50 4F 53 49 54 49 4F 4E 00 E0 4C ED 06 3A |E POSITION..L..:|
000044E0: 00 EB 4C EE 06 3A 20 20 20 98 34 00 F1 4C EF 06 |..L..: .4..L..|
000044F0: 3A 00 15 4D F0 06 8F 22 20 D5 C0 C0 C0 C0 C0 C0 |:..M..." .......|
00004500: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00004510: C0 C0 C0 C0 C9 00 39 4D F1 06 8F 22 A0 DD 20 20 |......9M...".. |
00004520: 50 4C 4F 54 20 54 48 45 20 47 49 41 4E 54 20 4C |PLOT THE GIANT L|
00004530: 45 54 54 45 52 20 20 20 DD 00 5D 4D F2 06 8F 22 |ETTER ..]M..."|
00004540: 20 DD 20 20 46 4C 49 50 50 45 44 20 54 4F 50 20 | . FLIPPED TOP |
00004550: 54 4F 20 42 4F 54 54 4F 4D 2E 20 20 DD 00 81 4D |TO BOTTOM. ...M|
00004560: F3 06 8F 22 20 CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |..." ...........|
00004570: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00004580: CB 00 87 4D F4 06 3A 00 AA 4D F5 06 8F 20 44 52 |...M..:..M... DR|
00004590: 41 57 20 41 20 53 51 55 41 52 45 20 42 4F 58 20 |AW A SQUARE BOX |
000045A0: 34 37 39 20 42 59 20 34 37 39 00 B0 4D F6 06 3A |479 BY 479..M..:|
000045B0: 00 B9 4D F7 06 3A 20 98 34 00 DB 4D F8 06 3A 20 |..M..: .4..M..: |
000045C0: 98 34 2C 22 46 4C 49 50 50 45 44 20 54 4F 50 20 |.4,"FLIPPED TOP |
000045D0: 54 4F 20 42 4F 54 54 4F 4D 3A 22 00 E1 4D F9 06 |TO BOTTOM:"..M..|
000045E0: 3A 00 F7 4D FA 06 3A 20 98 31 2C 22 44 22 2C 34 |:..M..: .1,"D",4|
000045F0: 37 39 2C 20 20 20 30 00 0D 4E FB 06 3A 20 98 31 |79, 0..N..: .1|
00004600: 2C 22 44 22 2C 34 37 39 2C AB 34 37 39 00 23 4E |,"D",479,.479.#N|
00004610: FC 06 3A 20 98 31 2C 22 44 22 2C 20 20 30 2C AB |..: .1,"D", 0,.|
00004620: 34 37 39 00 39 4E FD 06 3A 20 98 31 2C 22 44 22 |479.9N..: .1,"D"|
00004630: 2C 20 20 30 2C 20 20 20 30 00 3F 4E FE 06 3A 00 |, 0, 0.?N..:.|
00004640: 64 4E FF 06 8F 20 53 55 42 54 52 41 43 54 20 54 |dN... SUBTRACT T|
00004650: 48 45 20 59 2D 41 58 49 53 20 56 41 4C 55 45 20 |HE Y-AXIS VALUE |
00004660: 46 52 4F 4D 00 85 4E 00 07 8F 20 54 48 45 20 50 |FROM..N... THE P|
00004670: 4C 4F 54 54 45 52 20 42 45 44 20 48 45 49 47 48 |LOTTER BED HEIGH|
00004680: 54 2C 20 49 4E 00 A3 4E 01 07 8F 20 54 48 49 53 |T, IN..N... THIS|
00004690: 20 43 41 53 45 20 54 48 45 20 42 4F 58 20 53 49 | CASE THE BOX SI|
000046A0: 5A 45 2C 00 C8 4E 02 07 8F 20 41 4E 44 20 4D 4F |ZE,..N... AND MO|
000046B0: 56 45 20 54 4F 20 54 48 45 20 49 4E 49 54 49 41 |VE TO THE INITIA|
000046C0: 4C 20 50 4F 49 4E 54 2E 00 CE 4E 03 07 3A 00 EE |L POINT...N..:..|
000046D0: 4E 04 07 3A 20 20 20 98 31 2C 22 4D 22 2C 58 28 |N..: .1,"M",X(|
000046E0: 31 29 2C AB 28 34 37 39 AB 59 28 31 29 29 00 F4 |1),.(479.Y(1))..|
000046F0: 4E 05 07 3A 00 19 4F 06 07 8F 20 50 4C 4F 54 20 |N..:..O... PLOT |
00004700: 54 48 45 20 50 4F 49 4E 54 53 20 46 52 4F 4D 20 |THE POINTS FROM |
00004710: 54 48 45 20 41 52 52 41 59 00 3D 4F 07 07 8F 20 |THE ARRAY.=O... |
00004720: 53 55 42 54 52 41 43 54 49 4E 47 20 54 48 45 20 |SUBTRACTING THE |
00004730: 59 2D 41 58 49 53 20 56 41 4C 55 45 53 00 60 4F |Y-AXIS VALUES.`O|
00004740: 08 07 8F 20 46 52 4F 4D 20 54 48 45 20 50 4C 4F |... FROM THE PLO|
00004750: 54 54 45 52 20 42 45 44 20 48 45 49 47 48 54 2E |TTER BED HEIGHT.|
00004760: 00 66 4F 09 07 3A 00 79 4F 0A 07 3A 20 20 20 81 |.fO..:.yO..: .|
00004770: 20 49 B2 31 20 A4 20 31 31 00 9B 4F 0B 07 3A 20 | I.1 . 11..O..: |
00004780: 20 20 20 20 98 31 2C 22 44 22 2C 58 28 49 29 2C | .1,"D",X(I),|
00004790: AB 28 34 37 39 AB 59 28 49 29 29 00 A5 4F 0C 07 |.(479.Y(I))..O..|
000047A0: 3A 20 20 20 82 00 AB 4F 0D 07 3A 00 C3 4F 0E 07 |: ...O..:..O..|
000047B0: 8F 20 45 4A 45 43 54 20 54 48 45 20 44 52 41 57 |. EJECT THE DRAW|
000047C0: 49 4E 47 00 C9 4F 0F 07 3A 00 E1 4F 10 07 3A 20 |ING..O..:..O..: |
000047D0: 20 20 98 31 2C 22 4D 22 2C 20 20 30 2C AB 34 37 | .1,"M", 0,.47|
000047E0: 39 00 E7 4F 11 07 3A 00 09 50 12 07 8F 20 45 53 |9..O..:..P... ES|
000047F0: 54 41 42 4C 49 53 48 20 4E 45 57 20 48 4F 4D 45 |TABLISH NEW HOME|
00004800: 20 50 4F 53 49 54 49 4F 4E 00 0F 50 13 07 3A 00 | POSITION..P..:.|
00004810: 1A 50 14 07 3A 20 20 20 98 34 00 20 50 15 07 3A |.P..: .4. P..:|
00004820: 00 44 50 16 07 8F 22 20 D5 C0 C0 C0 C0 C0 C0 C0 |.DP..." ........|
00004830: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00004840: C0 C0 C0 C9 00 68 50 17 07 8F 22 A0 DD 20 20 50 |.....hP...".. P|
00004850: 4C 4F 54 20 54 48 45 20 47 49 41 4E 54 20 4C 45 |LOT THE GIANT LE|
00004860: 54 54 45 52 20 20 20 DD 00 8C 50 18 07 8F 22 20 |TTER ...P..." |
00004870: DD 20 20 46 4C 49 50 50 45 44 20 42 4F 54 48 20 |. FLIPPED BOTH |
00004880: 53 49 44 45 20 54 4F 20 20 20 20 DD 00 B0 50 19 |SIDE TO ...P.|
00004890: 07 8F 22 20 DD 20 20 53 49 44 45 20 41 4E 44 20 |.." . SIDE AND |
000048A0: 54 4F 50 20 54 4F 20 42 4F 54 54 4F 4D 2E 20 DD |TOP TO BOTTOM. .|
000048B0: 00 D4 50 1A 07 8F 22 20 CA C0 C0 C0 C0 C0 C0 C0 |..P..." ........|
000048C0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000048D0: C0 C0 C0 CB 00 DA 50 1B 07 3A 00 FD 50 1C 07 8F |......P..:..P...|
000048E0: 20 44 52 41 57 20 41 20 53 51 55 41 52 45 20 42 | DRAW A SQUARE B|
000048F0: 4F 58 20 34 37 39 20 42 59 20 34 37 39 00 03 51 |OX 479 BY 479..Q|
00004900: 1D 07 3A 00 0D 51 1E 07 3A 20 20 98 34 00 2F 51 |..:..Q..: .4./Q|
00004910: 1F 07 3A 20 20 98 34 2C 22 46 4C 49 50 50 45 44 |..: .4,"FLIPPED|
00004920: 20 53 49 44 45 20 54 4F 20 53 49 44 45 2C 22 00 | SIDE TO SIDE,".|
00004930: 4E 51 20 07 3A 20 20 98 34 2C 22 41 4E 44 20 54 |NQ .: .4,"AND T|
00004940: 4F 50 20 54 4F 20 42 4F 54 54 4F 4D 3A 22 00 54 |OP TO BOTTOM:".T|
00004950: 51 21 07 3A 00 6B 51 22 07 3A 20 20 98 31 2C 22 |Q!.:.kQ".: .1,"|
00004960: 44 22 2C 34 37 39 2C 20 20 20 30 00 82 51 23 07 |D",479, 0..Q#.|
00004970: 3A 20 20 98 31 2C 22 44 22 2C 34 37 39 2C AB 34 |: .1,"D",479,.4|
00004980: 37 39 00 99 51 24 07 3A 20 20 98 31 2C 22 44 22 |79..Q$.: .1,"D"|
00004990: 2C 20 20 30 2C AB 34 37 39 00 B0 51 25 07 3A 20 |, 0,.479..Q%.: |
000049A0: 20 98 31 2C 22 44 22 2C 20 20 30 2C 20 20 20 30 | .1,"D", 0, 0|
000049B0: 00 B6 51 26 07 3A 00 DB 51 27 07 8F 20 53 55 42 |..Q&.:..Q'.. SUB|
000049C0: 54 52 41 43 54 20 54 48 45 20 58 2D 41 58 49 53 |TRACT THE X-AXIS|
000049D0: 20 41 4E 44 20 59 2D 41 58 49 53 00 FF 51 28 07 | AND Y-AXIS..Q(.|
000049E0: 8F 20 50 4F 49 4E 54 20 56 41 4C 55 45 53 20 46 |. POINT VALUES F|
000049F0: 52 4F 4D 20 54 48 45 20 50 4C 4F 54 54 45 52 00 |ROM THE PLOTTER.|
00004A00: 1E 52 29 07 8F 20 42 45 44 20 53 49 5A 45 20 41 |.R).. BED SIZE A|
00004A10: 4E 44 20 4D 4F 56 45 20 54 4F 20 54 48 45 00 33 |ND MOVE TO THE.3|
00004A20: 52 2A 07 8F 20 49 4E 49 54 49 41 4C 20 50 4F 49 |R*.. INITIAL POI|
00004A30: 4E 54 2E 00 39 52 2B 07 3A 00 5B 52 2C 07 3A 20 |NT..9R+.:.[R,.: |
00004A40: 98 31 2C 22 4D 22 2C 34 37 39 AB 58 28 31 29 2C |.1,"M",479.X(1),|
00004A50: AB 28 34 37 39 AB 59 28 31 29 29 00 61 52 2D 07 |.(479.Y(1)).aR-.|
00004A60: 3A 00 86 52 2E 07 8F 20 50 4C 4F 54 20 54 48 45 |:..R... PLOT THE|
00004A70: 20 50 4F 49 4E 54 53 20 46 52 4F 4D 20 54 48 45 | POINTS FROM THE|
00004A80: 20 41 52 52 41 59 00 A7 52 2F 07 8F 20 53 55 42 | ARRAY..R/.. SUB|
00004A90: 54 52 41 43 54 49 4E 47 20 54 48 45 20 58 2D 41 |TRACTING THE X-A|
00004AA0: 58 49 53 20 41 4E 44 00 CA 52 30 07 8F 20 59 2D |XIS AND..R0.. Y-|
00004AB0: 41 58 49 53 20 50 4F 49 4E 54 20 56 41 4C 55 45 |AXIS POINT VALUE|
00004AC0: 53 20 46 52 4F 4D 20 54 48 45 00 E2 52 31 07 8F |S FROM THE..R1..|
00004AD0: 20 50 4C 4F 54 54 45 52 20 42 45 44 20 53 49 5A | PLOTTER BED SIZ|
00004AE0: 45 2E 00 E8 52 32 07 3A 00 F9 52 33 07 3A 20 81 |E...R2.:..R3.: .|
00004AF0: 20 49 B2 31 20 A4 20 31 31 00 1B 53 34 07 3A 20 | I.1 . 11..S4.: |
00004B00: 98 31 2C 22 44 22 2C 34 37 39 AB 58 28 49 29 2C |.1,"D",479.X(I),|
00004B10: AB 28 34 37 39 AB 59 28 49 29 29 00 23 53 35 07 |.(479.Y(I)).#S5.|
00004B20: 3A 20 82 00 29 53 36 07 3A 00 41 53 37 07 8F 20 |: ..)S6.:.AS7.. |
00004B30: 45 4A 45 43 54 20 54 48 45 20 44 52 41 57 49 4E |EJECT THE DRAWIN|
00004B40: 47 00 47 53 38 07 3A 00 5F 53 39 07 3A 20 20 20 |G.GS8.:._S9.: |
00004B50: 98 31 2C 22 4D 22 2C 20 20 30 2C AB 34 37 39 00 |.1,"M", 0,.479.|
00004B60: 65 53 3A 07 3A 00 87 53 3B 07 8F 20 45 53 54 41 |eS:.:..S;.. ESTA|
00004B70: 42 4C 49 53 48 20 4E 45 57 20 48 4F 4D 45 20 50 |BLISH NEW HOME P|
00004B80: 4F 53 49 54 49 4F 4E 00 8D 53 3C 07 3A 00 98 53 |OSITION..S<.:..S|
00004B90: 3D 07 3A 20 20 20 98 34 00 9E 53 3E 07 3A 00 C2 |=.: .4..S>.:..|
00004BA0: 53 3F 07 8F 22 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 |S?.." ..........|
00004BB0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00004BC0: C0 C9 00 E6 53 40 07 8F 22 20 DD 20 20 20 20 20 |....S@.." . |
00004BD0: 50 4C 4F 54 20 4F 52 49 45 4E 54 41 54 49 4F 4E |PLOT ORIENTATION|
00004BE0: 20 20 20 20 20 DD 00 0A 54 41 07 8F 22 20 CA C0 | ...TA.." ..|
00004BF0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00004C00: C0 C0 C0 C0 C0 C0 C0 C0 C0 CB 00 10 54 42 07 3A |............TB.:|
00004C10: 00 2E 54 43 07 8F 20 20 20 54 48 45 20 46 4F 4C |..TC.. THE FOL|
00004C20: 4C 4F 57 49 4E 47 20 45 58 41 4D 50 4C 45 00 50 |LOWING EXAMPLE.P|
00004C30: 54 44 07 8F 20 20 20 44 45 4D 4F 4E 53 54 52 41 |TD.. DEMONSTRA|
00004C40: 54 45 53 20 50 4C 4F 54 54 49 4E 47 20 54 48 45 |TES PLOTTING THE|
00004C50: 00 71 54 45 07 8F 20 20 20 46 49 47 55 52 45 20 |.qTE.. FIGURE |
00004C60: 41 54 20 41 4E 20 4F 52 49 45 4E 54 41 54 49 4F |AT AN ORIENTATIO|
00004C70: 4E 00 91 54 46 07 8F 20 20 20 54 48 41 54 20 49 |N..TF.. THAT I|
00004C80: 53 20 56 45 52 54 49 43 41 4C 20 52 41 54 48 45 |S VERTICAL RATHE|
00004C90: 52 00 AA 54 47 07 8F 20 20 20 54 48 41 4E 20 48 |R..TG.. THAN H|
00004CA0: 4F 52 49 5A 4F 4E 54 41 4C 2E 00 B0 54 48 07 3A |ORIZONTAL...TH.:|
00004CB0: 00 D4 54 49 07 8F 22 20 D5 C0 C0 C0 C0 C0 C0 C0 |..TI.." ........|
00004CC0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00004CD0: C0 C0 C0 C9 00 F8 54 4A 07 8F 22 A0 DD 20 20 50 |......TJ..".. P|
00004CE0: 4C 4F 54 20 54 48 45 20 47 49 41 4E 54 20 4C 45 |LOT THE GIANT LE|
00004CF0: 54 54 45 52 20 20 20 DD 00 1C 55 4B 07 8F 22 20 |TTER ...UK.." |
00004D00: DD 20 20 4F 52 49 45 4E 54 45 44 20 56 45 52 54 |. ORIENTED VERT|
00004D10: 49 43 41 4C 4C 59 2E 20 20 20 20 DD 00 40 55 4C |ICALLY. ..@UL|
00004D20: 07 8F 22 20 CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |.." ............|
00004D30: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 CB |................|
00004D40: 00 46 55 4D 07 3A 00 69 55 4E 07 8F 20 44 52 41 |.FUM.:.iUN.. DRA|
00004D50: 57 20 41 20 53 51 55 41 52 45 20 42 4F 58 20 34 |W A SQUARE BOX 4|
00004D60: 37 39 20 42 59 20 34 37 39 00 6F 55 4F 07 3A 00 |79 BY 479.oUO.:.|
00004D70: 79 55 50 07 3A 20 20 98 34 00 9B 55 51 07 3A 20 |yUP.: .4..UQ.: |
00004D80: 20 98 34 2C 22 56 45 52 54 49 43 41 4C 20 4F 52 | .4,"VERTICAL OR|
00004D90: 49 45 4E 54 41 54 49 4F 4E 3A 22 00 A1 55 52 07 |IENTATION:"..UR.|
00004DA0: 3A 00 B8 55 53 07 3A 20 20 98 31 2C 22 44 22 2C |:..US.: .1,"D",|
00004DB0: 34 37 39 2C 20 20 20 30 00 CF 55 54 07 3A 20 20 |479, 0..UT.: |
00004DC0: 98 31 2C 22 44 22 2C 34 37 39 2C AB 34 37 39 00 |.1,"D",479,.479.|
00004DD0: E6 55 55 07 3A 20 20 98 31 2C 22 44 22 2C 20 20 |.UU.: .1,"D", |
00004DE0: 30 2C AB 34 37 39 00 FD 55 56 07 3A 20 20 98 31 |0,.479..UV.: .1|
00004DF0: 2C 22 44 22 2C 20 20 30 2C 20 20 20 30 00 03 56 |,"D", 0, 0..V|
00004E00: 57 07 3A 00 26 56 58 07 8F 20 55 53 45 20 54 48 |W.:.&VX.. USE TH|
00004E10: 45 20 58 2D 41 58 49 53 20 56 41 4C 55 45 20 46 |E X-AXIS VALUE F|
00004E20: 4F 52 20 54 48 45 00 48 56 59 07 8F 20 59 2D 41 |OR THE.HVY.. Y-A|
00004E30: 58 49 53 20 41 4E 44 20 54 48 45 20 59 2D 41 58 |XIS AND THE Y-AX|
00004E40: 49 53 20 56 41 4C 55 45 00 69 56 5A 07 8F 20 46 |IS VALUE.iVZ.. F|
00004E50: 4F 52 20 54 48 45 20 58 2D 41 58 49 53 20 41 4E |OR THE X-AXIS AN|
00004E60: 44 20 4D 4F 56 45 20 54 4F 00 85 56 5B 07 8F 20 |D MOVE TO..V[.. |
00004E70: 54 48 45 20 49 4E 49 54 49 41 4C 20 50 4F 53 49 |THE INITIAL POSI|
00004E80: 54 49 4F 4E 2E 00 8B 56 5C 07 3A 00 A5 56 5D 07 |TION...V\.:..V].|
00004E90: 3A 20 20 20 98 31 2C 22 4D 22 2C 59 28 31 29 2C |: .1,"M",Y(1),|
00004EA0: AB 58 28 31 29 00 AB 56 5E 07 3A 00 D0 56 5F 07 |.X(1)..V^.:..V_.|
00004EB0: 8F 20 50 4C 4F 54 20 54 48 45 20 50 4F 49 4E 54 |. PLOT THE POINT|
00004EC0: 53 20 46 52 4F 4D 20 54 48 45 20 41 52 52 41 59 |S FROM THE ARRAY|
00004ED0: 00 F2 56 60 07 8F 20 55 53 49 4E 47 20 54 48 45 |..V`.. USING THE|
00004EE0: 20 58 2D 41 58 49 53 20 56 41 4C 55 45 53 20 46 | X-AXIS VALUES F|
00004EF0: 4F 52 00 12 57 61 07 8F 20 54 48 45 20 59 2D 41 |OR..Wa.. THE Y-A|
00004F00: 58 49 53 20 41 4E 44 20 54 48 45 20 59 2D 41 58 |XIS AND THE Y-AX|
00004F10: 49 53 00 2F 57 62 07 8F 20 56 41 4C 55 45 53 20 |IS./Wb.. VALUES |
00004F20: 46 4F 52 20 54 48 45 20 58 2D 41 58 49 53 2E 00 |FOR THE X-AXIS..|
00004F30: 3B 57 63 07 8F 20 4E 4F 54 45 3A 00 57 57 64 07 |;Wc.. NOTE:.WWd.|
00004F40: 8F 20 54 48 49 53 20 57 49 4C 4C 20 49 4E 54 52 |. THIS WILL INTR|
00004F50: 4F 44 55 43 45 20 41 00 75 57 65 07 8F 20 52 45 |ODUCE A.uWe.. RE|
00004F60: 46 4C 45 43 54 49 4F 4E 20 57 48 49 43 48 20 43 |FLECTION WHICH C|
00004F70: 41 4E 20 42 45 00 97 57 66 07 8F 20 45 4C 49 4D |AN BE..Wf.. ELIM|
00004F80: 49 4E 41 54 45 44 20 42 59 20 49 4E 56 45 52 54 |INATED BY INVERT|
00004F90: 49 4E 47 20 54 48 45 00 AB 57 67 07 8F 20 58 2D |ING THE..Wg.. X-|
00004FA0: 20 4F 52 20 59 2D 41 58 49 53 2E 00 B1 57 68 07 | OR Y-AXIS...Wh.|
00004FB0: 3A 00 C4 57 69 07 3A 20 20 20 81 20 49 B2 31 20 |:..Wi.: . I.1 |
00004FC0: A4 20 31 31 00 E0 57 6A 07 3A 20 20 20 20 20 98 |. 11..Wj.: .|
00004FD0: 31 2C 22 44 22 2C 59 28 49 29 2C AB 58 28 49 29 |1,"D",Y(I),.X(I)|
00004FE0: 00 EA 57 6B 07 3A 20 20 20 82 00 F0 57 6C 07 3A |..Wk.: ...Wl.:|
00004FF0: 00 08 58 6D 07 8F 20 45 4A 45 43 54 20 54 48 45 |..Xm.. EJECT THE|
00005000: 20 44 52 41 57 49 4E 47 00 0E 58 6E 07 3A 00 26 | DRAWING..Xn.:.&|
00005010: 58 6F 07 3A 20 20 20 98 31 2C 22 4D 22 2C 20 20 |Xo.: .1,"M", |
00005020: 30 2C AB 34 37 39 00 2C 58 70 07 3A 00 4E 58 71 |0,.479.,Xp.:.NXq|
00005030: 07 8F 20 45 53 54 41 42 4C 49 53 48 20 4E 45 57 |.. ESTABLISH NEW|
00005040: 20 48 4F 4D 45 20 50 4F 53 49 54 49 4F 4E 00 54 | HOME POSITION.T|
00005050: 58 72 07 3A 00 5F 58 73 07 3A 20 20 20 98 34 00 |Xr.:._Xs.: .4.|
00005060: 65 58 74 07 3A 00 89 58 75 07 8F 22 20 D5 C0 C0 |eXt.:..Xu.." ...|
00005070: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00005080: C0 C0 C0 C0 C0 C0 C0 C0 C9 00 AD 58 76 07 8F 22 |...........Xv.."|
00005090: 20 DD 20 20 20 20 20 20 50 4C 4F 54 20 53 43 41 | . PLOT SCA|
000050A0: 4C 49 4E 47 20 20 20 20 20 20 20 20 DD 00 D1 58 |LING ...X|
000050B0: 77 07 8F 22 20 CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |w.." ...........|
000050C0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000050D0: CB 00 D7 58 78 07 3A 00 F6 58 79 07 8F 20 20 20 |...Xx.:..Xy.. |
000050E0: 54 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 20 45 58 |THE FOLLOWING EX|
000050F0: 41 4D 50 4C 45 53 00 17 59 7A 07 8F 20 20 20 44 |AMPLES..Yz.. D|
00005100: 45 4D 4F 4E 53 54 52 41 54 45 20 50 4C 4F 54 54 |EMONSTRATE PLOTT|
00005110: 49 4E 47 20 54 48 45 00 38 59 7B 07 8F 20 20 20 |ING THE.8Y{.. |
00005120: 53 41 4D 45 20 46 49 47 55 52 45 20 49 4E 20 44 |SAME FIGURE IN D|
00005130: 49 46 46 45 52 45 4E 54 00 4F 59 7C 07 8F 20 20 |IFFERENT.OY|.. |
00005140: 20 53 49 5A 45 20 53 43 41 4C 49 4E 47 53 2E 00 | SIZE SCALINGS..|
00005150: 55 59 7D 07 3A 00 79 59 7E 07 8F 22 20 D5 C0 C0 |UY}.:.yY~.." ...|
00005160: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00005170: C0 C0 C0 C0 C0 C0 C0 C0 C9 00 9D 59 7F 07 8F 22 |...........Y..."|
00005180: A0 DD 20 20 50 4C 4F 54 20 54 48 45 20 47 49 41 |.. PLOT THE GIA|
00005190: 4E 54 20 4C 45 54 54 45 52 20 20 20 DD 00 C1 59 |NT LETTER ...Y|
000051A0: 80 07 8F 22 20 DD 20 20 53 43 41 4C 45 44 20 44 |..." . SCALED D|
000051B0: 4F 57 4E 20 49 4E 20 53 49 5A 45 20 20 20 20 20 |OWN IN SIZE |
000051C0: DD 00 E5 59 81 07 8F 22 20 DD 20 20 41 4C 4F 4E |...Y..." . ALON|
000051D0: 47 20 54 48 45 20 58 2D 41 58 49 53 20 4F 4E 4C |G THE X-AXIS ONL|
000051E0: 59 2E 20 20 DD 00 09 5A 82 07 8F 22 20 CA C0 C0 |Y. ...Z..." ...|
000051F0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00005200: C0 C0 C0 C0 C0 C0 C0 C0 CB 00 0F 5A 83 07 3A 00 |...........Z..:.|
00005210: 32 5A 84 07 8F 20 44 52 41 57 20 41 20 53 51 55 |2Z... DRAW A SQU|
00005220: 41 52 45 20 42 4F 58 20 34 37 39 20 42 59 20 34 |ARE BOX 479 BY 4|
00005230: 37 39 00 38 5A 85 07 3A 00 43 5A 86 07 3A 20 20 |79.8Z..:.CZ..: |
00005240: 20 98 34 00 60 5A 87 07 3A 20 20 20 98 34 2C 22 | .4.`Z..: .4,"|
00005250: 52 45 44 55 43 45 44 20 58 2D 41 58 49 53 3A 22 |REDUCED X-AXIS:"|
00005260: 00 66 5A 88 07 3A 00 7E 5A 89 07 3A 20 20 20 98 |.fZ..:.~Z..: .|
00005270: 31 2C 22 44 22 2C 34 37 39 2C 20 20 20 30 00 96 |1,"D",479, 0..|
00005280: 5A 8A 07 3A 20 20 20 98 31 2C 22 44 22 2C 34 37 |Z..: .1,"D",47|
00005290: 39 2C AB 34 37 39 00 AE 5A 8B 07 3A 20 20 20 98 |9,.479..Z..: .|
000052A0: 31 2C 22 44 22 2C 20 20 30 2C AB 34 37 39 00 C6 |1,"D", 0,.479..|
000052B0: 5A 8C 07 3A 20 20 20 98 31 2C 22 44 22 2C 20 20 |Z..: .1,"D", |
000052C0: 30 2C 20 20 20 30 00 CC 5A 8D 07 3A 00 EF 5A 8E |0, 0..Z..:..Z.|
000052D0: 07 8F 20 44 49 56 49 44 45 20 54 48 45 20 58 2D |.. DIVIDE THE X-|
000052E0: 41 58 49 53 20 56 41 4C 55 45 20 42 59 20 32 00 |AXIS VALUE BY 2.|
000052F0: 0D 5B 8F 07 8F 20 41 4E 44 20 4D 4F 56 45 20 54 |.[... AND MOVE T|
00005300: 4F 20 54 48 45 20 49 4E 49 54 49 41 4C 00 1D 5B |O THE INITIAL..[|
00005310: 90 07 8F 20 50 4F 53 49 54 49 4F 4E 2E 00 23 5B |... POSITION..#[|
00005320: 91 07 3A 00 3F 5B 92 07 3A 20 20 20 98 31 2C 22 |..:.?[..: .1,"|
00005330: 4D 22 2C 58 28 31 29 AD 32 2C AB 59 28 31 29 00 |M",X(1).2,.Y(1).|
00005340: 45 5B 93 07 3A 00 6A 5B 94 07 8F 20 50 4C 4F 54 |E[..:.j[... PLOT|
00005350: 20 54 48 45 20 50 4F 49 4E 54 53 20 46 52 4F 4D | THE POINTS FROM|
00005360: 20 54 48 45 20 41 52 52 41 59 00 8B 5B 95 07 8F | THE ARRAY..[...|
00005370: 20 44 49 56 49 44 49 4E 47 20 54 48 45 20 58 2D | DIVIDING THE X-|
00005380: 41 58 49 53 20 56 41 4C 55 45 53 00 97 5B 96 07 |AXIS VALUES..[..|
00005390: 8F 20 42 59 20 32 2E 00 9D 5B 97 07 3A 00 B0 5B |. BY 2...[..:..[|
000053A0: 98 07 3A 20 20 20 81 20 49 B2 31 20 A4 20 31 31 |..: . I.1 . 11|
000053B0: 00 CE 5B 99 07 3A 20 20 20 20 20 98 31 2C 22 44 |..[..: .1,"D|
000053C0: 22 2C 58 28 49 29 AD 32 2C AB 59 28 49 29 00 D8 |",X(I).2,.Y(I)..|
000053D0: 5B 9A 07 3A 20 20 20 82 00 DE 5B 9B 07 3A 00 F6 |[..: ...[..:..|
000053E0: 5B 9C 07 8F 20 45 4A 45 43 54 20 54 48 45 20 44 |[... EJECT THE D|
000053F0: 52 41 57 49 4E 47 00 FC 5B 9D 07 3A 00 14 5C 9E |RAWING..[..:..\.|
00005400: 07 3A 20 20 20 98 31 2C 22 4D 22 2C 20 20 30 2C |.: .1,"M", 0,|
00005410: AB 34 37 39 00 1A 5C 9F 07 3A 00 3C 5C A0 07 8F |.479..\..:.<\...|
00005420: 20 45 53 54 41 42 4C 49 53 48 20 4E 45 57 20 48 | ESTABLISH NEW H|
00005430: 4F 4D 45 20 50 4F 53 49 54 49 4F 4E 00 42 5C A1 |OME POSITION.B\.|
00005440: 07 3A 00 4D 5C A2 07 3A 20 20 20 98 34 00 53 5C |.:.M\..: .4.S\|
00005450: A3 07 3A 00 77 5C A4 07 8F 22 20 D5 C0 C0 C0 C0 |..:.w\..." .....|
00005460: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00005470: C0 C0 C0 C0 C0 C0 C9 00 9B 5C A5 07 8F 22 A0 DD |.........\..."..|
00005480: 20 20 50 4C 4F 54 20 54 48 45 20 47 49 41 4E 54 | PLOT THE GIANT|
00005490: 20 4C 45 54 54 45 52 20 20 20 DD 00 BF 5C A6 07 | LETTER ...\..|
000054A0: 8F 22 20 DD 20 20 53 43 41 4C 45 44 20 44 4F 57 |." . SCALED DOW|
000054B0: 4E 20 49 4E 20 53 49 5A 45 20 20 20 20 20 DD 00 |N IN SIZE ..|
000054C0: E3 5C A7 07 8F 22 20 DD 20 20 41 4C 4F 4E 47 20 |.\..." . ALONG |
000054D0: 54 48 45 20 59 2D 41 58 49 53 20 4F 4E 4C 59 2E |THE Y-AXIS ONLY.|
000054E0: 20 20 DD 00 07 5D A8 07 8F 22 20 CA C0 C0 C0 C0 | ...]..." .....|
000054F0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00005500: C0 C0 C0 C0 C0 C0 CB 00 0D 5D A9 07 3A 00 30 5D |.........]..:.0]|
00005510: AA 07 8F 20 44 52 41 57 20 41 20 53 51 55 41 52 |... DRAW A SQUAR|
00005520: 45 20 42 4F 58 20 34 37 39 20 42 59 20 34 37 39 |E BOX 479 BY 479|
00005530: 00 36 5D AB 07 3A 00 41 5D AC 07 3A 20 20 20 98 |.6]..:.A]..: .|
00005540: 34 00 5E 5D AD 07 3A 20 20 20 98 34 2C 22 52 45 |4.^]..: .4,"RE|
00005550: 44 55 43 45 44 20 59 2D 41 58 49 53 3A 22 00 64 |DUCED Y-AXIS:".d|
00005560: 5D AE 07 3A 00 7C 5D AF 07 3A 20 20 20 98 31 2C |]..:.|]..: .1,|
00005570: 22 44 22 2C 34 37 39 2C 20 20 20 30 00 94 5D B0 |"D",479, 0..].|
00005580: 07 3A 20 20 20 98 31 2C 22 44 22 2C 34 37 39 2C |.: .1,"D",479,|
00005590: AB 34 37 39 00 AC 5D B1 07 3A 20 20 20 98 31 2C |.479..]..: .1,|
000055A0: 22 44 22 2C 20 20 30 2C AB 34 37 39 00 C4 5D B2 |"D", 0,.479..].|
000055B0: 07 3A 20 20 20 98 31 2C 22 44 22 2C 20 20 30 2C |.: .1,"D", 0,|
000055C0: 20 20 20 30 00 CA 5D B3 07 3A 00 ED 5D B4 07 8F | 0..]..:..]...|
000055D0: 20 44 49 56 49 44 45 20 54 48 45 20 59 2D 41 58 | DIVIDE THE Y-AX|
000055E0: 49 53 20 56 41 4C 55 45 20 42 59 20 32 00 0B 5E |IS VALUE BY 2..^|
000055F0: B5 07 8F 20 41 4E 44 20 4D 4F 56 45 20 54 4F 20 |... AND MOVE TO |
00005600: 54 48 45 20 49 4E 49 54 49 41 4C 00 1B 5E B6 07 |THE INITIAL..^..|
00005610: 8F 20 50 4F 53 49 54 49 4F 4E 2E 00 21 5E B7 07 |. POSITION..!^..|
00005620: 3A 00 3D 5E B8 07 3A 20 20 20 98 31 2C 22 4D 22 |:.=^..: .1,"M"|
00005630: 2C 58 28 31 29 2C AB 59 28 31 29 AD 32 00 43 5E |,X(1),.Y(1).2.C^|
00005640: B9 07 3A 00 68 5E BA 07 8F 20 50 4C 4F 54 20 54 |..:.h^... PLOT T|
00005650: 48 45 20 50 4F 49 4E 54 53 20 46 52 4F 4D 20 54 |HE POINTS FROM T|
00005660: 48 45 20 41 52 52 41 59 00 89 5E BB 07 8F 20 44 |HE ARRAY..^... D|
00005670: 49 56 49 44 49 4E 47 20 54 48 45 20 59 2D 41 58 |IVIDING THE Y-AX|
00005680: 49 53 20 56 41 4C 55 45 53 00 95 5E BC 07 8F 20 |IS VALUES..^... |
00005690: 42 59 20 32 2E 00 9B 5E BD 07 3A 00 AE 5E BE 07 |BY 2...^..:..^..|
000056A0: 3A 20 20 20 81 20 49 B2 31 20 A4 20 31 31 00 CC |: . I.1 . 11..|
000056B0: 5E BF 07 3A 20 20 20 20 20 98 31 2C 22 44 22 2C |^..: .1,"D",|
000056C0: 58 28 49 29 2C AB 59 28 49 29 AD 32 00 D6 5E C0 |X(I),.Y(I).2..^.|
000056D0: 07 3A 20 20 20 82 00 DC 5E C1 07 3A 00 F4 5E C2 |.: ...^..:..^.|
000056E0: 07 8F 20 45 4A 45 43 54 20 54 48 45 20 44 52 41 |.. EJECT THE DRA|
000056F0: 57 49 4E 47 00 FA 5E C3 07 3A 00 12 5F C4 07 3A |WING..^..:.._..:|
00005700: 20 20 20 98 31 2C 22 4D 22 2C 20 20 30 2C AB 34 | .1,"M", 0,.4|
00005710: 37 39 00 18 5F C5 07 3A 00 3A 5F C6 07 8F 20 45 |79.._..:.:_... E|
00005720: 53 54 41 42 4C 49 53 48 20 4E 45 57 20 48 4F 4D |STABLISH NEW HOM|
00005730: 45 20 50 4F 53 49 54 49 4F 4E 00 40 5F C7 07 3A |E POSITION.@_..:|
00005740: 00 4B 5F C8 07 3A 20 20 20 98 34 00 51 5F C9 07 |.K_..: .4.Q_..|
00005750: 3A 00 75 5F CA 07 8F 22 20 D5 C0 C0 C0 C0 C0 C0 |:.u_..." .......|
00005760: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00005770: C0 C0 C0 C0 C9 00 99 5F CB 07 8F 22 A0 DD 20 20 |......._...".. |
00005780: 50 4C 4F 54 20 54 48 45 20 47 49 41 4E 54 20 4C |PLOT THE GIANT L|
00005790: 45 54 54 45 52 20 20 20 DD 00 BD 5F CC 07 8F 22 |ETTER ..._..."|
000057A0: 20 DD 20 20 53 43 41 4C 45 44 20 44 4F 57 4E 20 | . SCALED DOWN |
000057B0: 49 4E 20 53 49 5A 45 20 20 20 20 20 DD 00 E1 5F |IN SIZE ..._|
000057C0: CD 07 8F 22 20 DD 20 20 41 4C 4F 4E 47 20 54 48 |..." . ALONG TH|
000057D0: 45 20 58 2D 41 58 49 53 20 41 4E 44 20 20 20 20 |E X-AXIS AND |
000057E0: DD 00 05 60 CE 07 8F 22 20 DD 20 20 41 4C 4F 4E |...`..." . ALON|
000057F0: 47 20 54 48 45 20 59 2D 41 58 49 53 2E 20 20 20 |G THE Y-AXIS. |
00005800: 20 20 20 20 DD 00 29 60 CF 07 8F 22 20 CA C0 C0 | ..)`..." ...|
00005810: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00005820: C0 C0 C0 C0 C0 C0 C0 C0 CB 00 2F 60 D0 07 3A 00 |........../`..:.|
00005830: 52 60 D1 07 8F 20 44 52 41 57 20 41 20 53 51 55 |R`... DRAW A SQU|
00005840: 41 52 45 20 42 4F 58 20 34 37 39 20 42 59 20 34 |ARE BOX 479 BY 4|
00005850: 37 39 00 58 60 D2 07 3A 00 63 60 D3 07 3A 20 20 |79.X`..:.c`..: |
00005860: 20 98 34 00 69 60 D4 07 3A 00 74 60 D5 07 3A 20 | .4.i`..:.t`..: |
00005870: 20 20 98 34 00 94 60 D6 07 3A 20 20 20 98 34 2C | .4..`..: .4,|
00005880: 22 52 45 44 55 43 45 44 20 58 2D 41 58 49 53 20 |"REDUCED X-AXIS |
00005890: 41 4E 44 22 00 B1 60 D7 07 3A 20 20 20 98 34 2C |AND"..`..: .4,|
000058A0: 22 52 45 44 55 43 45 44 20 59 2D 41 58 49 53 3A |"REDUCED Y-AXIS:|
000058B0: 22 00 B7 60 D8 07 3A 00 CF 60 D9 07 3A 20 20 20 |"..`..:..`..: |
000058C0: 98 31 2C 22 44 22 2C 34 37 39 2C 20 20 20 30 00 |.1,"D",479, 0.|
000058D0: E7 60 DA 07 3A 20 20 20 98 31 2C 22 44 22 2C 34 |.`..: .1,"D",4|
000058E0: 37 39 2C AB 34 37 39 00 FF 60 DB 07 3A 20 20 20 |79,.479..`..: |
000058F0: 98 31 2C 22 44 22 2C 20 20 30 2C AB 34 37 39 00 |.1,"D", 0,.479.|
00005900: 17 61 DC 07 3A 20 20 20 98 31 2C 22 44 22 2C 20 |.a..: .1,"D", |
00005910: 20 30 2C 20 20 20 30 00 1D 61 DD 07 3A 00 3D 61 | 0, 0..a..:.=a|
00005920: DE 07 8F 20 44 49 56 49 44 45 20 54 48 45 20 58 |... DIVIDE THE X|
00005930: 2D 41 58 49 53 20 41 4E 44 20 54 48 45 00 5F 61 |-AXIS AND THE._a|
00005940: DF 07 8F 20 59 2D 41 58 49 53 20 56 41 4C 55 45 |... Y-AXIS VALUE|
00005950: 53 20 42 59 20 32 20 41 4E 44 20 4D 4F 56 45 00 |S BY 2 AND MOVE.|
00005960: 7E 61 E0 07 8F 20 54 4F 20 54 48 45 20 49 4E 49 |~a... TO THE INI|
00005970: 54 49 41 4C 20 50 4F 53 49 54 49 4F 4E 2E 00 84 |TIAL POSITION...|
00005980: 61 E1 07 3A 00 A2 61 E2 07 3A 20 20 20 98 31 2C |a..:..a..: .1,|
00005990: 22 4D 22 2C 58 28 31 29 AD 32 2C AB 59 28 31 29 |"M",X(1).2,.Y(1)|
000059A0: AD 32 00 A8 61 E3 07 3A 00 CD 61 E4 07 8F 20 50 |.2..a..:..a... P|
000059B0: 4C 4F 54 20 54 48 45 20 50 4F 49 4E 54 53 20 46 |LOT THE POINTS F|
000059C0: 52 4F 4D 20 54 48 45 20 41 52 52 41 59 00 EF 61 |ROM THE ARRAY..a|
000059D0: E5 07 8F 20 44 49 56 49 44 49 4E 47 20 54 48 45 |... DIVIDING THE|
000059E0: 20 58 2D 41 58 49 53 20 41 4E 44 20 54 48 45 00 | X-AXIS AND THE.|
000059F0: 09 62 E6 07 8F 20 59 2D 41 58 49 53 20 56 41 4C |.b... Y-AXIS VAL|
00005A00: 55 45 53 20 42 59 20 32 2E 00 0F 62 E7 07 3A 00 |UES BY 2...b..:.|
00005A10: 22 62 E8 07 3A 20 20 20 81 20 49 B2 31 20 A4 20 |"b..: . I.1 . |
00005A20: 31 31 00 42 62 E9 07 3A 20 20 20 20 20 98 31 2C |11.Bb..: .1,|
00005A30: 22 44 22 2C 58 28 49 29 AD 32 2C AB 59 28 49 29 |"D",X(I).2,.Y(I)|
00005A40: AD 32 00 4C 62 EA 07 3A 20 20 20 82 00 52 62 EB |.2.Lb..: ..Rb.|
00005A50: 07 3A 00 6A 62 EC 07 8F 20 45 4A 45 43 54 20 54 |.:.jb... EJECT T|
00005A60: 48 45 20 44 52 41 57 49 4E 47 00 70 62 ED 07 3A |HE DRAWING.pb..:|
00005A70: 00 88 62 EE 07 3A 20 20 20 98 31 2C 22 4D 22 2C |..b..: .1,"M",|
00005A80: 20 20 30 2C AB 34 37 39 00 8E 62 EF 07 3A 00 B0 | 0,.479..b..:..|
00005A90: 62 F0 07 8F 20 45 53 54 41 42 4C 49 53 48 20 4E |b... ESTABLISH N|
00005AA0: 45 57 20 48 4F 4D 45 20 50 4F 53 49 54 49 4F 4E |EW HOME POSITION|
00005AB0: 00 B6 62 F1 07 3A 00 C1 62 F2 07 3A 20 20 20 98 |..b..:..b..: .|
00005AC0: 34 00 C7 62 F3 07 3A 00 EB 62 F4 07 8F 22 20 D5 |4..b..:..b..." .|
00005AD0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00005AE0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 00 0F 63 F5 07 |.............c..|
00005AF0: 8F 22 20 DD 20 20 20 20 20 20 50 4C 4F 54 20 52 |." . PLOT R|
00005B00: 4F 54 41 54 49 4F 4E 20 20 20 20 20 20 20 DD 00 |OTATION ..|
00005B10: 33 63 F6 07 8F 22 20 CA C0 C0 C0 C0 C0 C0 C0 C0 |3c..." .........|
00005B20: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00005B30: C0 C0 CB 00 39 63 F7 07 3A 00 58 63 F8 07 8F 20 |....9c..:.Xc... |
00005B40: 20 20 54 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 20 | THE FOLLOWING |
00005B50: 45 58 41 4D 50 4C 45 53 00 79 63 F9 07 8F 20 20 |EXAMPLES.yc... |
00005B60: 20 44 45 4D 4F 4E 53 54 52 41 54 45 20 50 4C 4F | DEMONSTRATE PLO|
00005B70: 54 54 49 4E 47 20 54 48 45 00 9D 63 FA 07 8F 20 |TTING THE..c... |
00005B80: 20 20 53 41 4D 45 20 46 49 47 55 52 45 20 52 4F | SAME FIGURE RO|
00005B90: 54 41 54 45 44 20 54 48 52 4F 55 47 48 00 B0 63 |TATED THROUGH..c|
00005BA0: FB 07 8F 20 20 20 41 4E 59 20 41 4E 47 4C 45 2E |... ANY ANGLE.|
00005BB0: 00 B6 63 FC 07 3A 00 DA 63 FD 07 8F 22 20 D5 C0 |..c..:..c..." ..|
00005BC0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00005BD0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 00 FE 63 FE 07 8F |............c...|
00005BE0: 22 A0 DD 20 20 50 4C 4F 54 20 54 48 45 20 47 49 |".. PLOT THE GI|
00005BF0: 41 4E 54 20 4C 45 54 54 45 52 20 20 20 DD 00 22 |ANT LETTER .."|
00005C00: 64 FF 07 8F 22 20 DD 20 20 52 4F 54 41 54 45 44 |d..." . ROTATED|
00005C10: 20 54 48 52 4F 55 47 48 20 41 4E 20 20 20 20 20 | THROUGH AN |
00005C20: 20 DD 00 46 64 00 08 8F 22 20 DD 20 20 41 4E 47 | ..Fd..." . ANG|
00005C30: 4C 45 20 4F 46 20 34 35 20 44 45 47 52 45 45 53 |LE OF 45 DEGREES|
00005C40: 2E 20 20 20 20 DD 00 6A 64 01 08 8F 22 20 CA C0 |. ..jd..." ..|
00005C50: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00005C60: C0 C0 C0 C0 C0 C0 C0 C0 C0 CB 00 70 64 02 08 3A |...........pd..:|
00005C70: 00 93 64 03 08 8F 20 44 52 41 57 20 41 20 53 51 |..d... DRAW A SQ|
00005C80: 55 41 52 45 20 42 4F 58 20 34 37 39 20 42 59 20 |UARE BOX 479 BY |
00005C90: 34 37 39 00 99 64 04 08 3A 00 A4 64 05 08 3A 20 |479..d..:..d..: |
00005CA0: 20 20 98 34 00 C5 64 06 08 3A 20 20 20 98 34 2C | .4..d..: .4,|
00005CB0: 22 34 35 20 44 45 47 52 45 45 20 52 4F 54 41 54 |"45 DEGREE ROTAT|
00005CC0: 49 4F 4E 2C 22 00 E6 64 07 08 3A 20 20 20 98 34 |ION,"..d..: .4|
00005CD0: 2C 22 57 49 54 48 20 58 2D 41 58 49 53 20 4F 46 |,"WITH X-AXIS OF|
00005CE0: 46 53 45 54 3A 22 00 EC 64 08 08 3A 00 04 65 09 |FSET:"..d..:..e.|
00005CF0: 08 3A 20 20 20 98 31 2C 22 44 22 2C 34 37 39 2C |.: .1,"D",479,|
00005D00: 20 20 20 30 00 1C 65 0A 08 3A 20 20 20 98 31 2C | 0..e..: .1,|
00005D10: 22 44 22 2C 34 37 39 2C AB 34 37 39 00 34 65 0B |"D",479,.479.4e.|
00005D20: 08 3A 20 20 20 98 31 2C 22 44 22 2C 20 20 30 2C |.: .1,"D", 0,|
00005D30: AB 34 37 39 00 4C 65 0C 08 3A 20 20 20 98 31 2C |.479.Le..: .1,|
00005D40: 22 44 22 2C 20 20 30 2C 20 20 20 30 00 52 65 0D |"D", 0, 0.Re.|
00005D50: 08 3A 00 72 65 0E 08 8F 20 44 45 46 49 4E 45 20 |.:.re... DEFINE |
00005D60: 54 48 45 20 52 4F 54 41 54 49 4F 4E 20 41 4E 47 |THE ROTATION ANG|
00005D70: 4C 45 00 83 65 0F 08 8F 20 46 55 4E 43 54 49 4F |LE..e... FUNCTIO|
00005D80: 4E 53 3A 00 89 65 10 08 3A 00 A6 65 11 08 3A 20 |NS:..e..:..e..: |
00005D90: 20 20 52 41 B2 34 35 20 20 20 20 20 20 20 3A 8F | RA.45 :.|
00005DA0: 20 41 4E 47 4C 45 00 CB 65 12 08 3A 20 20 20 43 | ANGLE..e..: C|
00005DB0: 46 B2 FF AD 31 38 30 20 20 20 20 3A 8F 20 52 41 |F...180 :. RA|
00005DC0: 44 49 41 4E 20 46 41 43 54 4F 52 00 F0 65 13 08 |DIAN FACTOR..e..|
00005DD0: 3A 20 20 20 52 41 B2 52 41 AC 43 46 20 20 20 20 |: RA.RA.CF |
00005DE0: 3A 8F 20 43 4F 4E 56 45 52 54 20 41 4E 47 4C 45 |:. CONVERT ANGLE|
00005DF0: 00 10 66 14 08 3A 20 20 20 53 52 B2 BF 28 52 41 |..f..: SR..(RA|
00005E00: 29 20 20 3A 8F 20 41 4E 47 4C 45 20 53 49 4E 45 |) :. ANGLE SINE|
00005E10: 00 32 66 15 08 3A 20 20 20 43 52 B2 BE 28 52 41 |.2f..: CR..(RA|
00005E20: 29 20 20 3A 8F 20 41 4E 47 4C 45 20 43 4F 53 49 |) :. ANGLE COSI|
00005E30: 4E 45 00 38 66 16 08 3A 00 5A 66 17 08 8F 20 52 |NE.8f..:.Zf... R|
00005E40: 4F 54 41 54 45 20 54 48 45 20 50 4F 49 4E 54 53 |OTATE THE POINTS|
00005E50: 20 55 53 49 4E 47 20 54 48 45 00 73 66 18 08 8F | USING THE.sf...|
00005E60: 20 46 4F 4C 4C 4F 57 49 4E 47 20 46 4F 52 4D 55 | FOLLOWING FORMU|
00005E70: 4C 41 3A 00 88 66 19 08 8F 20 20 20 58 50 3D 43 |LA:..f... XP=C|
00005E80: 52 2A 58 2D 53 52 2A 59 00 9D 66 1A 08 8F 20 20 |R*X-SR*Y..f... |
00005E90: 20 59 50 3D 53 52 2A 58 2B 43 52 2A 59 00 A3 66 | YP=SR*X+CR*Y..f|
00005EA0: 1B 08 3A 00 C3 66 1C 08 8F 20 4D 4F 56 45 20 54 |..:..f... MOVE T|
00005EB0: 4F 20 54 48 45 20 49 4E 49 54 49 41 4C 20 50 4F |O THE INITIAL PO|
00005EC0: 49 4E 54 00 C9 66 1D 08 3A 00 E4 66 1E 08 3A 20 |INT..f..:..f..: |
00005ED0: 20 20 58 50 B2 43 52 AC 58 28 31 29 AB 53 52 AC | XP.CR.X(1).SR.|
00005EE0: 59 28 31 29 00 FF 66 1F 08 3A 20 20 20 59 50 B2 |Y(1)..f..: YP.|
00005EF0: 53 52 AC 58 28 31 29 AA 43 52 AC 59 28 31 29 00 |SR.X(1).CR.Y(1).|
00005F00: 15 67 20 08 3A 20 20 20 98 31 2C 22 4D 22 2C 58 |.g .: .1,"M",X|
00005F10: 50 2C AB 59 50 00 1B 67 21 08 3A 00 40 67 22 08 |P,.YP..g!.:.@g".|
00005F20: 8F 20 50 4C 4F 54 20 54 48 45 20 50 4F 49 4E 54 |. PLOT THE POINT|
00005F30: 53 20 46 52 4F 4D 20 54 48 45 20 41 52 52 41 59 |S FROM THE ARRAY|
00005F40: 00 61 67 23 08 8F 20 52 4F 54 41 54 49 4E 47 20 |.ag#.. ROTATING |
00005F50: 54 48 45 20 58 2D 20 41 4E 44 20 59 2D 41 58 49 |THE X- AND Y-AXI|
00005F60: 53 00 84 67 24 08 8F 20 50 4F 49 4E 54 53 20 42 |S..g$.. POINTS B|
00005F70: 59 20 54 48 45 20 52 4F 54 41 54 49 4F 4E 20 41 |Y THE ROTATION A|
00005F80: 4E 47 4C 45 00 90 67 25 08 8F 20 4E 4F 54 45 3A |NGLE..g%.. NOTE:|
00005F90: 00 B1 67 26 08 8F 20 52 4F 54 41 54 49 4F 4E 20 |..g&.. ROTATION |
00005FA0: 41 52 4F 55 4E 44 20 54 48 45 20 4F 52 49 47 49 |AROUND THE ORIGI|
00005FB0: 4E 00 D5 67 27 08 8F 20 57 49 4C 4C 20 43 41 55 |N..g'.. WILL CAU|
00005FC0: 53 45 20 4D 4F 53 54 20 4F 46 20 54 48 45 20 4C |SE MOST OF THE L|
00005FD0: 45 54 54 45 52 00 F3 67 28 08 8F 20 54 4F 20 4D |ETTER..g(.. TO M|
00005FE0: 4F 56 45 20 4F 55 54 20 4F 46 20 54 48 45 20 50 |OVE OUT OF THE P|
00005FF0: 4C 4F 54 00 17 68 29 08 8F 20 57 49 4E 44 4F 57 |LOT..h).. WINDOW|
00006000: 2E 20 54 48 45 52 45 46 4F 52 45 2C 20 54 48 45 |. THEREFORE, THE|
00006010: 20 4C 45 54 54 45 52 00 3A 68 2A 08 8F 20 57 49 | LETTER.:h*.. WI|
00006020: 4C 4C 20 42 45 20 50 4C 4F 54 54 45 44 20 57 49 |LL BE PLOTTED WI|
00006030: 54 48 20 4F 46 46 53 45 54 2E 00 59 68 2B 08 8F |TH OFFSET..Yh+..|
00006040: 20 41 44 44 49 4E 47 20 32 34 30 20 54 4F 20 54 | ADDING 240 TO T|
00006050: 48 45 20 58 2D 41 58 49 53 00 7B 68 2C 08 8F 20 |HE X-AXIS.{h,.. |
00006060: 57 49 4C 4C 20 4B 45 45 50 20 54 48 45 20 4C 45 |WILL KEEP THE LE|
00006070: 54 54 45 52 20 57 49 54 48 49 4E 00 87 68 2D 08 |TTER WITHIN..h-.|
00006080: 8F 20 56 49 45 57 2E 00 8D 68 2E 08 3A 00 A0 68 |. VIEW...h..:..h|
00006090: 2F 08 3A 20 20 20 81 20 49 B2 31 20 A4 20 31 31 |/.: . I.1 . 11|
000060A0: 00 BD 68 30 08 3A 20 20 20 20 20 58 50 B2 43 52 |..h0.: XP.CR|
000060B0: AC 58 28 49 29 AB 53 52 AC 59 28 49 29 00 DA 68 |.X(I).SR.Y(I)..h|
000060C0: 31 08 3A 20 20 20 20 20 59 50 B2 53 52 AC 58 28 |1.: YP.SR.X(|
000060D0: 49 29 AA 43 52 AC 59 28 49 29 00 F6 68 32 08 3A |I).CR.Y(I)..h2.:|
000060E0: 20 20 20 20 20 98 31 2C 22 44 22 2C 58 50 AA 32 | .1,"D",XP.2|
000060F0: 34 30 2C AB 59 50 00 00 69 33 08 3A 20 20 20 82 |40,.YP..i3.: .|
00006100: 00 06 69 34 08 3A 00 1E 69 35 08 8F 20 45 4A 45 |..i4.:..i5.. EJE|
00006110: 43 54 20 54 48 45 20 44 52 41 57 49 4E 47 00 24 |CT THE DRAWING.$|
00006120: 69 36 08 3A 00 3C 69 37 08 3A 20 20 20 98 31 2C |i6.:.<i7.: .1,|
00006130: 22 4D 22 2C 20 20 30 2C AB 34 37 39 00 42 69 38 |"M", 0,.479.Bi8|
00006140: 08 3A 00 64 69 39 08 8F 20 45 53 54 41 42 4C 49 |.:.di9.. ESTABLI|
00006150: 53 48 20 4E 45 57 20 48 4F 4D 45 20 50 4F 53 49 |SH NEW HOME POSI|
00006160: 54 49 4F 4E 00 6A 69 3A 08 3A 00 75 69 3B 08 3A |TION.ji:.:.ui;.:|
00006170: 20 20 20 98 34 00 7B 69 3C 08 3A 00 9F 69 3D 08 | .4.{i<.:..i=.|
00006180: 8F 22 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |." .............|
00006190: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 00 |................|
000061A0: C3 69 3E 08 8F 22 A0 DD 20 20 50 4C 4F 54 20 54 |.i>..".. PLOT T|
000061B0: 48 45 20 47 49 41 4E 54 20 4C 45 54 54 45 52 20 |HE GIANT LETTER |
000061C0: 20 20 DD 00 E7 69 3F 08 8F 22 20 DD 20 20 52 4F | ...i?.." . RO|
000061D0: 54 41 54 45 44 20 41 52 4F 55 4E 44 20 41 4E 47 |TATED AROUND ANG|
000061E0: 4C 45 53 20 20 20 DD 00 0B 6A 40 08 8F 22 20 DD |LES ...j@.." .|
000061F0: 20 20 57 48 49 43 48 20 41 52 45 20 4D 55 4C 54 | WHICH ARE MULT|
00006200: 49 50 4C 45 53 20 4F 46 20 20 DD 00 2F 6A 41 08 |IPLES OF ../jA.|
00006210: 8F 22 20 DD 20 20 34 35 20 44 45 47 52 45 45 53 |." . 45 DEGREES|
00006220: 2C 20 57 49 54 48 20 20 20 20 20 20 20 20 DD 00 |, WITH ..|
00006230: 53 6A 42 08 8F 22 20 DD 20 20 53 43 41 4C 49 4E |SjB.." . SCALIN|
00006240: 47 20 41 4E 44 20 4F 46 46 53 45 54 53 2E 20 20 |G AND OFFSETS. |
00006250: 20 20 DD 00 77 6A 43 08 8F 22 20 CA C0 C0 C0 C0 | ..wjC.." .....|
00006260: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00006270: C0 C0 C0 C0 C0 C0 CB 00 7D 6A 44 08 3A 00 A0 6A |........}jD.:..j|
00006280: 45 08 8F 20 44 52 41 57 20 41 20 53 51 55 41 52 |E.. DRAW A SQUAR|
00006290: 45 20 42 4F 58 20 34 37 39 20 42 59 20 34 37 39 |E BOX 479 BY 479|
000062A0: 00 A6 6A 46 08 3A 00 B0 6A 47 08 3A 20 20 98 34 |..jF.:..jG.: .4|
000062B0: 00 D2 6A 48 08 3A 20 20 98 34 2C 22 52 4F 54 41 |..jH.: .4,"ROTA|
000062C0: 54 49 4F 4E 2C 20 53 43 41 4C 49 4E 47 20 41 4E |TION, SCALING AN|
000062D0: 44 22 00 F4 6A 49 08 3A 20 20 98 34 2C 22 58 20 |D"..jI.: .4,"X |
000062E0: 41 4E 44 20 59 2D 41 58 49 53 20 4F 46 46 53 45 |AND Y-AXIS OFFSE|
000062F0: 54 53 3A 22 00 FA 6A 4A 08 3A 00 11 6B 4B 08 3A |TS:"..jJ.:..kK.:|
00006300: 20 20 98 31 2C 22 44 22 2C 34 37 39 2C 20 20 20 | .1,"D",479, |
00006310: 30 00 28 6B 4C 08 3A 20 20 98 31 2C 22 44 22 2C |0.(kL.: .1,"D",|
00006320: 34 37 39 2C AB 34 37 39 00 3F 6B 4D 08 3A 20 20 |479,.479.?kM.: |
00006330: 98 31 2C 22 44 22 2C 20 20 30 2C AB 34 37 39 00 |.1,"D", 0,.479.|
00006340: 56 6B 4E 08 3A 20 20 98 31 2C 22 44 22 2C 20 20 |VkN.: .1,"D", |
00006350: 30 2C 20 20 20 30 00 5C 6B 4F 08 3A 00 7C 6B 50 |0, 0.\kO.:.|kP|
00006360: 08 8F 20 44 45 46 49 4E 45 20 54 48 45 20 52 4F |.. DEFINE THE RO|
00006370: 54 41 54 49 4F 4E 20 41 4E 47 4C 45 00 9B 6B 51 |TATION ANGLE..kQ|
00006380: 08 8F 20 46 55 4E 43 54 49 4F 4E 53 20 41 4E 44 |.. FUNCTIONS AND|
00006390: 20 53 54 4F 52 45 20 54 48 45 4D 00 B0 6B 52 08 | STORE THEM..kR.|
000063A0: 8F 20 49 4E 54 4F 20 41 4E 20 41 52 52 41 59 2E |. INTO AN ARRAY.|
000063B0: 00 B6 6B 53 08 3A 00 DC 6B 54 08 8F 20 44 45 46 |..kS.:..kT.. DEF|
000063C0: 49 4E 45 20 41 52 52 41 59 53 20 54 4F 20 48 4F |INE ARRAYS TO HO|
000063D0: 4C 44 20 46 55 4E 43 54 49 4F 4E 53 00 E2 6B 55 |LD FUNCTIONS..kU|
000063E0: 08 3A 00 01 6C 56 08 3A 20 20 20 86 20 53 52 28 |.:..lV.: . SR(|
000063F0: 38 29 20 20 3A 8F 20 53 49 4E 45 20 41 52 52 41 |8) :. SINE ARRA|
00006400: 59 00 22 6C 57 08 3A 20 20 20 86 20 43 52 28 38 |Y."lW.: . CR(8|
00006410: 29 20 20 3A 8F 20 43 4F 53 49 4E 45 20 41 52 52 |) :. COSINE ARR|
00006420: 41 59 00 28 6C 58 08 3A 00 49 6C 59 08 8F 20 4C |AY.(lX.:.IlY.. L|
00006430: 4F 41 44 20 46 55 4E 43 54 49 4F 4E 53 20 49 4E |OAD FUNCTIONS IN|
00006440: 54 4F 20 41 52 52 41 59 53 00 4F 6C 5A 08 3A 00 |TO ARRAYS.OlZ.:.|
00006450: 74 6C 5B 08 3A 20 20 20 43 46 B2 FF AD 31 38 30 |tl[.: CF...180|
00006460: 20 20 20 20 3A 8F 20 52 41 44 49 41 4E 20 46 41 | :. RADIAN FA|
00006470: 43 54 4F 52 00 86 6C 5C 08 3A 20 20 20 81 20 49 |CTOR..l\.: . I|
00006480: B2 31 20 A4 20 38 00 A8 6C 5D 08 3A 20 20 20 20 |.1 . 8..l].: |
00006490: 20 52 41 B2 49 AC 34 35 20 20 20 3A 8F 20 4E 45 | RA.I.45 :. NE|
000064A0: 58 54 20 41 4E 47 4C 45 00 CD 6C 5E 08 3A 20 20 |XT ANGLE..l^.: |
000064B0: 20 20 20 52 41 B2 52 41 AC 43 46 20 20 3A 8F 20 | RA.RA.CF :. |
000064C0: 43 4F 4E 56 45 52 54 20 41 4E 47 4C 45 00 EC 6C |CONVERT ANGLE..l|
000064D0: 5F 08 3A 20 20 20 20 20 53 52 28 49 29 B2 BF 28 |_.: SR(I)..(|
000064E0: 52 41 29 20 20 3A 8F 20 53 49 4E 45 00 0D 6D 60 |RA) :. SINE..m`|
000064F0: 08 3A 20 20 20 20 20 43 52 28 49 29 B2 BE 28 52 |.: CR(I)..(R|
00006500: 41 29 20 20 3A 8F 20 43 4F 53 49 4E 45 00 17 6D |A) :. COSINE..m|
00006510: 61 08 3A 20 20 20 82 00 1D 6D 62 08 3A 00 42 6D |a.: ...mb.:.Bm|
00006520: 63 08 8F 20 44 45 46 49 4E 45 20 54 48 45 20 53 |c.. DEFINE THE S|
00006530: 43 41 4C 49 4E 47 20 41 4E 44 20 4F 46 46 53 45 |CALING AND OFFSE|
00006540: 54 53 00 48 6D 64 08 3A 00 6A 6D 65 08 3A 20 20 |TS.Hmd.:.jme.: |
00006550: 20 53 46 B2 2E 35 20 20 20 3A 8F 20 53 43 41 4C | SF..5 :. SCAL|
00006560: 49 4E 47 20 46 41 43 54 4F 52 00 8B 6D 66 08 3A |ING FACTOR..mf.:|
00006570: 20 20 20 58 4F B2 32 34 30 20 20 3A 8F 20 58 2D | XO.240 :. X-|
00006580: 41 58 49 53 20 4F 46 46 53 45 54 00 AC 6D 67 08 |AXIS OFFSET..mg.|
00006590: 3A 20 20 20 59 4F B2 32 34 30 20 20 3A 8F 20 59 |: YO.240 :. Y|
000065A0: 2D 41 58 49 53 20 4F 46 46 53 45 54 00 B2 6D 68 |-AXIS OFFSET..mh|
000065B0: 08 3A 00 D2 6D 69 08 8F 20 4C 4F 4F 50 20 45 49 |.:..mi.. LOOP EI|
000065C0: 47 48 54 20 54 49 4D 45 53 2C 20 44 52 41 57 49 |GHT TIMES, DRAWI|
000065D0: 4E 47 00 F4 6D 6A 08 8F 20 41 20 52 4F 54 41 54 |NG..mj.. A ROTAT|
000065E0: 45 44 20 4C 45 54 54 45 52 20 45 41 43 48 20 54 |ED LETTER EACH T|
000065F0: 49 4D 45 2E 00 FA 6D 6B 08 3A 00 0C 6E 6C 08 3A |IME...mk.:..nl.:|
00006600: 20 20 20 81 20 49 B2 31 20 A4 20 38 00 21 6E 6D | . I.1 . 8.!nm|
00006610: 08 3A 20 20 20 20 20 81 20 4A B2 31 20 A4 20 31 |.: . J.1 . 1|
00006620: 31 00 3E 6E 6E 08 3A 20 20 20 20 20 20 20 8F 20 |1.>nn.: . |
00006630: 52 4F 54 41 54 45 20 58 20 41 4E 44 20 59 00 65 |ROTATE X AND Y.e|
00006640: 6E 6F 08 3A 20 20 20 20 20 20 20 20 20 58 50 B2 |no.: XP.|
00006650: 43 52 28 49 29 AC 58 28 4A 29 AB 53 52 28 49 29 |CR(I).X(J).SR(I)|
00006660: AC 59 28 4A 29 00 8C 6E 70 08 3A 20 20 20 20 20 |.Y(J)..np.: |
00006670: 20 20 20 20 59 50 B2 53 52 28 49 29 AC 58 28 4A | YP.SR(I).X(J|
00006680: 29 AA 43 52 28 49 29 AC 59 28 4A 29 00 A8 6E 71 |).CR(I).Y(J)..nq|
00006690: 08 3A 20 20 20 20 20 20 20 8F 20 53 43 41 4C 45 |.: . SCALE|
000066A0: 20 58 20 41 4E 44 20 59 00 BF 6E 72 08 3A 20 20 | X AND Y..nr.: |
000066B0: 20 20 20 20 20 20 20 58 50 B2 58 50 AC 53 46 00 | XP.XP.SF.|
000066C0: D6 6E 73 08 3A 20 20 20 20 20 20 20 20 20 59 50 |.ns.: YP|
000066D0: B2 59 50 AC 53 46 00 F3 6E 74 08 3A 20 20 20 20 |.YP.SF..nt.: |
000066E0: 20 20 20 8F 20 4F 46 46 53 45 54 20 58 20 41 4E | . OFFSET X AN|
000066F0: 44 20 59 00 0A 6F 75 08 3A 20 20 20 20 20 20 20 |D Y..ou.: |
00006700: 20 20 58 50 B2 58 50 AA 58 4F 00 21 6F 76 08 3A | XP.XP.XO.!ov.:|
00006710: 20 20 20 20 20 20 20 20 20 59 50 B2 59 50 AA 59 | YP.YP.Y|
00006720: 4F 00 43 6F 77 08 3A 20 20 20 20 20 20 20 8F 20 |O.Cow.: . |
00006730: 4D 4F 56 45 20 54 4F 20 46 49 52 53 54 20 50 4F |MOVE TO FIRST PO|
00006740: 49 4E 54 00 5E 6F 78 08 3A 20 20 20 20 20 20 20 |INT.^ox.: |
00006750: 20 20 8B 20 4A B1 31 20 A7 20 32 31 37 31 00 7A | . J.1 . 2171.z|
00006760: 6F 79 08 3A 20 20 20 20 20 20 20 20 20 98 31 2C |oy.: .1,|
00006770: 22 4D 22 2C 58 50 2C AB 59 50 00 9E 6F 7A 08 3A |"M",XP,.YP..oz.:|
00006780: 20 20 20 20 20 20 20 8F 20 44 52 41 57 20 4C 49 | . DRAW LI|
00006790: 4E 45 20 4F 46 20 41 20 4C 45 54 54 45 52 00 BA |NE OF A LETTER..|
000067A0: 6F 7B 08 3A 20 20 20 20 20 20 20 20 20 98 31 2C |o{.: .1,|
000067B0: 22 44 22 2C 58 50 2C AB 59 50 00 CC 6F 7C 08 3A |"D",XP,.YP..o|.:|
000067C0: 20 20 20 20 20 82 20 20 3A 8F 20 4A 00 DC 6F 7D | . :. J..o}|
000067D0: 08 3A 20 20 20 82 20 20 3A 8F 20 49 00 E2 6F 7E |.: . :. I..o~|
000067E0: 08 3A 00 FA 6F 7F 08 8F 20 45 4A 45 43 54 20 54 |.:..o... EJECT T|
000067F0: 48 45 20 44 52 41 57 49 4E 47 00 00 70 80 08 3A |HE DRAWING..p..:|
00006800: 00 18 70 81 08 3A 20 20 20 98 31 2C 22 4D 22 2C |..p..: .1,"M",|
00006810: 20 20 30 2C AB 34 37 39 00 1E 70 82 08 3A 00 40 | 0,.479..p..:.@|
00006820: 70 83 08 8F 20 45 53 54 41 42 4C 49 53 48 20 4E |p... ESTABLISH N|
00006830: 45 57 20 48 4F 4D 45 20 50 4F 53 49 54 49 4F 4E |EW HOME POSITION|
00006840: 00 46 70 84 08 3A 00 51 70 85 08 3A 20 20 20 98 |.Fp..:.Qp..: .|
00006850: 34 00 57 70 86 08 3A 00 7B 70 87 08 8F 22 20 D5 |4.Wp..:.{p..." .|
00006860: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00006870: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 00 9F 70 88 08 |.............p..|
00006880: 8F 22 20 DD 20 20 20 20 43 4F 4D 42 49 4E 45 44 |." . COMBINED|
00006890: 20 46 55 4E 43 54 49 4F 4E 53 20 20 20 20 DD 00 | FUNCTIONS ..|
000068A0: C3 70 89 08 8F 22 20 CA C0 C0 C0 C0 C0 C0 C0 C0 |.p..." .........|
000068B0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000068C0: C0 C0 CB 00 C9 70 8A 08 3A 00 E8 70 8B 08 8F 20 |.....p..:..p... |
000068D0: 20 20 54 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 20 | THE FOLLOWING |
000068E0: 45 58 41 4D 50 4C 45 53 00 09 71 8C 08 8F 20 20 |EXAMPLES..q... |
000068F0: 20 44 45 4D 4F 4E 53 54 52 41 54 45 20 50 4C 4F | DEMONSTRATE PLO|
00006900: 54 54 49 4E 47 20 54 48 45 00 2D 71 8D 08 8F 20 |TTING THE.-q... |
00006910: 20 20 53 41 4D 45 20 46 49 47 55 52 45 20 52 4F | SAME FIGURE RO|
00006920: 54 41 54 45 44 20 54 48 52 4F 55 47 48 00 51 71 |TATED THROUGH.Qq|
00006930: 8E 08 8F 20 20 20 50 4F 49 4E 54 53 20 4F 4E 20 |... POINTS ON |
00006940: 54 48 45 20 43 49 52 43 55 4D 46 45 52 45 4E 43 |THE CIRCUMFERENC|
00006950: 45 00 66 71 8F 08 8F 20 20 20 4F 46 20 41 20 43 |E.fq... OF A C|
00006960: 49 52 43 4C 45 2E 00 6C 71 90 08 3A 00 90 71 91 |IRCLE..lq..:..q.|
00006970: 08 8F 22 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |.." ............|
00006980: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 |................|
00006990: 00 B4 71 92 08 8F 22 A0 DD 20 20 50 4C 4F 54 20 |..q...".. PLOT |
000069A0: 54 48 45 20 47 49 41 4E 54 20 4C 45 54 54 45 52 |THE GIANT LETTER|
000069B0: 20 20 20 DD 00 D8 71 93 08 8F 22 20 DD 20 20 52 | ...q..." . R|
000069C0: 4F 54 41 54 45 44 20 54 48 52 4F 55 47 48 20 41 |OTATED THROUGH A|
000069D0: 4E 47 4C 45 53 20 20 DD 00 FC 71 94 08 8F 22 20 |NGLES ...q..." |
000069E0: DD 20 20 4F 46 20 34 35 20 44 45 47 52 45 45 53 |. OF 45 DEGREES|
000069F0: 20 57 48 49 4C 45 20 20 20 20 20 DD 00 20 72 95 | WHILE .. r.|
00006A00: 08 8F 22 20 DD 20 20 54 48 45 20 50 4F 49 4E 54 |.." . THE POINT|
00006A10: 20 4F 46 20 4F 52 49 47 49 4E 20 20 20 20 20 DD | OF ORIGIN .|
00006A20: 00 44 72 96 08 8F 22 20 DD 20 20 4D 4F 56 45 53 |.Dr..." . MOVES|
00006A30: 20 41 52 4F 55 4E 44 20 54 48 45 20 43 49 52 2D | AROUND THE CIR-|
00006A40: 20 20 20 DD 00 68 72 97 08 8F 22 20 DD 20 20 43 | ..hr..." . C|
00006A50: 55 4D 46 45 52 45 4E 43 45 20 4F 46 20 41 20 43 |UMFERENCE OF A C|
00006A60: 49 52 43 4C 45 2E 20 DD 00 8C 72 98 08 8F 22 20 |IRCLE. ...r..." |
00006A70: CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00006A80: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 CB 00 92 72 99 |..............r.|
00006A90: 08 3A 00 B5 72 9A 08 8F 20 44 52 41 57 20 41 20 |.:..r... DRAW A |
00006AA0: 53 51 55 41 52 45 20 42 4F 58 20 34 37 39 20 42 |SQUARE BOX 479 B|
00006AB0: 59 20 34 37 39 00 BB 72 9B 08 3A 00 C6 72 9C 08 |Y 479..r..:..r..|
00006AC0: 3A 20 20 20 98 34 00 E6 72 9D 08 3A 20 20 20 98 |: .4..r..: .|
00006AD0: 34 2C 22 52 4F 54 41 54 49 4F 4E 2C 20 53 43 41 |4,"ROTATION, SCA|
00006AE0: 4C 49 4E 47 2C 22 00 08 73 9E 08 3A 20 20 20 98 |LING,"..s..: .|
00006AF0: 34 2C 22 4F 46 46 53 45 54 53 20 41 4E 44 20 52 |4,"OFFSETS AND R|
00006B00: 45 4C 41 54 49 56 45 22 00 27 73 9F 08 3A 20 20 |ELATIVE".'s..: |
00006B10: 20 98 34 2C 22 4F 52 49 47 49 4E 20 52 45 46 45 | .4,"ORIGIN REFE|
00006B20: 52 45 4E 43 45 3A 22 00 2D 73 A0 08 3A 00 45 73 |RENCE:".-s..:.Es|
00006B30: A1 08 3A 20 20 20 98 31 2C 22 44 22 2C 34 37 39 |..: .1,"D",479|
00006B40: 2C 20 20 20 30 00 5D 73 A2 08 3A 20 20 20 98 31 |, 0.]s..: .1|
00006B50: 2C 22 44 22 2C 34 37 39 2C AB 34 37 39 00 75 73 |,"D",479,.479.us|
00006B60: A3 08 3A 20 20 20 98 31 2C 22 44 22 2C 20 20 30 |..: .1,"D", 0|
00006B70: 2C AB 34 37 39 00 8D 73 A4 08 3A 20 20 20 98 31 |,.479..s..: .1|
00006B80: 2C 22 44 22 2C 20 20 30 2C 20 20 20 30 00 93 73 |,"D", 0, 0..s|
00006B90: A5 08 3A 00 B7 73 A6 08 8F 20 44 45 46 49 4E 45 |..:..s... DEFINE|
00006BA0: 20 54 48 45 20 53 43 41 4C 49 4E 47 20 46 41 43 | THE SCALING FAC|
00006BB0: 54 4F 52 20 41 4E 44 00 D4 73 A7 08 8F 20 41 4E |TOR AND..s... AN|
00006BC0: 44 20 43 49 52 43 4C 45 20 50 41 52 41 4D 45 54 |D CIRCLE PARAMET|
00006BD0: 45 52 53 2E 00 DA 73 A8 08 3A 00 FC 73 A9 08 3A |ERS...s..:..s..:|
00006BE0: 20 20 20 53 46 B2 2E 32 35 20 20 3A 8F 20 53 43 | SF..25 :. SC|
00006BF0: 41 4C 49 4E 47 20 46 41 43 54 4F 52 00 20 74 AA |ALING FACTOR. t.|
00006C00: 08 3A 20 20 20 43 52 B2 31 32 30 20 20 3A 8F 20 |.: CR.120 :. |
00006C10: 52 41 44 49 55 53 20 4F 46 20 43 49 52 43 4C 45 |RADIUS OF CIRCLE|
00006C20: 00 44 74 AB 08 3A 20 20 20 58 43 B2 32 33 39 20 |.Dt..: XC.239 |
00006C30: 20 3A 8F 20 58 2D 41 58 49 53 20 4F 46 20 43 45 | :. X-AXIS OF CE|
00006C40: 4E 54 45 52 00 68 74 AC 08 3A 20 20 20 59 43 B2 |NTER.ht..: YC.|
00006C50: 32 33 39 20 20 3A 8F 20 59 2D 41 58 49 53 20 4F |239 :. Y-AXIS O|
00006C60: 46 20 43 45 4E 54 45 52 00 6E 74 AD 08 3A 00 8E |F CENTER.nt..:..|
00006C70: 74 AE 08 8F 20 4C 4F 4F 50 20 45 49 47 48 54 20 |t... LOOP EIGHT |
00006C80: 54 49 4D 45 53 2C 20 44 52 41 57 49 4E 47 00 B0 |TIMES, DRAWING..|
00006C90: 74 AF 08 8F 20 41 20 52 4F 54 41 54 45 44 20 4C |t... A ROTATED L|
00006CA0: 45 54 54 45 52 20 45 41 43 48 20 54 49 4D 45 2E |ETTER EACH TIME.|
00006CB0: 00 D2 74 B0 08 8F 20 52 4F 54 41 54 45 20 54 48 |..t... ROTATE TH|
00006CC0: 45 20 50 4F 49 4E 54 53 20 55 53 49 4E 47 20 54 |E POINTS USING T|
00006CD0: 48 45 00 EB 74 B1 08 8F 20 46 4F 4C 4C 4F 57 49 |HE..t... FOLLOWI|
00006CE0: 4E 47 20 46 4F 52 4D 55 4C 41 3A 00 00 75 B2 08 |NG FORMULA:..u..|
00006CF0: 8F 20 20 20 58 50 3D 43 52 2A 58 2D 53 52 2A 59 |. XP=CR*X-SR*Y|
00006D00: 00 15 75 B3 08 8F 20 20 20 59 50 3D 53 52 2A 58 |..u... YP=SR*X|
00006D10: 2B 43 52 2A 59 00 1B 75 B4 08 3A 00 2D 75 B5 08 |+CR*Y..u..:.-u..|
00006D20: 3A 20 20 20 81 20 49 B2 31 20 A4 20 38 00 51 75 |: . I.1 . 8.Qu|
00006D30: B6 08 3A 20 20 20 20 20 8F 20 43 4F 4D 50 55 54 |..: . COMPUT|
00006D40: 45 20 50 4F 49 4E 54 20 4F 4E 20 43 49 52 43 4C |E POINT ON CIRCL|
00006D50: 45 00 6C 75 B7 08 3A 20 20 20 20 20 20 20 58 50 |E.lu..: XP|
00006D60: B2 43 52 28 49 29 AC 43 52 AA 58 43 00 87 75 B8 |.CR(I).CR.XC..u.|
00006D70: 08 3A 20 20 20 20 20 20 20 59 50 B2 53 52 28 49 |.: YP.SR(I|
00006D80: 29 AC 43 52 AA 59 43 00 A8 75 B9 08 3A 20 20 20 |).CR.YC..u..: |
00006D90: 20 20 8F 20 4D 4F 56 45 20 54 4F 20 43 49 52 43 | . MOVE TO CIRC|
00006DA0: 4C 45 20 50 4F 49 4E 54 00 CD 75 BA 08 3A 20 20 |LE POINT..u..: |
00006DB0: 20 20 20 8F 20 41 4E 44 20 45 53 54 41 42 4C 49 | . AND ESTABLI|
00006DC0: 53 48 20 41 20 52 45 4C 41 54 49 56 45 00 EE 75 |SH A RELATIVE..u|
00006DD0: BB 08 3A 20 20 20 20 20 8F 20 4F 52 49 47 49 4E |..: . ORIGIN|
00006DE0: 20 4F 46 20 52 45 46 45 52 45 4E 43 45 2E 00 08 | OF REFERENCE...|
00006DF0: 76 BC 08 3A 20 20 20 20 20 20 20 98 31 2C 22 4D |v..: .1,"M|
00006E00: 22 2C 58 50 2C AB 59 50 00 1B 76 BD 08 3A 20 20 |",XP,.YP..v..: |
00006E10: 20 20 20 20 20 98 31 2C 22 49 22 00 30 76 BE 08 | .1,"I".0v..|
00006E20: 3A 20 20 20 20 20 81 20 4A B2 31 20 A4 20 31 31 |: . J.1 . 11|
00006E30: 00 4D 76 BF 08 3A 20 20 20 20 20 20 20 8F 20 52 |.Mv..: . R|
00006E40: 4F 54 41 54 45 20 58 20 41 4E 44 20 59 00 74 76 |OTATE X AND Y.tv|
00006E50: C0 08 3A 20 20 20 20 20 20 20 20 20 58 50 B2 43 |..: XP.C|
00006E60: 52 28 49 29 AC 58 28 4A 29 AB 53 52 28 49 29 AC |R(I).X(J).SR(I).|
00006E70: 59 28 4A 29 00 9B 76 C1 08 3A 20 20 20 20 20 20 |Y(J)..v..: |
00006E80: 20 20 20 59 50 B2 53 52 28 49 29 AC 58 28 4A 29 | YP.SR(I).X(J)|
00006E90: AA 43 52 28 49 29 AC 59 28 4A 29 00 B7 76 C2 08 |.CR(I).Y(J)..v..|
00006EA0: 3A 20 20 20 20 20 20 20 8F 20 53 43 41 4C 45 20 |: . SCALE |
00006EB0: 58 20 41 4E 44 20 59 00 CE 76 C3 08 3A 20 20 20 |X AND Y..v..: |
00006EC0: 20 20 20 20 20 20 58 50 B2 58 50 AC 53 46 00 E5 | XP.XP.SF..|
00006ED0: 76 C4 08 3A 20 20 20 20 20 20 20 20 20 59 50 B2 |v..: YP.|
00006EE0: 59 50 AC 53 46 00 09 77 C5 08 3A 20 20 20 20 20 |YP.SF..w..: |
00006EF0: 20 20 8F 20 44 52 41 57 20 4C 49 4E 45 20 4F 46 | . DRAW LINE OF|
00006F00: 20 41 20 4C 45 54 54 45 52 00 2E 77 C6 08 3A 20 | A LETTER..w..: |
00006F10: 20 20 20 20 20 20 8F 20 55 53 49 4E 47 20 54 48 | . USING TH|
00006F20: 45 20 22 4A 22 20 43 4F 4D 4D 41 4E 44 2C 00 4C |E "J" COMMAND,.L|
00006F30: 77 C7 08 3A 20 20 20 20 20 20 20 8F 20 52 45 46 |w..: . REF|
00006F40: 45 52 45 4E 43 49 4E 47 20 54 48 45 00 6F 77 C8 |ERENCING THE.ow.|
00006F50: 08 3A 20 20 20 20 20 20 20 8F 20 52 45 4C 41 54 |.: . RELAT|
00006F60: 49 56 45 20 4F 52 49 47 49 4E 20 28 54 48 45 00 |IVE ORIGIN (THE.|
00006F70: 93 77 C9 08 3A 20 20 20 20 20 20 20 8F 20 50 4F |.w..: . PO|
00006F80: 49 4E 54 20 4F 4E 20 54 48 45 20 43 49 52 43 4C |INT ON THE CIRCL|
00006F90: 45 29 2E 00 AF 77 CA 08 3A 20 20 20 20 20 20 20 |E)...w..: |
00006FA0: 20 20 98 31 2C 22 4A 22 2C 58 50 2C AB 59 50 00 | .1,"J",XP,.YP.|
00006FB0: C1 77 CB 08 3A 20 20 20 20 20 82 20 20 3A 8F 20 |.w..: . :. |
00006FC0: 4A 00 D1 77 CC 08 3A 20 20 20 82 20 20 3A 8F 20 |J..w..: . :. |
00006FD0: 49 00 D7 77 CD 08 3A 00 EF 77 CE 08 8F 20 45 4A |I..w..:..w... EJ|
00006FE0: 45 43 54 20 54 48 45 20 44 52 41 57 49 4E 47 00 |ECT THE DRAWING.|
00006FF0: F5 77 CF 08 3A 00 0D 78 D0 08 3A 20 20 20 98 31 |.w..:..x..: .1|
00007000: 2C 22 4D 22 2C 20 20 30 2C AB 34 37 39 00 13 78 |,"M", 0,.479..x|
00007010: D1 08 3A 00 35 78 D2 08 8F 20 45 53 54 41 42 4C |..:.5x... ESTABL|
00007020: 49 53 48 20 4E 45 57 20 48 4F 4D 45 20 50 4F 53 |ISH NEW HOME POS|
00007030: 49 54 49 4F 4E 00 3B 78 D3 08 3A 00 46 78 D4 08 |ITION.;x..:.Fx..|
00007040: 3A 20 20 20 98 34 00 4C 78 D5 08 3A 00 70 78 D6 |: .4.Lx..:.px.|
00007050: 08 8F 22 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |.." ............|
00007060: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 |................|
00007070: 00 94 78 D7 08 8F 22 20 DD 20 20 52 45 53 45 54 |..x..." . RESET|
00007080: 54 49 4E 47 20 54 48 45 20 50 4C 4F 54 54 45 52 |TING THE PLOTTER|
00007090: 20 20 20 DD 00 B8 78 D8 08 8F 22 20 CA C0 C0 C0 | ...x..." ....|
000070A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000070B0: C0 C0 C0 C0 C0 C0 C0 CB 00 BE 78 D9 08 3A 00 E2 |..........x..:..|
000070C0: 78 DA 08 8F 20 20 20 54 48 45 20 50 4C 4F 54 54 |x... THE PLOTT|
000070D0: 45 52 20 43 41 4E 20 42 45 20 52 45 53 45 54 20 |ER CAN BE RESET |
000070E0: 41 54 00 07 79 DB 08 8F 20 20 20 41 4E 59 20 54 |AT..y... ANY T|
000070F0: 49 4D 45 20 42 59 20 50 52 49 4E 54 49 4E 47 20 |IME BY PRINTING |
00007100: 41 20 42 4C 41 4E 4B 00 29 79 DC 08 8F 20 20 20 |A BLANK.)y... |
00007110: 4C 49 4E 45 20 54 48 52 4F 55 47 48 20 50 4F 52 |LINE THROUGH POR|
00007120: 54 20 37 20 55 53 49 4E 47 00 4D 79 DD 08 8F 20 |T 7 USING.My... |
00007130: 20 20 46 49 4C 45 20 4E 55 4D 45 52 20 23 37 2E | FILE NUMER #7.|
00007140: 20 54 48 45 20 50 4F 57 45 52 20 4F 4E 00 71 79 | THE POWER ON.qy|
00007150: DE 08 8F 20 20 20 43 59 43 4C 45 20 57 49 4C 4C |... CYCLE WILL|
00007160: 20 54 48 45 4E 20 54 41 4B 45 20 50 4C 41 43 45 | THEN TAKE PLACE|
00007170: 2E 00 96 79 DF 08 8F 20 20 20 41 4C 4C 20 50 41 |...y... ALL PA|
00007180: 52 41 4D 45 54 45 52 53 20 57 49 4C 4C 20 42 45 |RAMETERS WILL BE|
00007190: 20 52 45 53 45 54 00 BA 79 E0 08 8F 20 20 20 54 | RESET..y... T|
000071A0: 4F 20 54 48 45 49 52 20 44 45 46 41 55 4C 54 20 |O THEIR DEFAULT |
000071B0: 56 41 4C 55 45 53 20 41 4E 44 00 DC 79 E1 08 8F |VALUES AND..y...|
000071C0: 20 20 20 54 48 45 20 50 4F 57 45 52 20 4F 4E 20 | THE POWER ON |
000071D0: 54 45 53 54 20 50 41 54 54 45 52 4E 00 F3 79 E2 |TEST PATTERN..y.|
000071E0: 08 8F 20 20 20 57 49 4C 4C 20 42 45 20 44 52 41 |.. WILL BE DRA|
000071F0: 57 4E 2E 00 F9 79 E3 08 3A 00 04 7A E4 08 3A 20 |WN...y..:..z..: |
00007200: 20 20 98 34 00 26 7A E5 08 3A 20 20 20 98 34 2C | .4.&z..: .4,|
00007210: 22 52 45 53 45 54 54 49 4E 47 20 50 4C 4F 54 54 |"RESETTING PLOTT|
00007220: 45 52 2E 2E 2E 22 00 31 7A E6 08 3A 20 20 20 98 |ER...".1z..: .|
00007230: 37 00 37 7A E7 08 3A 00 5B 7A E8 08 8F 22 20 D5 |7.7z..:.[z..." .|
00007240: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00007250: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 00 7F 7A E9 08 |.............z..|
00007260: 8F 22 A0 DD 20 20 43 4C 4F 53 49 4E 47 20 50 4C |.".. CLOSING PL|
00007270: 4F 54 54 45 52 20 46 49 4C 45 53 20 20 20 DD 00 |OTTER FILES ..|
00007280: A3 7A EA 08 8F 22 20 CA C0 C0 C0 C0 C0 C0 C0 C0 |.z..." .........|
00007290: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000072A0: C0 C0 CB 00 A9 7A EB 08 3A 00 BB 7A EC 08 3A 20 |.....z..:..z..: |
000072B0: 20 20 81 20 49 B2 31 20 A4 20 37 00 CA 7A ED 08 | . I.1 . 7..z..|
000072C0: 3A 20 20 20 20 20 20 A0 20 49 00 D6 7A EE 08 3A |: . I..z..:|
000072D0: 20 20 20 82 20 49 00 E3 7A EF 08 3A 20 20 20 A0 | . I..z..: .|
000072E0: 20 34 34 00 E9 7A F0 08 3A 00 F3 7A F1 08 3A 20 | 44..z..:..z..: |
000072F0: 20 20 80 00 00 00 | .... |
..%...." U..........................I.I.
..." . U......................I ..M...."
. . PLOTTER PROGRAMMING . ......." . J
......................K ......." J......
....................K.....:.A...:......"
U..........................I......" . F
ILE OPENING CONVENTIONS ..-...." J......
....................K.3...:.N...." U...
.. FILE NUMBER.X...." ..V...." . U...
DEVICE ADDRESS......" . ......." . . U
. SECONDARY ADDRESS.B...." . . . (PO
RT SELECT).P...." . . ......." . . ...
...." . . . PORT FUNCTION.&...."
. . . ..................H.... 4,
6 :. ASCII DATA STRING.F.... 1,6,1 :.
PLOT COMMANDS...... 2,6,2 :. PEN COLOR
SELECT...... 3,6,3 :. SELECT CHAR SIZE
.F.... 44,6,4 :. CHAR ROTATION...... 5,
6,5 :. DASH LINE SELECT...... 6,6,6 :.
UPPER/LOWER CASE.&.... 7,6,7 :. PLOTTER
RESET.,...:.P...." U...................
.......I.T...." . CHARACTER PRINTING
......." J..........................K
.....:.B.... PRINTING IS THROUGH PORT
0,...... USING FILE NUMBER #4. THE....
.. SYNTAX IS THE SAME AS FOR.$.... T
HE STANDARD PRINTER..*...:.M.... PRINTIN
G WITH QUOTED STRINGS.S...:.S...: .4,"
QUOTED TEXT STRING".Y...:...... PRINTING
WITH STRING VARIABLES.....:.A...: S$.
"STRING VARIABLE".O...: .4,S$.U...:...
... PRINTING WITH CHR$ CODES.....:.....:
.4,G(67)G(72);.(...: .4,G(82)G(36);
.?...: .4,G(32)G(67);.V...: .4,G(79)
G(68);.L...: .4,G(69)G(83).R...:... ..
PRINTING WITH TAB AND SPC...!.:...".:
.4,">".10);.J.#.: .4,"I TABBED TO HER
E".P.$.:...%.: .4,">".10);...&.: .4,
"I SPACED TO HERE"...'.:.,.(.." U.......
...................I.P.).." . USING THE
OTHER PORTS ..T.*.." . WITH CHARACTER
PRINTING ....+.." J...................
.......K...,.:.B.-.." U.................
.........I......" . SELECTING PEN COLO
R ..../.." J.........................
.K...0.:.0.1.. SELECTING DIFFERENT PEN
.S.2.. COLORS IS DONE BY PRINTING.V.3.
. THE PEN COLOR CODE THROUGH...4.. P
ORT 2 USING FILE #2....5.:...6.. PEN C
OLOR CODES ARE:...7.:.S.8.. "0" = BL
ACK...9.. "1" = BLUE...:.. "2" =
GREEN...;.. "3" = RED...<.:.7.=.:
. BLACK,BLUE,GREEN,RED.=.>.:.O.?.: .
I.0 . 3._.@.: . S$..A.: .2,I
:. CHANGE COLOR...B.: .4,"THIS PEN
IS "S$...C.: . I...D.:.Q.E.. RESET PEN
COLOR TO DEFAULT.W.F.:...G.: .2,"0" :
. BLACK PEN...H.:...I.." U..............
............I.A.J.." . SELECTING CHARACT
ER SIZE ..E.K.." J......................
....K.K.L.:...M.. SELECTING OTHER CHAR
ACTER...N.. SIZES IS DONE BY PRINTING.
R.O.. THE CHARACTER SIZE THROUGH...P..
PORT 3 USING FILE #3....Q.:...R.. C
HARACTER SIZE CODES ARE:...S.:.A.T..
"0" = 80 CHARACTERS/LINE.D.U.. "1"
= 40 CHARACTERS/LINE...V.. "2" = 20
CHARACTERS/LINE...W.. "3" = 10 CHARA
CTERS/LINE...X.:.F.Y.: . 80,40,20,10.L
.Z.:...[.: . I.0 . 3...\.: . S$..
.].: .3,I :. CHANGE SIZE.&.^.:
.4,I(D(I),1);.A._.: .4,"="S$"/LINE
".O.`.: .4.[.A.: . I.A.B.:.}.C..
RESET SIZE TO DEFAULT...D.:...E.: .3,"
1" :. 40/LINE...F.:.G.G.." U............
..............I...H.." . CHARACTER RO
TATION ....I.." J....................
......K...J.:.:.K.. CHARACTERS TO BE P
RINTED MAY._.L.. BE ROTATED 90 DEGREES
TO THE...M.. RIGHT BY PRINTING THE VA
LUE...N.. OF ROTATION THROUGH PORT 4..
.O.. USING FILE #44..D.P.:...Q.. ROT
ATION CODES ARE:...R.:...S.. "0" = N
ORMAL HORIZONTAL.+.T.. "1" = 90 DEGR
EE ROTATION.1.U.:.I.V.: . V,E,R,T,I,C,A,
L.O.W.:.J.X.: .4,"HORIZONTAL LINE".P.Y.:
...Z.: .44,"1" :. SET ROTATION...{.:...|
.: .4,"E N I L D E T A T O R"...}.:.L.~
.: . I.1 . 8.Z..: . S$.....: .4,S
$.....: . I.....:...... RESTORE DEFAULT
ORIENTATION.!...:.?...: .44,"0" :. HOR
IZONTAL.E...:.I...." U..................
........I......" . DASHED LINE CHARACTE
RS ......." J..........................
K.....:.Y.... CHARACTERS MAY BE PRINTE
D...... USING DASHED LINES BY......
PRINTING THE LINE SEGMENT.:.... SIZE C
ODE THROUGH PORT 5.X.... USING FILE NU
MBER #5..Z.... ALLOWABLE VALUES ARE 0
TO...... 15. SIZE CODES ARE:.....:....
.. 0 = SOLID LINE.T.... 1 = SMAL
LEST SEGMENT...... 2 = LARGER SEGMEN
T...... ....... ..'.... 15 =
LARGEST SEGMENT.-...:.H.... USE LARGE CH
ARACTERS.N...:.G...: .3,"3" :. 10/LINE.
Q...: .4.W...:...... PRINT EVERY THIRD
SIZE LINE... .:.....: . I.0 . 15 . 3.S.
..: .5,I :. CHANGE LINE.....: .4
,"DASHED".....: . I.....:...... RESTORE
DEFAULT SIZE AND LINE.$...:.=...: .3,"
1" :. 40/LINE.Y...: .5,"0" :. SOLID LIN
E._...:......" U........................
..I......" . UPPER AND LOWER CASE ..
K...." J..........................K.Q...
:...... UPPER AND LOWER CASE CAN BE...
... PRINTED AT ALL TIMES. THE.7....
DEFAULT IS TO PRINT ALL.Z.... NORMAL C
HARACTERS IN UPPER.~.... CASE AND SHIF
TED CHARACTERS...... IN LOWER CASE. TH
IS CAN BE.B.... REVERSED BY PRINTING T
HE...... CASE SELECT CODE THROUGH.....
. PORT 6 USING FILE NUMBER #6......:.-
.... CASE SELECT CODES ARE:.3...:.Q...
. "0" = DEFAULT CASE.O.... "1"
= REVERSE CASE.U...:.....: .4.....:
.4,"DEFAULT CASE:".....: . 1228 :. PR
INT CHARS...A.:...B.: .6,"1" :. REVERS
E CASE...C.:...D.: .4...E.: .4,"REVE
RSE CASE:".(.F.: . 1228 :. PRINT CHARS
...G.:.P.H.: . 1240 :. JUMP SUBROUTINE
.V.I.:.P.J.. PRINT CHARACTER SET.V.K.:..
.L.: . I.64 . 95...M.: .4,G(I);..
.N.: . I...O.: .4.K.P.: . I.192 .
223...Q.: .4,G(I);...R.: . I...S.
: .4...T.: ....U.:.!.V.. RESTORE DEF
AULT CASE.'.W.:.F.X.: .6,"0" :. DEFAUL
T CASE.L.Y.:.P.Z.." U...................
.......I......" . PLOTTING LINES
......." J..........................K
.....:...... LINES OF ANY LENGTH CAN B
E...... DRAWN IN ANY DIRECTION AND.(..
.. THE PEN CAN BE MOVED TO ANY.K....
POINT IN THE PLOTTING AREA.O.... BY P
RINTING THE APPROPRIATE...... COMMAND
THROUGH PORT 1 USING...... FILE NUMBER
#1......:.S.... THE FORMAT FOR THE PR
INT...... STATEMENT WHEN PRINTING TO..
.... PORT 1 IS:.....:.*.... PRINT
#1,"C",X,Y.0...:.?.... WHERE:.E...:.G.
... C = ONE OF THE COMMANDS......
X = THE X COORDINATE...... Y = THE
Y COORDINATE.....:.A.... COMMANDS ARE
:.G...:...... "I" = SET RELATIVE ORI
GIN.. ... "H" = MOVE HOME ABSOLUTE.3
... "M" = MOVE ABSOLUTE TO X,Y.X ..
. "R" = MOVE RELATIVE TO X,Y.} ...
"D" = DRAW ABSOLUTE TO X,Y.. ...
"J" = DRAW RELATIVE TO X,Y.. ..:.. ...
NOTE:.. ..:.. ... MOVE - IMPLIES PE
N UP.. ... DRAW - IMPLIES PEN DOWN.!
!... ABSOLUTE - REFERENCED TO.D!...
HOME POSITION.G!... R
ELATIVE - REFERENCED TO..!...
RELATIVE ORIGIN..!...
SET WITH "I"..!..:.X!..." U...........
...............I..!..." . PLOTTING ARE
A BOUNDS .. "..." J...................
.......K.&"..:.I"... THE PLOTTING AREA
IS ABOUT.K"... 3 3/4 INCES WIDE BY AB
OUT.."... 15 3/4 INCHES LONG. IS IS.."
... GRADUATED AS FOLLOWS:.."..:.T"...
0,998 479,998.."..." ...
..........................#..." .
..@#..." .
..D#... /
/..#..." .
...#..." .0,0 (HOME) 47
9,0..P#..." ...........................
..#..." . ...$.
.." . ..<$...
/ /.`$..." .
...$..." .0,-998
479,-998...$..." ...........
..................$..:.R$..." U.........
.................I..$..." . PLOTTING WI
TH ABSOLUTE ...%..." . COORDINATE REF
ERENCES ..>% .." J.....................
.....K.D%!.:.G%".. ABSOLUTE PLOT COMMA
NDS ARE..%#.. REFERENCED RELATIVE TO T
HE..%$.. HOME POSITION (X=0, Y=0)..Q%%
.. HOME POSITION IS ESTABLISHED..%&..
UPON POWER ON OR BY PRINTING..&'.. A
CARRIAGE RETURN THROUGH.7&(.. PORT 0,
FILE NUMER #4..=&).:._&*.. MOVE THE PEN
TO AREA BOTTOM.E&+.:.{&,.: .1,"M",0,.
998..&-.:..&... ESTABLISH NEW HOME POSIT
ION..&/.:..&0.: .4..&1.:..&2.." U.....
.....................I..'3.." . DRAW BOU
NDS OF PLOT AREA ..&'4.." J.............
.............K.,'5.:.D'6.: .1,"D", 0,
.998.\'7.: .1,"D",479,.998.T'8.: .1,
"D",479, 998..'9.: .1,"D", 0, 998..':
.: .1,"D", 0, 0..';.: .1,"D",479,
0.B'<.:..'=.." U.....................
.....I..(>.." . PLOTTING AND PRINTING
...(?.." J..........................K.4
(@.:.U(A.. CHARACTER SET DIMENSIONS.[(
B.:.{(C.. WHEN COMBINING PLOTTING..(D.
. WITH PRINTING AS IN THE..(E.. EXAM
PLE BELOW, THE SIZE OF..(F.. THE PRINT
ED CHARACTERS MUST..)G.. BE KNOWN IN T
ERMS OF THE.()H.. PLOTTING AREA UNITS.
A TABLE.L)I.. OF CHARACTER SIZE CODES
AND.Q)J.. THEIR CORRESPONDING PLOTTIN
G..)K.. AREA DIMENSIONS FOLLOWS:..)L.:
..)M.. SIZE CHARACTER.T)N.. C
ODE DIMENSION..)O.." ...... ....
.................)P.:. *Q.. "0" 10
HIGH BY 6 WIDE.C*R.. "1" 20 HIGH
BY 12 WIDE.F*S.. "2" 40 HIGH BY 2
4 WIDE..*T.. "3" 80 HIGH BY 48 WID
E..*U.:..*V.." U........................
..I.W*W.." . LABEL POINTS OF PLOT AREA..
.*X.." J..........................K..+Y.
:. +Z.. MOVE TO TOP OF PLOT AREA.&+[.:.>
+\.: .1,"M", 0, 998.D+].:.`+^.. PRINT
TOP COORDINATES.F+_.:.Q+`.: .4..+A.:
.4," 0,998";..+B.: .4,.27)"479,998".
.+C.:.I+D.. PRINTING WITH CARRIAGE RETUR
N..+E.. CAUSED A NEW HOME TO BE..,F.. DE
FINED, SO MOVE TO MIDDLE.,,G.. OF PLOT A
REA WHILE BACKING UP.P,H.. THE HEIGHT OF
ONE PRINT LINE..V,I.:.Q,J.: .1,"M",
0,.998.20.W,K.:..,L.. PRINT MIDDLE COORD
INATES..,M.:..,N.: .4," 0,0 (HOME)";.M
,O.: .4,.24)"479,0".S,P.:..,Q.. MOVE T
O BOTTOM OF PLOT AREA..-R.. WHILE BACKIN
G UP THE HEIGHT OF.;-S.. ONE PRINT LINE,
AS BEFORE..A-T.:.\-U.: .1,"M", 0,.99
8.20.B-V.:..-W.. PRINT THE BOTTOM COORDI
NATES..-X.:..-Y.: .4," 0,-998";..-Z.:
.4,.25)"479,-998".F-{.: .4.L-|.:..-}
.." U..........................I...~.."
. PLOTTING FUNCTIONS ..8..." J...
.......................K.>...:.A.... T
HE FOLLOWING TWO EXAMPLES...... DEMONS
TRATE PLOTTING OF...... FUNCTIONS. THE
FIRST EXAMPLE.G.... PLOTS A SINE CURV
E USING...... THE ABSOLUTE COORDINATE.
./... REFERENCE RELATIVE TO HOME.../..
:.5/..." U..........................I.Y/
..." . PLOTTING A SINE CURVE ..}/..."
J..........................K../..:../..
. EJECT ENOUGH PAPER../..:../..: .1,"M
", 0,.200../..:../... ESTABLISH NEW HOM
E POSITION../..:../..: .4../..:..0...
DRAW BOX 400 HIGH BY 479 WIDE.#0..:.;0..
: .1,"D", 0, 200.S0..: .1,"D",479,
200.K0..: .1,"D",479,.200..0..: .1,"
D", 0,.200..0..: .1,"D", 0, 0..0..
: .1,"D",479, 0..0..:.N0... RETURN T
O HOME.T0..:..0..: .1,"H"..0 .:..1...
DRAW A SINE WAVE IN THE BOX...1..:.11...
THE VARIABLE I WILL TAKE.T1... VALUES F
ROM 0 TO 360 DEGREES.X1... (2*. RADIANS)
. THE STEP VALUE..1... WILL PRODUCE 200
SAMPLES..1... ALONG THE X AXIS VARYING F
ROM..1... 0 TO 479. THE SINE WILL VARY..
2... BETWEEN +1 AND -1. THE VALUE.&2...
OF Y, THEREFORE VARIES BETWEEN.;2... +20
0 AND -200..A2..:.]2..: . I.0 . 2.. .
..100.V2..: X.I.479.(2..)..2..:
Y..(I).200..2..: .1,"D",X,Y..2..:
. I..2..:.L2... EJECT THE DRAWING.R2.
.:..2..: .1,"M", 0,.300..2..:..3... E
STABLISH NEW HOME POSITION..3..:.#3..:
.4.)3..:.M3..." U......................
....I.Q3..." . PLOTTING A CIRCLE
...3..." J..........................K..3
..:..3... EJECT ENOUGH PAPER..3..:.U3A.:
.1,"M", 0,.239.20..3B.:..3C.. ESTABL
ISH NEW HOME POSITION..4D.:..4E.: .4..
4F.:.74G.. DRAW A SQUARE BOX 479 BY 479.
=4H.:.U4I.: .1,"D", 0, 239.M4J.: .1
,"D",479, 239..4K.: .1,"D",479,.239..4
L.: .1,"D", 0,.239..4M.: .1,"D", 0
, 0.M4N.: .1,"D",479, 0.S4O.:..4P.
. MOVE TO CENTER OF THE CIRCLE..4Q.:..5R
.: .1,"M",239, 0..5S.:.<5T.. ESTABLI
SH A RELATIVE ORIGIN.B5U.:.Q5V.: .1,"I
".W5W.:.|5X.. DRAW A CIRCLE IN THE BOX U
SING..5Y.. THE "J" COMMAND, REFERENCING.
A5Z.. THE RELATIVE ORIGIN. BEFORE..5...
PLOTTING THE FIRST POINT (WHEN..6... I=0
) USE THE "R" COMMAND TO.*6... MOVE WITH
THE PEN UP TO THE.N6... FIRST POINT ON
THE CIRCLE, SO.R6... WE DON'T DRAW FROM
THE CENTER..6... TO THE FIRST POINT. THE
SINE..6... AND COSINE WILL VARY BETWEEN
..6... +1 AND -1 YIELDING VALUES FOR..7.
.. X AND Y BETWEEN +239 AND -239...7..:.
#7..: . I.0 . 2.. . ..100.97..: X
..(I).239.O7..: Y..(I).239.M7..:
. I.0 . .1,"R",X,Y..7..: .1,"J",
X,Y..7..: . I..7..:..7... EJECT THE DR
AWING..7..:.N7..: .1,"M", 0,.239.80.T
7..:..7... ESTABLISH NEW HOME POSITION..
7..:..8..: .4..8..:.18..." U..........
................I.U8..." . PLOT POSI
TIONING ..Y8..." J..................
........K.8..:..8... THE FOLLOWING EX
AMPLES..8... DEMONSTRATE POSITIONING..
8... THE PLOT ON THE PLOTTER BED...8..
:..9..." U..........................I.19
..." . PLOTTING A GIANT LETTER ..U9..."
J..........................K.[9..:.X9..
. (0,0) (240,0)..9..." N
M..9..." Q................
....Q.T9..." . (80,80) ...9.
.." . N ...:..." .
Q................Q.0:..." . . (80,160
) N.M:..." . .N (240,80).D:
..." . Q........Q.|:..." .
.M..:..." . . (160,160)..:
..." . Q........Q.L:..." . .M
M..:..." . . (80,240) (160,240)..:
..." . ...;..." . . (80,400).!;...
" . .N./;..." Q...Q.:;..." M.L;...
(0,400).R;..:.Q;... GIANT LETTER DA
TA POINTS.W;..:..;... X , Y..;..."
... .....;..: . 0, 0..;..: .
240, 0.R;..: . 240, 80..;..: . 80
, 80..;..: . 80,160..<..: . 160,160
..<..: . 160,240.,< .: . 80,240.><!
.: . 80,400.P<".: . 0,400.B<#.:
. 0, 0.H<$.:..<%.. DIMENSION DATA AR
RAYS..<&.:..<'.: . X(11) :. X-AXIS VAL
UES.L<(.: . Y(11) :. Y-AXIS VALUES.R<)
.:..<*.. LOAD DATA INTO ARRAYS..<+.:..=,
.: . I.1 . 11..=-.: . X,Y.(=..:
X(I).X.9=/.: Y(I).Y.C=0.: ..I=1.
:.M=2.." U..........................I..=
3.." . PLOT THE GIANT LETTER ...=4.."
J..........................K..=5.:..=6.
. DRAW A SQUARE BOX 479 BY 479..=7.:..=8
.: .4..>9.: .4,"INITIAL POSITION:"..
>:.:.,>;.: .1,"D",479, 0.D><.: .1,
"D",479,.479.\>=.: .1,"D", 0,.479.T>>
.: .1,"D", 0, 0.Z>?.:..>@.. MOVE TO
THE INITIAL POINT. >A.:..>B.: .1,"M",
X(1),.Y(1)..>C.:..>D.. PLOT THE POINTS F
ROM THE ARRAY..>E.:..>F.: . I.1 . 11..
?G.: .1,"D",X(I),.Y(I).$?H.: ..*?I
.:.B?J.. EJECT THE DRAWING.H?K.:.`?L.:
.1,"M", 0,.479.F?M.:..?N.. ESTABLISH N
EW HOME POSITION..?O.:..?P.: .4..?Q.:.
C?R.." U..........................I..?S.
." . PLOT THE GIANT LETTER ...@T.." .
ON THE RIGHT SIDE OF ../@U.." . TH
E PLOTTER BED. ..S@V.." J........
..................K.Y@W.:.|@X.. DRAW A S
QUARE BOX 479 BY 479..@Y.:..@Z.: .4..@
[.: .4,"X-AXIS MOVED RIGHT:"..@\.:.L@]
.: .1,"D",479, 0..@^.: .1,"D",479,
.479..@_.: .1,"D", 0,.479..A`.: .1,
"D", 0, 0..AA.:.?AB.. ADD 240 TO THE
X-AXIS AND MOVE.[AC.. TO THE INITIAL POI
NT..AAD.:.AE.: .1,"M",X(1).240,.Y(1).
.AF.:..AG.. PLOT THE POINTS FROM THE ARR
AY.OAH.. ADDING 240 TO THE X-AXIS VALUE.
UAI.:..AJ.: . I.1 . 11..BK.: .1,"D
",X(I).240,.Y(I)..BL.: ...BM.:.0BN.. E
JECT THE DRAWING.6BO.:.NBP.: .1,"M",
0,.479.TBQ.:.VBR.. ESTABLISH NEW HOME PO
SITION.|BS.:..BT.: .4..BU.:..BV.." U..
........................I.UBW.." . PLOT
THE GIANT LETTER ...BX.." . ON THE B
OTTOM OF THE ...CY.." . PLOTTER BED.
..ACZ.." J..................
........K.GC{.:.JC|.. DRAW A SQUARE BOX
479 BY 479.PC}.:.{C~.: .4..C.: .4,"
Y-AXIS MOVED DOWN:"..C..:..C..: .1,"D"
,479, 0.QC..: .1,"D",479,.479..C..:
.1,"D", 0,.479..D..: .1,"D", 0,
0..D..:.&D... ADD 80 TO THE Y-AXIS AND.G
D... MOVE TO THE INITIAL POINT..MD..:.LD
..: .1,"M",X(1),.(Y(1).80).RD..:..D...
PLOT THE POINTS FROM THE ARRAY..D... AD
DING 80 TO THE Y-AXIS...D..:.OD..: . I
.1 . 11..D..: .1,"D",X(I),.(Y(I).80)
..D..: ...E..:..E... EJECT THE DRAWING
..E..:.6E..: .1,"M", 0,.479.<E..:.^E.
.. ESTABLISH NEW HOME POSITION.DE..:.OE.
.: .4.UE..:..E..." U..................
........I..E..." . PLOT THE GIANT LETTE
R ...E..." . IN THE LOWER RIGHT HAND
...F..." . CORNER OF THE PLOT BED. ..)F
..." J..........................K./F..:.
RF .. DRAW A SQUARE BOX 479 BY 479.XF..:
.CF..: .4..F..: .4,"X-AXIS MOVED RIG
HT,"..F..: .4,"Y-AXIS MOVED DOWN:"..F.
.:.BF..: .1,"D",479, 0.ZF..: .1,"D
",479,.479..F..: .1,"D", 0,.479..G..:
.1,"D", 0, 0..G..:.0G... ADD 240 T
O THE X-AXIS AND.PG... ADD 80 TO THE Y-A
XIS THEN.QG... MOVE TO THE INITIAL POINT
..WG..:..G..: .1,"M",X(1).240,.(Y(1).80
)..G..:.DG... PLOT THE POINTS FROM THE A
RRAY..G... ADDING 240 TO THE X-AXIS AND.
.H... ADDING 80 TO THE Y-AXIS...H..:..H.
.: . I.1 . 11.@H..: .1,"D",X(I).240,.(
Y(I).80).IH..: ..OH..:.GH... EJECT THE
DRAWING.MH..:..H..: .1,"M", 0,.479..H
..:..H... ESTABLISH NEW HOME POSITION..H
..:..H..: .4.DH..:..HA.." U...........
...............I..IB.." . PLOT REFLE
CTIONS ..0IC.." J...................
.......K.6ID.:.UIE.. THE FOLLOWING EXA
MPLES.VIF.. DEMONSTRATE PLOTTING THE..
IG.. REFLECTIONS OF A FIGURE,..IH..
THAT IS, FLIPPING THE FIGURE..II.. SID
EWAYS AND/OR ENDWAYS...IJ.:..JK.." U....
......................I.+JL.." . PLOT T
HE GIANT LETTER ..OJM.." . FLIPPED SI
DE TO SIDE. ..SJN.." J................
..........K.YJO.:..JP.. DRAW A SQUARE BO
X 479 BY 479..JQ.:..JR.: .4.NJS.: .4,"
FLIPPED SIDE TO SIDE:".TJT.:..JU.: .1,"
D",479, 0..KV.: .1,"D",479,.479..KW.:
.1,"D", 0,.479.0KX.: .1,"D", 0, 0
.6KY.:.[KZ.. SUBTRACT THE X-AXIS VALUE F
ROM..K... THE PLOTTER BED WIDTH AND MOVE
..K... TO THE INITIAL POSITION...K..:.CK
..: .1,"M",479.X(1),.Y(1).IK..:..K...
PLOT THE POINTS FROM THE ARRAY..L... SUB
TRACTING THE X-AXIS VALUE.3L... FROM THE
PLOTTER BED WIDTH..9L..:.LL..: . I.1
. 11.LL..: .1,"D",479.X(I),.Y(I).VL.
.: ..|L..:..L... EJECT THE DRAWING..L.
.:..L..: .1,"M", 0,.479..L..:.ZL... E
STABLISH NEW HOME POSITION..L..:..L..:
.4..L..:..M..." U......................
....I.9M..." . PLOT THE GIANT LETTER
..]M..." . FLIPPED TOP TO BOTTOM. ...M
..." J..........................K..M..:.
.M... DRAW A SQUARE BOX 479 BY 479..M..:
..M..: .4..M..: .4,"FLIPPED TOP TO BOTTO
M:"..M..:..M..: .1,"D",479, 0..N..: .1
,"D",479,.479.#N..: .1,"D", 0,.479.9N..
: .1,"D", 0, 0.?N..:.DN... SUBTRACT T
HE Y-AXIS VALUE FROM..N... THE PLOTTER B
ED HEIGHT, IN..N... THIS CASE THE BOX SI
ZE,.HN... AND MOVE TO THE INITIAL POINT.
.NN..:..N..: .1,"M",X(1),.(479.Y(1))..
N..:..O... PLOT THE POINTS FROM THE ARRA
Y.=O... SUBTRACTING THE Y-AXIS VALUES.`O
... FROM THE PLOTTER BED HEIGHT..FO..:.Y
O..: . I.1 . 11..O..: .1,"D",X(I),
.(479.Y(I))..O..: ...O..:.CO... EJECT
THE DRAWING.IO..:..O..: .1,"M", 0,.47
9..O..:..P... ESTABLISH NEW HOME POSITIO
N..P..:..P..: .4. P..:.DP..." U.......
...................I.HP..." . PLOT THE
GIANT LETTER ...P..." . FLIPPED BOTH
SIDE TO ...P..." . SIDE AND TOP TO B
OTTOM. ..TP..." J.......................
...K.ZP..:..P... DRAW A SQUARE BOX 479 B
Y 479..Q..:..Q..: .4./Q..: .4,"FLIPPED
SIDE TO SIDE,".NQ .: .4,"AND TOP TO BO
TTOM:".TQ!.:.KQ".: .1,"D",479, 0..Q#.
: .1,"D",479,.479..Q$.: .1,"D", 0,.47
9..Q%.: .1,"D", 0, 0..Q&.:..Q'.. SUB
TRACT THE X-AXIS AND Y-AXIS..Q(.. POINT
VALUES FROM THE PLOTTER..R).. BED SIZE A
ND MOVE TO THE.3R*.. INITIAL POINT..9R+.
:.[R,.: .1,"M",479.X(1),.(479.Y(1)).AR-.
:..R... PLOT THE POINTS FROM THE ARRAY..
R/.. SUBTRACTING THE X-AXIS AND.JR0.. Y-
AXIS POINT VALUES FROM THE..R1.. PLOTTER
BED SIZE...R2.:..R3.: . I.1 . 11..S4.:
.1,"D",479.X(I),.(479.Y(I)).#S5.: ..)S6.
:.AS7.. EJECT THE DRAWING.GS8.:._S9.:
.1,"M", 0,.479.ES:.:..S;.. ESTABLISH NE
W HOME POSITION..S<.:..S=.: .4..S>.:.B
S?.." U..........................I..S@..
" . PLOT ORIENTATION ...TA.." J.
.........................K..TB.:..TC..
THE FOLLOWING EXAMPLE.PTD.. DEMONSTRA
TES PLOTTING THE.QTE.. FIGURE AT AN OR
IENTATION..TF.. THAT IS VERTICAL RATHE
R..TG.. THAN HORIZONTAL...TH.:.TTI.."
U..........................I..TJ.." . P
LOT THE GIANT LETTER ...UK.." . ORIEN
TED VERTICALLY. ..@UL.." J...........
...............K.FUM.:.IUN.. DRAW A SQUA
RE BOX 479 BY 479.OUO.:.YUP.: .4..UQ.:
.4,"VERTICAL ORIENTATION:"..UR.:..US.:
.1,"D",479, 0.OUT.: .1,"D",479,.479.
.UU.: .1,"D", 0,.479..UV.: .1,"D", 0
, 0..VW.:.&VX.. USE THE X-AXIS VALUE F
OR THE.HVY.. Y-AXIS AND THE Y-AXIS VALUE
.IVZ.. FOR THE X-AXIS AND MOVE TO..V[..
THE INITIAL POSITION...V\.:..V].: .1,"
M",Y(1),.X(1)..V^.:.PV_.. PLOT THE POINT
S FROM THE ARRAY..V`.. USING THE X-AXIS
VALUES FOR..WA.. THE Y-AXIS AND THE Y-AX
IS./WB.. VALUES FOR THE X-AXIS..;WC.. NO
TE:.WWD.. THIS WILL INTRODUCE A.UWE.. RE
FLECTION WHICH CAN BE..WF.. ELIMINATED B
Y INVERTING THE..WG.. X- OR Y-AXIS...WH.
:.DWI.: . I.1 . 11..WJ.: .1,"D",Y(
I),.X(I)..WK.: ...WL.:..XM.. EJECT THE
DRAWING..XN.:.&XO.: .1,"M", 0,.479.,
XP.:.NXQ.. ESTABLISH NEW HOME POSITION.T
XR.:._XS.: .4.EXT.:..XU.." U..........
................I..XV.." . PLOT SCA
LING ..QXW.." J..................
........K.WXX.:..XY.. THE FOLLOWING EX
AMPLES..YZ.. DEMONSTRATE PLOTTING THE.
8Y{.. SAME FIGURE IN DIFFERENT.OY|..
SIZE SCALINGS..UY}.:.YY~.." U..........
................I..Y.." . PLOT THE GIA
NT LETTER ..AY..." . SCALED DOWN IN S
IZE ...Y..." . ALONG THE X-AXIS ONL
Y. ...Z..." J..........................
K..Z..:.2Z... DRAW A SQUARE BOX 479 BY 4
79.8Z..:.CZ..: .4.`Z..: .4,"REDUCED
X-AXIS:".FZ..:.~Z..: .1,"D",479, 0..
Z..: .1,"D",479,.479..Z..: .1,"D",
0,.479.FZ..: .1,"D", 0, 0.LZ..:..Z.
.. DIVIDE THE X-AXIS VALUE BY 2..[... AN
D MOVE TO THE INITIAL..[... POSITION..#[
..:.?[..: .1,"M",X(1).2,.Y(1).E[..:.J[
... PLOT THE POINTS FROM THE ARRAY..[...
DIVIDING THE X-AXIS VALUES..[... BY 2..
.[..:..[..: . I.1 . 11.N[..: .1,"D
",X(I).2,.Y(I).X[..: ...[..:..[... EJE
CT THE DRAWING..[..:..\..: .1,"M", 0,
.479..\..:.<\ .. ESTABLISH NEW HOME POSI
TION.B\..:.M\..: .4.S\..:.W\..." U....
......................I..\..." . PLOT T
HE GIANT LETTER ...\..." . SCALED DOW
N IN SIZE ...\..." . ALONG THE Y-AX
IS ONLY. ...]..." J....................
......K..]..:.0]... DRAW A SQUARE BOX 47
9 BY 479.6]..:.A]..: .4.^]..: .4,"RE
DUCED Y-AXIS:".D]..:.|]..: .1,"D",479,
0..]..: .1,"D",479,.479..]..: .1,
"D", 0,.479.D]..: .1,"D", 0, 0.J].
.:..]... DIVIDE THE Y-AXIS VALUE BY 2..^
... AND MOVE TO THE INITIAL..^... POSITI
ON..!^..:.=^..: .1,"M",X(1),.Y(1).2.C^
..:.H^... PLOT THE POINTS FROM THE ARRAY
..^... DIVIDING THE Y-AXIS VALUES..^...
BY 2...^..:..^..: . I.1 . 11.L^..:
.1,"D",X(I),.Y(I).2.V^..: ...^A.:..^B
.. EJECT THE DRAWING..^C.:.._D.: .1,"M
", 0,.479.._E.:.:_F.. ESTABLISH NEW HOM
E POSITION.@_G.:.K_H.: .4.Q_I.:.U_J.."
U..........................I.._K.." .
PLOT THE GIANT LETTER ..._L.." . SCAL
ED DOWN IN SIZE ..._M.." . ALONG TH
E X-AXIS AND ...`N.." . ALONG THE Y-
AXIS. ..)`O.." J..................
........K./`P.:.R`Q.. DRAW A SQUARE BOX
479 BY 479.X`R.:.C`S.: .4.I`T.:.T`U.:
.4..`V.: .4,"REDUCED X-AXIS AND"..`W
.: .4,"REDUCED Y-AXIS:"..`X.:.O`Y.:
.1,"D",479, 0..`Z.: .1,"D",479,.479.
.`..: .1,"D", 0,.479..A..: .1,"D",
0, 0..A..:.=A... DIVIDE THE X-AXIS AN
D THE._A... Y-AXIS VALUES BY 2 AND MOVE.
~A... TO THE INITIAL POSITION...A..:..A.
.: .1,"M",X(1).2,.Y(1).2..A..:.MA... P
LOT THE POINTS FROM THE ARRAY..A... DIVI
DING THE X-AXIS AND THE..B... Y-AXIS VAL
UES BY 2...B..:."B..: . I.1 . 11.BB..:
.1,"D",X(I).2,.Y(I).2.LB..: ..RB.
.:.JB... EJECT THE DRAWING.PB..:..B..:
.1,"M", 0,.479..B..:..B... ESTABLISH N
EW HOME POSITION..B..:.AB..: .4.GB..:.
.B..." U..........................I..C..
." . PLOT ROTATION ..3C..." J
..........................K.9C..:.XC...
THE FOLLOWING EXAMPLES.YC... DEMONST
RATE PLOTTING THE..C... SAME FIGURE RO
TATED THROUGH..C... ANY ANGLE...C..:.Z
C..." U..........................I..C...
" . PLOT THE GIANT LETTER .."D..." .
ROTATED THROUGH AN ..FD..." . ANG
LE OF 45 DEGREES. ..JD..." J.........
.................K.PD..:..D... DRAW A SQ
UARE BOX 479 BY 479..D..:..D..: .4.ED.
.: .4,"45 DEGREE ROTATION,"..D..: .4
,"WITH X-AXIS OFFSET:"..D..:..E..: .1,
"D",479, 0..E..: .1,"D",479,.479.4E.
.: .1,"D", 0,.479.LE..: .1,"D", 0,
0.RE..:.RE... DEFINE THE ROTATION ANG
LE..E... FUNCTIONS:..E..:..E..: RA.45
:. ANGLE.KE..: CF...180 :. RA
DIAN FACTOR..E..: RA.RA.CF :. CONVE
RT ANGLE..F..: SR..(RA) :. ANGLE SINE
.2F..: CR..(RA) :. ANGLE COSINE.8F..:
.ZF... ROTATE THE POINTS USING THE.SF...
FOLLOWING FORMULA:..F... XP=CR*X-SR*Y
..F... YP=SR*X+CR*Y..F..:.CF... MOVE T
O THE INITIAL POINT.IF..:..F..: XP.CR.
X(1).SR.Y(1)..F..: YP.SR.X(1).CR.Y(1).
.G .: .1,"M",XP,.YP..G!.:.@G".. PLOT T
HE POINTS FROM THE ARRAY.AG#.. ROTATING
THE X- AND Y-AXIS..G$.. POINTS BY THE RO
TATION ANGLE..G%.. NOTE:..G&.. ROTATION
AROUND THE ORIGIN.UG'.. WILL CAUSE MOST
OF THE LETTER..G(.. TO MOVE OUT OF THE P
LOT..H).. WINDOW. THEREFORE, THE LETTER.
:H*.. WILL BE PLOTTED WITH OFFSET..YH+..
ADDING 240 TO THE X-AXIS.{H,.. WILL KEE
P THE LETTER WITHIN..H-.. VIEW...H..:. H
/.: . I.1 . 11..H0.: XP.CR.X(I).SR
.Y(I).ZH1.: YP.SR.X(I).CR.Y(I)..H2.:
.1,"D",XP.240,.YP..I3.: ...I4.:..
I5.. EJECT THE DRAWING.$I6.:.<I7.: .1,
"M", 0,.479.BI8.:.DI9.. ESTABLISH NEW H
OME POSITION.JI:.:.UI;.: .4.{I<.:..I=.
." U..........................I.CI>.." .
PLOT THE GIANT LETTER ...I?.." . RO
TATED AROUND ANGLES ...J@.." . WHICH
ARE MULTIPLES OF ../JA.." . 45 DEGREES
, WITH ..SJB.." . SCALING AND OF
FSETS. ..WJC.." J....................
......K.}JD.:. JE.. DRAW A SQUARE BOX 47
9 BY 479..JF.:..JG.: .4.RJH.: .4,"ROTA
TION, SCALING AND"..JI.: .4,"X AND Y-AX
IS OFFSETS:"..JJ.:..KK.: .1,"D",479,
0.(KL.: .1,"D",479,.479.?KM.: .1,"D",
0,.479.VKN.: .1,"D", 0, 0.\KO.:.|KP
.. DEFINE THE ROTATION ANGLE..KQ.. FUNCT
IONS AND STORE THEM..KR.. INTO AN ARRAY.
..KS.:..KT.. DEFINE ARRAYS TO HOLD FUNCT
IONS..KU.:..LV.: . SR(8) :. SINE ARRA
Y."LW.: . CR(8) :. COSINE ARRAY.(LX.:
.ILY.. LOAD FUNCTIONS INTO ARRAYS.OLZ.:.
TL[.: CF...180 :. RADIAN FACTOR..L\
.: . I.1 . 8..L].: RA.I.45 :. NE
XT ANGLE.ML^.: RA.RA.CF :. CONVERT
ANGLE..L_.: SR(I)..(RA) :. SINE..M`
.: CR(I)..(RA) :. COSINE..MA.: ..
.MB.:.BMC.. DEFINE THE SCALING AND OFFSE
TS.HMD.:.JME.: SF..5 :. SCALING FACT
OR..MF.: XO.240 :. X-AXIS OFFSET..MG.
: YO.240 :. Y-AXIS OFFSET..MH.:.RMI..
LOOP EIGHT TIMES, DRAWING..MJ.. A ROTAT
ED LETTER EACH TIME...MK.:..NL.: . I.1
. 8.!NM.: . J.1 . 11.>NN.: .
ROTATE X AND Y.ENO.: XP.CR(I).X(
J).SR(I).Y(J)..NP.: YP.SR(I).X(J
).CR(I).Y(J)..NQ.: . SCALE X AND Y
..NR.: XP.XP.SF.VNS.: YP
.YP.SF..NT.: . OFFSET X AND Y..OU.
: XP.XP.XO.!OV.: YP.YP.Y
O.COW.: . MOVE TO FIRST POINT.^OX.
: . J.1 . 2171.ZOY.: .1,
"M",XP,.YP..OZ.: . DRAW LINE OF A
LETTER..O{.: .1,"D",XP,.YP.LO|.:
. :. J..O}.: . :. I..O~.:..O..
EJECT THE DRAWING..P..:..P..: .1,"M",
0,.479..P..:.@P... ESTABLISH NEW HOME
POSITION.FP..:.QP..: .4.WP..:.{P..." U
..........................I..P..." .
COMBINED FUNCTIONS ..CP..." J........
..................K.IP..:..P... THE FO
LLOWING EXAMPLES..Q... DEMONSTRATE PLO
TTING THE.-Q... SAME FIGURE ROTATED TH
ROUGH.QQ... POINTS ON THE CIRCUMFERENC
E.FQ... OF A CIRCLE..LQ..:..Q..." U...
.......................I..Q..." . PLOT
THE GIANT LETTER ..XQ..." . ROTATED T
HROUGH ANGLES ...Q..." . OF 45 DEGREES
WHILE .. R..." . THE POINT OF ORIG
IN ..DR..." . MOVES AROUND THE CIR-
..HR..." . CUMFERENCE OF A CIRCLE. .
..R..." J..........................K..R.
.:..R... DRAW A SQUARE BOX 479 BY 479..R
..:.FR..: .4..R..: .4,"ROTATION, SCA
LING,"..S..: .4,"OFFSETS AND RELATIVE"
.'S..: .4,"ORIGIN REFERENCE:".-S .:.ES
..: .1,"D",479, 0.]S..: .1,"D",479
,.479.US..: .1,"D", 0,.479..S..: .1
,"D", 0, 0..S..:..S... DEFINE THE SCA
LING FACTOR AND.TS... AND CIRCLE PARAMET
ERS..ZS..:..S..: SF..25 :. SCALING FA
CTOR. T..: CR.120 :. RADIUS OF CIRCLE
.DT..: XC.239 :. X-AXIS OF CENTER.HT.
.: YC.239 :. Y-AXIS OF CENTER.NT..:..
T... LOOP EIGHT TIMES, DRAWING..T... A R
OTATED LETTER EACH TIME..RT... ROTATE TH
E POINTS USING THE..T... FOLLOWING FORMU
LA:..U... XP=CR*X-SR*Y..U... YP=SR*X
+CR*Y..U..:.-U..: . I.1 . 8.QU..:
. COMPUTE POINT ON CIRCLE.LU..: XP
.CR(I).CR.XC..U..: YP.SR(I).CR.YC.
.U..: . MOVE TO CIRCLE POINT.MU..:
. AND ESTABLISH A RELATIVE..U..:
. ORIGIN OF REFERENCE...V..: .1,"M
",XP,.YP..V..: .1,"I".0V..: .
J.1 . 11.MV..: . ROTATE X AND Y.TV
..: XP.CR(I).X(J).SR(I).Y(J)..VA
.: YP.SR(I).X(J).CR(I).Y(J)..VB.
: . SCALE X AND Y.NVC.: XP
.XP.SF..VD.: YP.YP.SF..WE.:
. DRAW LINE OF A LETTER..WF.: .
USING THE "J" COMMAND,.LWG.: . REF
ERENCING THE.OWH.: . RELATIVE ORIG
IN (THE..WI.: . POINT ON THE CIRCL
E)...WJ.: .1,"J",XP,.YP.AWK.:
. :. J.QWL.: . :. I.WWM.:..WN.. EJ
ECT THE DRAWING..WO.:..XP.: .1,"M", 0
,.479..XQ.:.5XR.. ESTABLISH NEW HOME POS
ITION.;XS.:.FXT.: .4.LXU.:.PXV.." U...
.......................I..XW.." . RESET
TING THE PLOTTER ...XX.." J...........
...............K..XY.:..XZ.. THE PLOTT
ER CAN BE RESET AT..Y... ANY TIME BY P
RINTING A BLANK.)Y... LINE THROUGH POR
T 7 USING.MY... FILE NUMER #7. THE POW
ER ON.QY... CYCLE WILL THEN TAKE PLACE
...Y... ALL PARAMETERS WILL BE RESET..
Y... TO THEIR DEFAULT VALUES AND..Y...
THE POWER ON TEST PATTERN..Y... WIL
L BE DRAWN...Y..:..Z..: .4.&Z..: .4,
"RESETTING PLOTTER...".1Z..: .7.7Z..:.
[Z..." U..........................I.Z..
." . CLOSING PLOTTER FILES ...Z..." J
..........................K..Z..:..Z..:
. I.1 . 7.JZ..: I.VZ..: . I..
Z..: 44..Z..:..Z..: ....
> CLICK IMAGE PREVIEW FOR FULL MODAL