CREA6-5

FILE INFORMATION

FILENAME(S): CREA6-5

FILE TYPE(S): PRG

FILE SIZE: 1.2K

FIRST SEEN: 2025-11-30 19:55:20

APPEARS ON: 1 disk(s)

FILE HASH

3f9c4d56a0052132caef5fe42f480faa8deba84671942f33b71040be34865a28

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
GROG	CREA6-5	PRG	Curtcool, Hans Curt	8	8	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 25 08 64 00 9F 20  31 35 2C 38 2C 31 35 3A  |..%.d.. 15,8,15:|
00000010: 86 20 41 24 28 34 39 29  3A 46 24 B2 22 43 4F 4D  |. A$(49):F$."COM|
00000020: 2D 36 2D 35 22 00 40 08  6E 00 9F 32 2C 38 2C 32  |-6-5".@.n..2,8,2|
00000030: 2C 22 40 4F 3A 22 AA 46  24 AA 22 2C 53 2C 57 22  |,"@O:".F$.",S,W"|
00000040: 00 58 08 78 00 84 31 35  2C 45 31 24 2C 45 32 24  |.X.x..15,E1$,E2$|
00000050: 2C 45 33 24 2C 45 34 24  00 7B 08 7A 00 8B 20 C5  |,E3$,E4$.{.z.. .|
00000060: 28 45 31 24 29 B1 30 20  A7 20 99 20 45 31 24 2C  |(E1$).0 . . E1$,|
00000070: 45 32 24 2C 45 33 24 2C  45 34 24 00 85 08 7D 00  |E2$,E3$,E4$...}.|
00000080: 4E 53 B2 33 35 00 8B 08  82 00 8C 00 A6 08 8C 00  |NS.35...........|
00000090: 87 20 41 24 3A 8B 20 41  24 B3 B1 22 45 4F 46 22  |. A$:. A$.."EOF"|
000000A0: 20 A7 20 31 35 35 00 C0  08 96 00 8B 20 41 24 B2  | . 155...... A$.|
000000B0: 22 45 4F 46 22 20 A7 20  A0 32 3A 89 20 31 36 30  |"EOF" . .2:. 160|
000000C0: 00 D0 08 9B 00 98 32 2C  41 24 3A 89 20 31 34 30  |......2,A$:. 140|
000000D0: 00 EB 08 A0 00 9F 20 32  2C 38 2C 32 2C 22 4F 3A  |...... 2,8,2,"O:|
000000E0: 22 AA 46 24 AA 22 2C 53  2C 52 22 00 0D 09 AA 00  |".F$.",S,R".....|
000000F0: 81 20 4B B2 30 20 A4 20  4E 53 3A 84 32 2C 41 24  |. K.0 . NS:.2,A$|
00000100: 28 4B 29 3A 99 41 24 28  4B 29 3A 82 4B 00 13 09  |(K):.A$(K):.K...|
00000110: C8 00 80 00 1F 09 E9 03  83 20 22 2A 20 24 22 00  |......... "* $".|
00000120: 2B 09 EA 03 83 20 22 24  20 2A 22 00 37 09 EB 03  |+.... "$ *".7...|
00000130: 83 20 22 2A 20 24 22 00  43 09 EC 03 83 20 22 24  |. "* $".C.... "$|
00000140: 20 2A 22 00 4F 09 ED 03  83 20 22 2A 20 24 22 00  | *".O.... "* $".|
00000150: 5B 09 EE 03 83 20 22 24  20 2A 22 00 67 09 EF 03  |[.... "$ *".g...|
00000160: 83 20 22 2A 20 24 22 00  73 09 F0 03 83 20 22 24  |. "* $".s.... "$|
00000170: 20 2A 22 00 80 09 F1 03  83 20 22 2A 20 20 2A 22  | *"...... "*  *"|
00000180: 00 91 09 F2 03 83 20 22  2A 20 C4 45 41 52 20 24  |...... "* .EAR $|
00000190: 22 00 9E 09 F3 03 83 20  22 24 3B 20 2A 22 00 AB  |"...... "$; *"..|
000001A0: 09 F4 03 83 20 22 2A 20  20 2A 22 00 D8 09 F5 03  |.... "*  *".....|
000001B0: 83 20 22 2A 20 20 20 20  20 D7 45 20 52 45 47 52  |. "*     .E REGR|
000001C0: 45 54 20 56 45 52 59 20  4D 55 43 48 20 54 48 41  |ET VERY MUCH THA|
000001D0: 54 20 54 48 45 20 24 22  00 05 0A F6 03 83 20 22  |T THE $"...... "|
000001E0: 24 20 59 4F 55 20 50 55  52 43 48 41 53 45 44 20  |$ YOU PURCHASED |
000001F0: 46 52 4F 4D 20 55 53 20  49 53 20 55 4E 53 41 54  |FROM US IS UNSAT|
00000200: 49 53 2D 2A 22 00 4D 0A  F7 03 83 20 22 2A 20 46  |IS-*".M.... "* F|
00000210: 41 43 54 4F 52 59 2E 20  D7 48 49 4C 45 20 4F 55  |ACTORY. .HILE OU|
00000220: 52 20 53 48 49 50 50 49  4E 47 20 44 45 50 41 52  |R SHIPPING DEPAR|
00000230: 54 4D 45 4E 54 20 4D 41  4B 45 53 20 45 56 45 52  |TMENT MAKES EVER|
00000240: 59 20 45 46 46 4F 52 54  20 54 4F 26 22 00 67 0A  |Y EFFORT TO&".g.|
00000250: F8 03 83 20 22 24 20 53  45 45 20 54 48 41 54 20  |... "$ SEE THAT |
00000260: 45 56 45 52 59 2A 22 00  AF 0A F9 03 83 20 22 2A  |EVERY*"...... "*|
00000270: 20 50 49 45 43 45 20 49  53 20 49 4E 53 50 45 43  | PIECE IS INSPEC|
00000280: 54 45 44 20 42 45 46 4F  52 45 20 42 45 49 4E 47  |TED BEFORE BEING|
00000290: 20 53 45 4E 54 20 4F 55  54 20 20 49 4E 20 54 48  | SENT OUT  IN TH|
000002A0: 49 53 20 43 41 53 45 20  59 4F 55 52 20 24 22 00  |IS CASE YOUR $".|
000002B0: C2 0A FA 03 83 20 22 24  20 57 41 53 20 4E 4F 54  |..... "$ WAS NOT|
000002C0: 2A 22 00 E0 0A FB 03 83  20 22 2A 20 49 4E 53 50  |*"...... "* INSP|
000002D0: 45 43 54 45 44 20 42 45  43 41 55 53 45 20 24 22  |ECTED BECAUSE $"|
000002E0: 00 EC 0A FC 03 83 20 22  24 2E 2A 22 00 F9 0A FD  |...... "$.*"....|
000002F0: 03 83 20 22 2A 20 20 2A  22 00 32 0B FE 03 83 20  |.. "*  *".2.... |
00000300: 22 24 20 20 20 20 20 D7  45 20 41 52 45 20 53 48  |"$     .E ARE SH|
00000310: 49 50 50 49 4E 47 20 54  4F 20 59 4F 55 20 49 4D  |IPPING TO YOU IM|
00000320: 4D 45 44 49 41 54 45 4C  59 20 41 20 4E 45 57 20  |MEDIATELY A NEW |
00000330: 24 22 00 4F 0B FF 03 83  20 22 24 20 41 4E 44 20  |$".O.... "$ AND |
00000340: 55 50 4F 4E 20 44 45 4C  49 56 45 52 59 2A 22 00  |UPON DELIVERY*".|
00000350: 7F 0B 00 04 83 20 22 2A  20 57 49 4C 4C 20 50 49  |..... "* WILL PI|
00000360: 43 4B 20 55 50 20 54 48  45 20 4F 4C 44 20 4F 4E  |CK UP THE OLD ON|
00000370: 45 20 46 4F 52 20 52 45  54 55 52 4E 2E 2A 22 00  |E FOR RETURN.*".|
00000380: 8B 0B 01 04 83 20 22 2A  20 2A 22 00 D3 0B 02 04  |..... "* *".....|
00000390: 83 20 22 24 20 20 20 20  20 D7 45 20 41 50 50 52  |. "$     .E APPR|
000003A0: 45 43 49 41 54 45 20 59  4F 55 52 20 50 41 54 52  |ECIATE YOUR PATR|
000003B0: 4F 4E 41 47 45 20 4F 46  20 4F 55 52 20 53 54 4F  |ONAGE OF OUR STO|
000003C0: 52 45 20 41 4E 44 20 57  45 20 57 49 53 48 20 54  |RE AND WE WISH T|
000003D0: 4F 26 22 00 EF 0B 03 04  83 22 24 20 4D 41 4B 45  |O&"......"$ MAKE|
000003E0: 20 45 56 45 52 59 20 54  52 41 4E 53 2D 2A 22 00  | EVERY TRANS-*".|
000003F0: 16 0C 04 04 83 20 22 2A  20 41 43 54 49 4F 4E 20  |..... "* ACTION |
00000400: 53 41 54 49 53 46 41 43  54 4F 52 59 20 54 4F 20  |SATISFACTORY TO |
00000410: 59 4F 55 2E 2A 22 00 23  0C 05 04 83 20 22 2A 20  |YOU.*".#.... "* |
00000420: 20 2A 22 00 30 0C 06 04  83 20 22 2A 20 20 2A 22  | *".0.... "*  *"|
00000430: 00 78 0C 07 04 83 20 22  2A 20 20 20 20 20 20 20  |.x.... "*       |
00000440: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000450: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000460: 20 20 20 20 20 20 D9 4F  55 52 53 20 56 45 52 59  |      .OURS VERY|
00000470: 20 54 52 55 4C 59 2A 22  00 85 0C 08 04 83 20 22  | TRULY*"...... "|
00000480: 2A 20 20 2A 22 00 92 0C  09 04 83 20 22 2A 20 20  |*  *"...... "*  |
00000490: 2A 22 00 9F 0C 0A 04 83  20 22 2A 20 20 2A 22 00  |*"...... "*  *".|
000004A0: AC 0C 0B 04 83 20 22 2A  20 20 2A 22 00 B8 0C 10  |..... "*  *"....|
000004B0: 04 83 20 22 45 4F 46 22  00 00 00                 |.. "EOF"...     |

..%.D.. 15,8,15:. A$(49):F$."COM-6-5".@.
N..2,8,2,"@O:".F$.",S,W".X.X..15,E1$,E2$
,E3$,E4$.{.Z.. E(E1$).0 . . E1$,E2$,E3$,
E4$...}.NS.35............ A$:. A$.."EOF"
 . 155...... A$."EOF" .  2:. 160.P....2,
A$:. 140... .. 2,8,2,"O:".F$.",S,R".....
. K.0 . NS:.2,A$(K):.A$(K):.K...H.......
. "* $".+.... "$ *".7.... "* $".C.... "$
 *".O.... "* $".[.... "$ *".G.... "* $".
S.... "$ *"...... "*  *"...... "* DEAR $
"...... "$; *"...... "*  *".X.... "*    
 WE REGRET VERY MUCH THAT THE $"...... "
$ YOU PURCHASED FROM US IS UNSATIS-*".M.
... "* FACTORY. WHILE OUR SHIPPING DEPAR
TMENT MAKES EVERY EFFORT TO&".G.... "$ S
EE THAT EVERY*"...... "* PIECE IS INSPEC
TED BEFORE BEING SENT OUT  IN THIS CASE 
YOUR $".B.... "$ WAS NOT*"...... "* INSP
ECTED BECAUSE $"...... "$.*"...... "*  *
".2.... "$     WE ARE SHIPPING TO YOU IM
MEDIATELY A NEW $".O.... "$ AND UPON DEL
IVERY*"..... "* WILL PICK UP THE OLD ON
E FOR RETURN.*"...... "* *".S.... "$    
 WE APPRECIATE YOUR PATRONAGE OF OUR STO
RE AND WE WISH TO&"......"$ MAKE EVERY T
RANS-*"...... "* ACTION SATISFACTORY TO 
YOU.*".#.... "*  *".0.... "*  *".X.... "
*                                       
      YOURS VERY TRULY*"...... "*  *"...
... "*  *"...... "*  *"...... "*  *"....
.. "EOF"...

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL