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

GOSUB EKSPL.2

FILE INFORMATION

FILENAME(S): GOSUB EKSPL.2

FILE TYPE(S): PRG

FILE SIZE: 428b

FIRST SEEN: 2025-11-30 20:22:11

APPEARS ON: 1 disk(s)

FILE HASH

042a0eb93949629949bea56112f5f68284c2ddfa52f30baf555f0c8afa567c3a

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
SIKKERHEDSKOPIER GOSUB EKSPL.2 PRG Curtcool, Misc 1 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 1E 08 63 00 8F 20  2A 2A 2A 20 47 4F 53 55  |....c.. *** GOSU|
00000010: 42 20 45 4B 53 45 4D 50  45 4C 20 2A 2A 2A 00 44  |B EKSEMPEL ***.D|
00000020: 08 64 00 99 22 93 22 3A  99 A3 31 30 29 22 11 2A  |.d..".":..10)".*|
00000030: 2A 20 47 4F 53 55 42 20  45 4B 53 45 4D 50 45 4C  |* GOSUB EKSEMPEL|
00000040: 20 2A 2A 22 00 65 08 65  00 99 A3 31 30 29 22 11  | **".e.e...10)".|
00000050: 11 54 48 49 53 20 50 52  4F 47 52 41 4D 20 50 52  |.THIS PROGRAM PR|
00000060: 49 4E 54 53 22 00 6F 08  6E 00 8D 20 32 30 30 00  |INTS".o.n.. 200.|
00000070: 90 08 78 00 99 A3 31 30  29 22 11 53 4C 4F 57 4C  |..x...10)".SLOWL|
00000080: 59 20 4F 4E 20 54 48 45  20 53 43 52 45 45 4E 22  |Y ON THE SCREEN"|
00000090: 00 9A 08 82 00 8D 20 32  30 30 00 BA 08 8C 00 99  |...... 200......|
000000A0: A3 31 30 29 22 11 55 53  49 4E 47 20 41 20 53 49  |.10)".USING A SI|
000000B0: 4D 50 4C 45 20 4C 4F 4F  50 22 00 C4 08 96 00 8D  |MPLE LOOP"......|
000000C0: 20 32 30 30 00 E0 08 A0  00 99 A3 31 30 29 22 11  | 200.......10)".|
000000D0: 41 53 20 41 20 54 49 4D  45 20 44 45 4C 41 59 22  |AS A TIME DELAY"|
000000E0: 00 EA 08 AA 00 8D 20 32  30 30 00 06 09 AB 00 99  |...... 200......|
000000F0: A3 31 30 29 22 11 42 59  20 55 53 49 4E 47 20 47  |.10)".BY USING G|
00000100: 4F 53 55 42 2E 22 00 10  09 AC 00 8D 20 32 30 30  |OSUB."...... 200|
00000110: 00 2E 09 AD 00 99 A3 31  30 29 22 11 44 45 43 2E  |.......10)".DEC.|
00000120: 31 39 38 33 2E 20 43 2E  4D 41 49 4E 53 22 00 38  |1983. C.MAINS".8|
00000130: 09 AE 00 8D 20 32 30 30  00 60 09 AF 00 99 A3 31  |.... 200.`.....1|
00000140: 30 29 22 11 11 11 11 11  50 52 45 53 53 20 41 4E  |0)".....PRESS AN|
00000150: 59 20 4B 45 59 20 54 4F  20 53 54 4F 50 21 21 22  |Y KEY TO STOP!!"|
00000160: 00 6A 09 B0 00 8D 20 32  30 30 00 7E 09 B1 00 A1  |.j.... 200.~....|
00000170: 41 24 3A 8B 41 24 B2 22  22 A7 89 31 30 30 00 88  |A$:.A$.""..100..|
00000180: 09 B2 00 8D 20 32 30 30  00 8E 09 B4 00 80 00 A3  |.... 200........|
00000190: 09 C8 00 81 20 4C B2 31  20 A4 20 32 30 30 30 20  |.... L.1 . 2000 |
000001A0: 3A 20 82 00 A9 09 D2 00  8E 00 00 00              |: ..........    |

....C.. *** GOSUB EKSEMPEL ***.D.D..".":
..10)".** GOSUB EKSEMPEL **".E.E...10)".
.THIS PROGRAM PRINTS".O.N.. 200...X...10
)".SLOWLY ON THE SCREEN"...... 200......
.10)".USING A SIMPLE LOOP".D.... 200... 
...10)".AS A TIME DELAY"...... 200......
.10)".BY USING GOSUB."...... 200.......1
0)".DEC.1983. C.MAINS".8.... 200.`.....1
0)".....PRESS ANY KEY TO STOP!!".J.... 2
00.~....A$:.A$.""..100...... 200........
.H.. L.1 . 2000 : ....R.....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL