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

ALLER NYESTE

FILE INFORMATION

FILENAME(S): ALLER NYESTE

FILE TYPE(S): PRG

FILE SIZE: 1022b

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

APPEARS ON: 1 disk(s)

FILE HASH

c78f64ee55dac8d007bc38158003eb9d456253c69cbba0283a7256e4d89b5805

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
AFTEN ALLER NYESTE PRG Curtcool, Bo 27 7 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 24 08 0A 00 44 49  52 B2 35 36 35 37 39 3A  |..$...DIR.56579:|
00000010: 44 41 54 B2 35 36 35 37  37 3A 46 4C 41 47 B2 35  |DAT.56577:FLAG.5|
00000020: 36 35 38 39 00 34 08 14  00 89 20 20 36 30 30 3A  |6589.4....  600:|
00000030: 99 22 93 22 00 61 08 1E  00 8D 20 31 30 30 3A 8B  |.".".a.... 100:.|
00000040: 20 4D 4F 20 A7 20 8D 20  34 30 30 3A 99 22 11 11  | MO . . 400:."..|
00000050: 11 11 11 22 3B 49 4E 24  3B 22 13 22 AA 55 41 24  |...";IN$;".".UA$|
00000060: 3B 00 A0 08 1F 00 8F 3A  47 4F 53 55 42 20 31 30  |;......:GOSUB 10|
00000070: 30 3A 49 46 20 4D 4F 20  54 48 45 4E 20 47 4F 53  |0:IF MO THEN GOS|
00000080: 55 42 20 34 30 30 3A 50  52 49 4E 54 22 11 11 11  |UB 400:PRINT"...|
00000090: 11 11 22 3B 49 4E 24 3B  22 13 22 2B 55 41 24 3B  |..";IN$;"."+UA$;|
000000A0: 00 BF 08 28 00 8B 20 54  45 24 B2 C7 28 32 35 34  |...(.. TE$..(254|
000000B0: 29 20 A7 20 8D 20 35 30  30 3A 8D 20 33 30 30 00  |) . . 500:. 300.|
000000C0: C8 08 32 00 A1 20 54 24  00 E8 08 3C 00 8B 20 54  |..2.. T$...<.. T|
000000D0: 24 B2 C7 28 31 33 33 29  20 A7 20 55 44 24 B2 55  |$..(133) . UD$.U|
000000E0: 41 24 3A 54 24 B2 22 22  00 07 09 46 00 8B 20 54  |A$:T$.""...F.. T|
000000F0: 24 B3 B1 22 22 20 A7 20  55 41 24 B2 55 41 24 AA  |$.."" . UA$.UA$.|
00000100: 54 24 3A 99 54 24 3B 00  30 09 47 00 8F 3A 49 46  |T$:.T$;.0.G..:IF|
00000110: 20 54 24 3C 3E 22 22 20  54 48 45 4E 20 55 41 24  | T$<>"" THEN UA$|
00000120: 3D 55 41 24 2B 54 24 3A  50 52 49 4E 54 54 24 3B  |=UA$+T$:PRINTT$;|
00000130: 00 39 09 4B 00 89 20 33  30 00 51 09 64 00 8F 20  |.9.K.. 30.Q.d.. |
00000140: 2A 2A 2A 46 4C 41 47 20  4D 4F 44 54 41 47 2A 2A  |***FLAG MODTAG**|
00000150: 2A 00 60 09 6E 00 46 41  B2 C2 28 46 4C 41 47 29  |*.`.n.FA..(FLAG)|
00000160: 00 7A 09 78 00 8B 20 46  41 B2 31 36 20 A7 20 4D  |.z.x.. FA.16 . M|
00000170: 4F B2 AB 31 3A 89 20 31  34 30 00 83 09 82 00 4D  |O..1:. 140.....M|
00000180: 4F B2 30 00 89 09 8C 00  8E 00 9D 09 C8 00 8F 20  |O.0............ |
00000190: 2A 2A 2A 50 4F 52 54 20  55 44 2A 2A 2A 00 A7 09  |***PORT UD***...|
000001A0: CD 00 99 22 55 44 22 00  B5 09 D2 00 97 20 44 49  |..."UD"...... DI|
000001B0: 52 2C 32 35 35 00 BB 09  DC 00 8E 00 D0 09 2C 01  |R,255.........,.|
000001C0: 8F 20 2A 2A 2A 50 4F 52  54 20 49 4E 44 2A 2A 2A  |. ***PORT IND***|
000001D0: 00 DB 09 31 01 99 22 49  4E 44 22 00 E7 09 36 01  |...1.."IND"...6.|
000001E0: 97 20 44 49 52 2C 30 00  ED 09 40 01 8E 00 00 0A  |. DIR,0...@.....|
000001F0: 90 01 8F 20 2A 2A 2A 4D  4F 44 54 41 47 2A 2A 2A  |... ***MODTAG***|
00000200: 00 0E 0A 95 01 99 22 4D  4F 44 54 41 47 22 00 19  |......"MODTAG"..|
00000210: 0A 9A 01 49 4E 24 B2 22  22 00 32 0A 9F 01 8D 20  |...IN$."".2.... |
00000220: 31 30 30 3A 8B 20 A8 20  4D 4F 20 A7 20 89 20 34  |100:. . MO . . 4|
00000230: 31 35 00 44 0A A4 01 54  45 24 B2 C7 28 C2 28 44  |15.D...TE$..(.(D|
00000240: 41 54 29 29 00 5A 0A AE  01 8B 20 54 45 24 B2 C7  |AT)).Z.... TE$..|
00000250: 20 28 32 35 34 29 20 A7  20 8E 00 6A 0A B8 01 49  | (254) . ..j...I|
00000260: 4E 24 B2 49 4E 24 AA 54  45 24 00 92 0A C2 01 8F  |N$.IN$.TE$......|
00000270: 20 47 4F 53 55 42 20 31  30 30 3A 49 46 20 4E 4F  | GOSUB 100:IF NO|
00000280: 54 20 4D 4F 20 54 48 45  4E 20 47 4F 54 4F 20 34  |T MO THEN GOTO 4|
00000290: 35 30 00 9C 0A CC 01 89  20 34 31 35 00 AF 0A F4  |50...... 415....|
000002A0: 01 8F 20 2A 2A 2A 53 45  4E 44 45 52 2A 2A 2A 00  |.. ***SENDER***.|
000002B0: BB 0A F9 01 99 22 53 45  4E 44 22 00 D9 0A FE 01  |....."SEND".....|
000002C0: 55 44 24 B2 55 44 24 AA  C7 28 32 35 34 29 3A 8D  |UD$.UD$..(254):.|
000002D0: 20 32 30 30 3A 41 4E B2  31 00 FA 0A 08 02 97 20  | 200:AN.1...... |
000002E0: 44 41 54 2C C6 28 CA 28  55 44 24 2C 41 4E 2C 31  |DAT,.(.(UD$,AN,1|
000002F0: 29 29 3A 41 4E B2 41 4E  AA 31 00 13 0B 12 02 8D  |)):AN.AN.1......|
00000300: 20 31 30 30 3A 8B 20 A8  20 4D 4F 20 A7 20 89 20  | 100:. . MO . . |
00000310: 35 33 30 00 2E 0B 1C 02  8B 20 41 4E B1 C3 28 55  |530...... AN..(U|
00000320: 44 24 29 20 A7 20 55 44  24 B2 22 22 3A 8E 00 38  |D$) . UD$."":..8|
00000330: 0B 26 02 89 20 35 32 30  00 55 0B 58 02 8F 20 2A  |.&.. 520.U.X.. *|
00000340: 2A 2A 41 55 54 4F 20 53  45 4E 44 2D 4D 4F 44 54  |**AUTO SEND-MODT|
00000350: 41 47 2A 2A 2A 00 8B 0B  62 02 8F 20 47 4F 54 4F  |AG***...b.. GOTO|
00000360: 20 36 34 30 3A 52 45 4D  20 4D 4F 44 54 41 47 45  | 640:REM MODTAGE|
00000370: 52 45 4E 20 53 4C 45 54  54 45 52 20 52 45 4D 4D  |REN SLETTER REMM|
00000380: 45 4E 20 46 30 52 20 47  4F 54 4F 00 A0 0B 6C 02  |EN F0R GOTO...l.|
00000390: 55 44 24 B2 22 48 30 4A  52 45 20 53 45 4E 44 22  |UD$."H0JRE SEND"|
000003A0: 00 B1 0B 76 02 8D 20 35  30 30 3A 8F 20 53 45 4E  |...v.. 500:. SEN|
000003B0: 44 00 C1 0B 80 02 8D 20  33 30 30 3A 8F 20 49 4E  |D...... 300:. IN|
000003C0: 44 00 D1 0B 8A 02 8D 20  34 30 30 3A 8F 20 4D 4F  |D...... 400:. MO|
000003D0: 44 00 DB 0B 94 02 99 20  49 4E 24 00 E5 0B 9E 02  |D...... IN$.....|
000003E0: 89 20 36 32 30 00 FB 0B  E7 03 8F 20 53 41 56 45  |. 620...... SAVE|
000003F0: 22 4B 4F 4D 4D 55 27 38  22 2C 38 00 00 00        |"KOMMU'8",8...  |

..$...DIR.56579:DAT.56577:FLAG.56589.4..
..  600:.".".A.... 100:. MO . . 400:."..
...";IN$;".".UA$;. ....:GOSUB 100:IF MO 
THEN GOSUB 400:PRINT".....";IN$;"."+UA$;
...(.. TE$.G(254) . . 500:. 300.H.2.. T$
...<.. T$.G(133) . UD$.UA$:T$.""...F.. T
$.."" . UA$.UA$.T$:.T$;.0.G..:IF T$<>"" 
THEN UA$=UA$+T$:PRINTT$;.9.K.. 30.Q.D.. 
***FLAG MODTAG***.`.N.FA.B(FLAG).Z.X.. F
A.16 . MO..1:. 140.....MO.0.........H.. 
***PORT UD***...M.."UD"...R.. DIR,255...
....P.,.. ***PORT IND***...1.."IND"...6.
. DIR,0...@........ ***MODTAG***......"M
ODTAG".....IN$."".2.... 100:. . MO . . 4
15.D...TE$.G(B(DAT)).Z.... TE$.G (254) .
 ..J...IN$.IN$.TE$...B.. GOSUB 100:IF NO
T MO THEN GOTO 450...L.. 415...... ***SE
NDER***......"SEND".Y...UD$.UD$.G(254):.
 200:AN.1...... DAT,F(J(UD$,AN,1)):AN.AN
.1...... 100:. . MO . . 530...... AN.C(U
D$) . UD$."":..8.&.. 520.U.X.. ***AUTO S
END-MODTAG***...B.. GOTO 640:REM MODTAGE
REN SLETTER REMMEN F0R GOTO. .L.UD$."H0J
RE SEND"...V.. 500:. SEND.A.... 300:. IN
D.Q.... 400:. MOD...... IN$...... 620...
... SAVE"KOMMU'8",8...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL