PS.IMAGE.VIEWER
FILE INFORMATION
FILENAME(S): PS.IMAGE.VIEWER
FILE TYPE(S): PRG
FILE SIZE: 5.4K
FIRST SEEN: 2025-11-30 18:12:22
APPEARS ON: 1 disk(s)
FILE HASH
8a1e3a5188a1f096986cbc289c8cb4720a8499c319e15979b002cafd7d206dae
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 48 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 D5 |HE FILE......:..| 000001B0: 09 09 00 8F 20 21 21 21 21 20 20 20 45 58 43 55 |.... !!!! EXCU| 000001C0: 55 55 55 55 55 53 45 20 4D 45 45 45 45 45 45 20 |UUUUUSE MEEEEEE | 000001D0: 21 21 21 21 21 00 DB 09 0A 00 3A 00 FA 09 0B 00 |!!!!!.....:.....| 000001E0: 97 35 33 32 38 30 2C 32 3A 97 35 33 32 38 31 2C |.53280,2:.53281,| 000001F0: 2E 3A 97 36 35 30 2C 31 32 38 00 40 0A 0C 00 8B |.:.650,128.@....| 00000200: 58 B2 2E A7 99 C7 28 31 34 32 29 22 93 08 11 11 |X.....(142)"....| 00000210: 11 11 11 11 11 11 11 11 11 11 99 20 20 20 20 57 |........... W| 00000220: 45 4C 43 4F 4D 45 20 54 4F 20 54 48 45 20 50 52 |ELCOME TO THE PR| 00000230: 49 4E 54 20 53 48 4F 50 20 56 49 45 57 45 52 22 |INT SHOP VIEWER"| 00000240: 00 5C 0A 0F 00 8B 58 B2 2E A7 58 B2 31 3A 93 22 |.\....X...X.1:."| 00000250: 42 4C 4F 41 44 2E 4F 22 2C 38 2C 31 00 6F 0A 14 |BLOAD.O",8,1.o..| 00000260: 00 97 35 36 2C 31 32 30 3A 9C 3A 97 32 2C 31 00 |..56,120:.:.2,1.| 00000270: 90 0A 19 00 9E 38 32 38 2C 35 30 37 35 39 2C 22 |.....828,50759,"| 00000280: 54 45 58 54 2F 44 4F 54 2F 57 49 50 45 2E 4F 22 |TEXT/DOT/WIPE.O"| 00000290: 00 AA 0A 1E 00 9E 38 32 38 2C 35 31 34 35 36 2C |......828,51456,| 000002A0: 22 55 4E 50 41 43 4B 45 52 22 00 C7 0A 23 00 9E |"UNPACKER"...#..| 000002B0: 38 32 38 2C 33 32 37 36 38 2C 22 50 53 2E 43 4F |828,32768,"PS.CO| 000002C0: 4D 42 4F 32 2E 4F 22 00 CD 0A 27 00 3A 00 EF 0A |MBO2.O"...'.:...| 000002D0: 28 00 8D 31 35 30 30 3A 8F 20 44 45 46 49 4E 45 |(..1500:. DEFINE| 000002E0: 20 53 54 52 49 4E 47 53 20 26 20 56 41 52 53 00 | STRINGS & VARS.| 000002F0: 10 0B 32 00 8D 31 30 30 30 3A 8F 20 52 45 41 44 |..2..1000:. READ| 00000300: 20 4E 41 4D 45 53 20 4F 46 20 49 4D 41 47 45 53 | NAMES OF IMAGES| 00000310: 00 33 0B 37 00 8D 32 30 30 30 3A 8F 20 44 49 53 |.3.7..2000:. DIS| 00000320: 50 4C 41 59 20 4E 41 4D 45 53 20 46 4F 52 20 56 |PLAY NAMES FOR V| 00000330: 49 45 57 00 75 0B 3C 00 8D 32 35 30 30 3A 8F 20 |IEW.u.<..2500:. | 00000340: 4D 4F 56 45 20 48 49 47 48 4C 49 47 48 54 20 41 |MOVE HIGHLIGHT A| 00000350: 4E 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |ND | 00000360: 20 20 20 20 20 20 20 20 53 45 4C 45 43 54 20 49 | SELECT I| 00000370: 4D 41 47 45 53 00 93 0B 41 00 52 49 B2 43 53 AA |MAGES...A.RI.CS.| 00000380: 28 43 50 AB 31 29 AC 32 38 3A 54 46 B2 2E 3A 46 |(CP.1).28:TF..:F| 00000390: 4C B2 2E 00 B0 0B 46 00 8B 41 24 B2 22 85 22 A7 |L.....F..A$.".".| 000003A0: 8D 33 30 30 30 3A 9E 35 31 34 35 39 3A 89 36 30 |.3000:.51459:.60| 000003B0: 00 CD 0B 4B 00 8B 41 24 B2 22 86 22 A7 8D 35 30 |...K..A$."."..50| 000003C0: 30 30 3A 9E 35 31 34 35 39 3A 89 36 30 00 ED 0B |00:.51459:.60...| 000003D0: 50 00 8B 41 24 B2 22 87 22 A7 43 50 B2 43 50 AA |P..A$.".".CP.CP.| 000003E0: 31 3A 8B 43 50 B1 4E 50 A7 43 50 B2 31 00 0A 0C |1:.CP.NP.CP.1...| 000003F0: 51 00 8B 41 24 B2 22 87 22 A7 8D 32 30 34 30 3A |Q..A$."."..2040:| 00000400: 8B 4E 50 B1 31 A7 43 53 B2 31 00 19 0C 52 00 8B |.NP.1.CS.1...R..| 00000410: 41 24 B2 22 87 22 A7 36 30 00 36 0C 55 00 8B 41 |A$.".".60.6.U..A| 00000420: 24 B2 22 88 22 A7 8D 36 30 30 30 30 3A 8D 32 31 |$."."..60000:.21| 00000430: 30 30 3A 89 36 30 00 5D 0C 5A 00 9E 38 32 38 2C |00:.60.].Z..828,| 00000440: 32 32 35 32 38 2C 49 4D 24 28 52 49 29 3A 44 49 |22528,IM$(RI):DI| 00000450: B2 52 49 3A 8D 34 30 30 30 3A 89 36 30 00 63 0C |.RI:.4000:.60.c.| 00000460: DE 03 90 00 69 0C E7 03 3A 00 8F 0C E8 03 9F 33 |....i...:......3| 00000470: 2C 38 2C 33 2C 22 50 53 2E 49 4D 41 47 45 2E 4E |,8,3,"PS.IMAGE.N| 00000480: 41 4D 45 53 22 3A 43 4F B2 2E 3A 4E 50 B2 31 00 |AMES":CO..:NP.1.| 00000490: AE 0C ED 03 84 33 2C 4E 49 3A 8F 20 20 20 4E 55 |.....3,NI:. NU| 000004A0: 4D 42 45 52 20 4F 46 20 49 4D 41 47 45 53 00 D2 |MBER OF IMAGES..| 000004B0: 0C F2 03 86 20 49 4D 24 28 4E 49 AA 31 29 2C 42 |.... IM$(NI.1),B| 000004C0: 59 24 28 4E 49 AA 31 29 2C 4D 45 24 28 4E 49 AA |Y$(NI.1),ME$(NI.| 000004D0: 31 29 00 DE 0C FC 03 81 41 B2 31 A4 4E 49 00 FE |1)......A.1.NI..| 000004E0: 0C 01 04 8B 42 59 24 28 41 29 B2 22 2A 22 A7 42 |....BY$(A)."*".B| 000004F0: 59 24 28 41 29 B2 42 59 24 28 41 AB 31 29 00 29 |Y$(A).BY$(A.1).)| 00000500: 0D 06 04 84 33 2C 49 4D 24 28 41 29 2C 42 59 24 |....3,IM$(A),BY$| 00000510: 28 41 29 3A 4D 45 24 28 41 29 B2 49 4D 24 28 41 |(A):ME$(A).IM$(A| 00000520: 29 3A 43 4F B2 43 4F AA 31 00 49 0D 10 04 8B 42 |):CO.CO.1.I....B| 00000530: 59 24 28 41 29 B2 22 2A 22 A7 42 59 24 28 41 29 |Y$(A)."*".BY$(A)| 00000540: B2 42 59 24 28 41 AB 31 29 00 71 0D 1A 04 4E 49 |.BY$(A.1).q...NI| 00000550: 28 4E 50 29 B2 4E 49 28 4E 50 29 AA 31 3A 8B 43 |(NP).NI(NP).1:.C| 00000560: 4F B2 32 38 A7 43 4F B2 2E 3A 4E 50 B2 4E 50 AA |O.28.CO..:NP.NP.| 00000570: 31 00 A2 0D 24 04 42 B2 C3 28 4D 45 24 28 41 29 |1...$.B..(ME$(A)| 00000580: 29 3A 8B 42 B3 B1 31 36 A7 4D 45 24 28 41 29 B2 |):.B..16.ME$(A).| 00000590: 4D 45 24 28 41 29 AA C8 28 53 50 24 2C 31 36 AB |ME$(A)..(SP$,16.| 000005A0: 42 29 00 C5 0D 2E 04 82 3A A0 33 3A 8B 28 4E 50 |B)......:.3:.(NP| 000005B0: AD 32 38 29 B2 B5 28 4E 50 AD 32 38 29 A7 4E 50 |.28)..(NP.28).NP| 000005C0: B2 4E 50 AB 31 00 E3 0D 30 04 4F 44 B2 2E 3A 8B |.NP.1...0.OD..:.| 000005D0: 28 4E 49 AD 32 29 B2 B5 28 4E 49 AD 32 29 A7 31 |(NI.2)..(NI.2).1| 000005E0: 30 38 30 00 20 0E 32 04 4E 49 28 4E 50 29 B2 4E |080. .2.NI(NP).N| 000005F0: 49 28 4E 50 29 AA 31 3A 4E 49 B2 4E 49 AA 31 3A |I(NP).1:NI.NI.1:| 00000600: 4D 45 24 28 4E 49 29 B2 22 1C 2D 4E 4F 54 20 53 |ME$(NI).".-NOT S| 00000610: 45 4C 45 43 54 41 42 4C 45 2D 22 3A 4F 44 B2 31 |ELECTABLE-":OD.1| 00000620: 00 26 0E 38 04 8E 00 59 0E DC 05 54 50 24 B2 22 |.&.8...Y...TP$."| 00000630: D5 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 C0 C0 C9 22 00 8C 0E E6 05 53 49 |........".....SI| 00000660: 24 B2 22 DD 20 20 20 20 20 20 20 20 20 20 20 20 |$.". | 00000670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000680: 20 20 20 20 20 20 20 20 20 20 DD 22 00 BF 0E F0 | ."....| 00000690: 05 44 49 24 B2 22 AB C0 C0 C0 C0 C0 C0 C0 C0 C0 |.DI$."..........| 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 C0 C0 C0 B3 22 00 |..............".| 000006C0: F2 0E FA 05 42 4F 24 B2 22 CA C0 C0 C0 C0 C0 C0 |....BO$.".......| 000006D0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 000006E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 000006F0: CB 22 00 28 0F 04 06 42 54 24 B2 22 CA C0 C0 C0 |.".(...BT$."....| 00000700: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000710: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000720: C0 C0 CB 9D 94 C0 13 22 00 43 0F 0E 06 53 50 24 |.......".C...SP$| 00000730: B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." | 00000740: 20 20 22 00 64 0F 18 06 43 53 B2 31 20 20 20 20 | ".d...CS.1 | 00000750: 3A 8F 20 43 55 52 52 45 4E 54 20 53 45 4C 45 43 |:. CURRENT SELEC| 00000760: 54 49 4F 4E 00 83 0F 22 06 4A 4F B2 35 36 33 32 |TION...".JO.5632| 00000770: 30 3A 8F 20 4A 4F 59 53 54 49 43 4B 20 50 4F 52 |0:. JOYSTICK POR| 00000780: 54 20 32 00 9F 0F 2C 06 43 50 B2 31 20 20 20 20 |T 2...,.CP.1 | 00000790: 3A 8F 20 43 55 52 52 45 4E 54 20 50 41 47 45 00 |:. CURRENT PAGE.| 000007A0: A5 0F C6 07 8E 00 AB 0F CF 07 3A 00 C3 0F D0 07 |..........:.....| 000007B0: 99 22 93 99 92 22 54 50 24 53 49 24 53 49 24 44 |."..."TP$SI$SI$D| 000007C0: 49 24 3B 00 D7 0F DA 07 81 41 B2 31 A4 31 34 3A |I$;......A.1.14:| 000007D0: 99 53 49 24 3B 3A 82 00 F3 0F E4 07 99 44 49 24 |.SI$;:.......DI$| 000007E0: 53 49 24 53 49 24 53 49 24 53 49 24 53 49 24 42 |SI$SI$SI$SI$SI$B| 000007F0: 54 24 3B 00 10 10 EE 07 81 41 B2 32 31 37 A4 32 |T$;......A.217.2| 00000800: 34 32 3A 97 41 2C C2 28 41 29 B0 31 32 38 3A 82 |42:.A,.(A).128:.| 00000810: 00 39 10 F8 07 99 22 13 11 1D 92 20 20 20 20 20 |.9....".... | 00000820: 20 20 20 9E 50 52 49 4E 54 20 53 48 4F 50 20 56 | .PRINT SHOP V| 00000830: 49 45 57 45 52 20 56 32 22 00 69 10 02 08 99 22 |IEWER V2".i...."| 00000840: 1D 96 42 59 20 41 2E 20 47 41 52 44 4E 45 52 2C |..BY A. GARDNER,| 00000850: 20 4A 2E 20 57 45 49 4C 45 52 2C 20 26 20 4D 2E | J. WEILER, & M.| 00000860: 20 4D 41 59 4E 41 52 44 22 00 73 10 0C 08 99 22 | MAYNARD".s...."| 00000870: 11 22 3B 00 95 10 16 08 4D 49 B2 B5 28 4E 49 28 |.";.....MI..(NI(| 00000880: 43 50 29 AD 32 29 3A 8F 20 4D 49 44 44 4C 45 20 |CP).2):. MIDDLE | 00000890: 49 4D 41 47 45 00 B0 10 20 08 8B 28 4E 50 B1 31 |IMAGE... ..(NP.1| 000008A0: 29 AF 28 43 50 B3 B1 4E 50 29 A7 4D 49 B2 31 34 |).(CP..NP).MI.14| 000008B0: 00 FC 10 25 08 53 49 B2 28 43 50 AB 31 29 AC 32 |...%.SI.(CP.1).2| 000008C0: 38 3A 8F 20 53 54 41 52 54 49 4E 47 20 49 4D 41 |8:. STARTING IMA| 000008D0: 47 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |GE | 000008E0: 20 20 20 20 20 20 20 20 20 20 20 20 46 4F 52 20 | FOR | 000008F0: 43 55 52 52 45 4E 54 20 50 41 47 45 00 35 11 2A |CURRENT PAGE.5.*| 00000900: 08 81 41 B2 53 49 AA 31 A4 53 49 AA 4D 49 3A 99 |..A.SI.1.SI.MI:.| 00000910: A3 31 29 22 1E 5D 9A 22 4D 45 24 28 41 29 22 1E |.1)".]."ME$(A)".| 00000920: 5B 20 20 5D 9A 22 4D 45 24 28 41 AA 4D 49 29 22 |[ ]."ME$(A.MI)"| 00000930: 1E 5B 22 3A 82 00 4B 11 2D 08 8B 53 49 AA 31 34 |.[":..K.-..SI.14| 00000940: B2 53 49 AA 4D 49 A7 32 31 30 30 00 8E 11 30 08 |.SI.MI.2100...0.| 00000950: 81 41 B2 53 49 AA 31 33 A4 53 49 AA 4D 49 A9 AB |.A.SI.13.SI.MI..| 00000960: 31 3A 99 22 1D 20 20 20 20 20 20 20 20 20 20 20 |1:.". | 00000970: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000980: 20 20 20 20 20 20 20 20 20 20 20 22 3A 82 00 C0 | ":...| 00000990: 11 34 08 99 22 13 11 11 11 11 11 11 11 11 11 11 |.4.."...........| 000009A0: 11 11 11 11 11 11 11 11 11 1D 9A 4E 55 4D 42 45 |...........NUMBE| 000009B0: 52 20 4F 46 20 50 41 47 45 53 3A 05 22 4E 50 3B |R OF PAGES:."NP;| 000009C0: 00 DD 11 3E 08 99 A3 32 33 29 22 9A 43 55 52 52 |...>...23)".CURR| 000009D0: 45 4E 54 20 50 41 47 45 3A 05 22 43 50 00 F6 11 |ENT PAGE:."CP...| 000009E0: 48 08 99 22 1D 05 46 31 20 9A 2D 20 41 55 54 4F |H.."..F1 .- AUTO| 000009F0: 20 4D 4F 44 45 22 00 27 12 52 08 99 22 1D 05 46 | MODE".'.R.."..F| 00000A00: 33 20 9A 2D 20 51 55 49 43 4B 20 4C 4F 4F 4B 20 |3 .- QUICK LOOK | 00000A10: 20 20 20 20 20 20 9E 43 52 53 52 20 4B 45 59 53 | .CRSR KEYS| 00000A20: 20 4D 4F 56 45 20 22 00 55 12 5C 08 99 22 1D 05 | MOVE ".U.\.."..| 00000A30: 46 35 20 9A 2D 20 4E 45 58 54 20 50 41 47 45 20 |F5 .- NEXT PAGE | 00000A40: 20 20 20 20 20 20 20 20 20 9E 12 48 49 47 48 4C | ..HIGHL| 00000A50: 49 47 48 54 22 00 88 12 66 08 99 22 1D 05 46 37 |IGHT"...f.."..F7| 00000A60: 20 9A 2D 20 51 55 49 54 20 20 20 20 20 20 20 20 | .- QUIT | 00000A70: 20 20 20 9E 52 45 54 55 52 4E 20 53 45 4C 45 43 | .RETURN SELEC| 00000A80: 54 53 20 49 54 2E 13 22 00 8E 12 70 08 8E 00 A4 |TS IT.."...p....| 00000A90: 12 C4 09 42 B2 43 53 3A 8B 42 B1 4D 49 A7 42 B2 |...B.CS:.B.MI.B.| 00000AA0: 42 AB 4D 49 00 BC 12 CE 09 99 22 13 11 11 11 22 |B.MI......"...."| 00000AB0: 3B 3A 81 41 B2 31 A4 42 3A 99 3A 82 00 DA 12 D8 |;:.A.1.B:.:.....| 00000AC0: 09 99 A3 32 29 3B 3A 8B 43 53 B1 4D 49 A7 99 A3 |...2);:.CS.MI...| 00000AD0: 31 39 29 22 05 2D 3E 1D 22 3B 00 F6 12 E2 09 99 |19)".->.";......| 00000AE0: 22 12 05 22 4D 45 24 28 53 49 AA 43 53 29 3B 3A |".."ME$(SI.CS);:| 00000AF0: 97 31 39 38 2C 2E 00 0D 13 E7 09 8B 43 53 B3 4D |.198,.......CS.M| 00000B00: 49 AA 31 A7 99 22 1D 92 05 3C 2D 22 3B 00 27 13 |I.1.."...<-";.'.| 00000B10: EC 09 A1 41 24 3A 8D 32 37 30 30 3A 8B 41 24 B2 |...A$:.2700:.A$.| 00000B20: 22 22 A7 32 35 34 30 00 5D 13 F1 09 8B 28 41 24 |"".2540.]....(A$| 00000B30: B2 C7 28 31 33 29 29 B0 28 41 24 B2 22 85 22 29 |..(13)).(A$.".")| 00000B40: B0 28 41 24 B2 22 86 22 29 B0 28 41 24 B2 22 87 |.(A$.".").(A$.".| 00000B50: 22 29 B0 28 41 24 B2 22 88 22 29 A7 8E 00 73 13 |").(A$.".")...s.| 00000B60: F6 09 42 B2 43 53 3A 8B 42 B1 4D 49 A7 42 B2 42 |..B.CS:.B.MI.B.B| 00000B70: AB 4D 49 00 8B 13 00 0A 99 22 13 11 11 11 22 3B |.MI......"....";| 00000B80: 3A 81 41 B2 31 A4 42 3A 99 3A 82 00 A9 13 0A 0A |:.A.1.B:.:......| 00000B90: 99 A3 32 29 3B 3A 8B 43 53 B1 4D 49 A7 99 A3 31 |..2);:.CS.MI...1| 00000BA0: 39 29 22 1E 20 20 1D 22 3B 00 BD 13 14 0A 99 22 |9)". .";......"| 00000BB0: 9A 22 4D 45 24 28 53 49 AA 43 53 29 3B 00 D3 13 |."ME$(SI.CS);...| 00000BC0: 19 0A 8B 43 53 B3 4D 49 AA 31 A7 99 22 1D 1E 20 |...CS.MI.1..".. | 00000BD0: 20 22 3B 00 02 14 1E 0A 8B 41 24 B2 22 11 22 A7 | ";......A$.".".| 00000BE0: 43 53 B2 43 53 AA 31 3A 41 44 B2 AB 31 3A 8B 43 |CS.CS.1:AD..1:.C| 00000BF0: 53 B1 4E 49 28 43 50 29 A7 43 53 B2 4E 49 28 43 |S.NI(CP).CS.NI(C| 00000C00: 50 29 00 26 14 28 0A 8B 41 24 B2 22 91 22 A7 43 |P).&.(..A$.".".C| 00000C10: 53 B2 43 53 AB 31 3A 41 44 B2 31 3A 8B 43 53 B3 |S.CS.1:AD.1:.CS.| 00000C20: 31 A7 43 53 B2 31 00 58 14 32 0A 8B 41 24 B2 22 |1.CS.1.X.2..A$."| 00000C30: 1D 22 A7 43 53 B2 43 53 AA 4D 49 3A 41 44 B2 AB |.".CS.CS.MI:AD..| 00000C40: 4D 49 3A 8B 43 53 B1 4E 49 28 43 50 29 A7 43 53 |MI:.CS.NI(CP).CS| 00000C50: B2 43 53 AB 4D 49 AC 32 00 84 14 3C 0A 8B 41 24 |.CS.MI.2...<..A$| 00000C60: B2 22 9D 22 A7 43 53 B2 43 53 AB 4D 49 3A 41 44 |.".".CS.CS.MI:AD| 00000C70: B2 4D 49 3A 8B 43 53 B3 31 A7 43 53 B2 43 53 AA |.MI:.CS.1.CS.CS.| 00000C80: 4D 49 AC 32 00 A8 14 41 0A 8B 28 41 44 B2 4D 49 |MI.2...A..(AD.MI| 00000C90: 29 AF 28 43 53 B2 4E 49 29 A7 43 53 B2 43 53 AB |).(CS.NI).CS.CS.| 00000CA0: 4D 49 3A 89 32 35 30 30 00 C3 14 46 0A 8B 28 4F |MI:.2500...F..(O| 00000CB0: 44 29 AF 28 4E 49 B2 43 53 29 A7 43 53 B2 43 53 |D).(NI.CS).CS.CS| 00000CC0: AA 41 44 00 CD 14 50 0A 89 32 35 30 30 00 EA 14 |.AD...P..2500...| 00000CD0: 8C 0A 8B 28 C2 28 4A 4F 29 AF 31 36 29 B2 2E A7 |...(.(JO).16)...| 00000CE0: 41 24 B2 C7 28 31 33 29 3A 8E 00 03 15 96 0A 41 |A$..(13):......A| 00000CF0: B2 28 C2 28 4A 4F 29 AF 31 35 29 3A 8B 41 B2 31 |.(.(JO).15):.A.1| 00000D00: 35 A7 8E 00 14 15 A0 0A 8B 41 B2 31 34 A7 41 24 |5........A.14.A$| 00000D10: B2 22 91 22 00 25 15 AA 0A 8B 41 B2 30 37 A7 41 |.".".%....A.07.A| 00000D20: 24 B2 22 1D 22 00 36 15 B4 0A 8B 41 B2 31 33 A7 |$.".".6....A.13.| 00000D30: 41 24 B2 22 11 22 00 47 15 BE 0A 8B 41 B2 31 31 |A$.".".G....A.11| 00000D40: A7 41 24 B2 22 9D 22 00 4D 15 C8 0A 8E 00 98 15 |.A$.".".M.......| 00000D50: AE 0B 8F 20 44 49 53 50 4C 41 59 20 54 48 45 20 |... DISPLAY THE | 00000D60: 49 4D 41 47 45 53 20 53 54 41 52 54 49 4E 47 20 |IMAGES STARTING | 00000D70: 41 54 20 20 20 20 20 20 20 20 20 20 52 49 20 28 |AT RI (| 00000D80: 57 48 49 43 48 20 49 53 20 57 48 45 52 45 20 54 |WHICH IS WHERE T| 00000D90: 48 45 20 48 49 47 48 2D 00 E1 15 AF 0B 8F 20 4C |HE HIGH-...... L| 00000DA0: 49 47 48 54 20 49 53 20 43 55 52 52 45 4E 54 4C |IGHT IS CURRENTL| 00000DB0: 59 20 41 54 29 20 41 4E 44 20 20 20 20 20 20 20 |Y AT) AND | 00000DC0: 20 20 20 20 20 20 20 45 4E 44 49 4E 47 20 57 49 | ENDING WI| 00000DD0: 54 48 20 54 48 45 20 4C 41 53 54 20 49 4D 41 47 |TH THE LAST IMAG| 00000DE0: 45 00 F4 15 B8 0B 81 44 49 B2 52 49 A4 4E 49 3A |E......DI.RI.NI:| 00000DF0: 54 46 B2 31 00 0C 16 BD 0B 8B 20 49 4D 24 28 44 |TF.1...... IM$(D| 00000E00: 49 29 B2 22 22 20 A7 20 33 30 33 30 00 23 16 C2 |I)."" . 3030.#..| 00000E10: 0B 9E 38 32 38 2C 32 32 35 32 38 2C 49 4D 24 28 |..828,22528,IM$(| 00000E20: 44 49 29 00 3D 16 C4 0B 8D 34 30 30 30 3A 8F 20 |DI).=....4000:. | 00000E30: 50 4C 4F 54 20 50 53 20 49 4D 41 47 45 00 6B 16 |PLOT PS IMAGE.k.| 00000E40: CC 0B 97 32 34 39 2C 32 32 34 3A 97 32 35 30 2C |...249,224:.250,| 00000E50: 32 30 34 3A 9E 35 30 37 36 35 3A 8B 41 24 B2 22 |204:.50765:.A$."| 00000E60: 51 22 B0 41 24 B2 22 D1 22 A7 8E 00 AA 16 D6 0B |Q".A$.".".......| 00000E70: 46 4C B2 31 3A 82 3A 8B 52 49 B2 31 A7 8E 3A 8F |FL.1:.:.RI.1..:.| 00000E80: 20 49 46 20 20 20 20 20 20 20 52 49 3D 31 20 57 | IF RI=1 W| 00000E90: 45 20 53 54 41 52 54 45 44 20 41 54 20 54 48 45 |E STARTED AT THE| 00000EA0: 20 42 45 47 49 4E 4E 49 4E 47 00 F2 16 DB 0B 8F | BEGINNING......| 00000EB0: 20 44 49 53 50 4C 41 59 20 54 48 45 20 49 4D 41 | DISPLAY THE IMA| 00000EC0: 47 45 53 20 53 54 41 52 54 49 4E 47 20 20 20 20 |GES STARTING | 00000ED0: 20 20 20 20 20 20 20 20 20 41 54 20 31 20 41 4E | AT 1 AN| 00000EE0: 44 20 45 4E 44 49 4E 47 20 41 54 20 52 49 20 2D |D ENDING AT RI -| 00000EF0: 20 31 00 06 17 E0 0B 81 44 49 B2 31 A4 52 49 AB | 1......DI.1.RI.| 00000F00: 31 3A 54 46 B2 31 00 1E 17 E5 0B 8B 20 49 4D 24 |1:TF.1...... IM$| 00000F10: 28 44 49 29 B2 22 22 20 A7 20 33 30 38 30 00 35 |(DI)."" . 3080.5| 00000F20: 17 EA 0B 9E 38 32 38 2C 32 32 35 32 38 2C 49 4D |....828,22528,IM| 00000F30: 24 28 44 49 29 00 4F 17 F4 0B 8D 34 30 30 30 3A |$(DI).O....4000:| 00000F40: 8F 20 50 4C 4F 54 20 50 53 20 49 4D 41 47 45 00 |. PLOT PS IMAGE.| 00000F50: 7D 17 FE 0B 97 32 34 39 2C 32 32 34 3A 97 32 35 |}....249,224:.25| 00000F60: 30 2C 32 30 34 3A 9E 35 30 37 36 35 3A 8B 41 24 |0,204:.50765:.A$| 00000F70: B2 22 51 22 B0 41 24 B2 22 D1 22 A7 8E 00 8A 17 |."Q".A$.".".....| 00000F80: 08 0C 46 4C B2 31 3A 82 3A 8E 00 B4 17 A0 0F 8B |..FL.1:.:.......| 00000F90: 46 4C B2 2E A7 97 32 34 39 2C 32 32 34 3A 97 32 |FL....249,224:.2| 00000FA0: 35 30 2C 32 30 34 3A 9E 35 31 34 35 39 3A 9E 35 |50,204:.51459:.5| 00000FB0: 30 37 36 35 00 EB 17 A7 0F 4E 24 B2 49 4D 24 28 |0765.....N$.IM$(| 00000FC0: 44 49 29 3A 97 35 33 32 37 30 2C 32 30 30 3A 9E |DI):.53270,200:.| 00000FD0: 35 30 37 35 39 2C 4E 24 2C 28 32 34 30 AB C3 28 |50759,N$,(240..(| 00000FE0: 4E 24 29 AC 38 AD 32 29 2C 37 32 00 10 18 A8 0F |N$).8.2),72.....| 00000FF0: 4E 24 B2 22 43 52 45 41 54 45 44 20 42 59 22 3A |N$."CREATED BY":| 00001000: 9E 35 30 37 35 39 2C 4E 24 2C 32 30 30 2C 38 38 |.50759,N$,200,88| 00001010: 00 46 18 A9 0F 4E 24 B2 22 53 41 4E 44 52 41 20 |.F...N$."SANDRA | 00001020: 47 45 52 48 41 52 54 22 3A 9E 35 30 37 35 39 2C |GERHART":.50759,| 00001030: 4E 24 2C 28 32 35 30 AB C3 28 4E 24 29 AC 38 AD |N$,(250..(N$).8.| 00001040: 32 29 2C 31 30 34 00 71 18 AA 0F 4E 24 B2 22 41 |2),104.q...N$."A| 00001050: 4E 44 22 3A 9E 35 30 37 35 39 2C 4E 24 2C 28 32 |ND":.50759,N$,(2| 00001060: 35 30 AB C3 28 4E 24 29 AC 38 AD 32 29 2C 31 31 |50..(N$).8.2),11| 00001070: 32 00 A5 18 AB 0F 4E 24 B2 22 4B 49 52 49 20 47 |2.....N$."KIRI G| 00001080: 45 52 48 41 52 54 22 3A 9E 35 30 37 35 39 2C 4E |ERHART":.50759,N| 00001090: 24 2C 28 32 35 30 AB C3 28 4E 24 29 AC 38 AD 32 |$,(250..(N$).8.2| 000010A0: 29 2C 31 32 30 00 AB 18 AC 0F 3A 00 BA 18 AF 0F |),120.....:.....| 000010B0: 97 35 33 32 37 30 2C 32 30 30 00 D9 18 B4 0F 97 |.53270,200......| 000010C0: 33 33 30 35 37 2C 38 3A 97 33 33 30 35 38 2C 32 |33057,8:.33058,2| 000010D0: 31 32 3A 9E 33 32 37 37 36 00 F6 18 B9 0F 97 33 |12:.32776......3| 000010E0: 33 30 35 37 2C 38 3A 97 33 33 30 35 38 2C 31 3A |3057,8:.33058,1:| 000010F0: 9E 33 32 37 36 38 00 FC 18 BE 0F 3A 00 40 19 DC |.32768.....:.@..| 00001100: 0F 9E 35 30 37 35 39 2C 22 50 52 45 53 53 20 41 |..50759,"PRESS A| 00001110: 20 4B 45 59 22 2C 31 31 32 2C 31 37 32 3A 8B 54 | KEY",112,172:.T| 00001120: 46 B2 31 A7 9E 35 30 37 35 39 2C 22 5B 51 20 54 |F.1..50759,"[Q T| 00001130: 4F 20 51 55 49 54 5D 22 2C 31 31 32 2C 31 38 30 |O QUIT]",112,180| 00001140: 00 4B 19 DE 0F 97 31 39 38 2C 2E 00 65 19 E1 0F |.K....198,..e...| 00001150: A1 41 24 3A 8D 32 37 30 30 3A 8B 41 24 B2 22 22 |.A$:.2700:.A$.""| 00001160: A7 34 30 36 35 00 76 19 E6 0F 8B 54 46 B2 2E A7 |.4065.v....TF...| 00001170: 9E 35 31 34 35 39 00 7C 19 F0 0F 8E 00 BA 19 88 |.51459.|........| 00001180: 13 50 58 B2 2E 3A 50 59 B2 2E 3A 54 46 B2 31 3A |.PX..:PY..:TF.1:| 00001190: 97 32 34 39 2C 32 32 34 3A 97 32 35 30 2C 32 30 |.249,224:.250,20| 000011A0: 34 3A 9E 35 31 34 35 39 3A 9E 35 30 37 36 35 3A |4:.51459:.50765:| 000011B0: 97 35 33 32 37 30 2C 32 30 30 00 C4 19 92 13 8D |.53270,200......| 000011C0: 37 30 30 30 00 D0 19 BA 13 81 58 B2 31 A4 4E 49 |7000......X.1.NI| 000011D0: 00 E7 19 BF 13 8B 20 49 4D 24 28 58 29 B2 22 22 |...... IM$(X).""| 000011E0: 20 A7 20 35 31 30 30 00 FE 19 C1 13 9E 20 38 32 | . 5100...... 82| 000011F0: 38 2C 32 32 35 32 38 2C 49 4D 24 28 58 29 00 28 |8,22528,IM$(X).(| 00001200: 1A C4 13 97 35 33 32 37 30 2C 32 30 30 3A 97 33 |....53270,200:.3| 00001210: 33 30 35 37 2C 50 59 3A 97 33 33 30 35 38 2C 50 |3057,PY:.33058,P| 00001220: 58 3A 9E 33 32 37 37 36 00 4B 1A CE 13 50 58 B2 |X:.32776.K...PX.| 00001230: 50 58 AA 34 35 3A 8B 50 58 B1 32 32 34 A7 50 58 |PX.45:.PX.224.PX| 00001240: B2 2E 3A 50 59 B2 50 59 AA 34 36 00 64 1A D8 13 |..:PY.PY.46.d...| 00001250: A1 41 24 3A 8B 41 24 B2 22 51 22 B0 41 24 B2 22 |.A$:.A$."Q".A$."| 00001260: D1 22 A7 8E 00 89 1A E2 13 46 4C B2 2E 3A 8B 58 |.".......FL..:.X| 00001270: AD 32 30 B2 B5 28 58 AD 32 30 29 A7 8D 36 30 30 |.20..(X.20)..600| 00001280: 30 3A 8B 46 4C B2 31 A7 8E 00 B0 1A EC 13 82 3A |0:.FL.1........:| 00001290: 46 4C B2 31 3A 9E 54 45 2C 22 5B 50 52 45 53 53 |FL.1:.TE,"[PRESS| 000012A0: 20 41 20 4B 45 59 5D 22 2C 31 31 38 2C 31 38 38 | A KEY]",118,188| 000012B0: 00 C4 1A F6 13 97 31 39 38 2C 2E 3A 92 31 39 38 |......198,.:.198| 000012C0: 2C 31 3A 8E 00 CA 1A 00 14 3A 00 EA 1A 70 17 9E |,1:......:...p..| 000012D0: 54 45 2C 22 5B 50 52 45 53 53 20 41 20 4B 45 59 |TE,"[PRESS A KEY| 000012E0: 5D 22 2C 31 31 38 2C 31 38 38 00 1D 1B 7A 17 97 |]",118,188...z..| 000012F0: 31 39 38 2C 2E 3A 92 31 39 38 2C 31 3A A1 41 24 |198,.:.198,1:.A$| 00001300: 3A 97 31 39 38 2C 2E 3A 8B 41 24 B2 22 51 22 B0 |:.198,.:.A$."Q".| 00001310: 41 24 B2 22 D1 22 A7 46 4C B2 31 3A 8E 00 3A 1B |A$.".".FL.1:..:.| 00001320: 84 17 97 32 34 39 2C 32 32 34 3A 97 32 35 30 2C |...249,224:.250,| 00001330: 32 30 34 3A 9E 35 30 37 36 35 00 50 1B 8E 17 8D |204:.50765.P....| 00001340: 37 30 30 30 3A 50 58 B2 2E 3A 50 59 B2 2E 3A 8E |7000:PX..:PY..:.| 00001350: 00 87 1B 58 1B 54 45 B2 35 30 37 35 39 3A 9E 54 |...X.TE.50759:.T| 00001360: 45 2C 22 50 52 49 4E 54 20 53 48 4F 50 22 2C 32 |E,"PRINT SHOP",2| 00001370: 34 34 2C 34 30 3A 9E 54 45 2C 22 49 53 20 41 22 |44,40:.TE,"IS A"| 00001380: 2C 32 36 38 2C 34 38 00 A2 1B 62 1B 9E 54 45 2C |,268,48...b..TE,| 00001390: 22 54 52 41 44 45 4D 41 52 4B 22 2C 32 34 34 2C |"TRADEMARK",244,| 000013A0: 35 36 00 CE 1B 6C 1B 9E 54 45 2C 22 4F 46 22 2C |56...l..TE,"OF",| 000013B0: 32 37 36 2C 36 34 3A 9E 54 45 2C 22 42 52 4F 44 |276,64:.TE,"BROD| 000013C0: 45 52 42 55 4E 44 22 2C 32 34 34 2C 37 32 00 00 |ERBUND",244,72..| 000013D0: 1C 76 1B 9E 54 45 2C 22 53 4F 46 54 57 41 52 45 |.v..TE,"SOFTWARE| 000013E0: 22 2C 32 35 32 2C 38 30 3A 9E 54 45 2C 22 51 20 |",252,80:.TE,"Q | 000013F0: 54 4F 20 51 55 49 54 22 2C 32 34 34 2C 31 31 30 |TO QUIT",244,110| 00001400: 00 06 1C 80 1B 8E 00 24 1C 60 EA 99 22 13 11 11 |.......$.`.."...| 00001410: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00001420: 11 92 22 3B 00 5C 1C 6A EA 81 41 B2 31 A4 32 3A |..";.\.j..A.1.2:| 00001430: 99 22 1D 20 20 20 20 20 20 20 20 20 20 20 20 20 |.". | 00001440: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001450: 20 20 20 20 20 20 20 20 20 22 3A 82 00 96 1C 74 | ":....t| 00001460: EA 99 22 1D 9A 20 41 52 45 20 59 4F 55 20 53 55 |..".. ARE YOU SU| 00001470: 52 45 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 51 |RE YOU WANT TO Q| 00001480: 55 49 54 3F 20 28 05 59 9A 2F 05 4E 9A 29 22 3A |UIT? (.Y./.N.)":| 00001490: 97 31 39 38 2C 2E 00 CE 1C 7E EA 81 41 B2 31 A4 |.198,....~..A.1.| 000014A0: 32 3A 99 22 1D 20 20 20 20 20 20 20 20 20 20 20 |2:.". | 000014B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000014C0: 20 20 20 20 20 20 20 20 20 20 20 22 3A 82 00 EE | ":...| 000014D0: 1C 88 EA 41 B2 C2 28 32 30 33 29 3A 8B 41 B3 B1 |...A..(203):.A..| 000014E0: 32 35 AF 41 B3 B1 33 39 A7 36 30 30 34 30 00 FA |25.A..39.60040..| 000014F0: 1C 92 EA 8B 41 B2 33 39 A7 8E 00 33 1D 9C EA 9F |....A.39...3....| 00001500: 31 35 2C 38 2C 31 35 2C 22 52 30 3A 48 45 4C 4C |15,8,15,"R0:HELL| 00001510: 4F 20 43 4F 4E 4E 45 43 54 3D 48 45 4C 4C 4F 20 |O CONNECT=HELLO | 00001520: 43 4F 4E 4E 45 43 54 22 3A 84 31 35 2C 45 52 3A |CONNECT":.15,ER:| 00001530: A0 31 35 00 4E 1D A6 EA 8B 45 52 B3 B1 36 33 A7 |.15.N....ER..63.| 00001540: 99 22 13 22 3B 3A 97 31 39 38 2C 2E 3A 80 00 65 |.".";:.198,.:..e| 00001550: 1D B0 EA 93 22 48 45 4C 4C 4F 20 43 4F 4E 4E 45 |...."HELLO CONNE| 00001560: 43 54 22 2C 38 00 00 00 |CT",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......:.U.... !!!
! EXCUUUUUUSE MEEEEEE !!!!!.....:.....
.53280,2:.53281,.:.650,128.@....X....G(1
42)"............... WELCOME TO THE PR
INT SHOP VIEWER".\....X...X.1:."BLOAD.O"
,8,1.O....56,120:.:.2,1......828,50759,"
TEXT/DOT/WIPE.O"......828,51456,"UNPACKE
R".G.#..828,32768,"PS.COMBO2.O".M.'.:...
(..1500:. DEFINE STRINGS & VARS...2..100
0:. READ NAMES OF IMAGES.3.7..2000:. DIS
PLAY NAMES FOR VIEW.U.<..2500:. MOVE HIG
HLIGHT AND SELECT I
MAGES...A.RI.CS.(CP.1).28:TF..:FL.....F.
.A$."."..3000:.51459:.60.M.K..A$."."..50
00:.51459:.60...P..A$.".".CP.CP.1:.CP.NP
.CP.1...Q..A$."."..2040:.NP.1.CS.1...R..
A$.".".60.6.U..A$."."..60000:.2100:.60.]
.Z..828,22528,IM$(RI):DI.RI:.4000:.60.C.
....I...:......3,8,3,"PS.IMAGE.NAMES":CO
..:NP.1......3,NI:. NUMBER OF IMAGES.R
.... IM$(NI.1),BY$(NI.1),ME$(NI.1)......
A.1.NI......BY$(A)."*".BY$(A).BY$(A.1).)
....3,IM$(A),BY$(A):ME$(A).IM$(A):CO.CO.
1.I....BY$(A)."*".BY$(A).BY$(A.1).Q...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).E....: 3:.(NP.28)..(NP.28).NP.NP.1...
0.OD..:.(NI.2)..(NI.2).1080. .2.NI(NP).N
I(NP).1:NI.NI.1:ME$(NI).".-NOT SELECTABL
E-":OD.1.&.8...Y...TP$."U...............
.......................I".....SI$.".
."....
.DI$."..................................
......".....BO$."J......................
................K".(...BT$."J...........
..........................K....".C...SP$
." ".D...CS.1 :. CURRE
NT SELECTION...".JO.56320:. JOYSTICK POR
T 2...,.CP.1 :. CURRENT PAGE...F.....
O.:.C.P.."..."TP$SI$SI$DI$;.W.Z..A.1.14:
.SI$;:.......DI$SI$SI$SI$SI$SI$BT$;.....
.A.217.242:.A,B(A).128:..9...."....
.PRINT SHOP VIEWER V2".I...."..BY A.
GARDNER, J. WEILER, & M. MAYNARD".S...."
.";.....MI..(NI(CP).2):. MIDDLE IMAGE...
..(NP.1).(CP..NP).MI.14...%.SI.(CP.1).2
8:. STARTING IMAGE
FOR CURRENT PAGE.5.*..A.SI.1.SI.MI:.
.1)".]."ME$(A)".[ ]."ME$(A.MI)".[":..K.
-..SI.14.SI.MI.2100...0..A.SI.13.SI.MI..
1:.".
":....4.."......................NUMBE
R OF PAGES:."NP;...>...23)".CURRENT PAGE
:."CP...H.."..F1 .- AUTO MODE".'.R.."..F
3 .- QUICK LOOK .CRSR KEYS MOVE ".
U.\.."..F5 .- NEXT PAGE ..HIGHL
IGHT"...F.."..F7 .- QUIT .RETU
RN SELECTS IT.."...P.....D.B.CS:.B.MI.B.
B.MI...N.."....";:.A.1.B:.:..Z.X...2);:.
CS.MI...19)".->.";......".."ME$(SI.CS);:
.198,.......CS.MI.1.."...<-";.'....A$:.2
700:.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);.S....CS.MI.1..".. ";......A$.".".
CS.CS.1:AD..1:.CS.NI(CP).CS.NI(CP).&.(..
A$.".".CS.CS.1:AD.1:.CS.1.CS.1.X.2..A$."
.".CS.CS.MI:AD..MI:.CS.NI(CP).CS.CS.MI.2
...<..A$.".".CS.CS.MI:AD.MI:.CS.1.CS.CS.
MI.2...A..(AD.MI).(CS.NI).CS.CS.MI:.2500
.C.F..(OD).(NI.CS).CS.CS.AD.M.P..2500...
...(B(JO).16)...A$.G(13):......A.(B(JO).
15):.A.15..... ..A.14.A$.".".%....A.07.A
$.".".6....A.13.A$.".".G....A.11.A$.".".
M.H........ DISPLAY THE IMAGES STARTING
AT RI (WHICH IS WHERE THE HIGH-
...... LIGHT IS CURRENTLY AT) AND
ENDING WITH THE LAST IMAGE......D
I.RI.NI:TF.1...... IM$(DI)."" . 3030.#.B
..828,22528,IM$(DI).=.D..4000:. PLOT PS
IMAGE.K.L..249,224:.250,204:.50765:.A$."
Q".A$."Q".....V.FL.1:.:.RI.1..:. IF
RI=1 WE STARTED AT THE BEGINNING......
DISPLAY THE IMAGES STARTING
AT 1 AND ENDING AT RI - 1......DI.1.RI.
1:TF.1...... IM$(DI)."" . 3080.5....828,
22528,IM$(DI).O....4000:. PLOT PS IMAGE.
}....249,224:.250,204:.50765:.A$."Q".A$.
"Q".......FL.1:.:.... ..FL....249,224:.2
50,204:.51459:.50765.....N$.IM$(DI):.532
70,200:.50759,N$,(240.C(N$).8.2),72.....
N$."CREATED BY":.50759,N$,200,88.F...N$.
"SANDRA GERHART":.50759,N$,(250.C(N$).8.
2),104.Q...N$."AND":.50759,N$,(250.C(N$)
.8.2),112.....N$."KIRI GERHART":.50759,N
$,(250.C(N$).8.2),120.....:......53270,2
00.Y....33057,8:.33058,212:.32776......3
3057,8:.33058,1:.32768.....:.@....50759,
"PRESS A KEY",112,172:.TF.1..50759,"[Q T
O QUIT]",112,180.K....198,..E....A$:.270
0:.A$."".4065.V....TF....51459.|........
.PX..:PY..:TF.1:.249,224:.250,204:.51459
:.50765:.53270,200.D....7000.P....X.1.NI
...... IM$(X)."" . 5100...A.. 828,22528,
IM$(X).(.D..53270,200:.33057,PY:.33058,P
X:.32776.K.N.PX.PX.45:.PX.224.PX..:PY.PY
.46.D.X..A$:.A$."Q".A$."Q".......FL..:.X
.20..(X.20)..6000:.FL.1........:FL.1:.TE
,"[PRESS A KEY]",118,188.D....198,.:.198
,1:..J...:...P..TE,"[PRESS A KEY]",118,1
88...Z..198,.:.198,1:.A$:.198,.:.A$."Q".
A$."Q".FL.1:..:....249,224:.250,204:.507
65.P....7000:PX..:PY..:....X.TE.50759:.T
E,"PRINT SHOP",244,40:.TE,"IS A",268,48.
..B..TE,"TRADEMARK",244,56.N.L..TE,"OF",
276,64:.TE,"BRODERBUND",244,72...V..TE,"
SOFTWARE",252,80:.TE,"Q TO QUIT",244,110
.......$.`..".....................";.\.J
..A.1.2:.".
":....T..".. ARE YOU SURE YOU W
ANT TO QUIT? (.Y./.N.)":.198,..N.~..A.1.
2:.".
":......A.B(203):.A..25.A..39.60040..
....A.39...3....15,8,15,"R0:HELLO CONNEC
T=HELLO CONNECT":.15,ER: 15.N....ER..63.
.".";:.198,.:..E...."HELLO CONNECT",8...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL