CREA6-1
FILE INFORMATION
FILENAME(S): CREA6-1
FILE TYPE(S): PRG
FILE SIZE: 1.1K
FIRST SEEN: 2025-11-30 19:55:20
APPEARS ON: 1 disk(s)
FILE HASH
9aa7991c84ff9a48028e28629205e3156c7d663346e29bda2b879fb73ef2b6b7
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GROG | CREA6-1 | PRG | Curtcool, Hans Curt | 19 | 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 31 22 00 40 08 6E 00 9F 32 2C 38 2C 32 |-6-1".@.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 E1 09 F5 03 |.... "* *".....|
000001B0: 83 20 22 2A 20 20 20 20 20 CF 4E 20 59 4F 55 52 |. "* .N YOUR|
000001C0: 20 52 45 43 45 4E 54 20 49 4E 56 4F 49 43 45 20 | RECENT INVOICE |
000001D0: C9 20 57 41 53 20 43 48 41 52 47 45 44 20 24 24 |. WAS CHARGED $$|
000001E0: 22 00 F1 09 F6 03 83 20 22 24 20 46 4F 52 20 24 |"...... "$ FOR $|
000001F0: 22 00 07 0A F7 03 83 20 22 24 20 C9 20 52 45 43 |"...... "$ . REC|
00000200: 45 49 56 45 44 2A 22 00 1B 0A F8 03 83 20 22 2A |EIVED*"...... "*|
00000210: 20 46 52 4F 4D 20 59 4F 55 2E 2A 00 28 0A F9 03 | FROM YOU.*.(...|
00000220: 83 20 22 2A 20 20 2A 22 00 4E 0A FA 03 83 20 22 |. "* *".N.... "|
00000230: 2A 20 20 20 20 20 D4 48 49 53 20 42 49 4C 4C 20 |* .HIS BILL |
00000240: 57 41 53 20 50 41 49 44 20 4F 4E 20 24 22 00 6E |WAS PAID ON $".n|
00000250: 0A FB 03 83 20 22 24 20 42 59 20 4D 59 20 43 48 |.... "$ BY MY CH|
00000260: 45 51 55 45 20 4F 4E 20 54 48 45 20 24 22 00 7A |EQUE ON THE $".z|
00000270: 0A FC 03 83 20 22 24 2E 2A 22 00 C2 0A FD 03 83 |.... "$.*"......|
00000280: 20 22 24 20 D4 48 45 20 43 41 4E 43 45 4C 4C 45 | "$ .HE CANCELLE|
00000290: 44 20 43 48 45 51 55 45 20 57 41 53 20 52 45 54 |D CHEQUE WAS RET|
000002A0: 55 52 4E 45 44 20 57 49 54 48 20 4D 59 20 42 41 |URNED WITH MY BA|
000002B0: 4E 4B 20 53 54 41 54 45 4D 45 4E 54 20 49 4E 20 |NK STATEMENT IN |
000002C0: 24 22 00 CE 0A FE 03 83 20 22 24 20 2A 22 00 12 |$"...... "$ *"..|
000002D0: 0B FF 03 83 20 22 2A 20 41 4E 44 20 54 48 45 20 |.... "* AND THE |
000002E0: 4E 45 58 54 20 44 41 59 20 C9 20 52 45 43 45 49 |NEXT DAY . RECEI|
000002F0: 56 45 44 20 59 4F 55 52 20 42 49 4C 4C 20 53 48 |VED YOUR BILL SH|
00000300: 4F 57 49 4E 47 20 54 48 45 20 41 4D 4F 55 4E 54 |OWING THE AMOUNT|
00000310: 26 22 00 2B 0B 00 04 83 20 22 24 20 53 54 49 4C |&".+.... "$ STIL|
00000320: 4C 20 55 4E 50 41 49 44 2E 2A 22 00 38 0B 01 04 |L UNPAID.*".8...|
00000330: 83 20 22 2A 20 20 2A 22 00 7F 0B 02 04 83 20 22 |. "* *"...... "|
00000340: 2A 20 20 20 20 20 D7 4F 55 4C 44 20 59 4F 55 20 |* .OULD YOU |
00000350: 50 4C 45 41 53 45 20 53 45 45 20 54 48 41 54 20 |PLEASE SEE THAT |
00000360: 54 48 45 20 50 41 59 4D 45 4E 54 20 49 53 20 43 |THE PAYMENT IS C|
00000370: 52 45 44 49 54 45 44 20 54 4F 20 4D 59 26 22 00 |REDITED TO MY&".|
00000380: 9A 0B 03 04 83 20 22 24 20 41 43 43 4F 55 4E 54 |..... "$ ACCOUNT|
00000390: 20 53 4F 20 54 48 41 54 2A 22 00 BC 0B 04 04 83 | SO THAT*"......|
000003A0: 20 22 2A 20 C9 20 41 4D 20 4E 4F 54 20 42 49 4C | "* . AM NOT BIL|
000003B0: 4C 45 44 20 41 47 41 49 4E 2E 2A 22 00 C9 0B 05 |LED AGAIN.*"....|
000003C0: 04 83 20 22 2A 20 20 2A 22 00 D6 0B 06 04 83 20 |.. "* *"...... |
000003D0: 22 2A 20 20 2A 22 00 1E 0C 07 04 83 20 22 2A 20 |"* *"...... "* |
000003E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000400: 20 20 20 20 20 20 20 20 20 20 20 20 D9 4F 55 52 | .OUR|
00000410: 53 20 56 45 52 59 20 54 52 55 4C 59 2A 22 00 2B |S VERY TRULY*".+|
00000420: 0C 08 04 83 20 22 2A 20 20 2A 22 00 38 0C 09 04 |.... "* *".8...|
00000430: 83 20 22 2A 20 20 2A 22 00 45 0C 0A 04 83 20 22 |. "* *".E.... "|
00000440: 2A 20 20 2A 22 00 52 0C 0B 04 83 20 22 2A 20 20 |* *".R.... "* |
00000450: 2A 22 00 5E 0C 10 04 83 20 22 45 4F 46 22 00 00 |*".^.... "EOF"..|
00000460: 00 |. |
..%.D.. 15,8,15:. A$(49):F$."COM-6-1".@.
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 $
"...... "$; *"...... "* *"...... "*
ON YOUR RECENT INVOICE I WAS CHARGED $$
"...... "$ FOR $"...... "$ I RECEIVED*".
..... "* FROM YOU.*.(.... "* *".N.... "
* THIS BILL WAS PAID ON $".N.... "$
BY MY CHEQUE ON THE $".Z.... "$.*".B....
"$ THE CANCELLED CHEQUE WAS RETURNED WI
TH MY BANK STATEMENT IN $".N.... "$ *"..
.... "* AND THE NEXT DAY I RECEIVED YOUR
BILL SHOWING THE AMOUNT&".+.... "$ STIL
L UNPAID.*".8.... "* *"..... "* WO
ULD YOU PLEASE SEE THAT THE PAYMENT IS C
REDITED TO MY&"...... "$ ACCOUNT SO THAT
*"...... "* I AM NOT BILLED AGAIN.*".I..
.. "* *".V.... "* *"...... "*
YOUR
S VERY TRULY*".+.... "* *".8.... "* *"
.E.... "* *".R.... "* *".^.... "EOF"..
.
> CLICK IMAGE PREVIEW FOR FULL MODAL