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

BABY2

FILE INFORMATION

FILENAME(S): BABY2

FILE TYPE(S): SEQ

FILE SIZE: 172b

FIRST SEEN: 2025-11-30 16:59:30

APPEARS ON: 1 disk(s)

FILE HASH

04fb9b9b7759c04fe21d683dfa00cf133eced5862244aa89b3cb299d6d8db008

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
KMMM PASCAL BABY2 SEQ High Voltage Complete C64 Collection 25 7 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 50 52 4F 47 52 41 4D 20  54 45 53 54 3B 0D 0D 56  |PROGRAM TEST;..V|
00000010: 41 52 20 49 20 3A 20 49  4E 54 45 47 45 52 3B 0D  |AR I : INTEGER;.|
00000020: 0D 42 45 47 49 4E 0D 20  20 49 3A 3D 31 30 30 30  |.BEGIN.  I:=1000|
00000030: 0D 20 20 52 45 50 45 41  54 0D 20 20 20 20 49 3A  |.  REPEAT.    I:|
00000040: 3D 49 2B 31 3B 0D 20 20  20 20 57 52 49 54 45 28  |=I+1;.    WRITE(|
00000050: 49 29 3B 0D 20 20 55 4E  54 49 4C 20 49 3D 31 35  |I);.  UNTIL I=15|
00000060: 30 30 3B 0D 45 4E 44 2E  20 20 20 20 20 20 20 20  |00;.END.        |
00000070: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000080: 20 20 20 20 20 20 20 20  20 20 20 20 0D 0D 0D 0D  |            ....|
00000090: 0D 0D 0D 0D 0D 0D 0D 0D  0D 0D 0D 0D 0D 0D 0D 0D  |................|
000000A0: 0D 0D 0D 0D 0D 0D 0D 0D  0D 0D 0D 03              |............    |

PROGRAM TEST;..VAR I : INTEGER;..BEGIN. 
 I:=1000.  REPEAT.    I:=I+1;.    WRITE(
I);.  UNTIL I=1500;.END.                
                    ....................
............
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL