_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

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 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL