PS ENV PRNT 2.0
FILE INFORMATION
FILENAME(S): PS ENV PRNT 2.0
FILE TYPE(S): PRG
FILE SIZE: 4.1K
FIRST SEEN: 2025-10-20 14:31:10
APPEARS ON: 2 disk(s)
FILE HASH
5bf3a8a2f88d8b1158139c12965cae726f5e6c12e245d951a561a29e186a6533
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PB DOMAIN 0019GR | PS ENV PRNT 2.0 | PRG | Treasure Chest - Klaus Der Suhler | 10 | 13 | DOWNLOAD FILE |
| PB DOMAIN 0019GR | PS ENV PRNT 2.0 | PRG | UK CD | 10 | 13 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 17 08 0A 00 8F 20 50 53 20 45 4E 56 20 50 |....... PS ENV P| 00000010: 52 4E 54 20 32 2E 30 00 4B 08 0C 00 97 31 30 32 |RNT 2.0.K....102| 00000020: 30 2C C2 28 35 33 32 38 30 29 3A 97 31 30 32 31 |0,.(53280):.1021| 00000030: 2C C2 28 35 33 32 38 31 29 3A 97 31 30 32 32 2C |,.(53281):.1022,| 00000040: C2 28 36 34 36 29 3A 89 20 32 36 00 90 08 0E 00 |.(646):. 26.....| 00000050: 4C 31 B2 28 28 38 30 AB C3 28 57 34 24 AA 56 36 |L1.((80..(W4$.V6| 00000060: 24 AA 57 35 24 AA 56 36 24 AA 57 36 24 29 29 AD |$.W5$.V6$.W6$)).| 00000070: 32 29 3A 98 34 2C A3 4C 31 29 3B 57 34 24 3B 56 |2):.4,.L1);W4$;V| 00000080: 36 24 3B 57 35 24 3B 56 36 24 3B 57 36 24 3A 8E |6$;W5$;V6$;W6$:.| 00000090: 00 A9 08 10 00 81 49 B2 31 A4 4C 3A 98 34 2C C7 |......I.1.L:.4,.| 000000A0: 28 39 36 29 3B 3A 82 3A 8E 00 C0 08 12 00 81 49 |(96);:.:.......I| 000000B0: B2 31 A4 4C 3A 98 34 2C 22 20 22 3B 3A 82 3A 8E |.1.L:.4," ";:.:.| 000000C0: 00 D8 08 14 00 81 49 B2 31 A4 35 36 3A 98 34 2C |......I.1.56:.4,| 000000D0: 56 33 24 3B 3A 82 3A 8E 00 EF 08 16 00 81 49 B2 |V3$;:.:.......I.| 000000E0: 31 A4 4A 3A 98 34 2C 56 36 24 3B 3A 82 3A 8E 00 |1.J:.4,V6$;:.:..| 000000F0: 22 09 18 00 4C B2 35 36 3A 98 34 2C 56 31 24 3B |"...L.56:.4,V1$;| 00000100: 56 34 24 3B 56 31 24 3B 56 37 24 3B 3A 8D 20 31 |V4$;V1$;V7$;:. 1| 00000110: 38 3A 98 34 2C 56 37 24 3B 56 31 24 3B 56 34 24 |8:.4,V7$;V1$;V4$| 00000120: 3A 8E 00 63 09 1A 00 56 31 24 B2 22 20 20 20 20 |:..c...V1$." | 00000130: 20 22 3A 56 32 24 B2 22 20 20 20 20 20 20 20 20 | ":V2$." | 00000140: 20 20 20 22 3A 56 33 24 B2 22 2E 22 3A 56 34 24 | ":V3$.".":V4$| 00000150: B2 C7 28 31 32 35 29 3A 56 35 24 B2 22 C0 C0 C0 |..(125):V5$."...| 00000160: C0 C0 22 00 A3 09 1C 00 56 36 24 B2 22 20 22 3A |..".....V6$." ":| 00000170: 56 37 24 B2 22 3A 22 3A 56 38 24 B2 22 CE 22 3A |V7$.":":V8$.".":| 00000180: 57 31 24 B2 22 CD 22 3A 57 32 24 B2 22 20 20 20 |W1$.".":W2$." | 00000190: 20 20 20 20 20 20 20 22 3A 57 33 24 B2 22 20 20 | ":W3$." | 000001A0: 20 20 22 00 DF 09 1E 00 57 34 24 B2 22 C3 22 3A | ".....W4$.".":| 000001B0: 57 35 24 B2 22 D5 22 3A 57 36 24 B2 22 D4 22 3A |W5$.".":W6$.".":| 000001C0: 57 37 24 B2 22 46 22 3A 57 38 24 B2 22 4F 22 3A |W7$."F":W8$."O":| 000001D0: 57 39 24 B2 22 4C 22 3A 57 30 24 B2 22 44 22 00 |W9$."L":W0$."D".| 000001E0: 0A 0A 20 00 48 44 24 B2 22 1D 1D 1D 1D 1D 1D 1D |.. .HD$.".......| 000001F0: 1D 1D 1D D0 D3 20 C5 CE D6 C5 CC CF D0 C5 20 D0 |..... ........ .| 00000200: D2 C9 CE D4 C5 D2 11 11 11 22 00 14 0A 22 00 8D |........."..."..| 00000210: 20 31 38 30 00 39 0A 24 00 99 C7 28 31 34 29 3A | 180.9.$...(14):| 00000220: 97 35 33 32 38 30 2C 35 3A 97 35 33 32 38 31 2C |.53280,5:.53281,| 00000230: 30 3A 97 36 34 36 2C 31 33 00 70 0A 26 00 99 22 |0:.646,13.p.&.."| 00000240: 93 22 3B 48 44 24 3A 99 22 54 55 52 4E 20 50 52 |.";HD$:."TURN PR| 00000250: 49 4E 54 45 52 20 4F 4E 20 41 4E 44 20 53 45 54 |INTER ON AND SET| 00000260: 20 54 4F 1D 54 4F 50 20 4F 46 20 50 41 47 45 22 | TO.TOP OF PAGE"| 00000270: 00 9F 0A 28 00 99 22 11 11 11 11 20 20 20 20 20 |...(..".... | 00000280: 20 20 20 20 20 20 20 54 48 45 4E 20 48 49 54 20 | THEN HIT | 00000290: 41 20 4B 45 59 22 20 20 20 3A 41 24 B2 22 22 00 |A KEY" :A$."".| 000002A0: B2 0A 2A 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 20 |..*..A$:.A$."". | 000002B0: 34 32 00 E0 0A 2C 00 9F 33 2C 34 3A 98 33 2C 22 |42...,..3,4:.3,"| 000002C0: 2D 22 3B 3A 81 49 B2 31 A4 37 38 3A 98 33 2C 22 |-";:.I.1.78:.3,"| 000002D0: 20 22 3B 3A 82 3A 98 33 2C 22 2D 22 20 3A A0 33 | ";:.:.3,"-" :.3| 000002E0: 00 FF 0A 2E 00 99 22 57 41 53 20 54 48 41 54 20 |......"WAS THAT | 000002F0: 43 4F 52 52 45 43 54 3F 20 28 D9 2F CE 29 22 00 |CORRECT? (./.)".| 00000300: 12 0B 30 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 20 |..0..A$:.A$."". | 00000310: 34 38 00 29 0B 32 00 8B 41 24 B2 22 59 22 B0 41 |48.).2..A$."Y".A| 00000320: 24 B2 22 D9 22 A7 20 35 32 00 31 0B 33 00 89 34 |$.".". 52.1.3..4| 00000330: 34 00 59 0B 34 00 99 22 93 22 3B 48 44 24 3A 85 |4.Y.4..".";HD$:.| 00000340: 20 22 D9 4F 55 52 20 CE 41 4D 45 20 20 20 20 20 | ".OUR .AME | 00000350: 20 20 20 22 3B 20 4E 46 24 00 78 0B 36 00 85 20 | "; NF$.x.6.. | 00000360: 22 D9 4F 55 52 20 C1 44 44 52 45 53 53 20 20 20 |".OUR .DDRESS | 00000370: 20 20 22 3B 20 41 46 24 00 97 0B 38 00 85 20 22 | "; AF$...8.. "| 00000380: D9 4F 55 52 20 C3 49 54 59 20 20 20 20 20 20 20 |.OUR .ITY | 00000390: 20 22 3B 20 46 43 24 00 B6 0B 3A 00 85 20 22 D9 | "; FC$...:.. ".| 000003A0: 4F 55 52 20 D3 54 41 54 45 20 20 20 20 20 20 20 |OUR .TATE | 000003B0: 22 3B 20 46 53 24 00 D5 0B 3C 00 85 20 22 D9 4F |"; FS$...<.. ".O| 000003C0: 55 52 20 DA 49 50 20 20 20 20 20 20 20 20 20 22 |UR .IP "| 000003D0: 3B 20 46 5A 24 00 ED 0B 3E 00 8B 46 43 24 B2 22 |; FZ$...>..FC$."| 000003E0: 22 A7 43 46 24 B2 22 22 3A 89 20 36 36 00 0D 0C |".CF$."":. 66...| 000003F0: 40 00 43 46 24 B2 46 43 24 AA C7 28 34 34 29 AA |@.CF$.FC$..(44).| 00000400: 46 53 24 AA C7 28 33 32 29 AA 46 5A 24 00 27 0C |FS$..(32).FZ$.'.| 00000410: 42 00 99 22 20 20 20 11 C3 4F 52 52 45 43 54 3F |B.." ..ORRECT?| 00000420: 20 28 D9 2F CE 29 22 00 3A 0C 44 00 A1 41 24 3A | (./.)".:.D..A$:| 00000430: 8B 41 24 B2 22 22 A7 20 36 38 00 51 0C 46 00 8B |.A$."". 68.Q.F..| 00000440: 41 24 B2 22 59 22 B0 41 24 B2 22 D9 22 A7 20 37 |A$."Y".A$.".". 7| 00000450: 32 00 59 0C 47 00 89 35 32 00 88 0C 48 00 99 22 |2.Y.G..52...H.."| 00000460: 13 11 11 11 11 11 11 11 11 11 11 22 3B 3A 85 20 |...........";:. | 00000470: 22 CE 41 4D 45 20 D4 4F 20 20 20 20 20 20 20 20 |".AME .O | 00000480: 20 20 22 3B 20 4E 54 24 00 A7 0C 4A 00 85 20 22 | "; NT$...J.. "| 00000490: C1 44 44 52 45 53 53 20 D4 4F 20 20 20 20 20 20 |.DDRESS .O | 000004A0: 20 22 3B 20 41 54 24 00 C6 0C 4C 00 85 20 22 C3 | "; AT$...L.. ".| 000004B0: 49 54 59 20 D4 4F 20 20 20 20 20 20 20 20 20 20 |ITY .O | 000004C0: 22 3B 20 54 43 24 00 E5 0C 4E 00 85 20 22 D3 54 |"; TC$...N.. ".T| 000004D0: 41 54 45 20 D4 4F 20 20 20 20 20 20 20 20 20 22 |ATE .O "| 000004E0: 3B 20 54 53 24 00 04 0D 50 00 85 20 22 DA 49 50 |; TS$...P.. ".IP| 000004F0: 20 D4 4F 20 20 20 20 20 20 20 20 20 20 20 22 3B | .O ";| 00000500: 20 54 5A 24 00 1C 0D 52 00 8B 54 43 24 B2 22 22 | TZ$...R..TC$.""| 00000510: A7 43 54 24 B2 22 22 3A 89 20 38 36 00 3C 0D 54 |.CT$."":. 86.<.T| 00000520: 00 43 54 24 B2 54 43 24 AA C7 28 34 34 29 AA 54 |.CT$.TC$..(44).T| 00000530: 53 24 AA C7 28 33 32 29 AA 54 5A 24 00 56 0D 56 |S$..(32).TZ$.V.V| 00000540: 00 99 22 20 20 20 11 C3 4F 52 52 45 43 54 3F 20 |.." ..ORRECT? | 00000550: 28 D9 2F CE 29 22 00 69 0D 58 00 A1 41 24 3A 8B |(./.)".i.X..A$:.| 00000560: 41 24 B2 22 22 A7 20 38 38 00 80 0D 5A 00 8B 41 |A$."". 88...Z..A| 00000570: 24 B2 22 59 22 B0 41 24 B2 22 D9 22 A7 20 39 32 |$."Y".A$.".". 92| 00000580: 00 88 0D 5B 00 89 37 32 00 A2 0D 5C 00 9F 34 2C |...[..72...\..4,| 00000590: 34 2C 37 3A 8D 20 31 34 3A A0 34 3A 9F 34 2C 34 |4,7:. 14:.4:.4,4| 000005A0: 2C 30 00 C9 0D 5E 00 4C B2 33 35 3A 4A B2 32 31 |,0...^.L.35:J.21| 000005B0: 3A 8D 20 32 32 3A 98 34 2C 56 38 24 3B 3A 8D 20 |:. 22:.4,V8$;:. | 000005C0: 31 36 3A 98 34 2C 57 31 24 00 FE 0D 60 00 4A B2 |16:.4,W1$...`.J.| 000005D0: 32 30 3A 81 4C B2 33 37 A4 35 35 A9 32 3A 8D 20 |20:.L.37.55.2:. | 000005E0: 32 32 3A 98 34 2C 56 38 24 3B 3A 8D 20 31 38 3A |22:.4,V8$;:. 18:| 000005F0: 98 34 2C 57 31 24 3A 4A B2 4A AB 31 3A 82 00 24 |.4,W1$:J.J.1:..$| 00000600: 0E 62 00 98 34 2C 56 32 24 3B 56 34 24 3B 3A 8D |.b..4,V2$;V4$;:.| 00000610: 20 32 30 3A 98 34 2C 56 34 24 3A A0 34 3A 9F 34 | 20:.4,V4$:.4:.4| 00000620: 2C 34 2C 37 00 55 0E 64 00 4C B2 35 36 3A 98 34 |,4,7.U.d.L.56:.4| 00000630: 2C 56 31 24 3B 56 34 24 3B 56 35 24 3B 56 37 24 |,V1$;V4$;V5$;V7$| 00000640: 3B 3A 8D 20 31 38 3A 98 34 2C 56 37 24 3B 56 35 |;:. 18:.4,V7$;V5| 00000650: 24 3B 56 34 24 00 8A 0E 66 00 4C B2 35 34 AB C3 |$;V4$...f.L.54..| 00000660: 28 4E 46 24 29 3A 98 34 2C 56 31 24 3B 56 34 24 |(NF$):.4,V1$;V4$| 00000670: 3B 56 31 24 3B 56 37 24 3B 56 36 24 3B 56 36 24 |;V1$;V7$;V6$;V6$| 00000680: 3B 4E 46 24 3B 3A 8D 20 31 38 00 9D 0E 68 00 98 |;NF$;:. 18...h..| 00000690: 34 2C 56 37 24 3B 56 31 24 3B 56 34 24 00 D2 0E |4,V7$;V1$;V4$...| 000006A0: 6A 00 4C B2 35 34 AB C3 28 41 46 24 29 3A 98 34 |j.L.54..(AF$):.4| 000006B0: 2C 56 31 24 3B 56 34 24 3B 56 31 24 3B 56 37 24 |,V1$;V4$;V1$;V7$| 000006C0: 3B 56 36 24 3B 56 36 24 3B 41 46 24 3B 3A 8D 20 |;V6$;V6$;AF$;:. | 000006D0: 31 38 00 E5 0E 6C 00 98 34 2C 56 37 24 3B 56 31 |18...l..4,V7$;V1| 000006E0: 24 3B 56 34 24 00 1A 0F 6E 00 4C B2 35 34 AB C3 |$;V4$...n.L.54..| 000006F0: 28 43 46 24 29 3A 98 34 2C 56 31 24 3B 56 34 24 |(CF$):.4,V1$;V4$| 00000700: 3B 56 31 24 3B 56 37 24 3B 56 36 24 3B 56 36 24 |;V1$;V7$;V6$;V6$| 00000710: 3B 43 46 24 3B 3A 8D 20 31 38 00 2D 0F 70 00 98 |;CF$;:. 18.-.p..| 00000720: 34 2C 56 37 24 3B 56 31 24 3B 56 34 24 00 3F 0F |4,V7$;V1$;V4$.?.| 00000730: 72 00 81 4A B2 31 A4 35 3A 8D 20 32 34 3A 82 00 |r..J.1.5:. 24:..| 00000740: 80 0F 74 00 4C B2 35 36 3A 98 34 2C 57 33 24 3B |..t.L.56:.4,W3$;| 00000750: 57 34 24 3B 56 34 24 3B 57 33 24 3B 57 37 24 3B |W4$;V4$;W3$;W7$;| 00000760: 56 37 24 3B 3A 8D 20 31 38 3A 98 34 2C 56 37 24 |V7$;:. 18:.4,V7$| 00000770: 3B 57 37 24 3B 57 33 24 3B 56 34 24 3B 57 34 24 |;W7$;W3$;V4$;W4$| 00000780: 00 C1 0F 76 00 4C B2 35 36 3A 98 34 2C 57 33 24 |...v.L.56:.4,W3$| 00000790: 3B 57 35 24 3B 56 34 24 3B 57 33 24 3B 57 38 24 |;W5$;V4$;W3$;W8$| 000007A0: 3B 56 37 24 3B 3A 8D 20 31 38 3A 98 34 2C 56 37 |;V7$;:. 18:.4,V7| 000007B0: 24 3B 57 38 24 3B 57 33 24 3B 56 34 24 3B 57 35 |$;W8$;W3$;V4$;W5| 000007C0: 24 00 02 10 78 00 4C B2 35 36 3A 98 34 2C 57 33 |$...x.L.56:.4,W3| 000007D0: 24 3B 57 36 24 3B 56 34 24 3B 57 33 24 3B 57 39 |$;W6$;V4$;W3$;W9| 000007E0: 24 3B 56 37 24 3B 3A 8D 20 31 38 3A 98 34 2C 56 |$;V7$;:. 18:.4,V| 000007F0: 37 24 3B 57 39 24 3B 57 33 24 3B 56 34 24 3B 57 |7$;W9$;W3$;V4$;W| 00000800: 36 24 00 3B 10 7A 00 4C B2 35 36 3A 98 34 2C 56 |6$.;.z.L.56:.4,V| 00000810: 31 24 3B 56 34 24 3B 57 33 24 3B 57 30 24 3B 56 |1$;V4$;W3$;W0$;V| 00000820: 37 24 3B 3A 8D 20 31 38 3A 98 34 2C 56 37 24 3B |7$;:. 18:.4,V7$;| 00000830: 57 30 24 3B 57 33 24 3B 56 34 24 00 5C 10 7C 00 |W0$;W3$;V4$.\.|.| 00000840: 98 34 2C 56 31 24 3B 56 34 24 3B 56 31 24 3B 56 |.4,V1$;V4$;V1$;V| 00000850: 37 24 3B A6 32 32 29 3B 4E 54 24 3B 00 80 10 7E |7$;.22);NT$;...~| 00000860: 00 4C B2 33 34 AB C3 28 4E 54 24 29 3A 8D 20 31 |.L.34..(NT$):. 1| 00000870: 38 3A 98 34 2C 56 37 24 3B 56 31 24 3B 56 34 24 |8:.4,V7$;V1$;V4$| 00000880: 00 A1 10 80 00 98 34 2C 56 31 24 3B 56 34 24 3B |......4,V1$;V4$;| 00000890: 56 31 24 3B 56 37 24 3B A6 32 32 29 3B 41 54 24 |V1$;V7$;.22);AT$| 000008A0: 3B 00 C5 10 82 00 4C B2 33 34 AB C3 28 41 54 24 |;.....L.34..(AT$| 000008B0: 29 3A 8D 20 31 38 3A 98 34 2C 56 37 24 3B 56 31 |):. 18:.4,V7$;V1| 000008C0: 24 3B 56 34 24 00 E6 10 84 00 98 34 2C 56 31 24 |$;V4$......4,V1$| 000008D0: 3B 56 34 24 3B 56 31 24 3B 56 37 24 3B A6 32 32 |;V4$;V1$;V7$;.22| 000008E0: 29 3B 43 54 24 3B 00 0A 11 86 00 4C B2 33 34 AB |);CT$;.....L.34.| 000008F0: C3 28 43 54 24 29 3A 8D 20 31 38 3A 98 34 2C 56 |.(CT$):. 18:.4,V| 00000900: 37 24 3B 56 31 24 3B 56 34 24 00 1C 11 88 00 81 |7$;V1$;V4$......| 00000910: 4A B2 31 A4 39 3A 8D 20 32 34 3A 82 00 48 11 8A |J.1.9:. 24:..H..| 00000920: 00 98 34 2C 56 31 24 3B 56 34 24 3B 56 35 24 3B |..4,V1$;V4$;V5$;| 00000930: 56 37 24 3B 3A 8D 20 32 30 3A 98 34 2C 56 37 24 |V7$;:. 20:.4,V7$| 00000940: 3B 56 35 24 3B 56 34 24 00 72 11 8C 00 4C B2 35 |;V5$;V4$.r...L.5| 00000950: 36 3A 81 4A B2 31 A4 38 3A 98 34 2C 56 32 24 3B |6:.J.1.8:.4,V2$;| 00000960: 56 34 24 3B 3A 8D 20 31 38 3A 98 34 2C 56 34 24 |V4$;:. 18:.4,V4$| 00000970: 3A 82 00 9B 11 8E 00 4C B2 35 36 3A 98 34 2C 57 |:......L.56:.4,W| 00000980: 32 24 3B 57 34 24 3B 56 34 24 3B 3A 8D 20 31 38 |2$;W4$;V4$;:. 18| 00000990: 3A 98 34 2C 56 34 24 3B 57 34 24 00 C4 11 90 00 |:.4,V4$;W4$.....| 000009A0: 4C B2 35 36 3A 98 34 2C 57 32 24 3B 57 35 24 3B |L.56:.4,W2$;W5$;| 000009B0: 56 34 24 3B 3A 8D 20 31 38 3A 98 34 2C 56 34 24 |V4$;:. 18:.4,V4$| 000009C0: 3B 57 35 24 00 ED 11 92 00 4C B2 35 36 3A 98 34 |;W5$.....L.56:.4| 000009D0: 2C 57 32 24 3B 57 36 24 3B 56 34 24 3B 3A 8D 20 |,W2$;W6$;V4$;:. | 000009E0: 31 38 3A 98 34 2C 56 34 24 3B 57 36 24 00 21 12 |18:.4,V4$;W6$.!.| 000009F0: 94 00 4C B2 35 36 3A 81 4A B2 31 A4 38 3A 98 34 |..L.56:.J.1.8:.4| 00000A00: 2C 56 32 24 3B 56 34 24 3B 3A 8D 20 31 38 3A 98 |,V2$;V4$;:. 18:.| 00000A10: 34 2C 56 34 24 3A 82 3A A0 34 3A 9F 34 2C 34 2C |4,V4$:.:.4:.4,4,| 00000A20: 30 00 48 12 96 00 4A B2 31 31 3A 81 4C B2 35 35 |0.H...J.11:.L.55| 00000A30: A4 35 31 A9 AB 32 3A 8D 20 32 32 3A 98 34 2C 57 |.51..2:. 22:.4,W| 00000A40: 31 24 3B 3A 8D 20 31 38 00 5B 12 98 00 98 34 2C |1$;:. 18.[....4,| 00000A50: 56 38 24 3A 4A B2 4A AA 31 3A 82 00 8C 12 9A 00 |V8$:J.J.1:......| 00000A60: 4C B2 34 39 3A 4A B2 31 34 3A 8D 20 32 32 3A 98 |L.49:J.14:. 22:.| 00000A70: 34 2C 57 31 24 3B 3A 8D 20 31 36 3A 98 34 2C 56 |4,W1$;:. 16:.4,V| 00000A80: 38 24 3A A0 34 3A 9F 34 2C 34 2C 37 00 95 12 9C |8$:.4:.4,4,7....| 00000A90: 00 8D 20 31 34 00 A5 12 9E 00 98 34 2C C7 28 31 |.. 14......4,.(1| 00000AA0: 32 29 3A A0 34 00 D2 12 A0 00 99 22 11 11 C4 4F |2):.4......"...O| 00000AB0: 20 59 4F 55 20 57 41 4E 54 20 41 4E 4F 54 48 45 | YOU WANT ANOTHE| 00000AC0: 52 20 45 4E 56 45 4C 4F 50 45 3F 20 28 D9 2F CE |R ENVELOPE? (./.| 00000AD0: 29 22 00 E6 12 A2 00 A1 41 24 3A 8B 41 24 B2 22 |)"......A$:.A$."| 00000AE0: 22 A7 20 31 36 32 00 FF 12 A4 00 8B 20 41 24 B2 |". 162...... A$.| 00000AF0: 22 59 22 B0 41 24 B2 22 D9 22 A7 20 31 37 30 00 |"Y".A$.".". 170.| 00000B00: 2E 13 A6 00 97 35 33 32 38 30 2C C2 28 31 30 32 |.....53280,.(102| 00000B10: 30 29 3A 97 35 33 32 38 31 2C C2 28 31 30 32 31 |0):.53281,.(1021| 00000B20: 29 3A 97 36 34 36 2C C2 28 31 30 32 32 29 00 43 |):.646,.(1022).C| 00000B30: 13 A8 00 99 C7 28 31 34 32 29 3B 22 93 22 3A A0 |.....(142);".":.| 00000B40: 34 3A 80 00 62 13 AA 00 99 22 11 20 20 D3 41 4D |4:..b....". .AM| 00000B50: 45 20 C5 4E 56 45 4C 4F 50 45 3F 20 28 D9 2F CE |E .NVELOPE? (./.| 00000B60: 29 22 00 76 13 AC 00 A1 41 24 3A 8B 41 24 B2 22 |)".v....A$:.A$."| 00000B70: 22 A7 20 31 37 32 00 8F 13 AE 00 8B 20 41 24 B2 |". 172...... A$.| 00000B80: 22 4E 22 B0 41 24 B2 22 CE 22 A7 20 31 37 38 00 |"N".A$.".". 178.| 00000B90: AD 13 B0 00 81 49 B2 31 36 36 34 A4 32 30 32 33 |.....I.1664.2023| 00000BA0: 3A 97 49 2C 33 32 3A 82 3A 89 20 39 32 00 CB 13 |:.I,32:.:. 92...| 00000BB0: B2 00 81 49 B2 31 33 38 34 A4 32 30 32 33 3A 97 |...I.1384.2023:.| 00000BC0: 49 2C 33 32 3A 82 3A 89 20 37 32 00 DE 13 B4 00 |I,32:.:. 72.....| 00000BD0: 8F 20 46 49 52 53 54 20 53 43 52 45 45 4E 00 0E |. FIRST SCREEN..| 00000BE0: 14 B6 00 97 35 33 32 38 30 2C 32 3A 97 35 33 32 |....53280,2:.532| 00000BF0: 38 31 2C 31 35 3A 97 36 34 36 2C 30 3A 99 C7 28 |81,15:.646,0:..(| 00000C00: 31 34 29 3B C7 28 31 34 37 29 3B 48 44 24 00 56 |14);.(147);HD$.V| 00000C10: 14 B8 00 42 59 24 B2 22 42 59 22 3A 4E 31 24 B2 |...BY$."BY":N1$.| 00000C20: 22 CA 2E C6 2E D0 55 54 45 52 42 41 55 47 48 22 |".....UTERBAUGH"| 00000C30: 3A 4E 32 24 B2 22 C7 2E CC 41 4E 45 22 3A 4D 31 |:N2$."...ANE":M1| 00000C40: 24 B2 22 CD 4F 44 49 46 49 45 44 20 46 52 4F 4D |$.".ODIFIED FROM| 00000C50: 20 D0 C7 CD 2E 22 00 A0 14 BA 00 4D 32 24 B2 22 | ....".....M2$."| 00000C60: D4 48 49 53 20 57 49 4C 4C 20 4D 41 4B 45 20 41 |.HIS WILL MAKE A| 00000C70: 4E 20 45 4E 56 45 4C 4F 50 45 22 3A 4D 33 24 B2 |N ENVELOPE":M3$.| 00000C80: 22 46 4F 52 20 D0 D2 C9 CE D4 20 D3 C8 CF D0 20 |"FOR ..... .... | 00000C90: C7 52 45 45 54 49 4E 47 20 C3 41 52 44 53 2C 22 |.REETING .ARDS,"| 00000CA0: 00 D2 14 BC 00 4D 34 24 B2 22 49 4E 43 4C 55 44 |.....M4$."INCLUD| 00000CB0: 49 4E 47 20 D4 CF 2F C6 D2 CF CD 20 41 44 44 52 |ING ../.... ADDR| 00000CC0: 45 53 53 45 53 2C 49 46 20 44 45 53 49 52 45 44 |ESSES,IF DESIRED| 00000CD0: 2E 22 00 04 15 BE 00 4D 35 24 B2 22 C9 46 20 59 |.".....M5$.".F Y| 00000CE0: 4F 55 20 44 4F 4E 27 54 20 57 41 4E 54 20 41 44 |OU DON'T WANT AD| 00000CF0: 44 2E 2D CA 55 53 54 20 C8 C9 D4 20 D2 C5 D4 D5 |D.-.UST ... ....| 00000D00: D2 CE 2C 22 00 44 15 C0 00 4D 36 24 B2 22 57 48 |..,".D...M6$."WH| 00000D10: 45 4E 20 41 53 4B 45 44 20 54 4F 20 45 4E 54 45 |EN ASKED TO ENTE| 00000D20: 52 20 44 41 54 41 2E 22 3A 4D 37 24 B2 22 D7 48 |R DATA.":M7$.".H| 00000D30: 45 4E 20 45 4E 54 45 52 49 4E 47 20 20 C3 C9 D4 |EN ENTERING ...| 00000D40: D9 20 2D 22 00 90 15 C2 00 4D 38 24 B2 22 44 4F |. -".....M8$."DO| 00000D50: 20 CE CF D4 20 49 4E 43 4C 55 44 45 20 41 20 43 | ... INCLUDE A C| 00000D60: 4F 4D 4D 41 21 21 22 3A 4D 39 24 B2 22 C1 46 54 |OMMA!!":M9$.".FT| 00000D70: 45 52 20 52 55 4E 4E 49 4E 47 2C 59 4F 55 20 57 |ER RUNNING,YOU W| 00000D80: 49 4C 4C 20 42 45 20 52 45 54 55 52 4E 45 44 22 |ILL BE RETURNED"| 00000D90: 00 C0 15 C4 00 4D 30 24 B2 22 54 4F 20 53 43 52 |.....M0$."TO SCR| 00000DA0: 45 45 4E 20 43 4F 4C 4F 52 53 20 54 48 41 54 20 |EEN COLORS THAT | 00000DB0: 45 58 49 53 54 45 44 20 42 45 46 4F 52 45 2E 22 |EXISTED BEFORE."| 00000DC0: 00 ED 15 C6 00 47 31 24 B2 22 C1 46 54 45 52 20 |.....G1$.".FTER | 00000DD0: 50 52 49 4E 54 49 4E 47 2C C3 D5 D4 20 4F 4E 20 |PRINTING,... ON | 00000DE0: 44 41 53 48 45 44 20 4C 49 4E 45 53 22 00 39 16 |DASHED LINES".9.| 00000DF0: C8 00 47 32 24 B2 22 C6 CF CC C4 20 4F 4E 20 44 |..G2$.".... ON D| 00000E00: 4F 54 54 45 44 20 4C 49 4E 45 53 2C 26 20 C7 4C |OTTED LINES,& .L| 00000E10: 55 45 20 46 4C 41 50 53 2E 22 3A 47 33 24 B2 22 |UE FLAPS.":G3$."| 00000E20: C8 C9 D4 20 C1 CE D9 20 CB C5 D9 20 54 4F 20 43 |... ... ... TO C| 00000E30: 4F 4E 54 49 4E 55 45 21 22 00 59 16 CA 00 99 22 |ONTINUE!".Y...."| 00000E40: 91 91 91 1F 22 3B A6 28 34 30 AB C3 28 42 59 24 |....";.(40..(BY$| 00000E50: 29 29 AD 32 29 3B 42 59 24 00 76 16 CC 00 99 22 |)).2);BY$.v...."| 00000E60: 1C 22 3B A6 28 34 30 AB C3 28 4E 31 24 29 29 AD |.";.(40..(N1$)).| 00000E70: 32 29 3B 4E 31 24 00 93 16 CE 00 99 22 1F 22 3B |2);N1$......".";| 00000E80: A6 28 34 30 AB C3 28 4D 31 24 29 29 AD 32 29 3B |.(40..(M1$)).2);| 00000E90: 4D 31 24 00 B0 16 D0 00 99 22 1F 22 3B A6 28 34 |M1$......".";.(4| 00000EA0: 30 AB C3 28 42 59 24 29 29 AD 32 29 3B 42 59 24 |0..(BY$)).2);BY$| 00000EB0: 00 CD 16 D2 00 99 22 9E 22 3B A6 28 34 30 AB C3 |......".";.(40..| 00000EC0: 28 4E 32 24 29 29 AD 32 29 3B 4E 32 24 00 EB 16 |(N2$)).2);N2$...| 00000ED0: D4 00 99 22 11 1E 22 3B A6 28 34 30 AB C3 28 4D |..."..";.(40..(M| 00000EE0: 32 24 29 29 AD 32 29 3B 4D 32 24 00 04 17 D6 00 |2$)).2);M2$.....| 00000EF0: 99 A6 28 34 30 AB C3 28 4D 33 24 29 29 AD 32 29 |..(40..(M3$)).2)| 00000F00: 3B 4D 33 24 00 1D 17 D8 00 99 A6 28 34 30 AB C3 |;M3$.......(40..| 00000F10: 28 4D 34 24 29 29 AD 32 29 3B 4D 34 24 00 3A 17 |(M4$)).2);M4$.:.| 00000F20: DA 00 99 22 11 22 3B A6 28 34 30 AB C3 28 4D 35 |...".";.(40..(M5| 00000F30: 24 29 29 AD 32 29 3B 4D 35 24 00 53 17 DC 00 99 |$)).2);M5$.S....| 00000F40: A6 28 34 30 AB C3 28 4D 36 24 29 29 AD 32 29 3B |.(40..(M6$)).2);| 00000F50: 4D 36 24 00 70 17 DE 00 99 22 11 22 3B A6 28 34 |M6$.p....".";.(4| 00000F60: 30 AB C3 28 4D 37 24 29 29 AD 32 29 3B 4D 37 24 |0..(M7$)).2);M7$| 00000F70: 00 89 17 E0 00 99 A6 28 34 30 AB C3 28 4D 38 24 |.......(40..(M8$| 00000F80: 29 29 AD 32 29 3B 4D 38 24 00 A7 17 E2 00 99 22 |)).2);M8$......"| 00000F90: 11 9C 22 3B A6 28 34 30 AB C3 28 4D 39 24 29 29 |..";.(40..(M9$))| 00000FA0: AD 32 29 3B 4D 39 24 00 C0 17 E4 00 99 A6 28 34 |.2);M9$.......(4| 00000FB0: 30 AB C3 28 4D 30 24 29 29 AD 32 29 3B 4D 30 24 |0..(M0$)).2);M0$| 00000FC0: 00 DE 17 E6 00 99 22 11 1F 22 3B A6 28 34 30 AB |......"..";.(40.| 00000FD0: C3 28 47 31 24 29 29 AD 32 29 3B 47 31 24 00 F7 |.(G1$)).2);G1$..| 00000FE0: 17 E8 00 99 A6 28 34 30 AB C3 28 47 32 24 29 29 |.....(40..(G2$))| 00000FF0: AD 32 29 3B 47 32 24 00 15 18 EA 00 99 22 11 05 |.2);G2$......"..| 00001000: 22 3B A6 28 34 30 AB C3 28 47 33 24 29 29 AD 32 |";.(40..(G3$)).2| 00001010: 29 3B 47 33 24 00 30 18 EC 00 97 31 39 38 2C 30 |);G3$.0....198,0| 00001020: 3A 92 31 39 38 2C 31 3A 97 31 39 38 2C 30 3A 8E |:.198,1:.198,0:.| 00001030: 00 00 00 00 |.... |
....... PS ENV PRNT 2.0.K....1020,B(5328
0):.1021,B(53281):.1022,B(646):. 26.....
L1.((80.C(W4$.V6$.W5$.V6$.W6$)).2):.4,.L
1);W4$;V6$;W5$;V6$;W6$:.......I.1.L:.4,G
(96);:.:.......I.1.L:.4," ";:.:..X....I.
1.56:.4,V3$;:.:.......I.1.J:.4,V6$;:.:..
"...L.56:.4,V1$;V4$;V1$;V7$;:. 18:.4,V7$
;V1$;V4$:..C...V1$." ":V2$."
":V3$.".":V4$.G(125):V5$.".....".....
V6$." ":V7$.":":V8$."N":W1$."M":W2$."
":W3$." ".....W4$."C":W5$."U":
W6$."T":W7$."F":W8$."O":W9$."L":W0$."D".
.. .HD$."..........PS ENVELOPE PRINTER..
."...".. 180.9.$..G(14):.53280,5:.53281,
0:.646,13.P.&..".";HD$:."TURN PRINTER ON
AND SET TO.TOP OF PAGE"...(.."....
THEN HIT A KEY" :A$.""...*..A$:
.A$."". 42...,..3,4:.3,"-";:.I.1.78:.3,"
";:.:.3,"-" : 3......"WAS THAT CORRECT?
(Y/N)"...0..A$:.A$."". 48.).2..A$."Y".A
$."Y". 52.1.3..44.Y.4..".";HD$:. "YOUR N
AME "; NF$.X.6.. "YOUR ADDRESS
"; AF$...8.. "YOUR CITY "; FC$.
..:.. "YOUR STATE "; FS$.U.<.. "YO
UR ZIP "; FZ$...>..FC$."".CF$.""
:. 66...@.CF$.FC$.G(44).FS$.G(32).FZ$.'.
B.." .CORRECT? (Y/N)".:.D..A$:.A$."".
68.Q.F..A$."Y".A$."Y". 72.Y.G..52...H.."
...........";:. "NAME TO "; NT$
...J.. "ADDRESS TO "; AT$.F.L.. "C
ITY TO "; TC$...N.. "STATE TO
"; TS$...P.. "ZIP TO ";
TZ$...R..TC$."".CT$."":. 86.<.T.CT$.TC$
.G(44).TS$.G(32).TZ$.V.V.." .CORRECT?
(Y/N)".I.X..A$:.A$."". 88...Z..A$."Y".A$
."Y". 92...[..72...\..4,4,7:. 14: 4:.4,4
,0.I.^.L.35:J.21:. 22:.4,V8$;:. 16:.4,W1
$...`.J.20:.L.37.55.2:. 22:.4,V8$;:. 18:
.4,W1$:J.J.1:..$.B..4,V2$;V4$;:. 20:.4,V
4$: 4:.4,4,7.U.D.L.56:.4,V1$;V4$;V5$;V7$
;:. 18:.4,V7$;V5$;V4$...F.L.54.C(NF$):.4
,V1$;V4$;V1$;V7$;V6$;V6$;NF$;:. 18...H..
4,V7$;V1$;V4$.R.J.L.54.C(AF$):.4,V1$;V4$
;V1$;V7$;V6$;V6$;AF$;:. 18...L..4,V7$;V1
$;V4$...N.L.54.C(CF$):.4,V1$;V4$;V1$;V7$
;V6$;V6$;CF$;:. 18.-.P..4,V7$;V1$;V4$.?.
R..J.1.5:. 24:....T.L.56:.4,W3$;W4$;V4$;
W3$;W7$;V7$;:. 18:.4,V7$;W7$;W3$;V4$;W4$
.A.V.L.56:.4,W3$;W5$;V4$;W3$;W8$;V7$;:.
18:.4,V7$;W8$;W3$;V4$;W5$...X.L.56:.4,W3
$;W6$;V4$;W3$;W9$;V7$;:. 18:.4,V7$;W9$;W
3$;V4$;W6$.;.Z.L.56:.4,V1$;V4$;W3$;W0$;V
7$;:. 18:.4,V7$;W0$;W3$;V4$.\.|..4,V1$;V
4$;V1$;V7$;.22);NT$;...~.L.34.C(NT$):. 1
8:.4,V7$;V1$;V4$......4,V1$;V4$;V1$;V7$;
.22);AT$;.E...L.34.C(AT$):. 18:.4,V7$;V1
$;V4$......4,V1$;V4$;V1$;V7$;.22);CT$;..
...L.34.C(CT$):. 18:.4,V7$;V1$;V4$......
J.1.9:. 24:..H....4,V1$;V4$;V5$;V7$;:. 2
0:.4,V7$;V5$;V4$.R...L.56:.J.1.8:.4,V2$;
V4$;:. 18:.4,V4$:......L.56:.4,W2$;W4$;V
4$;:. 18:.4,V4$;W4$.D...L.56:.4,W2$;W5$;
V4$;:. 18:.4,V4$;W5$.....L.56:.4,W2$;W6$
;V4$;:. 18:.4,V4$;W6$.!...L.56:.J.1.8:.4
,V2$;V4$;:. 18:.4,V4$:.: 4:.4,4,0.H...J.
11:.L.55.51..2:. 22:.4,W1$;:. 18.[....4,
V8$:J.J.1:......L.49:J.14:. 22:.4,W1$;:.
16:.4,V8$: 4:.4,4,7...... 14......4,G(1
2): 4.R. .."..DO YOU WANT ANOTHER ENVELO
PE? (Y/N)"......A$:.A$."". 162...... A$.
"Y".A$."Y". 170......53280,B(1020):.5328
1,B(1021):.646,B(1022).C....G(142);".":
4:..B....". SAME ENVELOPE? (Y/N)".V....
A$:.A$."". 172...... A$."N".A$."N". 178.
.....I.1664.2023:.I,32:.:. 92.K....I.138
4.2023:.I,32:.:. 72...... FIRST SCREEN..
....53280,2:.53281,15:.646,0:.G(14);G(14
7);HD$.V...BY$."BY":N1$."J.F.PUTERBAUGH"
:N2$."G.LANE":M1$."MODIFIED FROM PGM.".
...M2$."THIS WILL MAKE AN ENVELOPE":M3$.
"FOR PRINT SHOP GREETING CARDS,".R...M4$
."INCLUDING TO/FROM ADDRESSES,IF DESIRED
.".....M5$."IF YOU DON'T WANT ADD.-JUST
HIT RETURN,".D...M6$."WHEN ASKED TO ENTE
R DATA.":M7$."WHEN ENTERING CITY -"...B
.M8$."DO NOT INCLUDE A COMMA!!":M9$."AFT
ER RUNNING,YOU WILL BE RETURNED"...D.M0$
."TO SCREEN COLORS THAT EXISTED BEFORE."
...F.G1$."AFTER PRINTING,CUT ON DASHED L
INES".9.H.G2$."FOLD ON DOTTED LINES,& GL
UE FLAPS.":G3$."HIT ANY KEY TO CONTINUE!
".Y.J.."....";.(40.C(BY$)).2);BY$.V.L.."
.";.(40.C(N1$)).2);N1$...N..".";.(40.C(M
1$)).2);M1$...P..".";.(40.C(BY$)).2);BY$
.M.R..".";.(40.C(N2$)).2);N2$...T.."..";
.(40.C(M2$)).2);M2$...V...(40.C(M3$)).2)
;M3$...X...(40.C(M4$)).2);M4$.:.Z..".";.
(40.C(M5$)).2);M5$.S.....(40.C(M6$)).2);
M6$.P....".";.(40.C(M7$)).2);M7$.......(
40.C(M8$)).2);M8$......"..";.(40.C(M9$))
.2);M9$.......(40.C(M0$)).2);M0$......".
.";.(40.C(G1$)).2);G1$.......(40.C(G2$))
.2);G2$......"..";.(40.C(G3$)).2);G3$.0.
...198,0:.198,1:.198,0:.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL