SOU.TEXT 3 05'11

FILE INFORMATION

FILENAME(S): SOU.TEXT 3 05'11

FILE TYPE(S): PRG

FILE SIZE: 1012b

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

APPEARS ON: 1 disk(s)

FILE HASH

d15d19846c579d7eb748a240fa7104c8e7b338cd4373a47e26eef0962a3ff798

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
AFTEN	SOU.TEXT 3 05'11	PRG	Curtcool, Bo	20	2	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 AA 0A 00 3B 53 2F  53 4F 55 2E 54 45 58 54  |.....;S/SOU.TEXT|
00000010: 20 33 20 30 35 27 31 31  2F 20 38 00 14 00 3B 00  | 3 05'11/ 8...;.|
00000020: 1E 00 3B 49 4E 50 55 54  20 54 49 4C 20 42 41 53  |..;INPUT TIL BAS|
00000030: 49 43 00 28 00 3B 00 32  00 B8 24 36 30 30 30 00  |IC.(.;.2..$6000.|
00000040: 3C 00 3B 00 46 00 3B 53  54 59 52 45 50 52 4F 47  |<.;.F.;STYREPROG|
00000050: 52 41 4D 00 50 00 3B 00  5A 00 53 54 41 52 54 20  |RAM.P.;.Z.START |
00000060: BF 00 64 00 53 54 59 52  20 96 43 4C 52 00 6E 00  |..d.STYR .CLR.n.|
00000070: 96 54 53 4B 52 49 56 00  72 00 96 49 4E 54 4F 4E  |.TSKRIV.r..INTON|
00000080: 00 78 00 96 48 45 4E 54  00 7A 00 96 49 4E 54 4F  |.x..HENT.z..INTO|
00000090: 46 46 00 82 00 3B 20 20  20 20 20 20 20 20 20 4A  |FF...;         J|
000000A0: 53 52 20 48 45 4E 54 54  45 47 4E 00 8C 00 9F 00  |SR HENTTEGN.....|
000000B0: 96 00 3B 00 A0 00 3B 00  AA 00 3B 52 55 54 49 4E  |..;...;...;RUTIN|
000000C0: 45 20 4B 41 4C 44 00 B4  00 3B 00 BE 00 43 4C 52  |E KALD...;...CLR|
000000D0: 20 C0 24 45 35 34 34 3B  45 4A 20 48 55 53 4B 45  | .$E544;EJ HUSKE|
000000E0: 00 C8 00 43 48 52 4F 55  54 20 C0 24 46 46 44 32  |...CHROUT .$FFD2|
000000F0: 3B 53 49 44 45 20 32 37  32 00 D2 00 50 4C 4F 54  |;SIDE 272...PLOT|
00000100: 20 C0 24 46 46 46 30 00  DC 00 48 45 4E 54 20 C0  | .$FFF0...HENT .|
00000110: 24 46 46 43 46 00 DE 00  3B 00 E0 00 3B 49 4E 54  |$FFCF...;...;INT|
00000120: 45 52 52 55 50 54 20 56  41 52 49 41 42 4C 45 52  |ERRUPT VARIABLER|
00000130: 00 E2 00 3B 00 E6 00 49  4E 54 56 45 43 20 C0 24  |...;...INTVEC .$|
00000140: 30 33 31 34 3B 49 4E 54  45 52 52 55 50 54 20 56  |0314;INTERRUPT V|
00000150: 41 52 00 F0 00 47 45 4D  20 BA 30 2C 30 20 3B 47  |AR...GEM .0,0 ;G|
00000160: 41 4D 4D 45 4C 20 49 4E  54 45 52 52 00 FA 00 3B  |AMMEL INTERR...;|
00000170: 00 04 01 54 45 4B 53 20  C1 2F 48 45 52 20 4B 41  |...TEKS ./HER KA|
00000180: 4E 20 44 55 20 53 4B 52  49 56 45 20 38 30 20 54  |N DU SKRIVE 80 T|
00000190: 45 47 4E 2F 00 0E 01 BA  0A 06 30 2C 30 2C 30 00  |EGN/......0,0,0.|
000001A0: 18 01 3B 00 22 01 54 53  4B 52 49 56 20 92 23 35  |..;.".TSKRIV .#5|
000001B0: 3B 4C 49 4E 00 2C 01 8D  23 30 20 3B 43 4F 4C 00  |;LIN.,..#0 ;COL.|
000001C0: 36 01 99 00 40 01 96 50  4C 4F 54 00 4A 01 8D 23  |6...@..PLOT.J..#|
000001D0: 30 00 54 01 48 4F 50 20  85 54 45 4B 53 E2 00 5E  |0.T.HOP .TEKS..^|
000001E0: 01 B7 4C 49 4E 49 45 00  68 01 96 43 48 52 4F 55  |..LINIE.h..CHROU|
000001F0: 54 00 72 01 AD 00 7C 01  99 00 86 01 B4 48 4F 50  |T.r...|......HOP|
00000200: 00 90 01 4C 49 4E 49 45  20 92 23 30 3B 4C 49 4E  |...LINIE .#0;LIN|
00000210: 00 9A 01 8D 23 33 20 3B  43 4F 4C 00 A4 01 99 00  |....#3 ;COL.....|
00000220: AE 01 96 50 4C 4F 54 00  B8 01 96 53 4C 55 54 00  |...PLOT....SLUT.|
00000230: C2 01 53 4C 55 54 20 9F  00 CC 01 3B 00 D6 01 3B  |..SLUT ....;...;|
00000240: 48 45 4E 54 20 20 20 20  20 20 53 54 41 20 24 36  |HENT      STA $6|
00000250: 30 30 30 00 E0 01 3B 00  EA 01 48 45 4E 54 54 45  |000...;...HENTTE|
00000260: 47 4E 20 AE 00 F4 01 97  00 FE 01 3B 00 08 02 3B  |GN ........;...;|
00000270: 49 4E 54 45 52 52 55 50  54 20 52 55 54 49 4E 45  |INTERRUPT RUTINE|
00000280: 00 12 02 3B 00 1C 02 49  4E 54 20 8F 24 46 46 00  |...;...INT .$FF.|
00000290: 26 02 85 24 46 46 00 30  02 86 23 31 32 38 20 3B  |&..$FF.0..#128 ;|
000002A0: 44 45 43 00 3A 02 B1 42  4C 49 4E 4B 00 44 02 85  |DEC.:..BLINK.D..|
000002B0: 23 31 00 4E 02 84 31 30  32 34 20 3B 47 45 4D 20  |#1.N..1024 ;GEM |
000002C0: 49 20 53 4B 45 52 4D 00  58 02 95 28 47 45 4D 29  |I SKERM.X..(GEM)|
000002D0: 00 62 02 3B 00 6C 02 42  4C 49 4E 4B 20 85 23 30  |.b.;.l.BLINK .#0|
000002E0: 00 76 02 84 31 30 32 34  00 80 02 95 28 47 45 4D  |.v..1024....(GEM|
000002F0: 29 00 8A 02 3B 00 94 02  3B 49 4E 54 20 4F 4E 00  |)...;...;INT ON.|
00000300: 9E 02 3B 00 A8 02 49 4E  54 4F 4E 20 85 49 4E 54  |..;...INTON .INT|
00000310: 56 45 43 0A 02 3B 4C 4F  20 41 46 20 56 45 43 00  |VEC..;LO AF VEC.|
00000320: B2 02 84 47 45 4D 00 BC  02 85 49 4E 54 56 45 43  |...GEM....INTVEC|
00000330: 2B 31 3B 48 49 20 41 46  20 56 45 43 00 C6 02 84  |+1;HI AF VEC....|
00000340: 47 45 4D 2B 31 00 D0 02  A1 0A 04 3B 49 4E 54 45  |GEM+1......;INTE|
00000350: 52 52 55 50 54 20 46 52  41 00 DA 02 85 23 49 4E  |RRUPT FRA....#IN|
00000360: 54 00 E4 02 84 49 4E 54  56 45 43 00 EE 02 85 5E  |T....INTVEC....^|
00000370: 49 4E 54 00 F8 02 84 49  4E 54 56 45 43 2B 31 00  |INT....INTVEC+1.|
00000380: 02 03 9E 0A 04 3B 49 4E  54 45 52 52 55 50 54 20  |.....;INTERRUPT |
00000390: 54 49 4C 00 0C 03 9F 00  16 03 3B 00 20 03 3B 49  |TIL.......;. .;I|
000003A0: 4E 54 4F 46 46 00 2A 03  3B 00 34 03 49 4E 54 4F  |NTOFF.*.;.4.INTO|
000003B0: 46 46 20 A1 0A 02 3B 49  4E 54 52 52 55 50 54 20  |FF ...;INTRRUPT |
000003C0: 46 52 41 00 3E 03 85 47  45 4D 00 48 03 84 49 4E  |FRA.>..GEM.H..IN|
000003D0: 54 56 45 43 00 52 03 85  47 45 4D 2B 31 00 5C 03  |TVEC.R..GEM+1.\.|
000003E0: 84 49 4E 54 56 45 43 2B  31 00 66 03 9E 00 70 03  |.INTVEC+1.f...p.|
000003F0: 9F 00 FF FF                                       |....            |

.....;S/SOU.TEXT 3 05'11/ 8...;...;INPUT
 TIL BASIC.(.;.2..$6000.<.;.F.;STYREPROG
RAM.P.;.Z.START ..D.STYR .CLR.N..TSKRIV.
R..INTON.X..HENT.Z..INTOFF...;         J
SR HENTTEGN.......;. .;...;RUTINE KALD..
.;...CLR .$E544;EJ HUSKE.H.CHROUT .$FFD2
;SIDE 272.R.PLOT .$FFF0...HENT .$FFCF...
;...;INTERRUPT VARIABLER...;...INTVEC .$
0314;INTERRUPT VAR...GEM .0,0 ;GAMMEL IN
TERR...;...TEKS A/HER KAN DU SKRIVE 80 T
EGN/......0,0,0...;.".TSKRIV .#5;LIN.,..
#0 ;COL.6...@..PLOT.J..#0.T.HOP .TEKS..^
..LINIE.H..CHROUT.R...|......HOP...LINIE
 .#0;LIN....#3 ;COL........PLOT....SLUT.
B.SLUT ..L.;.V.;HENT      STA $6000...;.
..HENTTEGN ........;...;INTERRUPT RUTINE
...;...INT .$FF.&..$FF.0..#128 ;DEC.:..B
LINK.D..#1.N..1024 ;GEM I SKERM.X..(GEM)
.B.;.L.BLINK .#0.V..1024....(GEM)...;...
;INT ON...;...INTON .INTVEC..;LO AF VEC.
...GEM....INTVEC+1;HI AF VEC.F..GEM+1.P.
...;INTERRUPT FRA.Z..#INT....INTVEC....^
INT....INTVEC+1......;INTERRUPT TIL.....
..;. .;INTOFF.*.;.4.INTOFF ...;INTRRUPT 
FRA.>..GEM.H..INTVEC.R..GEM+1.\..INTVEC+
1.F...P.....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL