CREA3-7
FILE INFORMATION
FILENAME(S): CREA3-7
FILE TYPE(S): PRG
FILE SIZE: 1.2K
FIRST SEEN: 2025-11-30 19:55:20
APPEARS ON: 1 disk(s)
FILE HASH
d1f6f82d3e6e99174746d7fad9f5844aebadf8ca3007d711d2b709bbd467bbd3
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GROG | CREA3-7 | PRG | Curtcool, Hans Curt | 12 | 20 | 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 50 41 59 |. A$(49):F$."PAY|
00000020: 2D 33 2D 37 22 00 40 08 6E 00 9F 32 2C 38 2C 32 |-3-7".@.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 20 20 2A 22 00 AB |"...... "$ *"..|
000001A0: 09 F4 03 83 20 22 2A 20 20 2A 22 00 DA 09 F5 03 |.... "* *".....|
000001B0: 83 20 22 2A 20 20 20 20 20 D4 48 41 4E 4B 20 59 |. "* .HANK Y|
000001C0: 4F 55 20 46 4F 52 20 59 4F 55 52 20 43 48 45 51 |OU FOR YOUR CHEQ|
000001D0: 55 45 20 46 4F 52 20 24 24 22 00 06 0A F6 03 83 |UE FOR $$"......|
000001E0: 20 22 24 20 49 4E 20 50 41 59 4D 45 4E 54 20 4F | "$ IN PAYMENT O|
000001F0: 46 20 4F 55 52 20 49 4E 56 4F 49 43 45 20 44 41 |F OUR INVOICE DA|
00000200: 54 45 44 20 2A 22 00 12 0A F7 03 83 20 22 2A 20 |TED *"...... "* |
00000210: 24 22 00 1E 0A F8 03 83 20 22 24 2E 2A 22 00 2B |$"...... "$.*".+|
00000220: 0A F9 03 83 20 22 2A 20 20 2A 22 00 58 0A FA 03 |.... "* *".X...|
00000230: 83 20 22 2A 20 20 20 20 20 D7 45 20 41 52 45 20 |. "* .E ARE |
00000240: 47 4C 41 44 20 54 4F 20 41 4C 4C 4F 57 20 59 4F |GLAD TO ALLOW YO|
00000250: 55 20 54 48 45 20 24 22 00 8E 0A FB 03 83 20 22 |U THE $"...... "|
00000260: 24 25 20 43 41 53 48 20 44 49 53 43 4F 55 4E 54 |$% CASH DISCOUNT|
00000270: 20 49 4E 20 54 48 49 53 20 49 4E 53 54 41 4E 43 | IN THIS INSTANC|
00000280: 45 2E 20 C8 4F 57 45 56 45 52 20 57 45 2A 00 D7 |E. .OWEVER WE*..|
00000290: 0A FC 03 83 20 22 2A 20 4D 55 53 54 20 52 45 4D |.... "* MUST REM|
000002A0: 49 4E 44 20 59 4F 55 20 54 48 41 54 20 53 55 43 |IND YOU THAT SUC|
000002B0: 48 20 44 49 53 43 4F 55 4E 54 53 20 41 52 45 20 |H DISCOUNTS ARE |
000002C0: 47 49 56 45 4E 20 57 48 45 4E 20 50 41 59 4D 45 |GIVEN WHEN PAYME|
000002D0: 4E 54 20 49 53 26 22 00 EF 0A FD 03 83 20 22 24 |NT IS&"...... "$|
000002E0: 20 4D 41 44 45 20 57 49 54 48 49 4E 20 24 22 00 | MADE WITHIN $".|
000002F0: FB 0A FE 03 83 20 22 24 20 2A 22 00 27 0B FF 03 |..... "$ *".'...|
00000300: 83 20 22 2A 20 44 41 59 53 20 4F 46 20 54 48 45 |. "* DAYS OF THE|
00000310: 20 44 41 54 45 20 4F 46 20 54 48 45 20 49 4E 56 | DATE OF THE INV|
00000320: 4F 49 43 45 2E 2A 22 00 34 0B 00 04 83 20 22 2A |OICE.*".4.... "*|
00000330: 20 20 2A 22 00 76 0B 01 04 83 20 22 2A 20 20 20 | *".v.... "* |
00000340: 20 20 D7 45 20 48 4F 50 45 20 59 4F 55 20 57 49 | .E HOPE YOU WI|
00000350: 4C 4C 20 42 45 20 41 42 4C 45 20 54 4F 20 54 41 |LL BE ABLE TO TA|
00000360: 4B 45 20 41 44 56 41 4E 54 41 47 45 20 4F 46 20 |KE ADVANTAGE OF |
00000370: 4F 55 52 20 24 22 00 97 0B 02 04 83 20 22 24 25 |OUR $"...... "$%|
00000380: 20 43 41 53 48 20 44 49 53 43 4F 55 4E 54 20 49 | CASH DISCOUNT I|
00000390: 4E 20 54 48 45 2A 22 00 C7 0B 03 04 83 20 22 2A |N THE*"...... "*|
000003A0: 20 46 55 54 55 52 45 20 42 59 20 4D 41 4B 49 4E | FUTURE BY MAKIN|
000003B0: 47 20 50 41 59 4D 45 4E 54 20 44 55 52 49 4E 47 |G PAYMENT DURING|
000003C0: 20 54 48 45 20 24 22 00 F9 0B 04 04 83 20 22 24 | THE $"...... "$|
000003D0: 20 44 41 59 20 50 45 52 49 4F 44 20 46 4F 4C 4C | DAY PERIOD FOLL|
000003E0: 4F 57 49 4E 47 20 54 48 45 20 49 4E 56 4F 49 43 |OWING THE INVOIC|
000003F0: 45 20 44 41 54 45 2E 2A 22 00 06 0C 05 04 83 20 |E DATE.*"...... |
00000400: 22 2A 20 20 2A 22 00 13 0C 06 04 83 20 22 2A 20 |"* *"...... "* |
00000410: 20 2A 22 00 5B 0C 07 04 83 20 22 2A 20 20 20 20 | *".[.... "* |
00000420: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000440: 20 20 20 20 20 20 20 20 20 D9 4F 55 52 53 20 56 | .OURS V|
00000450: 45 52 59 20 54 52 55 4C 59 2A 22 00 68 0C 08 04 |ERY TRULY*".h...|
00000460: 83 20 22 2A 20 20 2A 22 00 75 0C 09 04 83 20 22 |. "* *".u.... "|
00000470: 2A 20 20 2A 22 00 82 0C 0A 04 83 20 22 2A 20 20 |* *"...... "* |
00000480: 2A 22 00 8F 0C 0B 04 83 20 22 2A 20 20 2A 22 00 |*"...... "* *".|
00000490: 9B 0C 10 04 83 20 22 45 4F 46 22 00 00 00 |..... "EOF"... |
..%.D.. 15,8,15:. A$(49):F$."PAY-3-7".@.
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 $
"...... "$ *"...... "* *".Z.... "*
THANK YOU FOR YOUR CHEQUE FOR $$"......
"$ IN PAYMENT OF OUR INVOICE DATED *"..
.... "* $"...... "$.*".+.... "* *".X...
. "* WE ARE GLAD TO ALLOW YOU THE $"
...... "$% CASH DISCOUNT IN THIS INSTANC
E. HOWEVER WE*.W.... "* MUST REMIND YOU
THAT SUCH DISCOUNTS ARE GIVEN WHEN PAYME
NT IS&"...... "$ MADE WITHIN $"...... "$
*".'.... "* DAYS OF THE DATE OF THE INV
OICE.*".4.... "* *".V.... "* WE HOP
E YOU WILL BE ABLE TO TAKE ADVANTAGE OF
OUR $"...... "$% CASH DISCOUNT IN THE*".
G.... "* FUTURE BY MAKING PAYMENT DURING
THE $"...... "$ DAY PERIOD FOLLOWING TH
E INVOICE DATE.*"...... "* *"...... "*
*".[.... "*
YOURS VERY TRULY*".H...
. "* *".U.... "* *"...... "* *"......
"* *"...... "EOF"...
> CLICK IMAGE PREVIEW FOR FULL MODAL