DGRAPH PAINTER
FILE INFORMATION
FILENAME(S): DGRAPH PAINTER
FILE TYPE(S): PRG
FILE SIZE: 3K
FIRST SEEN: 2025-10-19 22:35:37
APPEARS ON: 1 disk(s)
FILE HASH
4ce8faa822b2cc174b0753b00d6389b7ca85a320aa5627321250d713e70ce7db
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MAGIC TRICKS | DGRAPH PAINTER | PRG | Radd Maxx | 15 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1F 08 0A 00 99 C7 28 31 34 29 3B C7 28 38 |........(14);.(8| 00000010: 29 3A 4C 58 25 B2 34 3A 4C 59 25 B2 31 39 35 00 |):LX%.4:LY%.195.| 00000020: 3E 08 14 00 97 35 30 39 31 33 2C 31 3A 97 35 30 |>....50913,1:.50| 00000030: 39 35 39 2C 31 3A 97 35 30 39 31 38 2C 30 00 5D |959,1:.50918,0.]| 00000040: 08 1E 00 97 35 30 39 36 34 2C 30 3A 97 35 30 39 |....50964,0:.509| 00000050: 32 33 2C 30 3A 97 35 30 39 36 39 2C 30 00 70 08 |23,0:.50969,0.p.| 00000060: 28 00 40 32 3A 58 25 B2 34 3A 59 25 B2 31 39 35 |(.@2:X%.4:Y%.195| 00000070: 00 84 08 32 00 8B 20 58 25 B3 30 20 A7 20 58 25 |...2.. X%.0 . X%| 00000080: B2 33 31 39 00 98 08 3C 00 8B 20 58 25 B1 33 31 |.319...<.. X%.31| 00000090: 39 20 A7 20 58 25 B2 30 00 AC 08 46 00 8B 20 59 |9 . X%.0...F.. Y| 000000A0: 25 B3 30 20 A7 20 59 25 B2 31 39 39 00 C0 08 50 |%.0 . Y%.199...P| 000000B0: 00 8B 20 59 25 B1 31 39 39 20 A7 20 59 25 B2 30 |.. Y%.199 . Y%.0| 000000C0: 00 F2 08 5A 00 43 31 25 B2 35 3A 43 32 25 B2 36 |...Z.C1%.5:C2%.6| 000000D0: 3A 40 34 2C 58 25 2C 59 25 3A 8B 28 C2 28 32 35 |:@4,X%,Y%:.(.(25| 000000E0: 31 29 B3 B1 30 29 A7 43 31 25 B2 36 3A 43 32 25 |1)..0).C1%.6:C2%| 000000F0: B2 35 00 01 09 64 00 40 43 31 25 2C 58 25 2C 59 |.5...d.@C1%,X%,Y| 00000100: 25 00 15 09 6E 00 58 54 25 B2 C2 28 35 36 33 32 |%...n.XT%..(5632| 00000110: 30 29 AF 33 31 00 2F 09 78 00 4A 58 25 B2 B4 28 |0).31./.x.JX%..(| 00000120: 58 54 25 AF 34 29 AB B4 28 58 FF 25 AF 38 29 00 |XT%.4)..(X.%.8).| 00000130: 49 09 82 00 4A 59 25 B2 B4 28 58 FF 25 AF 32 29 |I...JY%..(X.%.2)| 00000140: AB FF 28 58 54 25 AF 31 29 00 5D 09 8C 00 4A 46 |..(XT%.1).]...JF| 00000150: 25 B2 31 AB FF 28 58 54 25 AF 31 36 29 00 78 09 |%.1..(XT%.16).x.| 00000160: 96 00 8B 28 4A 58 25 B3 B1 30 29 B0 28 4A 59 25 |...(JX%..0).(JY%| 00000170: B3 B1 30 29 89 32 30 30 00 8C 09 A0 00 A1 43 24 |..0).200......C$| 00000180: 3A 43 25 B2 C2 28 36 35 33 29 AF 34 00 A4 09 AA |:C%..(653).4....| 00000190: 00 8B 28 43 24 B2 22 22 29 AF 28 43 25 B2 30 29 |..(C$."").(C%.0)| 000001A0: 89 31 31 30 00 B4 09 B4 00 8B 28 43 25 B2 30 29 |.110......(C%.0)| 000001B0: 89 32 32 30 00 BD 09 BE 00 89 33 38 30 00 D3 09 |.220......380...| 000001C0: C8 00 8B 28 4A 46 25 B3 B1 30 29 A7 43 32 25 B2 |...(JF%..0).C2%.| 000001D0: 43 31 25 00 FA 09 D2 00 40 43 32 25 2C 58 25 2C |C1%.....@C2%,X%,| 000001E0: 59 25 3A 58 25 B2 58 25 AA 4A 58 25 3A 59 25 B2 |Y%:X%.X%.JX%:Y%.| 000001F0: 59 25 AA 4A 59 25 3A 89 35 30 00 1F 0A DC 00 43 |Y%.JY%:.50.....C| 00000200: 58 25 B2 58 25 AD 38 3A 43 59 25 B2 59 25 AD 38 |X%.X%.8:CY%.Y%.8| 00000210: 3A 40 31 30 2C 43 58 25 2C 43 59 25 2C 43 24 00 |:@10,CX%,CY%,C$.| 00000220: 33 0A E6 00 8B 28 C2 28 32 35 31 29 B2 30 29 89 |3....(.(251).0).| 00000230: 32 36 30 00 58 0A F0 00 8B 28 43 58 25 B1 33 38 |260.X....(CX%.38| 00000240: 29 A7 58 25 B2 AB 34 3A 8B 28 43 59 25 B1 30 29 |).X%..4:.(CY%.0)| 00000250: A7 59 25 B2 59 25 AB 38 00 68 0A FA 00 58 25 B2 |.Y%.Y%.8.h...X%.| 00000260: 58 25 AA 38 3A 89 35 30 00 83 0A 04 01 43 25 B2 |X%.8:.50.....C%.| 00000270: C6 28 43 24 29 3A 8B 28 43 25 B3 B1 31 33 29 89 |.(C$):.(C%..13).| 00000280: 32 39 30 00 A7 0A 0E 01 40 43 32 25 2C 58 25 2C |290.....@C2%,X%,| 00000290: 59 25 3A 58 25 B2 34 3A 8B 28 59 25 B1 37 29 A7 |Y%:X%.4:.(Y%.7).| 000002A0: 59 25 B2 59 25 AB 38 00 AF 0A 18 01 89 35 30 00 |Y%.Y%.8......50.| 000002B0: C7 0A 22 01 8B 28 43 25 B2 32 39 29 A7 4A 58 25 |.."..(C%.29).JX%| 000002C0: B2 38 3A 89 32 31 30 00 E1 0A 2C 01 8B 28 43 25 |.8:.210...,..(C%| 000002D0: B2 31 35 37 29 A7 4A 58 25 B2 AB 38 3A 89 32 31 |.157).JX%..8:.21| 000002E0: 30 00 FA 0A 36 01 8B 28 43 25 B2 31 34 35 29 A7 |0...6..(C%.145).| 000002F0: 4A 59 25 B2 38 3A 89 32 31 30 00 13 0B 40 01 8B |JY%.8:.210...@..| 00000300: 28 43 25 B2 31 37 29 A7 4A 59 25 B2 AB 38 3A 89 |(C%.17).JY%..8:.| 00000310: 32 31 30 00 3B 0B 4A 01 8B 28 43 25 B2 31 39 29 |210.;.J..(C%.19)| 00000320: A7 40 43 32 25 2C 58 25 2C 59 25 3A 58 25 B2 34 |.@C2%,X%,Y%:X%.4| 00000330: 3A 59 25 B2 31 39 35 3A 89 35 30 00 5C 0B 54 01 |:Y%.195:.50.\.T.| 00000340: 8B 28 43 25 B2 31 34 37 29 A7 40 33 3A 58 25 B2 |.(C%.147).@3:X%.| 00000350: 34 3A 59 25 B2 31 39 35 3A 89 35 30 00 6E 0B 5E |4:Y%.195:.50.n.^| 00000360: 01 8B 28 43 25 B3 B1 32 30 29 89 31 31 30 00 AF |..(C%..20).110..| 00000370: 0B 68 01 40 43 32 25 2C 58 25 2C 59 25 3A 8B 28 |.h.@C2%,X%,Y%:.(| 00000380: 58 25 B1 37 29 A7 58 25 B2 58 25 AB 38 3A 43 58 |X%.7).X%.X%.8:CX| 00000390: 25 B2 58 25 AD 38 3A 43 59 25 B2 59 25 AD 38 3A |%.X%.8:CY%.Y%.8:| 000003A0: 40 31 30 2C 43 58 25 2C 43 59 25 2C 22 20 22 00 |@10,CX%,CY%," ".| 000003B0: B7 0B 72 01 89 35 30 00 C1 0B 7C 01 99 22 93 22 |..r..50...|.."."| 000003C0: 3B 00 F4 0B 86 01 99 22 12 20 20 20 20 20 20 20 |;......". | 000003D0: 20 20 20 20 20 20 20 20 20 CF 50 54 49 4F 4E 53 | .PTIONS| 000003E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000003F0: 20 92 22 3B 00 0D 0C 90 01 99 22 11 20 47 20 2D | .";......". G -| 00000400: 3E 20 C7 45 54 20 41 20 C6 49 4C 45 22 00 26 0C |> .ET A .ILE".&.| 00000410: 9A 01 99 22 20 53 20 2D 3E 20 D3 41 56 45 20 41 |..." S -> .AVE A| 00000420: 20 C6 49 4C 45 22 00 40 0C A4 01 99 22 20 50 20 | .ILE".@...." P | 00000430: 2D 3E 20 D0 52 49 4E 54 20 D3 43 52 45 45 4E 22 |-> .RINT .CREEN"| 00000440: 00 59 0C AE 01 99 22 20 44 20 2D 3E 20 C4 52 41 |.Y...." D -> .RA| 00000450: 57 20 41 20 CC 49 4E 45 22 00 7D 0C B8 01 99 22 |W A .INE".}...."| 00000460: 20 46 20 2D 3E 20 C6 49 4C 4C 20 41 20 D2 45 47 | F -> .ILL A .EG| 00000470: 55 4C 41 52 20 D0 4F 4C 59 47 4F 4E 22 00 94 0C |ULAR .OLYGON"...| 00000480: C2 01 99 22 20 55 20 2D 3E 20 D5 50 50 45 52 43 |..." U -> .PPERC| 00000490: 41 53 45 22 00 AB 0C CC 01 99 22 20 4C 20 2D 3E |ASE"......" L ->| 000004A0: 20 CC 4F 57 45 52 43 41 53 45 22 00 CA 0C D6 01 | .OWERCASE".....| 000004B0: 99 22 20 4E 20 2D 3E 20 CE 4F 52 4D 41 4C 20 C3 |." N -> .ORMAL .| 000004C0: 48 41 52 41 43 54 45 52 53 22 00 EA 0C E0 01 99 |HARACTERS"......| 000004D0: 22 20 52 20 2D 3E 20 D2 45 56 45 52 53 45 20 C3 |" R -> .EVERSE .| 000004E0: 48 41 52 41 43 54 45 52 53 22 00 04 0D EA 01 99 |HARACTERS"......| 000004F0: 22 20 43 20 2D 3E 20 C3 4C 45 41 52 20 D3 43 52 |" C -> .LEAR .CR| 00000500: 45 45 4E 22 00 16 0D F4 01 99 22 20 51 20 2D 3E |EEN"......" Q ->| 00000510: 20 D1 55 49 54 22 00 33 0D FE 01 99 22 11 12 C5 | .UIT".3...."...| 00000520: 4E 54 45 52 20 CF 50 54 49 4F 4E 3A 92 20 22 3B |NTER .PTION:. ";| 00000530: 3A 40 31 00 48 0D 08 02 A1 43 24 3A 8B 28 43 24 |:@1.H....C$:.(C$| 00000540: B2 22 22 29 89 35 32 30 00 54 0D 12 02 99 43 24 |."").520.T....C$| 00000550: AA 22 11 22 00 67 0D 1C 02 8B 28 43 24 B3 B1 22 |.".".g....(C$.."| 00000560: 47 22 29 89 35 38 30 00 84 0D 26 02 43 24 B2 22 |G").580...&.C$."| 00000570: 22 3A 85 22 C7 45 54 20 C6 49 4C 45 4E 41 4D 45 |":.".ET .ILENAME| 00000580: 22 3B 43 24 00 C0 0D 30 02 8B 28 43 24 B2 22 22 |";C$...0..(C$.""| 00000590: 29 A7 99 22 93 11 C7 45 54 20 41 20 C6 49 4C 45 |).."...ET A .ILE| 000005A0: 20 C1 42 4F 52 54 45 44 20 2D 2D 20 C5 4E 54 45 | .BORTED -- .NTE| 000005B0: 52 20 C3 4F 4D 4D 41 4E 44 11 22 3A 89 33 39 30 |R .OMMAND.":.390| 000005C0: 00 E6 0D 3A 02 99 22 11 C7 45 54 54 49 4E 47 20 |...:.."..ETTING | 000005D0: C6 49 4C 45 2E 2E 2E 22 3A 40 31 33 2C 43 24 3A |.ILE...":@13,C$:| 000005E0: 40 32 3A 89 35 30 00 F9 0D 44 02 8B 28 43 24 B3 |@2:.50...D..(C$.| 000005F0: B1 22 53 22 29 89 36 32 30 00 17 0E 4E 02 43 24 |."S").620...N.C$| 00000600: B2 22 22 3A 85 22 D3 41 56 45 20 C6 49 4C 45 4E |."":.".AVE .ILEN| 00000610: 41 4D 45 22 3B 43 24 00 54 0E 58 02 8B 28 43 24 |AME";C$.T.X..(C$| 00000620: B2 22 22 29 A7 99 22 93 11 D3 41 56 45 20 41 20 |."").."...AVE A | 00000630: C6 49 4C 45 20 C1 42 4F 52 54 45 44 20 2D 2D 20 |.ILE .BORTED -- | 00000640: C5 4E 54 45 52 20 C3 4F 4D 4D 41 4E 44 11 22 3A |.NTER .OMMAND.":| 00000650: 89 33 39 30 00 90 0E 62 02 99 22 11 D3 41 56 49 |.390...b.."..AVI| 00000660: 4E 47 20 C6 49 4C 45 2E 2E 2E 22 3A 40 43 32 25 |NG .ILE...":@C2%| 00000670: 2C 58 25 2C 59 25 3A 40 31 32 2C 43 24 3A 40 43 |,X%,Y%:@12,C$:@C| 00000680: 31 25 2C 58 25 2C 59 25 3A 40 32 3A 89 31 31 30 |1%,X%,Y%:@2:.110| 00000690: 00 A3 0E 6C 02 8B 28 43 24 B3 B1 22 50 22 29 89 |...l..(C$.."P").| 000006A0: 36 37 30 00 BD 0E 76 02 99 22 D3 55 52 45 20 D0 |670...v..".URE .| 000006B0: 52 49 4E 54 20 28 59 2F 4E 29 3F 20 22 00 D2 0E |RINT (Y/N)? "...| 000006C0: 80 02 A1 43 24 3A 8B 28 43 24 B2 22 22 29 89 36 |...C$:.(C$."").6| 000006D0: 34 30 00 0B 0F 8A 02 8B 28 43 24 B3 B1 22 59 22 |40......(C$.."Y"| 000006E0: 29 A7 99 22 93 11 D0 52 49 4E 54 20 C1 42 4F 52 |).."...RINT .BOR| 000006F0: 54 45 44 20 2D 2D 20 C5 4E 54 45 52 20 C3 4F 4D |TED -- .NTER .OM| 00000700: 4D 41 4E 44 11 22 3A 89 33 39 30 00 41 0F 94 02 |MAND.":.390.A...| 00000710: 99 22 11 D0 52 49 4E 54 49 4E 47 2E 2E 2E 22 3A |."..RINTING...":| 00000720: 40 43 32 25 2C 58 25 2C 59 25 3A 40 31 34 3A 40 |@C2%,X%,Y%:@14:@| 00000730: 43 31 25 2C 58 25 2C 59 25 3A 40 32 3A 89 31 31 |C1%,X%,Y%:@2:.11| 00000740: 30 00 54 0F 9E 02 8B 28 43 24 B3 B1 22 44 22 29 |0.T....(C$.."D")| 00000750: 89 38 30 30 00 86 0F A8 02 99 22 12 20 20 20 20 |.800......". | 00000760: 20 20 20 20 20 20 20 20 20 20 C4 52 41 57 20 CF | .RAW .| 00000770: 50 54 49 4F 4E 53 20 20 20 20 20 20 20 20 20 20 |PTIONS | 00000780: 20 20 20 20 92 22 00 A6 0F B2 02 99 22 20 53 20 | ."......" S | 00000790: 2D 3E 20 D3 45 54 20 D3 54 41 52 54 49 4E 47 20 |-> .ET .TARTING | 000007A0: D0 4F 49 4E 54 22 00 C1 0F BC 02 99 22 20 44 20 |.OINT"......" D | 000007B0: 2D 3E 20 C4 52 41 57 20 54 48 45 20 CC 49 4E 45 |-> .RAW THE .INE| 000007C0: 22 00 E0 0F C6 02 99 22 11 12 C5 4E 54 45 52 20 |"......"...NTER | 000007D0: C4 52 41 57 20 CF 50 54 49 4F 4E 3A 92 20 22 3B |.RAW .PTION:. ";| 000007E0: 00 F5 0F D0 02 A1 43 24 3A 8B 28 43 24 B2 22 22 |......C$:.(C$.""| 000007F0: 29 89 37 32 30 00 FD 0F DA 02 99 43 24 00 10 10 |).720......C$...| 00000800: E4 02 8B 28 43 24 B3 B1 22 53 22 29 89 37 36 30 |...(C$.."S").760| 00000810: 00 32 10 EE 02 4C 58 25 B2 58 25 3A 4C 59 25 B2 |.2...LX%.X%:LY%.| 00000820: 59 25 3A 43 32 25 B2 43 31 25 3A 40 32 3A 89 31 |Y%:C2%.C1%:@2:.1| 00000830: 31 30 00 6A 10 F8 02 8B 28 43 24 B3 B1 22 44 22 |10.j....(C$.."D"| 00000840: 29 A7 99 22 93 11 CC 49 4E 45 20 C1 42 4F 52 54 |).."...INE .BORT| 00000850: 45 44 20 2D 2D 20 C5 4E 54 45 52 20 C3 4F 4D 4D |ED -- .NTER .OMM| 00000860: 41 4E 44 11 22 3A 89 33 39 30 00 8F 10 02 03 53 |AND.":.390.....S| 00000870: 25 B2 32 35 36 3A 85 22 11 CC 49 4E 45 20 D3 54 |%.256:."..INE .T| 00000880: 59 4C 45 20 28 30 2D 32 35 35 29 22 3B 53 25 00 |YLE (0-255)";S%.| 00000890: D4 10 0C 03 8B 28 28 53 25 B3 30 29 B0 28 53 25 |.....((S%.0).(S%| 000008A0: B1 32 35 35 29 29 A7 99 22 93 11 C4 52 41 57 20 |.255)).."...RAW | 000008B0: CC 49 4E 45 20 C1 42 4F 52 54 45 44 20 2D 2D 20 |.INE .BORTED -- | 000008C0: C5 4E 54 45 52 20 C3 4F 4D 4D 41 4E 44 11 22 3A |.NTER .OMMAND.":| 000008D0: 89 33 39 30 00 04 11 16 03 40 32 3A 40 34 2C 4C |.390.....@2:@4,L| 000008E0: 58 25 2C 4C 59 25 3A 40 37 2C 58 25 2C 59 25 2C |X%,LY%:@7,X%,Y%,| 000008F0: 53 25 3A 4C 58 25 B2 58 25 3A 4C 59 25 B2 59 25 |S%:LX%.X%:LY%.Y%| 00000900: 3A 89 35 30 00 17 11 20 03 8B 28 43 24 B3 B1 22 |:.50... ..(C$.."| 00000910: 46 22 29 89 38 38 30 00 3C 11 2A 03 99 22 C9 53 |F").880.<.*..".S| 00000920: 20 CD 41 52 4B 45 52 20 49 4E 20 D0 4F 4C 59 47 | .ARKER IN .OLYG| 00000930: 4F 4E 20 28 59 2F 4E 29 3F 20 22 3B 00 51 11 34 |ON (Y/N)? ";.Q.4| 00000940: 03 A1 43 24 3A 8B 28 43 24 B2 22 22 29 89 38 32 |..C$:.(C$."").82| 00000950: 30 00 59 11 3E 03 99 43 24 00 91 11 48 03 8B 28 |0.Y.>..C$...H..(| 00000960: 43 24 B3 B1 22 59 22 29 A7 99 22 93 11 C6 49 4C |C$.."Y").."...IL| 00000970: 4C 20 C1 42 4F 52 54 45 44 20 2D 2D 20 C5 4E 54 |L .BORTED -- .NT| 00000980: 45 52 20 C3 4F 4D 4D 41 4E 44 11 22 3A 89 33 39 |ER .OMMAND.":.39| 00000990: 30 00 B6 11 52 03 53 25 B2 31 32 38 3A 85 22 11 |0...R.S%.128:.".| 000009A0: C6 49 4C 4C 20 D3 54 59 4C 45 20 28 30 2D 31 32 |.ILL .TYLE (0-12| 000009B0: 37 29 22 3B 53 25 00 F6 11 5C 03 8B 28 28 53 25 |7)";S%...\..((S%| 000009C0: B3 30 29 B0 28 53 25 B1 31 32 37 29 29 A7 99 22 |.0).(S%.127)).."| 000009D0: 93 11 C6 49 4C 4C 20 C1 42 4F 52 54 45 44 20 2D |...ILL .BORTED -| 000009E0: 2D 20 C5 4E 54 45 52 20 C3 4F 4D 4D 41 4E 44 11 |- .NTER .OMMAND.| 000009F0: 22 3A 89 33 39 30 00 16 12 66 03 40 32 3A 40 36 |":.390...f.@2:@6| 00000A00: 2C 58 25 2C 59 25 3A 40 39 2C 58 25 2C 59 25 2C |,X%,Y%:@9,X%,Y%,| 00000A10: 53 25 3A 89 35 30 00 41 12 70 03 8B 28 43 24 B2 |S%:.50.A.p..(C$.| 00000A20: 22 55 22 29 A7 43 24 B2 C7 28 31 34 32 29 3A 40 |"U").C$..(142):@| 00000A30: 31 30 2C 30 2C 30 2C 43 24 3A 40 32 3A 89 31 31 |10,0,0,C$:@2:.11| 00000A40: 30 00 6B 12 7A 03 8B 28 43 24 B2 22 4C 22 29 A7 |0.k.z..(C$."L").| 00000A50: 43 24 B2 C7 28 31 34 29 3A 40 31 30 2C 30 2C 30 |C$..(14):@10,0,0| 00000A60: 2C 43 24 3A 40 32 3A 89 31 31 30 00 96 12 84 03 |,C$:@2:.110.....| 00000A70: 8B 28 43 24 B2 22 4E 22 29 A7 43 24 B2 C7 28 31 |.(C$."N").C$..(1| 00000A80: 34 36 29 3A 40 31 30 2C 30 2C 30 2C 43 24 3A 40 |46):@10,0,0,C$:@| 00000A90: 32 3A 89 31 31 30 00 C0 12 8E 03 8B 28 43 24 B2 |2:.110......(C$.| 00000AA0: 22 52 22 29 A7 43 24 B2 C7 28 31 38 29 3A 40 31 |"R").C$..(18):@1| 00000AB0: 30 2C 30 2C 30 2C 43 24 3A 40 32 3A 89 31 31 30 |0,0,0,C$:@2:.110| 00000AC0: 00 D9 12 98 03 8B 28 43 24 B2 22 43 22 29 A7 40 |......(C$."C").@| 00000AD0: 33 3A 40 32 3A 89 31 31 30 00 0B 13 A2 03 99 22 |3:@2:.110......"| 00000AE0: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D1 |. .| 00000AF0: 55 49 54 20 CF 50 54 49 4F 4E 53 20 20 20 20 20 |UIT .PTIONS | 00000B00: 20 20 20 20 20 20 20 20 20 92 22 00 26 13 AC 03 | .".&...| 00000B10: 99 22 20 4A 20 2D 3E 20 D2 45 54 FF 52 4E 20 54 |." J -> .ET.RN T| 00000B20: 4F 20 CA CF D9 22 00 3F 13 B6 03 99 22 20 42 20 |O ...".?...." B | 00000B30: 2D 3E 20 C7 4F 20 54 4F 20 C2 C1 D3 C9 C3 22 00 |-> .O TO .....".| 00000B40: 5C 13 C0 03 99 22 11 12 FF 4E 54 45 52 20 D1 FF |\...."...NTER ..| 00000B50: 49 54 20 CF 50 54 49 4F 4E 3A 92 22 00 71 13 CA |IT .PTION:.".q..| 00000B60: 03 A1 43 24 3A 8B 28 43 24 B2 22 22 29 89 39 37 |..C$:.(C$."").97| 00000B70: 30 00 87 13 D4 03 8B 28 43 24 B2 22 4A 22 29 A7 |0......(C$."J").| 00000B80: 40 32 3A 89 31 31 30 00 B8 13 DE 03 8B 28 43 24 |@2:.110......(C$| 00000B90: B2 22 42 22 29 A7 40 43 32 25 2C 58 25 2C 59 25 |."B").@C2%,X%,Y%| 00000BA0: 3A 99 22 93 09 22 3A 40 31 3A 99 C7 28 31 34 32 |:."..":@1:..(142| 00000BB0: 29 3B C7 28 39 29 3A 80 00 E5 13 E8 03 99 22 93 |);.(9):.......".| 00000BC0: 11 D1 55 49 54 20 C1 42 4F 52 54 45 44 20 2D 2D |..UIT .BORTED --| 00000BD0: 20 FF 4E 54 45 52 20 C3 4F 4D 4D 41 4E 44 11 22 | .NTER .OMMAND."| 00000BE0: 3A 89 33 39 30 00 00 00 |:.390... |
.......G(14);G(8):LX%.4:LY%.195.>....509
13,1:.50959,1:.50918,0.]....50964,0:.509
23,0:.50969,0.P.(.@2:X%.4:Y%.195...2.. X
%.0 . X%.319...<.. X%.319 . X%.0...F.. Y
%.0 . Y%.199...P.. Y%.199 . Y%.0...Z.C1%
.5:C2%.6:@4,X%,Y%:.(B(251)..0).C1%.6:C2%
.5...D.@C1%,X%,Y%...N.XT%.B(56320).31./.
X.JX%..(XT%.4)..(X.%.8).I...JY%..(X.%.2)
..(XT%.1).]...JF%.1..(XT%.16).X....(JX%.
.0).(JY%..0).200... ..C$:C%.B(653).4....
..(C$."").(C%.0).110......(C%.0).220....
..380.S.H..(JF%..0).C2%.C1%...R.@C2%,X%,
Y%:X%.X%.JX%:Y%.Y%.JY%:.50.....CX%.X%.8:
CY%.Y%.8:@10,CX%,CY%,C$.3....(B(251).0).
260.X....(CX%.38).X%..4:.(CY%.0).Y%.Y%.8
.H...X%.X%.8:.50.....C%.F(C$):.(C%..13).
290.....@C2%,X%,Y%:X%.4:.(Y%.7).Y%.Y%.8.
.....50.G."..(C%.29).JX%.8:.210...,..(C%
.157).JX%..8:.210...6..(C%.145).JY%.8:.2
10...@..(C%.17).JY%..8:.210.;.J..(C%.19)
.@C2%,X%,Y%:X%.4:Y%.195:.50.\.T..(C%.147
).@3:X%.4:Y%.195:.50.N.^..(C%..20).110..
.H.@C2%,X%,Y%:.(X%.7).X%.X%.8:CX%.X%.8:C
Y%.Y%.8:@10,CX%,CY%," "...R..50.A.|.."."
;......". OPTIONS
.";......". G -> GET A FILE".&.
..." S -> SAVE A FILE".@...." P -> PRINT
SCREEN".Y...." D -> DRAW A LINE".}...."
F -> FILL A REGULAR POLYGON"...B.." U -
> UPPERCASE"...L.." L -> LOWERCASE".J.V.
." N -> NORMAL CHARACTERS"......" R -> R
EVERSE CHARACTERS"......" C -> CLEAR SCR
EEN"......" Q -> QUIT".3...."..ENTER OPT
ION:. ";:@1.H....C$:.(C$."").520.T....C$
.".".G....(C$.."G").580...&.C$."":."GET
FILENAME";C$...0..(C$."").."..GET A FILE
ABORTED -- ENTER COMMAND.":.390...:..".
GETTING FILE...":@13,C$:@2:.50...D..(C$.
."S").620...N.C$."":."SAVE FILENAME";C$.
T.X..(C$."").."..SAVE A FILE ABORTED --
ENTER COMMAND.":.390...B..".SAVING FILE.
..":@C2%,X%,Y%:@12,C$:@C1%,X%,Y%:@2:.110
...L..(C$.."P").670...V.."SURE PRINT (Y/
N)? ".R....C$:.(C$."").640......(C$.."Y"
).."..PRINT ABORTED -- ENTER COMMAND.":.
390.A....".PRINTING...":@C2%,X%,Y%:@14:@
C1%,X%,Y%:@2:.110.T....(C$.."D").800....
..". DRAW OPTIONS
."......" S -> SET STARTING POINT".A
...." D -> DRAW THE LINE"...F.."..ENTER
DRAW OPTION:. ";...P..C$:.(C$."").720...
Z..C$......(C$.."S").760.2...LX%.X%:LY%.
Y%:C2%.C1%:@2:.110.J....(C$.."D").."..LI
NE ABORTED -- ENTER COMMAND.":.390.....S
%.256:.".LINE STYLE (0-255)";S%.T....((S
%.0).(S%.255)).."..DRAW LINE ABORTED --
ENTER COMMAND.":.390.....@2:@4,LX%,LY%:@
7,X%,Y%,S%:LX%.X%:LY%.Y%:.50... ..(C$.."
F").880.<.*.."IS MARKER IN POLYGON (Y/N)
? ";.Q.4..C$:.(C$."").820.Y.>..C$...H..(
C$.."Y").."..FILL ABORTED -- ENTER COMMA
ND.":.390...R.S%.128:.".FILL STYLE (0-12
7)";S%...\..((S%.0).(S%.127)).."..FILL A
BORTED -- ENTER COMMAND.":.390...F.@2:@6
,X%,Y%:@9,X%,Y%,S%:.50.A.P..(C$."U").C$.
G(142):@10,0,0,C$:@2:.110.K.Z..(C$."L").
C$.G(14):@10,0,0,C$:@2:.110......(C$."N"
).C$.G(146):@10,0,0,C$:@2:.110......(C$.
"R").C$.G(18):@10,0,0,C$:@2:.110.Y....(C
$."C").@3:@2:.110......". Q
UIT OPTIONS .".&...." J ->
RET.RN TO JOY".?...." B -> GO TO BASIC".
\...."...NTER Q.IT OPTION:.".Q.J..C$:.(C
$."").970...T..(C$."J").@2:.110......(C$
."B").@C2%,X%,Y%:."..":@1:.G(142);G(9):.
......"..QUIT ABORTED -- .NTER COMMAND."
:.390...
> CLICK IMAGE PREVIEW FOR FULL MODAL