KOM.BAS7 7/4
FILE INFORMATION
FILENAME(S): KOM.BAS7 7/4
FILE TYPE(S): PRG
FILE SIZE: 1015b
FIRST SEEN: 2025-11-30 19:36:55
APPEARS ON: 1 disk(s)
FILE HASH
411165f560cb4f373f6a7c7d4efc17e7f6bc0e74bd7bb360345e585b6a28f3db
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| AFTEN | KOM.BAS7 7/4 | PRG | Curtcool, Bo | 9 | 20 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 01 00 8F 20 53 41 56 45 22 4B 4F 4D |....... SAVE"KOM| 00000010: 2E 42 41 53 37 20 37 2F 34 22 2C 38 00 3E 08 0A |.BAS7 7/4",8.>..| 00000020: 00 44 41 B2 35 36 35 37 37 3A 46 4C 41 47 B2 35 |.DA.56577:FLAG.5| 00000030: 36 35 38 39 3A 44 49 52 B2 35 36 35 37 39 00 4F |6589:DIR.56579.O| 00000040: 08 14 00 53 45 4E B2 32 35 35 3A 4D 4F B2 30 00 |...SEN.255:MO.0.| 00000050: 5A 08 E7 03 89 32 30 30 30 30 00 6F 08 E8 03 8F |Z....20000.o....| 00000060: 20 2A 2A 2A 46 4C 41 47 20 4D 4F 20 2A 2A 2A 00 | ***FLAG MO ***.| 00000070: 7E 08 F2 03 46 41 B2 C2 28 46 4C 41 47 29 00 98 |~...FA..(FLAG)..| 00000080: 08 FC 03 8B 20 46 41 B2 31 36 A7 20 4D 4F B2 AB |.... FA.16. MO..| 00000090: 31 3A 89 20 31 30 34 30 00 A1 08 06 04 4D 4F B2 |1:. 1040.....MO.| 000000A0: 30 00 A7 08 10 04 8E 00 AD 08 4B 04 3A 00 C2 08 |0.........K.:...| 000000B0: 4C 04 8F 20 2A 2A 2A 50 4F 52 54 20 55 44 20 2A |L.. ***PORT UD *| 000000C0: 2A 2A 00 CC 08 51 04 99 22 55 44 22 00 DA 08 56 |**...Q.."UD"...V| 000000D0: 04 97 20 44 49 52 2C 32 35 35 00 E0 08 60 04 8E |.. DIR,255...`..| 000000E0: 00 E6 08 AF 04 3A 00 FC 08 B0 04 8F 20 2A 2A 2A |.....:...... ***| 000000F0: 50 4F 52 54 20 49 4E 44 20 2A 2A 2A 00 07 09 B5 |PORT IND ***....| 00000100: 04 99 22 49 4E 44 22 00 13 09 BA 04 97 20 44 49 |.."IND"...... DI| 00000110: 52 2C 30 00 19 09 C4 04 8E 00 1F 09 13 05 3A 00 |R,0...........:.| 00000120: 33 09 14 05 8F 20 2A 2A 2A 4D 4F 44 54 41 47 20 |3.... ***MODTAG | 00000130: 2A 2A 2A 00 3F 09 19 05 99 20 22 4D 4F 44 22 00 |***.?.... "MOD".| 00000140: 4A 09 1E 05 49 4E 24 B2 22 22 00 63 09 23 05 8D |J...IN$."".c.#..| 00000150: 20 31 30 30 30 3A 8B 20 A8 20 4D 4F 20 89 20 31 | 1000:. . MO . 1| 00000160: 33 31 35 00 74 09 28 05 54 45 24 B2 C7 28 C2 28 |315.t.(.TE$..(.(| 00000170: 44 41 29 29 00 88 09 32 05 8B 20 54 45 24 B2 C7 |DA))...2.. TE$..| 00000180: 28 32 35 34 29 A7 20 8E 00 98 09 3C 05 49 4E 24 |(254). ....<.IN$| 00000190: B2 49 4E 24 AA 54 45 24 00 B1 09 46 05 8D 20 31 |.IN$.TE$...F.. 1| 000001A0: 30 30 30 3A 8B 20 A8 20 4D 4F 20 89 20 31 33 35 |000:. . MO . 135| 000001B0: 30 00 BC 09 50 05 89 20 31 33 31 35 00 C2 09 77 |0...P.. 1315...w| 000001C0: 05 3A 00 D4 09 78 05 8F 20 2A 2A 2A 53 45 4E 44 |.:...x.. ***SEND| 000001D0: 20 2A 2A 2A 00 F3 09 82 05 55 44 24 B2 55 44 24 | ***.....UD$.UD$| 000001E0: AA C7 28 32 35 34 29 3A 8D 20 31 31 30 30 3A 41 |..(254):. 1100:A| 000001F0: 4E B2 31 00 13 0A 8C 05 97 20 44 41 2C C6 28 CA |N.1...... DA,.(.| 00000200: 28 55 44 24 2C 41 4E 2C 31 29 29 3A 41 4E B2 41 |(UD$,AN,1)):AN.A| 00000210: 4E AA 31 00 2C 0A 96 05 8D 20 31 30 30 30 3A 8B |N.1.,.... 1000:.| 00000220: 20 A8 20 4D 4F 20 89 20 31 34 33 30 00 46 0A A0 | . MO . 1430.F..| 00000230: 05 8B 20 41 4E B1 C3 28 55 44 24 29 A7 20 55 44 |.. AN..(UD$). UD| 00000240: 24 B2 22 22 3A 8E 00 50 0A AA 05 89 31 34 32 30 |$."":..P....1420| 00000250: 00 56 0A DC 05 3A 00 79 0A 10 27 89 20 32 30 30 |.V...:.y..'. 200| 00000260: 30 30 3A 8F 20 2A 2A 2A 20 48 4F 56 45 44 50 52 |00:. *** HOVEDPR| 00000270: 4F 47 52 41 4D 20 2A 2A 2A 00 91 0A 1A 27 8D 20 |OGRAM ***....'. | 00000280: 31 34 30 30 3A 8F 20 53 45 4E 44 45 52 4B 41 4C |1400:. SENDERKAL| 00000290: 44 00 9B 0A 24 27 99 22 93 22 3B 00 AD 0A 2E 27 |D...$'.".";....'| 000002A0: 8D 20 31 30 30 30 3A 8F 20 46 4C 41 47 00 DC 0A |. 1000:. FLAG...| 000002B0: 38 27 8B 20 4D 4F 20 A7 20 8D 20 31 33 30 30 3A |8'. MO . . 1300:| 000002C0: 99 22 11 11 11 11 11 11 11 11 11 11 11 11 22 3B |."............";| 000002D0: 49 4E 24 3B 22 13 22 3B 55 41 24 3B 00 FB 0A 42 |IN$;".";UA$;...B| 000002E0: 27 8B 20 54 45 24 B2 C7 28 32 35 34 29 A7 20 8D |'. TE$..(254). .| 000002F0: 20 31 34 30 30 3A 8D 31 32 30 30 00 04 0B 4C 27 | 1400:.1200...L'| 00000300: A1 20 54 24 00 23 0B 56 27 8B 20 54 24 B2 C7 28 |. T$.#.V'. T$..(| 00000310: 31 33 33 29 A7 20 55 44 24 B2 55 41 24 3A 54 24 |133). UD$.UA$:T$| 00000320: B2 22 22 00 41 0B 60 27 8B 20 54 24 B3 B1 22 22 |."".A.`'. T$..""| 00000330: A7 20 55 41 24 B2 55 41 24 AA 54 24 3A 99 54 24 |. UA$.UA$.T$:.T$| 00000340: 3B 00 4C 0B 6A 27 89 31 30 30 33 30 00 52 0B BC |;.L.j'.10030.R..| 00000350: 4D 3A 00 69 0B 20 4E 8F 20 41 55 54 4F 20 53 45 |M:.i. N. AUTO SE| 00000360: 4E 44 2D 4D 4F 44 54 41 47 00 7A 0B 2A 4E 8F 20 |ND-MODTAG.z.*N. | 00000370: 47 4F 54 4F 20 32 30 30 35 30 00 91 0B 34 4E 55 |GOTO 20050...4NU| 00000380: 44 24 B2 22 56 45 4E 53 54 52 45 20 53 45 4E 44 |D$."VENSTRE SEND| 00000390: 22 00 A5 0B 39 4E 81 20 58 B2 31 20 A4 20 33 30 |"...9N. X.1 . 30| 000003A0: 30 20 3A 20 82 00 B9 0B 3E 4E 8D 20 31 34 30 30 |0 : ....>N. 1400| 000003B0: 20 3A 20 8F 20 53 45 4E 44 00 CC 0B 52 4E 8D 20 | : . SEND...RN. | 000003C0: 31 32 30 30 20 3A 20 8F 20 49 4E 44 00 DF 0B 5C |1200 : . IND...\| 000003D0: 4E 8D 20 31 33 30 30 20 3A 20 8F 20 4D 4F 44 00 |N. 1300 : . MOD.| 000003E0: E9 0B 66 4E 99 20 49 4E 24 00 F4 0B 70 4E 89 32 |..fN. IN$...pN.2| 000003F0: 30 30 32 30 00 00 00 |0020... |
....... SAVE"KOM.BAS7 7/4",8.>...DA.5657 7:FLAG.56589:DIR.56579.O...SEN.255:MO.0. Z....20000.O.... ***FLAG MO ***.~...FA.B (FLAG)...... FA.16. MO..1:. 1040.....MO. 0.........K.:.B.L.. ***PORT UD ***.L.Q.. "UD".Z.V.. DIR,255...`.......:...... *** PORT IND ***......"IND"...... DIR,0...D. ......:.3.... ***MODTAG ***.?.... "MOD". J...IN$."".C.#.. 1000:. . MO . 1315.T.(. TE$.G(B(DA))...2.. TE$.G(254). ....<.IN$ .IN$.TE$...F.. 1000:. . MO . 1350...P.. 1315.B.W.:.T.X.. ***SEND ***.....UD$.UD$ .G(254):. 1100:AN.1...... DA,F(J(UD$,AN, 1)):AN.AN.1.,.... 1000:. . MO . 1430.F. .. AN.C(UD$). UD$."":..P....1420.V...:.Y ..'. 20000:. *** HOVEDPROGRAM ***....'. 1400:. SENDERKALD...$'.".";....'. 1000:. FLAG...8'. MO . . 1300:."............"; IN$;".";UA$;...B'. TE$.G(254). . 1400:.1 200...L'. T$.#.V'. T$.G(133). UD$.UA$:T$ ."".A.`'. T$.."". UA$.UA$.T$:.T$;.L.J'.1 0030.R..M:.I. N. AUTO SEND-MODTAG.Z.*N. GOTO 20050...4NUD$."VENSTRE SEND"...9N. X.1 . 300 : ....>N. 1400 : . SEND.L.RN. 1200 : . IND...\N. 1300 : . MOD...FN. IN $...PN.20020...
> CLICK IMAGE PREVIEW FOR FULL MODAL