PS.IMAGE.VIEWER
FILE INFORMATION
FILENAME(S): PS.IMAGE.VIEWER
FILE TYPE(S): PRG
FILE SIZE: 5.2K
FIRST SEEN: 2025-11-30 18:05:25
APPEARS ON: 2 disk(s)
FILE HASH
583aace30768eae37c4ce6255c672d30a139ee968e5fd51d1190851d737dc1e0
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 58 S 3 | PS.IMAGE.VIEWER | PRG | Xii | 21 | 0 | DOWNLOAD FILE |
| LOADSTAR 58 S 3 | PS.IMAGE.VIEWER | PRG | Sailor, Ganheden | 21 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 37 08 01 00 8F 20 54 4F 20 50 55 54 20 59 |..7.... TO PUT Y| 00000010: 4F 55 52 20 4F 57 4E 20 49 4D 41 47 45 53 20 49 |OUR OWN IMAGES I| 00000020: 4E 20 54 48 49 53 20 20 20 20 20 20 20 20 20 20 |N THIS | 00000030: 56 49 45 57 45 52 3A 00 86 08 02 00 8F 20 31 29 |VIEWER:...... 1)| 00000040: 20 43 52 45 41 54 45 20 41 20 53 45 51 20 46 49 | CREATE A SEQ FI| 00000050: 4C 45 20 57 49 54 48 20 54 48 45 20 20 20 20 20 |LE WITH THE | 00000060: 20 20 20 20 20 20 20 20 20 4E 55 4D 42 45 52 20 | NUMBER | 00000070: 4F 46 20 49 4D 41 47 45 53 2C 20 46 4F 4C 4C 4F |OF IMAGES, FOLLO| 00000080: 57 45 44 20 42 59 00 A9 08 03 00 8F 20 20 20 20 |WED BY...... | 00000090: 22 49 4D 41 47 45 20 4E 41 4D 45 2C 41 55 54 48 |"IMAGE NAME,AUTH| 000000A0: 4F 52 22 20 3C 43 52 3E 2E 00 F0 08 04 00 8F 20 |OR" <CR>....... | 000000B0: 20 20 20 20 53 45 51 20 46 49 4C 45 20 53 48 4F | SEQ FILE SHO| 000000C0: 55 4C 44 20 42 45 20 4E 41 4D 45 44 20 20 20 20 |ULD BE NAMED | 000000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000E0: 22 50 53 2E 49 4D 41 47 45 2E 4E 41 4D 45 53 22 |"PS.IMAGE.NAMES"| 000000F0: 00 3D 09 05 00 8F 20 32 29 20 49 46 20 54 48 45 |.=.... 2) IF THE| 00000100: 20 53 41 4D 45 20 50 45 52 53 4F 4E 20 43 52 45 | SAME PERSON CRE| 00000110: 41 54 45 44 20 54 48 45 20 20 20 20 20 20 20 20 |ATED THE | 00000120: 20 20 50 52 45 56 49 4F 55 53 20 49 4D 41 47 45 | PREVIOUS IMAGE| 00000130: 2C 20 50 55 54 20 41 4E 20 28 2A 29 2E 00 8D 09 |, PUT AN (*)....| 00000140: 06 00 8F 20 33 29 20 49 46 20 59 4F 55 27 52 45 |... 3) IF YOU'RE| 00000150: 20 55 53 49 4E 47 20 45 44 53 54 41 52 2C 20 4C | USING EDSTAR, L| 00000160: 45 41 56 45 20 20 20 20 20 20 20 20 20 20 20 20 |EAVE | 00000170: 20 4F 4E 45 20 42 4C 41 4E 4B 20 4C 49 4E 45 20 | ONE BLANK LINE | 00000180: 41 54 20 54 48 45 20 42 45 47 49 4E 2D 00 A8 09 |AT THE BEGIN-...| 00000190: 07 00 8F 20 20 20 20 4E 49 4E 47 20 4F 46 20 54 |... NING OF T| 000001A0: 48 45 20 46 49 4C 45 2E 00 AE 09 08 00 3A 00 B4 |HE FILE......:..| 000001B0: 09 0A 00 3A 00 D3 09 0B 00 97 35 33 32 38 30 2C |...:......53280,| 000001C0: 32 3A 97 35 33 32 38 31 2C 2E 3A 97 36 35 30 2C |2:.53281,.:.650,| 000001D0: 31 32 38 00 19 0A 0C 00 8B 58 B2 2E A7 99 C7 28 |128......X.....(| 000001E0: 31 34 32 29 22 93 08 11 11 11 11 11 11 11 11 11 |142)"...........| 000001F0: 11 11 11 99 20 20 20 20 57 45 4C 43 4F 4D 45 20 |.... WELCOME | 00000200: 54 4F 20 54 48 45 20 50 52 49 4E 54 20 53 48 4F |TO THE PRINT SHO| 00000210: 50 20 56 49 45 57 45 52 22 00 35 0A 0F 00 8B 58 |P VIEWER".5....X| 00000220: B2 2E A7 58 B2 31 3A 93 22 42 4C 4F 41 44 2E 4F |...X.1:."BLOAD.O| 00000230: 22 2C 38 2C 31 00 63 0A 14 00 97 35 36 2C 31 32 |",8,1.c....56,12| 00000240: 30 3A 9C 3A 97 32 2C 31 3A 54 50 24 B2 22 22 3A |0:.:.2,1:TP$."":| 00000250: 8F 20 4B 45 45 50 20 54 50 20 48 45 52 45 21 21 |. KEEP TP HERE!!| 00000260: 21 21 21 00 84 0A 19 00 9E 38 32 38 2C 35 30 37 |!!!......828,507| 00000270: 35 39 2C 22 54 45 58 54 2F 44 4F 54 2F 57 49 50 |59,"TEXT/DOT/WIP| 00000280: 45 2E 4F 22 00 9E 0A 1E 00 9E 38 32 38 2C 35 31 |E.O"......828,51| 00000290: 34 35 36 2C 22 55 4E 50 41 43 4B 45 52 22 00 BB |456,"UNPACKER"..| 000002A0: 0A 23 00 9E 38 32 38 2C 33 32 37 36 38 2C 22 50 |.#..828,32768,"P| 000002B0: 53 2E 43 4F 4D 42 4F 32 2E 4F 22 00 D8 0A 25 00 |S.COMBO2.O"...%.| 000002C0: 9E 38 32 38 2C 34 39 31 35 32 2C 22 49 4E 50 55 |.828,49152,"INPU| 000002D0: 54 20 41 4E 59 2E 4F 22 00 DE 0A 27 00 3A 00 00 |T ANY.O"...'.:..| 000002E0: 0B 28 00 8D 31 35 30 30 3A 8F 20 44 45 46 49 4E |.(..1500:. DEFIN| 000002F0: 45 20 53 54 52 49 4E 47 53 20 26 20 56 41 52 53 |E STRINGS & VARS| 00000300: 00 21 0B 32 00 8D 31 30 30 30 3A 8F 20 52 45 41 |.!.2..1000:. REA| 00000310: 44 20 4E 41 4D 45 53 20 4F 46 20 49 4D 41 47 45 |D NAMES OF IMAGE| 00000320: 53 00 44 0B 37 00 8D 32 30 30 30 3A 8F 20 44 49 |S.D.7..2000:. DI| 00000330: 53 50 4C 41 59 20 4E 41 4D 45 53 20 46 4F 52 20 |SPLAY NAMES FOR | 00000340: 56 49 45 57 00 86 0B 3C 00 8D 32 35 30 30 3A 8F |VIEW...<..2500:.| 00000350: 20 4D 4F 56 45 20 48 49 47 48 4C 49 47 48 54 20 | MOVE HIGHLIGHT | 00000360: 41 4E 44 20 20 20 20 20 20 20 20 20 20 20 20 20 |AND | 00000370: 20 20 20 20 20 20 20 20 20 53 45 4C 45 43 54 20 | SELECT | 00000380: 49 4D 41 47 45 53 00 A4 0B 41 00 52 49 B2 43 53 |IMAGES...A.RI.CS| 00000390: AA 28 43 50 AB 31 29 AC 32 38 3A 54 46 B2 2E 3A |.(CP.1).28:TF..:| 000003A0: 46 4C B2 2E 00 C1 0B 46 00 8B 41 24 B2 22 85 22 |FL.....F..A$."."| 000003B0: A7 8D 33 30 30 30 3A 9E 35 31 34 35 39 3A 89 36 |..3000:.51459:.6| 000003C0: 30 00 DE 0B 4B 00 8B 41 24 B2 22 86 22 A7 8D 35 |0...K..A$."."..5| 000003D0: 30 30 30 3A 9E 35 31 34 35 39 3A 89 36 30 00 FE |000:.51459:.60..| 000003E0: 0B 50 00 8B 41 24 B2 22 87 22 A7 43 50 B2 43 50 |.P..A$.".".CP.CP| 000003F0: AA 31 3A 8B 43 50 B1 4E 50 A7 43 50 B2 31 00 1B |.1:.CP.NP.CP.1..| 00000400: 0C 51 00 8B 41 24 B2 22 87 22 A7 8D 32 30 34 30 |.Q..A$."."..2040| 00000410: 3A 8B 4E 50 B1 31 A7 43 53 B2 31 00 2A 0C 52 00 |:.NP.1.CS.1.*.R.| 00000420: 8B 41 24 B2 22 87 22 A7 36 30 00 47 0C 55 00 8B |.A$.".".60.G.U..| 00000430: 41 24 B2 22 88 22 A7 8D 36 30 30 30 30 3A 8D 32 |A$."."..60000:.2| 00000440: 31 30 30 3A 89 36 30 00 6E 0C 5A 00 9E 38 32 38 |100:.60.n.Z..828| 00000450: 2C 32 32 35 32 38 2C 49 4D 24 28 52 49 29 3A 44 |,22528,IM$(RI):D| 00000460: 49 B2 52 49 3A 8D 34 30 30 30 3A 89 36 30 00 74 |I.RI:.4000:.60.t| 00000470: 0C DE 03 90 00 7A 0C E7 03 3A 00 A0 0C E8 03 9F |.....z...:......| 00000480: 33 2C 38 2C 33 2C 22 50 53 2E 49 4D 41 47 45 2E |3,8,3,"PS.IMAGE.| 00000490: 4E 41 4D 45 53 22 3A 43 4F B2 2E 3A 4E 50 B2 31 |NAMES":CO..:NP.1| 000004A0: 00 BF 0C ED 03 84 33 2C 4E 49 3A 8F 20 20 20 4E |......3,NI:. N| 000004B0: 55 4D 42 45 52 20 4F 46 20 49 4D 41 47 45 53 00 |UMBER OF IMAGES.| 000004C0: DD 0C F2 03 86 20 49 4D 24 28 4E 49 29 2C 42 59 |..... IM$(NI),BY| 000004D0: 24 28 4E 49 29 2C 4D 45 24 28 4E 49 29 00 E9 0C |$(NI),ME$(NI)...| 000004E0: FC 03 81 41 B2 31 A4 4E 49 00 09 0D 01 04 8B 42 |...A.1.NI......B| 000004F0: 59 24 28 41 29 B2 22 2A 22 A7 42 59 24 28 41 29 |Y$(A)."*".BY$(A)| 00000500: B2 42 59 24 28 41 AB 31 29 00 34 0D 06 04 84 33 |.BY$(A.1).4....3| 00000510: 2C 49 4D 24 28 41 29 2C 42 59 24 28 41 29 3A 4D |,IM$(A),BY$(A):M| 00000520: 45 24 28 41 29 B2 49 4D 24 28 41 29 3A 43 4F B2 |E$(A).IM$(A):CO.| 00000530: 43 4F AA 31 00 54 0D 10 04 8B 42 59 24 28 41 29 |CO.1.T....BY$(A)| 00000540: B2 22 2A 22 A7 42 59 24 28 41 29 B2 42 59 24 28 |."*".BY$(A).BY$(| 00000550: 41 AB 31 29 00 7C 0D 1A 04 4E 49 28 4E 50 29 B2 |A.1).|...NI(NP).| 00000560: 4E 49 28 4E 50 29 AA 31 3A 8B 43 4F B1 32 38 A7 |NI(NP).1:.CO.28.| 00000570: 43 4F B2 2E 3A 4E 50 B2 4E 50 AA 31 00 AD 0D 24 |CO..:NP.NP.1...$| 00000580: 04 42 B2 C3 28 4D 45 24 28 41 29 29 3A 8B 42 B3 |.B..(ME$(A)):.B.| 00000590: B1 31 36 A7 4D 45 24 28 41 29 B2 4D 45 24 28 41 |.16.ME$(A).ME$(A| 000005A0: 29 AA C8 28 53 50 24 2C 31 36 AB 42 29 00 B8 0D |)..(SP$,16.B)...| 000005B0: 2E 04 82 3A A0 33 3A 8E 00 BE 0D 38 04 3A 00 F1 |...:.3:....8.:..| 000005C0: 0D DC 05 54 50 24 B2 22 D5 C0 C0 C0 C0 C0 C0 C0 |...TP$."........| 000005D0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 000005E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 |................| 000005F0: 22 00 24 0E E6 05 53 49 24 B2 22 DD 20 20 20 20 |".$...SI$.". | 00000600: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000610: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000620: 20 20 DD 22 00 57 0E F0 05 44 49 24 B2 22 AB C0 | .".W...DI$."..| 00000630: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000640: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000650: C0 C0 C0 C0 C0 B3 22 00 8A 0E FA 05 42 4F 24 B2 |......".....BO$.| 00000660: 22 CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |"...............| 00000670: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000680: C0 C0 C0 C0 C0 C0 C0 C0 CB 22 00 C0 0E 04 06 42 |.........".....B| 00000690: 54 24 B2 22 CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |T$."............| 000006A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 000006B0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 CB 9D 94 C0 13 22 |..............."| 000006C0: 00 DB 0E 0E 06 53 50 24 B2 22 20 20 20 20 20 20 |.....SP$." | 000006D0: 20 20 20 20 20 20 20 20 20 20 22 00 FC 0E 18 06 | ".....| 000006E0: 43 53 B2 31 20 20 20 20 3A 8F 20 43 55 52 52 45 |CS.1 :. CURRE| 000006F0: 4E 54 20 53 45 4C 45 43 54 49 4F 4E 00 1B 0F 22 |NT SELECTION..."| 00000700: 06 4A 4F B2 35 36 33 32 30 3A 8F 20 4A 4F 59 53 |.JO.56320:. JOYS| 00000710: 54 49 43 4B 20 50 4F 52 54 20 32 00 37 0F 2C 06 |TICK PORT 2.7.,.| 00000720: 43 50 B2 31 20 20 20 20 3A 8F 20 43 55 52 52 45 |CP.1 :. CURRE| 00000730: 4E 54 20 50 41 47 45 00 3D 0F C6 07 8E 00 43 0F |NT PAGE.=.....C.| 00000740: CF 07 3A 00 5B 0F D0 07 99 22 93 99 92 22 54 50 |..:.[...."..."TP| 00000750: 24 53 49 24 53 49 24 44 49 24 3B 00 6F 0F DA 07 |$SI$SI$DI$;.o...| 00000760: 81 41 B2 31 A4 31 34 3A 99 53 49 24 3B 3A 82 00 |.A.1.14:.SI$;:..| 00000770: 8B 0F E4 07 99 44 49 24 53 49 24 53 49 24 53 49 |.....DI$SI$SI$SI| 00000780: 24 53 49 24 53 49 24 42 54 24 3B 00 A8 0F EE 07 |$SI$SI$BT$;.....| 00000790: 81 41 B2 32 31 37 A4 32 34 32 3A 97 41 2C C2 28 |.A.217.242:.A,.(| 000007A0: 41 29 B0 31 32 38 3A 82 00 D0 0F F8 07 99 22 13 |A).128:.......".| 000007B0: 11 1D 92 20 20 20 20 20 20 20 20 20 20 9E 50 52 |... .PR| 000007C0: 49 4E 54 20 53 48 4F 50 20 56 49 45 57 45 52 22 |INT SHOP VIEWER"| 000007D0: 00 00 10 02 08 99 22 1D 96 42 59 20 41 4C 4C 20 |......"..BY ALL | 000007E0: 54 48 45 20 46 52 49 45 4E 44 4C 59 20 46 4F 4C |THE FRIENDLY FOL| 000007F0: 4B 53 20 41 54 20 4C 4F 41 44 53 54 41 52 20 22 |KS AT LOADSTAR "| 00000800: 00 0A 10 0C 08 99 22 11 22 3B 00 2C 10 16 08 4D |......".";.,...M| 00000810: 49 B2 B5 28 4E 49 28 43 50 29 AD 32 29 3A 8F 20 |I..(NI(CP).2):. | 00000820: 4D 49 44 44 4C 45 20 49 4D 41 47 45 00 47 10 20 |MIDDLE IMAGE.G. | 00000830: 08 8B 28 4E 50 B1 31 29 AF 28 43 50 B3 B1 4E 50 |..(NP.1).(CP..NP| 00000840: 29 A7 4D 49 B2 31 34 00 93 10 25 08 53 49 B2 28 |).MI.14...%.SI.(| 00000850: 43 50 AB 31 29 AC 32 38 3A 8F 20 53 54 41 52 54 |CP.1).28:. START| 00000860: 49 4E 47 20 49 4D 41 47 45 20 20 20 20 20 20 20 |ING IMAGE | 00000870: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000880: 20 20 20 46 4F 52 20 43 55 52 52 45 4E 54 20 50 | FOR CURRENT P| 00000890: 41 47 45 00 CC 10 2A 08 81 41 B2 53 49 AA 31 A4 |AGE...*..A.SI.1.| 000008A0: 53 49 AA 4D 49 3A 99 A3 31 29 22 1E 5D 9A 22 4D |SI.MI:..1)".]."M| 000008B0: 45 24 28 41 29 22 1E 5B 20 20 5D 9A 22 4D 45 24 |E$(A)".[ ]."ME$| 000008C0: 28 41 AA 4D 49 29 22 1E 5B 22 3A 82 00 E2 10 2D |(A.MI)".[":....-| 000008D0: 08 8B 53 49 AA 31 34 B2 53 49 AA 4D 49 A7 32 31 |..SI.14.SI.MI.21| 000008E0: 30 30 00 25 11 30 08 81 41 B2 53 49 AA 31 33 A4 |00.%.0..A.SI.13.| 000008F0: 53 49 AA 4D 49 A9 AB 31 3A 99 22 1D 20 20 20 20 |SI.MI..1:.". | 00000900: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000910: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000920: 20 20 22 3A 82 00 57 11 34 08 99 22 13 11 11 11 | ":..W.4.."....| 00000930: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00000940: 1D 9A 4E 55 4D 42 45 52 20 4F 46 20 50 41 47 45 |..NUMBER OF PAGE| 00000950: 53 3A 05 22 4E 50 3B 00 74 11 3E 08 99 A3 32 33 |S:."NP;.t.>...23| 00000960: 29 22 9A 43 55 52 52 45 4E 54 20 50 41 47 45 3A |)".CURRENT PAGE:| 00000970: 05 22 43 50 00 8D 11 48 08 99 22 1D 05 46 31 20 |."CP...H.."..F1 | 00000980: 9A 2D 20 41 55 54 4F 20 4D 4F 44 45 22 00 BE 11 |.- AUTO MODE"...| 00000990: 52 08 99 22 1D 05 46 33 20 9A 2D 20 51 55 49 43 |R.."..F3 .- QUIC| 000009A0: 4B 20 4C 4F 4F 4B 20 20 20 20 20 20 20 9E 43 52 |K LOOK .CR| 000009B0: 53 52 20 4B 45 59 53 20 4D 4F 56 45 20 22 00 EC |SR KEYS MOVE "..| 000009C0: 11 5C 08 99 22 1D 05 46 35 20 9A 2D 20 4E 45 58 |.\.."..F5 .- NEX| 000009D0: 54 20 50 41 47 45 20 20 20 20 20 20 20 20 20 20 |T PAGE | 000009E0: 9E 12 48 49 47 48 4C 49 47 48 54 22 00 1F 12 66 |..HIGHLIGHT"...f| 000009F0: 08 99 22 1D 05 46 37 20 9A 2D 20 51 55 49 54 20 |.."..F7 .- QUIT | 00000A00: 20 20 20 20 20 20 20 20 20 20 9E 52 45 54 55 52 | .RETUR| 00000A10: 4E 20 53 45 4C 45 43 54 53 20 49 54 2E 13 22 00 |N SELECTS IT..".| 00000A20: 25 12 70 08 8E 00 3B 12 C4 09 42 B2 43 53 3A 8B |%.p...;...B.CS:.| 00000A30: 42 B1 4D 49 A7 42 B2 42 AB 4D 49 00 53 12 CE 09 |B.MI.B.B.MI.S...| 00000A40: 99 22 13 11 11 11 22 3B 3A 81 41 B2 31 A4 42 3A |."....";:.A.1.B:| 00000A50: 99 3A 82 00 71 12 D8 09 99 A3 32 29 3B 3A 8B 43 |.:..q.....2);:.C| 00000A60: 53 B1 4D 49 A7 99 A3 31 39 29 22 05 2D 3E 1D 22 |S.MI...19)".->."| 00000A70: 3B 00 8D 12 E2 09 99 22 12 05 22 4D 45 24 28 53 |;......".."ME$(S| 00000A80: 49 AA 43 53 29 3B 3A 97 31 39 38 2C 2E 00 A4 12 |I.CS);:.198,....| 00000A90: E7 09 8B 43 53 B3 4D 49 AA 31 A7 99 22 1D 92 05 |...CS.MI.1.."...| 00000AA0: 3C 2D 22 3B 00 BE 12 EC 09 A1 41 24 3A 8D 32 37 |<-";......A$:.27| 00000AB0: 30 30 3A 8B 41 24 B2 22 22 A7 32 35 34 30 00 F4 |00:.A$."".2540..| 00000AC0: 12 F1 09 8B 28 41 24 B2 C7 28 31 33 29 29 B0 28 |....(A$..(13)).(| 00000AD0: 41 24 B2 22 85 22 29 B0 28 41 24 B2 22 86 22 29 |A$.".").(A$.".")| 00000AE0: B0 28 41 24 B2 22 87 22 29 B0 28 41 24 B2 22 88 |.(A$.".").(A$.".| 00000AF0: 22 29 A7 8E 00 0A 13 F6 09 42 B2 43 53 3A 8B 42 |").......B.CS:.B| 00000B00: B1 4D 49 A7 42 B2 42 AB 4D 49 00 22 13 00 0A 99 |.MI.B.B.MI."....| 00000B10: 22 13 11 11 11 22 3B 3A 81 41 B2 31 A4 42 3A 99 |"....";:.A.1.B:.| 00000B20: 3A 82 00 40 13 0A 0A 99 A3 32 29 3B 3A 8B 43 53 |:..@.....2);:.CS| 00000B30: B1 4D 49 A7 99 A3 31 39 29 22 1E 20 20 1D 22 3B |.MI...19)". .";| 00000B40: 00 54 13 14 0A 99 22 9A 22 4D 45 24 28 53 49 AA |.T...."."ME$(SI.| 00000B50: 43 53 29 3B 00 6A 13 19 0A 8B 43 53 B3 4D 49 AA |CS);.j....CS.MI.| 00000B60: 31 A7 99 22 1D 1E 20 20 22 3B 00 93 13 1E 0A 8B |1..".. ";......| 00000B70: 41 24 B2 22 11 22 A7 43 53 B2 43 53 AA 31 3A 8B |A$.".".CS.CS.1:.| 00000B80: 43 53 B1 4E 49 28 43 50 29 A7 43 53 B2 4E 49 28 |CS.NI(CP).CS.NI(| 00000B90: 43 50 29 00 B2 13 28 0A 8B 41 24 B2 22 91 22 A7 |CP)...(..A$.".".| 00000BA0: 43 53 B2 43 53 AB 31 3A 8B 43 53 B3 31 A7 43 53 |CS.CS.1:.CS.1.CS| 00000BB0: B2 31 00 DD 13 32 0A 8B 41 24 B2 22 1D 22 A7 43 |.1...2..A$.".".C| 00000BC0: 53 B2 43 53 AA 4D 49 3A 8B 43 53 B1 4E 49 28 43 |S.CS.MI:.CS.NI(C| 00000BD0: 50 29 A7 43 53 B2 43 53 AB 4D 49 AC 32 00 03 14 |P).CS.CS.MI.2...| 00000BE0: 3C 0A 8B 41 24 B2 22 9D 22 A7 43 53 B2 43 53 AB |<..A$.".".CS.CS.| 00000BF0: 4D 49 3A 8B 43 53 B3 31 A7 43 53 B2 43 53 AA 4D |MI:.CS.1.CS.CS.M| 00000C00: 49 AC 32 00 0D 14 50 0A 89 32 35 30 30 00 2A 14 |I.2...P..2500.*.| 00000C10: 8C 0A 8B 28 C2 28 4A 4F 29 AF 31 36 29 B2 2E A7 |...(.(JO).16)...| 00000C20: 41 24 B2 C7 28 31 33 29 3A 8E 00 43 14 96 0A 41 |A$..(13):..C...A| 00000C30: B2 28 C2 28 4A 4F 29 AF 31 35 29 3A 8B 41 B2 31 |.(.(JO).15):.A.1| 00000C40: 35 A7 8E 00 54 14 A0 0A 8B 41 B2 31 34 A7 41 24 |5...T....A.14.A$| 00000C50: B2 22 91 22 00 65 14 AA 0A 8B 41 B2 30 37 A7 41 |.".".e....A.07.A| 00000C60: 24 B2 22 1D 22 00 76 14 B4 0A 8B 41 B2 31 33 A7 |$.".".v....A.13.| 00000C70: 41 24 B2 22 11 22 00 87 14 BE 0A 8B 41 B2 31 31 |A$."."......A.11| 00000C80: A7 41 24 B2 22 9D 22 00 8D 14 C8 0A 8E 00 D8 14 |.A$.".".........| 00000C90: AE 0B 8F 20 44 49 53 50 4C 41 59 20 54 48 45 20 |... DISPLAY THE | 00000CA0: 49 4D 41 47 45 53 20 53 54 41 52 54 49 4E 47 20 |IMAGES STARTING | 00000CB0: 41 54 20 20 20 20 20 20 20 20 20 20 52 49 20 28 |AT RI (| 00000CC0: 57 48 49 43 48 20 49 53 20 57 48 45 52 45 20 54 |WHICH IS WHERE T| 00000CD0: 48 45 20 48 49 47 48 2D 00 21 15 AF 0B 8F 20 4C |HE HIGH-.!.... L| 00000CE0: 49 47 48 54 20 49 53 20 43 55 52 52 45 4E 54 4C |IGHT IS CURRENTL| 00000CF0: 59 20 41 54 29 20 41 4E 44 20 20 20 20 20 20 20 |Y AT) AND | 00000D00: 20 20 20 20 20 20 20 45 4E 44 49 4E 47 20 57 49 | ENDING WI| 00000D10: 54 48 20 54 48 45 20 4C 41 53 54 20 49 4D 41 47 |TH THE LAST IMAG| 00000D20: 45 00 34 15 B8 0B 81 44 49 B2 52 49 A4 4E 49 3A |E.4....DI.RI.NI:| 00000D30: 54 46 B2 31 00 4B 15 C2 0B 9E 38 32 38 2C 32 32 |TF.1.K....828,22| 00000D40: 35 32 38 2C 49 4D 24 28 44 49 29 00 65 15 C4 0B |528,IM$(DI).e...| 00000D50: 8D 34 30 30 30 3A 8F 20 50 4C 4F 54 20 50 53 20 |.4000:. PLOT PS | 00000D60: 49 4D 41 47 45 00 93 15 CC 0B 97 32 34 39 2C 32 |IMAGE......249,2| 00000D70: 32 34 3A 97 32 35 30 2C 32 30 34 3A 9E 35 30 37 |24:.250,204:.507| 00000D80: 36 35 3A 8B 41 24 B2 22 51 22 B0 41 24 B2 22 D1 |65:.A$."Q".A$.".| 00000D90: 22 A7 8E 00 D2 15 D6 0B 46 4C B2 31 3A 82 3A 8B |".......FL.1:.:.| 00000DA0: 52 49 B2 31 A7 8E 3A 8F 20 49 46 20 20 20 20 20 |RI.1..:. IF | 00000DB0: 20 20 52 49 3D 31 20 57 45 20 53 54 41 52 54 45 | RI=1 WE STARTE| 00000DC0: 44 20 41 54 20 54 48 45 20 42 45 47 49 4E 4E 49 |D AT THE BEGINNI| 00000DD0: 4E 47 00 1A 16 DB 0B 8F 20 44 49 53 50 4C 41 59 |NG...... DISPLAY| 00000DE0: 20 54 48 45 20 49 4D 41 47 45 53 20 53 54 41 52 | THE IMAGES STAR| 00000DF0: 54 49 4E 47 20 20 20 20 20 20 20 20 20 20 20 20 |TING | 00000E00: 20 41 54 20 31 20 41 4E 44 20 45 4E 44 49 4E 47 | AT 1 AND ENDING| 00000E10: 20 41 54 20 52 49 20 2D 20 31 00 2E 16 E0 0B 81 | AT RI - 1......| 00000E20: 44 49 B2 31 A4 52 49 AB 31 3A 54 46 B2 31 00 45 |DI.1.RI.1:TF.1.E| 00000E30: 16 EA 0B 9E 38 32 38 2C 32 32 35 32 38 2C 49 4D |....828,22528,IM| 00000E40: 24 28 44 49 29 00 5F 16 F4 0B 8D 34 30 30 30 3A |$(DI)._....4000:| 00000E50: 8F 20 50 4C 4F 54 20 50 53 20 49 4D 41 47 45 00 |. PLOT PS IMAGE.| 00000E60: 8D 16 FE 0B 97 32 34 39 2C 32 32 34 3A 97 32 35 |.....249,224:.25| 00000E70: 30 2C 32 30 34 3A 9E 35 30 37 36 35 3A 8B 41 24 |0,204:.50765:.A$| 00000E80: B2 22 51 22 B0 41 24 B2 22 D1 22 A7 8E 00 9A 16 |."Q".A$.".".....| 00000E90: 08 0C 46 4C B2 31 3A 82 3A 8E 00 C4 16 A0 0F 8B |..FL.1:.:.......| 00000EA0: 46 4C B2 2E A7 97 32 34 39 2C 32 32 34 3A 97 32 |FL....249,224:.2| 00000EB0: 35 30 2C 32 30 34 3A 9E 35 31 34 35 39 3A 9E 35 |50,204:.51459:.5| 00000EC0: 30 37 36 35 00 FB 16 A7 0F 4E 24 B2 49 4D 24 28 |0765.....N$.IM$(| 00000ED0: 44 49 29 3A 97 35 33 32 37 30 2C 32 30 30 3A 9E |DI):.53270,200:.| 00000EE0: 35 30 37 35 39 2C 4E 24 2C 28 32 34 30 AB C3 28 |50759,N$,(240..(| 00000EF0: 4E 24 29 AC 38 AD 32 29 2C 37 32 00 20 17 A8 0F |N$).8.2),72. ...| 00000F00: 4E 24 B2 22 43 52 41 46 54 45 44 20 42 59 22 3A |N$."CRAFTED BY":| 00000F10: 9E 35 30 37 35 39 2C 4E 24 2C 32 30 30 2C 38 38 |.50759,N$,200,88| 00000F20: 00 53 17 A9 0F 4E 24 B2 22 44 4F 55 47 20 57 49 |.S...N$."DOUG WI| 00000F30: 4C 43 4F 58 22 3A 9E 35 30 37 35 39 2C 4E 24 2C |LCOX":.50759,N$,| 00000F40: 28 32 35 30 AB C3 28 4E 24 29 AC 38 AD 32 29 2C |(250..(N$).8.2),| 00000F50: 31 30 34 00 89 17 AC 0F 89 34 30 35 30 3A 8F 20 |104......4050:. | 00000F60: 54 48 49 53 20 4C 49 4E 45 20 49 46 20 54 48 45 |THIS LINE IF THE| 00000F70: 52 45 20 49 53 20 54 45 58 54 20 46 4F 52 20 45 |RE IS TEXT FOR E| 00000F80: 41 43 48 20 49 4D 41 47 45 00 99 17 BE 0F 52 B2 |ACH IMAGE.....R.| 00000F90: 31 34 34 3A 43 51 25 B2 31 00 B1 17 BF 0F 9F 32 |144:CQ%.1......2| 00000FA0: 2C 38 2C 32 2C 22 47 2E 22 AA 49 4D 24 28 44 49 |,8,2,"G.".IM$(DI| 00000FB0: 29 00 CC 17 C1 0F A1 23 32 2C 41 24 3A 8B 41 24 |)......#2,A$:.A$| 00000FC0: B3 B1 C7 28 31 33 29 A7 34 30 33 33 00 E8 17 C3 |...(13).4033....| 00000FD0: 0F 81 58 B2 30 A4 31 3A 9E 34 39 31 35 32 2C 32 |..X.0.1:.49152,2| 00000FE0: 2C 33 38 3A 58 B2 53 54 00 FE 17 C4 0F 8B 43 51 |,38:X.ST......CQ| 00000FF0: 25 B2 38 A7 20 A0 32 3A 89 20 34 30 35 30 00 21 |%.8. .2:. 4050.!| 00001000: 18 C5 0F 9E 35 30 37 35 39 2C 54 50 24 2C 38 2C |....50759,TP$,8,| 00001010: 52 3A 52 B2 52 AA 38 3A 43 51 25 B2 43 51 25 AA |R:R.R.8:CQ%.CQ%.| 00001020: 31 00 2A 18 C8 0F 82 3A A0 32 00 39 18 D2 0F 97 |1.*....:.2.9....| 00001030: 35 33 32 37 30 2C 32 30 30 00 58 18 D4 0F 97 33 |53270,200.X....3| 00001040: 33 30 35 37 2C 38 3A 97 33 33 30 35 38 2C 32 31 |3057,8:.33058,21| 00001050: 32 3A 9E 33 32 37 37 36 00 75 18 D7 0F 97 33 33 |2:.32776.u....33| 00001060: 30 35 37 2C 38 3A 97 33 33 30 35 38 2C 31 3A 9E |057,8:.33058,1:.| 00001070: 33 32 37 36 38 00 B9 18 DC 0F 9E 35 30 37 35 39 |32768......50759| 00001080: 2C 22 50 52 45 53 53 20 41 20 4B 45 59 22 2C 32 |,"PRESS A KEY",2| 00001090: 30 32 2C 31 32 30 3A 8B 54 46 B2 31 A7 9E 35 30 |02,120:.TF.1..50| 000010A0: 37 35 39 2C 22 5B 51 20 54 4F 20 51 55 49 54 5D |759,"[Q TO QUIT]| 000010B0: 22 2C 32 30 32 2C 31 32 38 00 C4 18 DE 0F 97 31 |",202,128......1| 000010C0: 39 38 2C 2E 00 DE 18 E1 0F A1 41 24 3A 8D 32 37 |98,.......A$:.27| 000010D0: 30 30 3A 8B 41 24 B2 22 22 A7 34 30 36 35 00 EF |00:.A$."".4065..| 000010E0: 18 E6 0F 8B 54 46 B2 2E A7 9E 35 31 34 35 39 00 |....TF....51459.| 000010F0: F5 18 F0 0F 8E 00 33 19 88 13 50 58 B2 2E 3A 50 |......3...PX..:P| 00001100: 59 B2 2E 3A 54 46 B2 31 3A 97 32 34 39 2C 32 32 |Y..:TF.1:.249,22| 00001110: 34 3A 97 32 35 30 2C 32 30 34 3A 9E 35 31 34 35 |4:.250,204:.5145| 00001120: 39 3A 9E 35 30 37 36 35 3A 97 35 33 32 37 30 2C |9:.50765:.53270,| 00001130: 32 30 30 00 3D 19 92 13 8D 37 30 30 30 00 5B 19 |200.=....7000.[.| 00001140: BA 13 81 58 B2 31 A4 4E 49 3A 9E 38 32 38 2C 32 |...X.1.NI:.828,2| 00001150: 32 35 32 38 2C 49 4D 24 28 58 29 00 85 19 C4 13 |2528,IM$(X).....| 00001160: 97 35 33 32 37 30 2C 32 30 30 3A 97 33 33 30 35 |.53270,200:.3305| 00001170: 37 2C 50 59 3A 97 33 33 30 35 38 2C 50 58 3A 9E |7,PY:.33058,PX:.| 00001180: 33 32 37 37 36 00 A8 19 CE 13 50 58 B2 50 58 AA |32776.....PX.PX.| 00001190: 34 35 3A 8B 50 58 B1 32 32 34 A7 50 58 B2 2E 3A |45:.PX.224.PX..:| 000011A0: 50 59 B2 50 59 AA 34 36 00 C1 19 D8 13 A1 41 24 |PY.PY.46......A$| 000011B0: 3A 8B 41 24 B2 22 51 22 B0 41 24 B2 22 D1 22 A7 |:.A$."Q".A$.".".| 000011C0: 8E 00 E6 19 E2 13 46 4C B2 2E 3A 8B 58 AD 32 30 |......FL..:.X.20| 000011D0: B2 B5 28 58 AD 32 30 29 A7 8D 36 30 30 30 3A 8B |..(X.20)..6000:.| 000011E0: 46 4C B2 31 A7 8E 00 0D 1A EC 13 82 3A 46 4C B2 |FL.1........:FL.| 000011F0: 31 3A 9E 54 45 2C 22 5B 50 52 45 53 53 20 41 20 |1:.TE,"[PRESS A | 00001200: 4B 45 59 5D 22 2C 31 31 38 2C 31 38 38 00 21 1A |KEY]",118,188.!.| 00001210: F6 13 97 31 39 38 2C 2E 3A 92 31 39 38 2C 31 3A |...198,.:.198,1:| 00001220: 8E 00 27 1A 00 14 3A 00 47 1A 70 17 9E 54 45 2C |..'...:.G.p..TE,| 00001230: 22 5B 50 52 45 53 53 20 41 20 4B 45 59 5D 22 2C |"[PRESS A KEY]",| 00001240: 31 31 38 2C 31 38 38 00 7A 1A 7A 17 97 31 39 38 |118,188.z.z..198| 00001250: 2C 2E 3A 92 31 39 38 2C 31 3A A1 41 24 3A 97 31 |,.:.198,1:.A$:.1| 00001260: 39 38 2C 2E 3A 8B 41 24 B2 22 51 22 B0 41 24 B2 |98,.:.A$."Q".A$.| 00001270: 22 D1 22 A7 46 4C B2 31 3A 8E 00 97 1A 84 17 97 |".".FL.1:.......| 00001280: 32 34 39 2C 32 32 34 3A 97 32 35 30 2C 32 30 34 |249,224:.250,204| 00001290: 3A 9E 35 30 37 36 35 00 AD 1A 8E 17 8D 37 30 30 |:.50765......700| 000012A0: 30 3A 50 58 B2 2E 3A 50 59 B2 2E 3A 8E 00 E4 1A |0:PX..:PY..:....| 000012B0: 58 1B 54 45 B2 35 30 37 35 39 3A 9E 54 45 2C 22 |X.TE.50759:.TE,"| 000012C0: 50 52 49 4E 54 20 53 48 4F 50 22 2C 32 34 34 2C |PRINT SHOP",244,| 000012D0: 34 30 3A 9E 54 45 2C 22 49 53 20 41 22 2C 32 36 |40:.TE,"IS A",26| 000012E0: 38 2C 34 38 00 FF 1A 62 1B 9E 54 45 2C 22 54 52 |8,48...b..TE,"TR| 000012F0: 41 44 45 4D 41 52 4B 22 2C 32 34 34 2C 35 36 00 |ADEMARK",244,56.| 00001300: 2B 1B 6C 1B 9E 54 45 2C 22 4F 46 22 2C 32 37 36 |+.l..TE,"OF",276| 00001310: 2C 36 34 3A 9E 54 45 2C 22 42 52 4F 44 45 52 42 |,64:.TE,"BRODERB| 00001320: 55 4E 44 22 2C 32 34 34 2C 37 32 00 5D 1B 76 1B |UND",244,72.].v.| 00001330: 9E 54 45 2C 22 53 4F 46 54 57 41 52 45 22 2C 32 |.TE,"SOFTWARE",2| 00001340: 35 32 2C 38 30 3A 9E 54 45 2C 22 51 20 54 4F 20 |52,80:.TE,"Q TO | 00001350: 51 55 49 54 22 2C 32 34 34 2C 31 31 30 00 63 1B |QUIT",244,110.c.| 00001360: 80 1B 8E 00 81 1B 60 EA 99 22 13 11 11 11 11 11 |......`.."......| 00001370: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 92 22 |..............."| 00001380: 3B 00 B9 1B 6A EA 81 41 B2 31 A4 32 3A 99 22 1D |;...j..A.1.2:.".| 00001390: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000013A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000013B0: 20 20 20 20 20 20 22 3A 82 00 F3 1B 74 EA 99 22 | ":....t.."| 000013C0: 1D 9A 20 41 52 45 20 59 4F 55 20 53 55 52 45 20 |.. ARE YOU SURE | 000013D0: 59 4F 55 20 57 41 4E 54 20 54 4F 20 51 55 49 54 |YOU WANT TO QUIT| 000013E0: 3F 20 28 05 59 9A 2F 05 4E 9A 29 22 3A 97 31 39 |? (.Y./.N.)":.19| 000013F0: 38 2C 2E 00 2B 1C 7E EA 81 41 B2 31 A4 32 3A 99 |8,..+.~..A.1.2:.| 00001400: 22 1D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |". | 00001410: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001420: 20 20 20 20 20 20 20 20 22 3A 82 00 4B 1C 88 EA | ":..K...| 00001430: 41 B2 C2 28 32 30 33 29 3A 8B 41 B3 B1 32 35 AF |A..(203):.A..25.| 00001440: 41 B3 B1 33 39 A7 36 30 30 34 30 00 57 1C 92 EA |A..39.60040.W...| 00001450: 8B 41 B2 33 39 A7 8E 00 90 1C 9C EA 9F 31 35 2C |.A.39........15,| 00001460: 38 2C 31 35 2C 22 52 30 3A 48 45 4C 4C 4F 20 43 |8,15,"R0:HELLO C| 00001470: 4F 4E 4E 45 43 54 3D 48 45 4C 4C 4F 20 43 4F 4E |ONNECT=HELLO CON| 00001480: 4E 45 43 54 22 3A 84 31 35 2C 45 52 3A A0 31 35 |NECT":.15,ER:.15| 00001490: 00 AB 1C A6 EA 8B 45 52 B3 B1 36 33 A7 99 22 13 |......ER..63..".| 000014A0: 22 3B 3A 97 31 39 38 2C 2E 3A 80 00 C2 1C B0 EA |";:.198,.:......| 000014B0: 93 22 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 22 |."HELLO CONNECT"| 000014C0: 2C 38 00 00 00 |,8... |
..7.... TO PUT YOUR OWN IMAGES IN THIS
VIEWER:...... 1) CREATE A SEQ FI
LE WITH THE NUMBER OF IMAGE
S, FOLLOWED BY...... "IMAGE NAME,AUTH
OR" <CR>....... SEQ FILE SHOULD BE N
AMED "PS.IMAGE.NAMES"
.=.... 2) IF THE SAME PERSON CREATED THE
PREVIOUS IMAGE, PUT AN (*)....
... 3) IF YOU'RE USING EDSTAR, LEAVE
ONE BLANK LINE AT THE BEGIN-...
... NING OF THE FILE......:.....:.S..
..53280,2:.53281,.:.650,128......X....G(
142)"............... WELCOME TO THE P
RINT SHOP VIEWER".5....X...X.1:."BLOAD.O
",8,1.C....56,120:.:.2,1:TP$."":. KEEP T
P HERE!!!!!......828,50759,"TEXT/DOT/WIP
E.O"......828,51456,"UNPACKER"...#..828,
32768,"PS.COMBO2.O".X.%..828,49152,"INPU
T ANY.O"...'.:...(..1500:. DEFINE STRING
S & VARS.!.2..1000:. READ NAMES OF IMAGE
S.D.7..2000:. DISPLAY NAMES FOR VIEW...<
..2500:. MOVE HIGHLIGHT AND
SELECT IMAGES...A.RI.CS.(CP.1).
28:TF..:FL...A.F..A$."."..3000:.51459:.6
0...K..A$."."..5000:.51459:.60...P..A$."
.".CP.CP.1:.CP.NP.CP.1...Q..A$."."..2040
:.NP.1.CS.1.*.R..A$.".".60.G.U..A$."."..
60000:.2100:.60.N.Z..828,22528,IM$(RI):D
I.RI:.4000:.60.T.....Z...:. ....3,8,3,"P
S.IMAGE.NAMES":CO..:NP.1......3,NI:. N
UMBER OF IMAGES...... IM$(NI),BY$(NI),ME
$(NI)......A.1.NI......BY$(A)."*".BY$(A)
.BY$(A.1).4....3,IM$(A),BY$(A):ME$(A).IM
$(A):CO.CO.1.T....BY$(A)."*".BY$(A).BY$(
A.1).|...NI(NP).NI(NP).1:.CO.28.CO..:NP.
NP.1...$.B.C(ME$(A)):.B..16.ME$(A).ME$(A
).H(SP$,16.B)......: 3:....8.:.....TP$."
U......................................I
".$...SI$.".
.".W...DI$."..................
......................".....BO$."J......
................................K".....B
T$."J...................................
..K....".....SP$." ".....
CS.1 :. CURRENT SELECTION...".JO.5632
0:. JOYSTICK PORT 2.7.,.CP.1 :. CURRE
NT PAGE.=.F...C.O.:.[.P.."..."TP$SI$SI$D
I$;.O.Z..A.1.14:.SI$;:.......DI$SI$SI$SI
$SI$SI$BT$;......A.217.242:.A,B(A).128:.
.P....".... .PRINT SHOP VIEWER"
......"..BY ALL THE FRIENDLY FOLKS AT LO
ADSTAR "......".";.,...MI..(NI(CP).2):.
MIDDLE IMAGE.G. ..(NP.1).(CP..NP).MI.14.
..%.SI.(CP.1).28:. STARTING IMAGE
FOR CURRENT PAGE.L.*.
.A.SI.1.SI.MI:..1)".]."ME$(A)".[ ]."ME$
(A.MI)".[":....-..SI.14.SI.MI.2100.%.0..
A.SI.13.SI.MI..1:.".
":..W.4.."............
..........NUMBER OF PAGES:."NP;.T.>...23
)".CURRENT PAGE:."CP...H.."..F1 .- AUTO
MODE"...R.."..F3 .- QUICK LOOK .CR
SR KEYS MOVE "...\.."..F5 .- NEXT PAGE
..HIGHLIGHT"...F.."..F7 .- QUIT
.RETURN SELECTS IT..".%.P...;.
D.B.CS:.B.MI.B.B.MI.S.N.."....";:.A.1.B:
.:..Q.X...2);:.CS.MI...19)".->.";......"
.."ME$(SI.CS);:.198,.......CS.MI.1.."...
<-";......A$:.2700:.A$."".2540......(A$.
G(13)).(A$.".").(A$.".").(A$.".").(A$.".
").......B.CS:.B.MI.B.B.MI."...."....";:
.A.1.B:.:..@.....2);:.CS.MI...19)". .";
.T...."."ME$(SI.CS);.J....CS.MI.1.."..
";......A$.".".CS.CS.1:.CS.NI(CP).CS.NI(
CP)...(..A$.".".CS.CS.1:.CS.1.CS.1...2..
A$.".".CS.CS.MI:.CS.NI(CP).CS.CS.MI.2...
<..A$.".".CS.CS.MI:.CS.1.CS.CS.MI.2...P.
.2500.*....(B(JO).16)...A$.G(13):..C...A
.(B(JO).15):.A.15...T. ..A.14.A$.".".E..
..A.07.A$.".".V....A.13.A$."."......A.11
.A$."."...H...X.... DISPLAY THE IMAGES S
TARTING AT RI (WHICH IS WHERE T
HE HIGH-.!.... LIGHT IS CURRENTLY AT) AN
D ENDING WITH THE LAST IMAG
E.4....DI.RI.NI:TF.1.K.B..828,22528,IM$(
DI).E.D..4000:. PLOT PS IMAGE...L..249,2
24:.250,204:.50765:.A$."Q".A$."Q"...R.V.
FL.1:.:.RI.1..:. IF RI=1 WE STARTE
D AT THE BEGINNING...... DISPLAY THE IMA
GES STARTING AT 1 AND ENDING
AT RI - 1......DI.1.RI.1:TF.1.E....828,
22528,IM$(DI)._....4000:. PLOT PS IMAGE.
.....249,224:.250,204:.50765:.A$."Q".A$.
"Q".......FL.1:.:..D. ..FL....249,224:.2
50,204:.51459:.50765.....N$.IM$(DI):.532
70,200:.50759,N$,(240.C(N$).8.2),72. ...
N$."CRAFTED BY":.50759,N$,200,88.S...N$.
"DOUG WILCOX":.50759,N$,(250.C(N$).8.2),
104......4050:. THIS LINE IF THERE IS TE
XT FOR EACH IMAGE.....R.144:CQ%.1......2
,8,2,"G.".IM$(DI).L.A..#2,A$:.A$..G(13).
4033...C..X.0.1:.49152,2,38:X.ST...D..CQ
%.8. 2:. 4050.!.E..50759,TP$,8,R:R.R.8:
CQ%.CQ%.1.*.H..: 2.9.R..53270,200.X.T..3
3057,8:.33058,212:.32776.U.W..33057,8:.3
3058,1:.32768......50759,"PRESS A KEY",2
02,120:.TF.1..50759,"[Q TO QUIT]",202,12
8.D....198,.......A$:.2700:.A$."".4065..
....TF....51459.......3...PX..:PY..:TF.1
:.249,224:.250,204:.51459:.50765:.53270,
200.=....7000.[....X.1.NI:.828,22528,IM$
(X)...D..53270,200:.33057,PY:.33058,PX:.
32776...N.PX.PX.45:.PX.224.PX..:PY.PY.46
.A.X..A$:.A$."Q".A$."Q".......FL..:.X.20
..(X.20)..6000:.FL.1........:FL.1:.TE,"[
PRESS A KEY]",118,188.!....198,.:.198,1:
..'...:.G.P..TE,"[PRESS A KEY]",118,188.
Z.Z..198,.:.198,1:.A$:.198,.:.A$."Q".A$.
"Q".FL.1:.......249,224:.250,204:.50765.
.....7000:PX..:PY..:....X.TE.50759:.TE,"
PRINT SHOP",244,40:.TE,"IS A",268,48...B
..TE,"TRADEMARK",244,56.+.L..TE,"OF",276
,64:.TE,"BRODERBUND",244,72.].V..TE,"SOF
TWARE",252,80:.TE,"Q TO QUIT",244,110.C.
......`..".....................";...J..A
.1.2:.".
":....T..".. ARE YOU SURE YOU WANT
TO QUIT? (.Y./.N.)":.198,..+.~..A.1.2:.
".
":..K...A.B(203):.A..25.A..39.60040.W...
.A.39........15,8,15,"R0:HELLO CONNECT=H
ELLO CONNECT":.15,ER: 15......ER..63..".
";:.198,.:..B...."HELLO CONNECT",8...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL