PS VIEWER
FILE INFORMATION
FILENAME(S): PS VIEWER
FILE TYPE(S): PRG
FILE SIZE: 4.6K
FIRST SEEN: 2025-11-30 18:12:08
APPEARS ON: 1 disk(s)
FILE HASH
55079907b4ad535f001c4cae12664a14c4288f6beec710ac5f11a9e00e803b9f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 60 S 4 | PS VIEWER | PRG | Sailor, Ganheden | 9 | 18 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 20 08 0B 00 97 35 33 32 38 30 2C 32 3A 97 |.. ....53280,2:.|
00000010: 35 33 32 38 31 2C 2E 3A 97 36 35 30 2C 31 32 38 |53281,.:.650,128|
00000020: 00 66 08 0C 00 8B 58 B2 2E A7 99 C7 28 31 34 32 |.f....X.....(142|
00000030: 29 22 93 08 11 11 11 11 11 11 11 11 11 11 11 11 |)"..............|
00000040: 99 20 20 20 20 57 45 4C 43 4F 4D 45 20 54 4F 20 |. WELCOME TO |
00000050: 54 48 45 20 50 52 49 4E 54 20 53 48 4F 50 20 56 |THE PRINT SHOP V|
00000060: 49 45 57 45 52 22 00 82 08 0F 00 8B 58 B2 2E A7 |IEWER"......X...|
00000070: 58 B2 31 3A 93 22 42 4C 4F 41 44 2E 4F 22 2C 38 |X.1:."BLOAD.O",8|
00000080: 2C 31 00 B0 08 14 00 97 35 36 2C 31 32 30 3A 9C |,1......56,120:.|
00000090: 3A 97 32 2C 31 3A 54 50 24 B2 22 22 3A 8F 20 4B |:.2,1:TP$."":. K|
000000A0: 45 45 50 20 54 50 20 48 45 52 45 21 21 21 21 21 |EEP TP HERE!!!!!|
000000B0: 00 D1 08 19 00 9E 38 32 38 2C 35 30 37 35 39 2C |......828,50759,|
000000C0: 22 54 45 58 54 2F 44 4F 54 2F 57 49 50 45 2E 4F |"TEXT/DOT/WIPE.O|
000000D0: 22 00 EB 08 1E 00 9E 38 32 38 2C 35 31 34 35 36 |"......828,51456|
000000E0: 2C 22 55 4E 50 41 43 4B 45 52 22 00 08 09 23 00 |,"UNPACKER"...#.|
000000F0: 9E 38 32 38 2C 33 32 37 36 38 2C 22 50 53 2E 43 |.828,32768,"PS.C|
00000100: 4F 4D 42 4F 32 2E 4F 22 00 20 09 25 00 9E 38 32 |OMBO2.O". .%..82|
00000110: 38 2C 34 39 31 35 32 2C 22 50 53 20 49 50 41 22 |8,49152,"PS IPA"|
00000120: 00 26 09 27 00 3A 00 48 09 28 00 8D 31 35 30 30 |.&.'.:.H.(..1500|
00000130: 3A 8F 20 44 45 46 49 4E 45 20 53 54 52 49 4E 47 |:. DEFINE STRING|
00000140: 53 20 26 20 56 41 52 53 00 69 09 32 00 8D 31 30 |S & VARS.i.2..10|
00000150: 30 30 3A 8F 20 52 45 41 44 20 4E 41 4D 45 53 20 |00:. READ NAMES |
00000160: 4F 46 20 49 4D 41 47 45 53 00 8C 09 37 00 8D 32 |OF IMAGES...7..2|
00000170: 30 30 30 3A 8F 20 44 49 53 50 4C 41 59 20 4E 41 |000:. DISPLAY NA|
00000180: 4D 45 53 20 46 4F 52 20 56 49 45 57 00 CE 09 3C |MES FOR VIEW...<|
00000190: 00 8D 32 35 30 30 3A 8F 20 4D 4F 56 45 20 48 49 |..2500:. MOVE HI|
000001A0: 47 48 4C 49 47 48 54 20 41 4E 44 20 20 20 20 20 |GHLIGHT AND |
000001B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001C0: 20 53 45 4C 45 43 54 20 49 4D 41 47 45 53 00 EC | SELECT IMAGES..|
000001D0: 09 41 00 52 49 B2 43 53 AA 28 43 50 AB 31 29 AC |.A.RI.CS.(CP.1).|
000001E0: 32 38 3A 54 46 B2 2E 3A 46 4C B2 2E 00 09 0A 46 |28:TF..:FL.....F|
000001F0: 00 8B 41 24 B2 22 85 22 A7 8D 33 30 30 30 3A 9E |..A$."."..3000:.|
00000200: 35 31 34 35 39 3A 89 36 30 00 26 0A 4B 00 8B 41 |51459:.60.&.K..A|
00000210: 24 B2 22 86 22 A7 8D 35 30 30 30 3A 9E 35 31 34 |$."."..5000:.514|
00000220: 35 39 3A 89 36 30 00 46 0A 50 00 8B 41 24 B2 22 |59:.60.F.P..A$."|
00000230: 87 22 A7 43 50 B2 43 50 AA 31 3A 8B 43 50 B1 4E |.".CP.CP.1:.CP.N|
00000240: 50 A7 43 50 B2 31 00 63 0A 51 00 8B 41 24 B2 22 |P.CP.1.c.Q..A$."|
00000250: 87 22 A7 8D 32 30 34 30 3A 8B 4E 50 B1 31 A7 43 |."..2040:.NP.1.C|
00000260: 53 B2 31 00 72 0A 52 00 8B 41 24 B2 22 87 22 A7 |S.1.r.R..A$.".".|
00000270: 36 30 00 8F 0A 55 00 8B 41 24 B2 22 88 22 A7 8D |60...U..A$."."..|
00000280: 36 30 30 30 30 3A 8D 32 31 30 30 3A 89 36 30 00 |60000:.2100:.60.|
00000290: B6 0A 5A 00 9E 38 32 38 2C 32 32 35 32 38 2C 49 |..Z..828,22528,I|
000002A0: 4D 24 28 52 49 29 3A 44 49 B2 52 49 3A 8D 34 30 |M$(RI):DI.RI:.40|
000002B0: 30 30 3A 89 36 30 00 BC 0A DE 03 90 00 C2 0A E7 |00:.60..........|
000002C0: 03 3A 00 E2 0A E8 03 9F 33 2C 38 2C 33 2C 22 50 |.:......3,8,3,"P|
000002D0: 53 2E 4E 41 4D 45 53 22 3A 43 4F B2 2E 3A 4E 50 |S.NAMES":CO..:NP|
000002E0: B2 31 00 EC 0A ED 03 4E 49 B2 32 38 00 02 0B F2 |.1.....NI.28....|
000002F0: 03 86 20 49 4D 24 28 4E 49 29 2C 4D 45 24 28 4E |.. IM$(NI),ME$(N|
00000300: 49 29 00 0E 0B FC 03 81 41 B2 31 A4 4E 49 00 2A |I)......A.1.NI.*|
00000310: 0B 06 04 84 33 2C 49 4D 24 28 41 29 3A 4D 45 24 |....3,IM$(A):ME$|
00000320: 28 41 29 B2 49 4D 24 28 41 29 00 3E 0B 1A 04 4E |(A).IM$(A).>...N|
00000330: 49 28 4E 50 29 B2 4E 49 28 4E 50 29 AA 31 00 6F |I(NP).NI(NP).1.o|
00000340: 0B 24 04 42 B2 C3 28 4D 45 24 28 41 29 29 3A 8B |.$.B..(ME$(A)):.|
00000350: 42 B3 B1 31 36 A7 4D 45 24 28 41 29 B2 4D 45 24 |B..16.ME$(A).ME$|
00000360: 28 41 29 AA C8 28 53 50 24 2C 31 36 AB 42 29 00 |(A)..(SP$,16.B).|
00000370: 7A 0B 2E 04 82 3A A0 33 3A 8E 00 80 0B 38 04 3A |z....:.3:....8.:|
00000380: 00 B3 0B DC 05 54 50 24 B2 22 D5 C0 C0 C0 C0 C0 |.....TP$."......|
00000390: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000003A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000003B0: C0 C9 22 00 E6 0B E6 05 53 49 24 B2 22 DD 20 20 |..".....SI$.". |
000003C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003E0: 20 20 20 20 DD 22 00 19 0C F0 05 44 49 24 B2 22 | .".....DI$."|
000003F0: AB C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000400: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000410: C0 C0 C0 C0 C0 C0 C0 B3 22 00 4C 0C FA 05 42 4F |........".L...BO|
00000420: 24 B2 22 CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |$.".............|
00000430: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000440: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 CB 22 00 82 0C 04 |..........."....|
00000450: 06 42 54 24 B2 22 CA C0 C0 C0 C0 C0 C0 C0 C0 C0 |.BT$."..........|
00000460: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000470: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 CB 9D 94 C0 |................|
00000480: 13 22 00 9D 0C 0E 06 53 50 24 B2 22 20 20 20 20 |.".....SP$." |
00000490: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 BE 0C | "...|
000004A0: 18 06 43 53 B2 31 20 20 20 20 3A 8F 20 43 55 52 |..CS.1 :. CUR|
000004B0: 52 45 4E 54 20 53 45 4C 45 43 54 49 4F 4E 00 DD |RENT SELECTION..|
000004C0: 0C 22 06 4A 4F B2 35 36 33 32 30 3A 8F 20 4A 4F |.".JO.56320:. JO|
000004D0: 59 53 54 49 43 4B 20 50 4F 52 54 20 32 00 F9 0C |YSTICK PORT 2...|
000004E0: 2C 06 43 50 B2 31 20 20 20 20 3A 8F 20 43 55 52 |,.CP.1 :. CUR|
000004F0: 52 45 4E 54 20 50 41 47 45 00 FF 0C C6 07 8E 00 |RENT PAGE.......|
00000500: 05 0D CF 07 3A 00 1D 0D D0 07 99 22 93 99 92 22 |....:......"..."|
00000510: 54 50 24 53 49 24 53 49 24 44 49 24 3B 00 31 0D |TP$SI$SI$DI$;.1.|
00000520: DA 07 81 41 B2 31 A4 31 34 3A 99 53 49 24 3B 3A |...A.1.14:.SI$;:|
00000530: 82 00 4D 0D E4 07 99 44 49 24 53 49 24 53 49 24 |..M....DI$SI$SI$|
00000540: 53 49 24 53 49 24 53 49 24 42 54 24 3B 00 6A 0D |SI$SI$SI$BT$;.j.|
00000550: EE 07 81 41 B2 32 31 37 A4 32 34 32 3A 97 41 2C |...A.217.242:.A,|
00000560: C2 28 41 29 B0 31 32 38 3A 82 00 99 0D F8 07 99 |.(A).128:.......|
00000570: 22 13 11 1D 92 9E 20 20 20 41 53 54 52 4F 47 52 |"..... ASTROGR|
00000580: 41 50 48 49 43 53 20 50 52 49 4E 54 20 53 48 4F |APHICS PRINT SHO|
00000590: 50 20 49 4D 41 47 45 53 22 00 C9 0D 02 08 99 22 |P IMAGES"......"|
000005A0: 1D 96 20 20 20 20 20 42 59 20 44 4F 55 47 20 43 |.. BY DOUG C|
000005B0: 55 4D 4D 49 4E 53 20 41 4E 44 20 4C 4F 41 44 53 |UMMINS AND LOADS|
000005C0: 54 41 52 20 20 20 20 20 22 00 D3 0D 0C 08 99 22 |TAR "......"|
000005D0: 11 22 3B 00 F5 0D 16 08 4D 49 B2 B5 28 4E 49 28 |.";.....MI..(NI(|
000005E0: 43 50 29 AD 32 29 3A 8F 20 4D 49 44 44 4C 45 20 |CP).2):. MIDDLE |
000005F0: 49 4D 41 47 45 00 10 0E 20 08 8B 28 4E 50 B1 31 |IMAGE... ..(NP.1|
00000600: 29 AF 28 43 50 B3 B1 4E 50 29 A7 4D 49 B2 31 34 |).(CP..NP).MI.14|
00000610: 00 5C 0E 25 08 53 49 B2 28 43 50 AB 31 29 AC 32 |.\.%.SI.(CP.1).2|
00000620: 38 3A 8F 20 53 54 41 52 54 49 4E 47 20 49 4D 41 |8:. STARTING IMA|
00000630: 47 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |GE |
00000640: 20 20 20 20 20 20 20 20 20 20 20 20 46 4F 52 20 | FOR |
00000650: 43 55 52 52 45 4E 54 20 50 41 47 45 00 95 0E 2A |CURRENT PAGE...*|
00000660: 08 81 41 B2 53 49 AA 31 A4 53 49 AA 4D 49 3A 99 |..A.SI.1.SI.MI:.|
00000670: A3 31 29 22 1E 5D 9A 22 4D 45 24 28 41 29 22 1E |.1)".]."ME$(A)".|
00000680: 5B 20 20 5D 9A 22 4D 45 24 28 41 AA 4D 49 29 22 |[ ]."ME$(A.MI)"|
00000690: 1E 5B 22 3A 82 00 AB 0E 2D 08 8B 53 49 AA 31 34 |.[":....-..SI.14|
000006A0: B2 53 49 AA 4D 49 A7 32 31 30 30 00 EE 0E 30 08 |.SI.MI.2100...0.|
000006B0: 81 41 B2 53 49 AA 31 33 A4 53 49 AA 4D 49 A9 AB |.A.SI.13.SI.MI..|
000006C0: 31 3A 99 22 1D 20 20 20 20 20 20 20 20 20 20 20 |1:.". |
000006D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000006E0: 20 20 20 20 20 20 20 20 20 20 20 22 3A 82 00 20 | ":.. |
000006F0: 0F 34 08 99 22 13 11 11 11 11 11 11 11 11 11 11 |.4.."...........|
00000700: 11 11 11 11 11 11 11 11 11 1D 9A 4E 55 4D 42 45 |...........NUMBE|
00000710: 52 20 4F 46 20 50 41 47 45 53 3A 05 22 4E 50 3B |R OF PAGES:."NP;|
00000720: 00 3D 0F 3E 08 99 A3 32 33 29 22 9A 43 55 52 52 |.=.>...23)".CURR|
00000730: 45 4E 54 20 50 41 47 45 3A 05 22 43 50 00 56 0F |ENT PAGE:."CP.V.|
00000740: 48 08 99 22 1D 05 46 31 20 9A 2D 20 41 55 54 4F |H.."..F1 .- AUTO|
00000750: 20 4D 4F 44 45 22 00 87 0F 52 08 99 22 1D 05 46 | MODE"...R.."..F|
00000760: 33 20 9A 2D 20 51 55 49 43 4B 20 4C 4F 4F 4B 20 |3 .- QUICK LOOK |
00000770: 20 20 20 20 20 20 9E 43 52 53 52 20 4B 45 59 53 | .CRSR KEYS|
00000780: 20 4D 4F 56 45 20 22 00 B5 0F 5C 08 99 22 1D 05 | MOVE "...\.."..|
00000790: 46 35 20 9A 2D 20 4E 45 58 54 20 50 41 47 45 20 |F5 .- NEXT PAGE |
000007A0: 20 20 20 20 20 20 20 20 20 9E 12 48 49 47 48 4C | ..HIGHL|
000007B0: 49 47 48 54 22 00 E8 0F 66 08 99 22 1D 05 46 37 |IGHT"...f.."..F7|
000007C0: 20 9A 2D 20 51 55 49 54 20 20 20 20 20 20 20 20 | .- QUIT |
000007D0: 20 20 20 9E 52 45 54 55 52 4E 20 53 45 4C 45 43 | .RETURN SELEC|
000007E0: 54 53 20 49 54 2E 13 22 00 EE 0F 70 08 8E 00 04 |TS IT.."...p....|
000007F0: 10 C4 09 42 B2 43 53 3A 8B 42 B1 4D 49 A7 42 B2 |...B.CS:.B.MI.B.|
00000800: 42 AB 4D 49 00 1C 10 CE 09 99 22 13 11 11 11 22 |B.MI......"...."|
00000810: 3B 3A 81 41 B2 31 A4 42 3A 99 3A 82 00 3A 10 D8 |;:.A.1.B:.:..:..|
00000820: 09 99 A3 32 29 3B 3A 8B 43 53 B1 4D 49 A7 99 A3 |...2);:.CS.MI...|
00000830: 31 39 29 22 05 2D 3E 1D 22 3B 00 56 10 E2 09 99 |19)".->.";.V....|
00000840: 22 12 05 22 4D 45 24 28 53 49 AA 43 53 29 3B 3A |".."ME$(SI.CS);:|
00000850: 97 31 39 38 2C 2E 00 6D 10 E7 09 8B 43 53 B3 4D |.198,..m....CS.M|
00000860: 49 AA 31 A7 99 22 1D 92 05 3C 2D 22 3B 00 87 10 |I.1.."...<-";...|
00000870: EC 09 A1 41 24 3A 8D 32 37 30 30 3A 8B 41 24 B2 |...A$:.2700:.A$.|
00000880: 22 22 A7 32 35 34 30 00 BD 10 F1 09 8B 28 41 24 |"".2540......(A$|
00000890: B2 C7 28 31 33 29 29 B0 28 41 24 B2 22 85 22 29 |..(13)).(A$.".")|
000008A0: B0 28 41 24 B2 22 86 22 29 B0 28 41 24 B2 22 87 |.(A$.".").(A$.".|
000008B0: 22 29 B0 28 41 24 B2 22 88 22 29 A7 8E 00 D3 10 |").(A$.".").....|
000008C0: F6 09 42 B2 43 53 3A 8B 42 B1 4D 49 A7 42 B2 42 |..B.CS:.B.MI.B.B|
000008D0: AB 4D 49 00 EB 10 00 0A 99 22 13 11 11 11 22 3B |.MI......"....";|
000008E0: 3A 81 41 B2 31 A4 42 3A 99 3A 82 00 09 11 0A 0A |:.A.1.B:.:......|
000008F0: 99 A3 32 29 3B 3A 8B 43 53 B1 4D 49 A7 99 A3 31 |..2);:.CS.MI...1|
00000900: 39 29 22 1E 20 20 1D 22 3B 00 1D 11 14 0A 99 22 |9)". .";......"|
00000910: 9A 22 4D 45 24 28 53 49 AA 43 53 29 3B 00 33 11 |."ME$(SI.CS);.3.|
00000920: 19 0A 8B 43 53 B3 4D 49 AA 31 A7 99 22 1D 1E 20 |...CS.MI.1..".. |
00000930: 20 22 3B 00 5C 11 1E 0A 8B 41 24 B2 22 11 22 A7 | ";.\....A$.".".|
00000940: 43 53 B2 43 53 AA 31 3A 8B 43 53 B1 4E 49 28 43 |CS.CS.1:.CS.NI(C|
00000950: 50 29 A7 43 53 B2 4E 49 28 43 50 29 00 7B 11 28 |P).CS.NI(CP).{.(|
00000960: 0A 8B 41 24 B2 22 91 22 A7 43 53 B2 43 53 AB 31 |..A$.".".CS.CS.1|
00000970: 3A 8B 43 53 B3 31 A7 43 53 B2 31 00 A6 11 32 0A |:.CS.1.CS.1...2.|
00000980: 8B 41 24 B2 22 1D 22 A7 43 53 B2 43 53 AA 4D 49 |.A$.".".CS.CS.MI|
00000990: 3A 8B 43 53 B1 4E 49 28 43 50 29 A7 43 53 B2 43 |:.CS.NI(CP).CS.C|
000009A0: 53 AB 4D 49 AC 32 00 CC 11 3C 0A 8B 41 24 B2 22 |S.MI.2...<..A$."|
000009B0: 9D 22 A7 43 53 B2 43 53 AB 4D 49 3A 8B 43 53 B3 |.".CS.CS.MI:.CS.|
000009C0: 31 A7 43 53 B2 43 53 AA 4D 49 AC 32 00 D6 11 50 |1.CS.CS.MI.2...P|
000009D0: 0A 89 32 35 30 30 00 F3 11 8C 0A 8B 28 C2 28 4A |..2500......(.(J|
000009E0: 4F 29 AF 31 36 29 B2 2E A7 41 24 B2 C7 28 31 33 |O).16)...A$..(13|
000009F0: 29 3A 8E 00 0C 12 96 0A 41 B2 28 C2 28 4A 4F 29 |):......A.(.(JO)|
00000A00: AF 31 35 29 3A 8B 41 B2 31 35 A7 8E 00 1D 12 A0 |.15):.A.15......|
00000A10: 0A 8B 41 B2 31 34 A7 41 24 B2 22 91 22 00 2E 12 |..A.14.A$."."...|
00000A20: AA 0A 8B 41 B2 30 37 A7 41 24 B2 22 1D 22 00 3F |...A.07.A$.".".?|
00000A30: 12 B4 0A 8B 41 B2 31 33 A7 41 24 B2 22 11 22 00 |....A.13.A$.".".|
00000A40: 50 12 BE 0A 8B 41 B2 31 31 A7 41 24 B2 22 9D 22 |P....A.11.A$."."|
00000A50: 00 56 12 C8 0A 8E 00 A1 12 AE 0B 8F 20 44 49 53 |.V.......... DIS|
00000A60: 50 4C 41 59 20 54 48 45 20 49 4D 41 47 45 53 20 |PLAY THE IMAGES |
00000A70: 53 54 41 52 54 49 4E 47 20 41 54 20 20 20 20 20 |STARTING AT |
00000A80: 20 20 20 20 20 52 49 20 28 57 48 49 43 48 20 49 | RI (WHICH I|
00000A90: 53 20 57 48 45 52 45 20 54 48 45 20 48 49 47 48 |S WHERE THE HIGH|
00000AA0: 2D 00 EA 12 AF 0B 8F 20 4C 49 47 48 54 20 49 53 |-...... LIGHT IS|
00000AB0: 20 43 55 52 52 45 4E 54 4C 59 20 41 54 29 20 41 | CURRENTLY AT) A|
00000AC0: 4E 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |ND |
00000AD0: 45 4E 44 49 4E 47 20 57 49 54 48 20 54 48 45 20 |ENDING WITH THE |
00000AE0: 4C 41 53 54 20 49 4D 41 47 45 00 FD 12 B8 0B 81 |LAST IMAGE......|
00000AF0: 44 49 B2 52 49 A4 4E 49 3A 54 46 B2 31 00 14 13 |DI.RI.NI:TF.1...|
00000B00: C2 0B 9E 38 32 38 2C 32 32 35 32 38 2C 49 4D 24 |...828,22528,IM$|
00000B10: 28 44 49 29 00 2E 13 C4 0B 8D 34 30 30 30 3A 8F |(DI)......4000:.|
00000B20: 20 50 4C 4F 54 20 50 53 20 49 4D 41 47 45 00 5C | PLOT PS IMAGE.\|
00000B30: 13 CC 0B 97 32 34 39 2C 32 32 34 3A 97 32 35 30 |....249,224:.250|
00000B40: 2C 32 30 34 3A 9E 35 30 37 36 35 3A 8B 41 24 B2 |,204:.50765:.A$.|
00000B50: 22 51 22 B0 41 24 B2 22 D1 22 A7 8E 00 9B 13 D6 |"Q".A$."."......|
00000B60: 0B 46 4C B2 31 3A 82 3A 8B 52 49 B2 31 A7 8E 3A |.FL.1:.:.RI.1..:|
00000B70: 8F 20 49 46 20 20 20 20 20 20 20 52 49 3D 31 20 |. IF RI=1 |
00000B80: 57 45 20 53 54 41 52 54 45 44 20 41 54 20 54 48 |WE STARTED AT TH|
00000B90: 45 20 42 45 47 49 4E 4E 49 4E 47 00 E3 13 DB 0B |E BEGINNING.....|
00000BA0: 8F 20 44 49 53 50 4C 41 59 20 54 48 45 20 49 4D |. DISPLAY THE IM|
00000BB0: 41 47 45 53 20 53 54 41 52 54 49 4E 47 20 20 20 |AGES STARTING |
00000BC0: 20 20 20 20 20 20 20 20 20 20 41 54 20 31 20 41 | AT 1 A|
00000BD0: 4E 44 20 45 4E 44 49 4E 47 20 41 54 20 52 49 20 |ND ENDING AT RI |
00000BE0: 2D 20 31 00 F7 13 E0 0B 81 44 49 B2 31 A4 52 49 |- 1......DI.1.RI|
00000BF0: AB 31 3A 54 46 B2 31 00 0E 14 EA 0B 9E 38 32 38 |.1:TF.1......828|
00000C00: 2C 32 32 35 32 38 2C 49 4D 24 28 44 49 29 00 28 |,22528,IM$(DI).(|
00000C10: 14 F4 0B 8D 34 30 30 30 3A 8F 20 50 4C 4F 54 20 |....4000:. PLOT |
00000C20: 50 53 20 49 4D 41 47 45 00 56 14 FE 0B 97 32 34 |PS IMAGE.V....24|
00000C30: 39 2C 32 32 34 3A 97 32 35 30 2C 32 30 34 3A 9E |9,224:.250,204:.|
00000C40: 35 30 37 36 35 3A 8B 41 24 B2 22 51 22 B0 41 24 |50765:.A$."Q".A$|
00000C50: B2 22 D1 22 A7 8E 00 63 14 08 0C 46 4C B2 31 3A |."."...c...FL.1:|
00000C60: 82 3A 8E 00 8D 14 A0 0F 8B 46 4C B2 2E A7 97 32 |.:.......FL....2|
00000C70: 34 39 2C 32 32 34 3A 97 32 35 30 2C 32 30 34 3A |49,224:.250,204:|
00000C80: 9E 35 31 34 35 39 3A 9E 35 30 37 36 35 00 C4 14 |.51459:.50765...|
00000C90: A7 0F 4E 24 B2 49 4D 24 28 44 49 29 3A 97 35 33 |..N$.IM$(DI):.53|
00000CA0: 32 37 30 2C 32 30 30 3A 9E 35 30 37 35 39 2C 4E |270,200:.50759,N|
00000CB0: 24 2C 28 32 34 30 AB C3 28 4E 24 29 AC 38 AD 32 |$,(240..(N$).8.2|
00000CC0: 29 2C 36 34 00 E9 14 A8 0F 4E 24 B2 22 43 52 41 |),64.....N$."CRA|
00000CD0: 46 54 45 44 20 42 59 22 3A 9E 35 30 37 35 39 2C |FTED BY":.50759,|
00000CE0: 4E 24 2C 32 30 30 2C 38 30 00 10 15 A9 0F 4E 24 |N$,200,80.....N$|
00000CF0: B2 22 44 4F 55 47 20 43 55 4D 4D 49 4E 53 22 3A |."DOUG CUMMINS":|
00000D00: 9E 35 30 37 35 39 2C 4E 24 2C 31 39 32 2C 39 36 |.50759,N$,192,96|
00000D10: 00 16 15 AC 0F 3A 00 26 15 BE 0F 52 B2 31 34 38 |.....:.&...R.148|
00000D20: 3A 43 51 25 B2 31 00 3E 15 BF 0F 9F 32 2C 38 2C |:CQ%.1.>....2,8,|
00000D30: 32 2C 22 47 2D 22 AA 49 4D 24 28 44 49 29 00 50 |2,"G-".IM$(DI).P|
00000D40: 15 C1 0F A1 23 32 2C 41 24 3A A1 23 32 2C 41 24 |....#2,A$:.#2,A$|
00000D50: 00 67 15 C3 0F 81 58 B2 31 A4 36 3A 9E 34 39 31 |.g....X.1.6:.491|
00000D60: 35 32 2C 32 2C 34 30 00 78 15 C4 0F 8B 54 50 24 |52,2,40.x....TP$|
00000D70: B2 22 22 A7 34 30 33 38 00 8B 15 C5 0F 9E 35 30 |."".4038......50|
00000D80: 37 35 39 2C 54 50 24 2C 38 2C 52 00 95 15 C6 0F |759,TP$,8,R.....|
00000D90: 52 B2 52 AA 38 00 9E 15 C8 0F 82 3A A0 32 00 AD |R.R.8......:.2..|
00000DA0: 15 D2 0F 97 35 33 32 37 30 2C 32 30 30 00 CC 15 |....53270,200...|
00000DB0: D4 0F 97 33 33 30 35 37 2C 38 3A 97 33 33 30 35 |...33057,8:.3305|
00000DC0: 38 2C 32 31 32 3A 9E 33 32 37 37 36 00 E9 15 D7 |8,212:.32776....|
00000DD0: 0F 97 33 33 30 35 37 2C 38 3A 97 33 33 30 35 38 |..33057,8:.33058|
00000DE0: 2C 31 3A 9E 33 32 37 36 38 00 2D 16 DC 0F 9E 35 |,1:.32768.-....5|
00000DF0: 30 37 35 39 2C 22 50 52 45 53 53 20 41 20 4B 45 |0759,"PRESS A KE|
00000E00: 59 22 2C 32 30 32 2C 31 32 38 3A 8B 54 46 B2 31 |Y",202,128:.TF.1|
00000E10: A7 9E 35 30 37 35 39 2C 22 5B 51 20 54 4F 20 51 |..50759,"[Q TO Q|
00000E20: 55 49 54 5D 22 2C 32 30 32 2C 31 32 38 00 38 16 |UIT]",202,128.8.|
00000E30: DE 0F 97 31 39 38 2C 2E 00 52 16 E1 0F A1 41 24 |...198,..R....A$|
00000E40: 3A 8D 32 37 30 30 3A 8B 41 24 B2 22 22 A7 34 30 |:.2700:.A$."".40|
00000E50: 36 35 00 63 16 E6 0F 8B 54 46 B2 2E A7 9E 35 31 |65.c....TF....51|
00000E60: 34 35 39 00 69 16 F0 0F 8E 00 A7 16 88 13 50 58 |459.i.........PX|
00000E70: B2 2E 3A 50 59 B2 2E 3A 54 46 B2 31 3A 97 32 34 |..:PY..:TF.1:.24|
00000E80: 39 2C 32 32 34 3A 97 32 35 30 2C 32 30 34 3A 9E |9,224:.250,204:.|
00000E90: 35 31 34 35 39 3A 9E 35 30 37 36 35 3A 97 35 33 |51459:.50765:.53|
00000EA0: 32 37 30 2C 32 30 30 00 B1 16 92 13 8D 37 30 30 |270,200......700|
00000EB0: 30 00 CF 16 BA 13 81 58 B2 31 A4 4E 49 3A 9E 38 |0......X.1.NI:.8|
00000EC0: 32 38 2C 32 32 35 32 38 2C 49 4D 24 28 58 29 00 |28,22528,IM$(X).|
00000ED0: F9 16 C4 13 97 35 33 32 37 30 2C 32 30 30 3A 97 |.....53270,200:.|
00000EE0: 33 33 30 35 37 2C 50 59 3A 97 33 33 30 35 38 2C |33057,PY:.33058,|
00000EF0: 50 58 3A 9E 33 32 37 37 36 00 1C 17 CE 13 50 58 |PX:.32776.....PX|
00000F00: B2 50 58 AA 34 35 3A 8B 50 58 B1 32 32 34 A7 50 |.PX.45:.PX.224.P|
00000F10: 58 B2 2E 3A 50 59 B2 50 59 AA 34 36 00 35 17 D8 |X..:PY.PY.46.5..|
00000F20: 13 A1 41 24 3A 8B 41 24 B2 22 51 22 B0 41 24 B2 |..A$:.A$."Q".A$.|
00000F30: 22 D1 22 A7 8E 00 5A 17 E2 13 46 4C B2 2E 3A 8B |"."...Z...FL..:.|
00000F40: 58 AD 32 30 B2 B5 28 58 AD 32 30 29 A7 8D 36 30 |X.20..(X.20)..60|
00000F50: 30 30 3A 8B 46 4C B2 31 A7 8E 00 81 17 EC 13 82 |00:.FL.1........|
00000F60: 3A 46 4C B2 31 3A 9E 54 45 2C 22 5B 50 52 45 53 |:FL.1:.TE,"[PRES|
00000F70: 53 20 41 20 4B 45 59 5D 22 2C 31 31 38 2C 31 38 |S A KEY]",118,18|
00000F80: 38 00 95 17 F6 13 97 31 39 38 2C 2E 3A 92 31 39 |8......198,.:.19|
00000F90: 38 2C 31 3A 8E 00 9B 17 00 14 3A 00 BB 17 70 17 |8,1:......:...p.|
00000FA0: 9E 54 45 2C 22 5B 50 52 45 53 53 20 41 20 4B 45 |.TE,"[PRESS A KE|
00000FB0: 59 5D 22 2C 31 31 38 2C 31 38 38 00 EE 17 7A 17 |Y]",118,188...z.|
00000FC0: 97 31 39 38 2C 2E 3A 92 31 39 38 2C 31 3A A1 41 |.198,.:.198,1:.A|
00000FD0: 24 3A 97 31 39 38 2C 2E 3A 8B 41 24 B2 22 51 22 |$:.198,.:.A$."Q"|
00000FE0: B0 41 24 B2 22 D1 22 A7 46 4C B2 31 3A 8E 00 0B |.A$.".".FL.1:...|
00000FF0: 18 84 17 97 32 34 39 2C 32 32 34 3A 97 32 35 30 |....249,224:.250|
00001000: 2C 32 30 34 3A 9E 35 30 37 36 35 00 21 18 8E 17 |,204:.50765.!...|
00001010: 8D 37 30 30 30 3A 50 58 B2 2E 3A 50 59 B2 2E 3A |.7000:PX..:PY..:|
00001020: 8E 00 58 18 58 1B 54 45 B2 35 30 37 35 39 3A 9E |..X.X.TE.50759:.|
00001030: 54 45 2C 22 50 52 49 4E 54 20 53 48 4F 50 22 2C |TE,"PRINT SHOP",|
00001040: 32 34 34 2C 34 30 3A 9E 54 45 2C 22 49 53 20 41 |244,40:.TE,"IS A|
00001050: 22 2C 32 36 38 2C 34 38 00 73 18 62 1B 9E 54 45 |",268,48.s.b..TE|
00001060: 2C 22 54 52 41 44 45 4D 41 52 4B 22 2C 32 34 34 |,"TRADEMARK",244|
00001070: 2C 35 36 00 9F 18 6C 1B 9E 54 45 2C 22 4F 46 22 |,56...l..TE,"OF"|
00001080: 2C 32 37 36 2C 36 34 3A 9E 54 45 2C 22 42 52 4F |,276,64:.TE,"BRO|
00001090: 44 45 52 42 55 4E 44 22 2C 32 34 34 2C 37 32 00 |DERBUND",244,72.|
000010A0: D1 18 76 1B 9E 54 45 2C 22 53 4F 46 54 57 41 52 |..v..TE,"SOFTWAR|
000010B0: 45 22 2C 32 35 32 2C 38 30 3A 9E 54 45 2C 22 51 |E",252,80:.TE,"Q|
000010C0: 20 54 4F 20 51 55 49 54 22 2C 32 34 34 2C 31 31 | TO QUIT",244,11|
000010D0: 30 00 D7 18 80 1B 8E 00 F5 18 60 EA 99 22 13 11 |0.........`.."..|
000010E0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000010F0: 11 11 92 22 3B 00 2D 19 6A EA 81 41 B2 31 A4 32 |...";.-.j..A.1.2|
00001100: 3A 99 22 1D 20 20 20 20 20 20 20 20 20 20 20 20 |:.". |
00001110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001120: 20 20 20 20 20 20 20 20 20 20 22 3A 82 00 67 19 | ":..g.|
00001130: 74 EA 99 22 1D 9A 20 41 52 45 20 59 4F 55 20 53 |t..".. ARE YOU S|
00001140: 55 52 45 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 |URE YOU WANT TO |
00001150: 51 55 49 54 3F 20 28 05 59 9A 2F 05 4E 9A 29 22 |QUIT? (.Y./.N.)"|
00001160: 3A 97 31 39 38 2C 2E 00 9F 19 7E EA 81 41 B2 31 |:.198,....~..A.1|
00001170: A4 32 3A 99 22 1D 20 20 20 20 20 20 20 20 20 20 |.2:.". |
00001180: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001190: 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 82 00 | ":..|
000011A0: BF 19 88 EA 41 B2 C2 28 32 30 33 29 3A 8B 41 B3 |....A..(203):.A.|
000011B0: B1 32 35 AF 41 B3 B1 33 39 A7 36 30 30 34 30 00 |.25.A..39.60040.|
000011C0: CB 19 92 EA 8B 41 B2 33 39 A7 8E 00 04 1A 9C EA |.....A.39.......|
000011D0: 9F 31 35 2C 38 2C 31 35 2C 22 52 30 3A 48 45 4C |.15,8,15,"R0:HEL|
000011E0: 4C 4F 20 43 4F 4E 4E 45 43 54 3D 48 45 4C 4C 4F |LO CONNECT=HELLO|
000011F0: 20 43 4F 4E 4E 45 43 54 22 3A 84 31 35 2C 45 52 | CONNECT":.15,ER|
00001200: 3A A0 31 35 00 1F 1A A6 EA 8B 45 52 B3 B1 36 33 |:.15......ER..63|
00001210: A7 99 22 13 22 3B 3A 97 31 39 38 2C 2E 3A 80 00 |..".";:.198,.:..|
00001220: 2C 1A AB EA 97 35 33 32 38 31 2C 30 00 5A 1A B0 |,....53281,0.Z..|
00001230: EA 99 22 93 11 11 11 90 4C 4F 41 44 22 C7 28 33 |..".....LOAD".(3|
00001240: 34 29 22 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 |4)"HELLO CONNECT|
00001250: 22 C7 28 33 34 29 22 2C 38 22 00 6A 1A BA EA 99 |".(34)",8".j....|
00001260: 22 11 11 11 11 52 55 4E 13 22 00 87 1A BF EA 97 |"....RUN."......|
00001270: 36 33 31 2C 31 33 3A 97 36 33 32 2C 31 33 3A 97 |631,13:.632,13:.|
00001280: 31 39 38 2C 32 3A 80 00 00 00 |198,2:.... |
.. ....53280,2:.53281,.:.650,128.F....X.
...G(142)"............... WELCOME TO
THE PRINT SHOP VIEWER"......X...X.1:."BL
OAD.O",8,1......56,120:.:.2,1:TP$."":. K
EEP TP HERE!!!!!.Q....828,50759,"TEXT/DO
T/WIPE.O"......828,51456,"UNPACKER"...#.
.828,32768,"PS.COMBO2.O". .%..828,49152,
"PS IPA".&.'.:.H.(..1500:. DEFINE STRING
S & VARS.I.2..1000:. READ NAMES OF IMAGE
S...7..2000:. DISPLAY NAMES FOR VIEW.N.<
..2500:. MOVE HIGHLIGHT AND
SELECT IMAGES...A.RI.CS.(CP.1).
28:TF..:FL.....F..A$."."..3000:.51459:.6
0.&.K..A$."."..5000:.51459:.60.F.P..A$."
.".CP.CP.1:.CP.NP.CP.1.C.Q..A$."."..2040
:.NP.1.CS.1.R.R..A$.".".60...U..A$."."..
60000:.2100:.60...Z..828,22528,IM$(RI):D
I.RI:.4000:.60.......B...:......3,8,3,"P
S.NAMES":CO..:NP.1.....NI.28...... IM$(N
I),ME$(NI)......A.1.NI.*....3,IM$(A):ME$
(A).IM$(A).>...NI(NP).NI(NP).1.O.$.B.C(M
E$(A)):.B..16.ME$(A).ME$(A).H(SP$,16.B).
Z....: 3:....8.:.....TP$."U.............
.........................I".....SI$.".
."..
...DI$."................................
........".L...BO$."J....................
..................K".....BT$."J.........
............................K....".....S
P$." ".....CS.1 :. CUR
RENT SELECTION...".JO.56320:. JOYSTICK P
ORT 2...,.CP.1 :. CURRENT PAGE...F...
..O.:...P.."..."TP$SI$SI$DI$;.1.Z..A.1.1
4:.SI$;:..M....DI$SI$SI$SI$SI$SI$BT$;.J.
...A.217.242:.A,B(A).128:.......".....
ASTROGRAPHICS PRINT SHOP IMAGES".I...."
.. BY DOUG CUMMINS AND LOADSTAR
".S....".";.....MI..(NI(CP).2):. MIDDLE
IMAGE... ..(NP.1).(CP..NP).MI.14.\.%.SI.
(CP.1).28:. STARTING IMAGE
FOR CURRENT PAGE...*..A.SI.1
.SI.MI:..1)".]."ME$(A)".[ ]."ME$(A.MI)"
.[":....-..SI.14.SI.MI.2100...0..A.SI.13
.SI.MI..1:.".
":.. .4.."...................
...NUMBER OF PAGES:."NP;.=.>...23)".CURR
ENT PAGE:."CP.V.H.."..F1 .- AUTO MODE"..
.R.."..F3 .- QUICK LOOK .CRSR KEYS
MOVE "...\.."..F5 .- NEXT PAGE
..HIGHLIGHT"...F.."..F7 .- QUIT
.RETURN SELECTS IT.."...P.....D.B.CS:
.B.MI.B.B.MI...N.."....";:.A.1.B:.:..:.X
...2);:.CS.MI...19)".->.";.V....".."ME$(
SI.CS);:.198,..M....CS.MI.1.."...<-";...
...A$:.2700:.A$."".2540......(A$.G(13)).
(A$.".").(A$.".").(A$.".").(A$.".")...S.
..B.CS:.B.MI.B.B.MI......"....";:.A.1.B:
.:........2);:.CS.MI...19)". .";......"
."ME$(SI.CS);.3....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.L.<..A$."
.".CS.CS.MI:.CS.1.CS.CS.MI.2.V.P..2500..
....(B(JO).16)...A$.G(13):......A.(B(JO)
.15):.A.15..... ..A.14.A$."."......A.07.
A$.".".?....A.13.A$.".".P....A.11.A$."."
.V.H........ DISPLAY THE IMAGES STARTING
AT RI (WHICH IS WHERE THE HIGH
-...... LIGHT IS CURRENTLY AT) AND
ENDING WITH THE LAST IMAGE......
DI.RI.NI:TF.1...B..828,22528,IM$(DI)...D
..4000:. PLOT PS IMAGE.\.L..249,224:.250
,204:.50765:.A$."Q".A$."Q".....V.FL.1:.:
.RI.1..:. IF RI=1 WE STARTED AT TH
E BEGINNING...... DISPLAY THE IMAGES STA
RTING AT 1 AND ENDING AT RI
- 1......DI.1.RI.1:TF.1......828,22528,I
M$(DI).(....4000:. PLOT PS IMAGE.V....24
9,224:.250,204:.50765:.A$."Q".A$."Q"...C
...FL.1:.:.... ..FL....249,224:.250,204:
.51459:.50765.D...N$.IM$(DI):.53270,200:
.50759,N$,(240.C(N$).8.2),64.....N$."CRA
FTED BY":.50759,N$,200,80.....N$."DOUG C
UMMINS":.50759,N$,192,96.....:.&...R.148
:CQ%.1.>....2,8,2,"G-".IM$(DI).P.A..#2,A
$:.#2,A$.G.C..X.1.6:.49152,2,40.X.D..TP$
."".4038...E..50759,TP$,8,R...F.R.R.8...
H..: 2...R..53270,200.L.T..33057,8:.3305
8,212:.32776...W..33057,8:.33058,1:.3276
8.-....50759,"PRESS A KEY",202,128:.TF.1
..50759,"[Q TO QUIT]",202,128.8....198,.
.R....A$:.2700:.A$."".4065.C....TF....51
459.I.........PX..:PY..:TF.1:.249,224:.2
50,204:.51459:.50765:.53270,200......700
0.O....X.1.NI:.828,22528,IM$(X)...D..532
70,200:.33057,PY:.33058,PX:.32776...N.PX
.PX.45:.PX.224.PX..:PY.PY.46.5.X..A$:.A$
."Q".A$."Q"...Z...FL..:.X.20..(X.20)..60
00:.FL.1........:FL.1:.TE,"[PRESS A KEY]
",118,188......198,.:.198,1:......:...P.
.TE,"[PRESS A KEY]",118,188...Z..198,.:.
198,1:.A$:.198,.:.A$."Q".A$."Q".FL.1:...
....249,224:.250,204:.50765.!....7000:PX
..:PY..:..X.X.TE.50759:.TE,"PRINT SHOP",
244,40:.TE,"IS A",268,48.S.B..TE,"TRADEM
ARK",244,56...L..TE,"OF",276,64:.TE,"BRO
DERBUND",244,72.Q.V..TE,"SOFTWARE",252,8
0:.TE,"Q TO QUIT",244,110.W.......`.."..
...................";.-.J..A.1.2:.".
":..G.
T..".. ARE YOU SURE YOU WANT TO QUIT? (.
Y./.N.)":.198,....~..A.1.2:.".
":......A.B(
203):.A..25.A..39.60040.K....A.39.......
.15,8,15,"R0:HELLO CONNECT=HELLO CONNECT
":.15,ER: 15......ER..63..".";:.198,.:..
,....53281,0.Z....".....LOAD"G(34)"HELLO
CONNECT"G(34)",8".J...."....RUN."......
631,13:.632,13:.198,2:....
> CLICK IMAGE PREVIEW FOR FULL MODAL