Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_50.ADF » G/LOADER
G/LOADER
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_50.ADF |
Filename: | G/LOADER |
Read OK: | ✔ |
File size: | 0473 bytes |
Load address: | FFFF0E00 |
Exec address: | FFFF802B |
Duplicates
There are 2 duplicate copies of this file in the archive:
- AEW website » eug » eug_3_5_discs_Eug-50_A-EUG50.adf » G/LOADER
- AEW website » eug » eug_5_25_discs_Eug-50_D-EUG50.dsd » G.LOADER
- Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_50.ADF » G/LOADER
File contents
5*FX200 1 10REM The INSOMNIA Adventure 20REM Disk Version By The Ice-Man 30REM Tape Version By The Haven 40MODE2:VDU23;8202;0;0;0;19,1,0;0;19,2,0;0;19,6,0;0;19,7,0;0;28,0,8,19,0:GCOL0,130:CLG:COLOUR130 50*LOAD G.EYES 49C0 60CLS:A$=INKEY$(45) 70COLOUR4:PRINTTAB(0,2)"WELCOME TO..." 80A$=INKEY$(100) 90VDU24,0;0;1279;300; 100VDU19,1,1;0; 110VDU19,7,7;0; 120VDU19,6,6;0; 130 FOR loop=1 TO 5 140 VDU19,0,1,0,0,0 150 VDU19,7,1,0,0,0 160 FOR delay=1 TO 250 170 NEXT delay 180 VDU19,0,0,0,0,0 190 VDU19,7,7,0,0,0 200 FOR delay=1 TO 250 210 NEXT delay 220 NEXT loop 230 GCOL0,6 240lp=510 250 RESTORE 350 260 FOR lop=1 TO 28 270 READ A,B,C,D 280 MOVE A+lp,B 290 DRAW C+lp,D 300 NEXT lop 310REPEATUNTILGET=32 320MODE6:VDU23;8202;0;0;0;:VDU28,0,24,39,1 330*LOAD G.EXITS B00 340*RUN G.INSOM 350 DATA 50,50,100,50,75,50,75,250,50,250,100,250 360 DATA 125,50,125,250,125,250,175,50,175,50,175,250 370 DATA 200,50,250,50,250,50,250,150,250,150,200,150,200,150,200,250,200,250,250,250 380 DATA 275,50,325,50,325,50,325,250,325,250,275,250,275,250,275,50 390 DATA 350,50,350,250,350,250,400,50,400,50,450,250,450,250,450,50 400 DATA 475,50,475,250,475,250,525,50,525,50,525,250 410 DATA 550,50,600,50,575,50,575,250,550,250,600,250 420 DATA 625,50,675,250,650,150,700,150,675,250,725,50
*FX200 1 � The INSOMNIA Adventure !� Disk Version By The Ice-Man � Tape Version By The Haven (S�2:�23;8202;0;0;0;19,1,0;0;19,2,0;0;19,6,0;0;19,7,0;0;28,0,8,19,0:�0,130:�:�130 2*LOAD G.EYES 49C0 <�:A$=�(45) F�4:�0,2)"WELCOME TO..." P A$=�(100) Z�24,0;0;1279;300; d�19,1,1;0; n�19,7,7;0; x�19,6,6;0; � � loop=1 � 5 � �19,0,1,0,0,0 � �19,7,1,0,0,0 � � delay=1 � 250 � � delay � �19,0,0,0,0,0 � �19,7,7,0,0,0 � � delay=1 � 250 � � delay � � loop � �0,6 � lp=510 � � �D^A � lop=1 � 28 � A,B,C,D � A+lp,B " � C+lp,D , � lop 6 ���=32 @$�6:�23;8202;0;0;0;:�28,0,24,39,1 J*LOAD G.EXITS B00 T*RUN G.INSOM ^/ � 50,50,100,50,75,50,75,250,50,250,100,250 h3 � 125,50,125,250,125,250,175,50,175,50,175,250 rS � 200,50,250,50,250,50,250,150,250,150,200,150,200,150,200,250,200,250,250,250 |B � 275,50,325,50,325,50,325,250,325,250,275,250,275,250,275,50 �B � 350,50,350,250,350,250,400,50,400,50,450,250,450,250,450,50 �3 � 475,50,475,250,475,250,525,50,525,50,525,250 �3 � 550,50,600,50,575,50,575,250,550,250,600,250 �4 � 625,50,675,250,650,150,700,150,675,250,725,50 �
00000000 0d 00 05 0c 2a 46 58 32 30 30 20 31 0d 00 0a 1c |....*FX200 1....| 00000010 f4 20 54 68 65 20 49 4e 53 4f 4d 4e 49 41 20 41 |. The INSOMNIA A| 00000020 64 76 65 6e 74 75 72 65 0d 00 14 21 f4 20 44 69 |dventure...!. Di| 00000030 73 6b 20 56 65 72 73 69 6f 6e 20 42 79 20 54 68 |sk Version By Th| 00000040 65 20 49 63 65 2d 4d 61 6e 0d 00 1e 1f f4 20 54 |e Ice-Man..... T| 00000050 61 70 65 20 56 65 72 73 69 6f 6e 20 42 79 20 54 |ape Version By T| 00000060 68 65 20 48 61 76 65 6e 0d 00 28 53 eb 32 3a ef |he Haven..(S.2:.| 00000070 32 33 3b 38 32 30 32 3b 30 3b 30 3b 30 3b 31 39 |23;8202;0;0;0;19| 00000080 2c 31 2c 30 3b 30 3b 31 39 2c 32 2c 30 3b 30 3b |,1,0;0;19,2,0;0;| 00000090 31 39 2c 36 2c 30 3b 30 3b 31 39 2c 37 2c 30 3b |19,6,0;0;19,7,0;| 000000a0 30 3b 32 38 2c 30 2c 38 2c 31 39 2c 30 3a e6 30 |0;28,0,8,19,0:.0| 000000b0 2c 31 33 30 3a da 3a fb 31 33 30 0d 00 32 15 2a |,130:.:.130..2.*| 000000c0 4c 4f 41 44 20 47 2e 45 59 45 53 20 34 39 43 30 |LOAD G.EYES 49C0| 000000d0 0d 00 3c 0e db 3a 41 24 3d bf 28 34 35 29 0d 00 |..<..:A$=.(45)..| 000000e0 46 1c fb 34 3a f1 8a 30 2c 32 29 22 57 45 4c 43 |F..4:..0,2)"WELC| 000000f0 4f 4d 45 20 54 4f 2e 2e 2e 22 0d 00 50 0d 41 24 |OME TO..."..P.A$| 00000100 3d bf 28 31 30 30 29 0d 00 5a 15 ef 32 34 2c 30 |=.(100)..Z..24,0| 00000110 3b 30 3b 31 32 37 39 3b 33 30 30 3b 0d 00 64 0e |;0;1279;300;..d.| 00000120 ef 31 39 2c 31 2c 31 3b 30 3b 0d 00 6e 0e ef 31 |.19,1,1;0;..n..1| 00000130 39 2c 37 2c 37 3b 30 3b 0d 00 78 0e ef 31 39 2c |9,7,7;0;..x..19,| 00000140 36 2c 36 3b 30 3b 0d 00 82 11 20 e3 20 6c 6f 6f |6,6;0;.... . loo| 00000150 70 3d 31 20 b8 20 35 0d 00 8c 12 20 ef 31 39 2c |p=1 . 5.... .19,| 00000160 30 2c 31 2c 30 2c 30 2c 30 0d 00 96 12 20 ef 31 |0,1,0,0,0.... .1| 00000170 39 2c 37 2c 31 2c 30 2c 30 2c 30 0d 00 a0 14 20 |9,7,1,0,0,0.... | 00000180 e3 20 64 65 6c 61 79 3d 31 20 b8 20 32 35 30 0d |. delay=1 . 250.| 00000190 00 aa 0c 20 ed 20 64 65 6c 61 79 0d 00 b4 12 20 |... . delay.... | 000001a0 ef 31 39 2c 30 2c 30 2c 30 2c 30 2c 30 0d 00 be |.19,0,0,0,0,0...| 000001b0 12 20 ef 31 39 2c 37 2c 37 2c 30 2c 30 2c 30 0d |. .19,7,7,0,0,0.| 000001c0 00 c8 14 20 e3 20 64 65 6c 61 79 3d 31 20 b8 20 |... . delay=1 . | 000001d0 32 35 30 0d 00 d2 0c 20 ed 20 64 65 6c 61 79 0d |250.... . delay.| 000001e0 00 dc 0b 20 ed 20 6c 6f 6f 70 0d 00 e6 09 20 e6 |... . loop.... .| 000001f0 30 2c 36 0d 00 f0 0a 6c 70 3d 35 31 30 0d 00 fa |0,6....lp=510...| 00000200 0b 20 f7 20 8d 44 5e 41 0d 01 04 11 20 e3 20 6c |. . .D^A.... . l| 00000210 6f 70 3d 31 20 b8 20 32 38 0d 01 0e 0e 20 f3 20 |op=1 . 28.... . | 00000220 41 2c 42 2c 43 2c 44 0d 01 18 0d 20 ec 20 41 2b |A,B,C,D.... . A+| 00000230 6c 70 2c 42 0d 01 22 0d 20 df 20 43 2b 6c 70 2c |lp,B..". . C+lp,| 00000240 44 0d 01 2c 0a 20 ed 20 6c 6f 70 0d 01 36 0a f5 |D..,. . lop..6..| 00000250 fd a5 3d 33 32 0d 01 40 24 eb 36 3a ef 32 33 3b |..=32..@$.6:.23;| 00000260 38 32 30 32 3b 30 3b 30 3b 30 3b 3a ef 32 38 2c |8202;0;0;0;:.28,| 00000270 30 2c 32 34 2c 33 39 2c 31 0d 01 4a 15 2a 4c 4f |0,24,39,1..J.*LO| 00000280 41 44 20 47 2e 45 58 49 54 53 20 42 30 30 0d 01 |AD G.EXITS B00..| 00000290 54 10 2a 52 55 4e 20 47 2e 49 4e 53 4f 4d 0d 01 |T.*RUN G.INSOM..| 000002a0 5e 2f 20 dc 20 35 30 2c 35 30 2c 31 30 30 2c 35 |^/ . 50,50,100,5| 000002b0 30 2c 37 35 2c 35 30 2c 37 35 2c 32 35 30 2c 35 |0,75,50,75,250,5| 000002c0 30 2c 32 35 30 2c 31 30 30 2c 32 35 30 0d 01 68 |0,250,100,250..h| 000002d0 33 20 dc 20 31 32 35 2c 35 30 2c 31 32 35 2c 32 |3 . 125,50,125,2| 000002e0 35 30 2c 31 32 35 2c 32 35 30 2c 31 37 35 2c 35 |50,125,250,175,5| 000002f0 30 2c 31 37 35 2c 35 30 2c 31 37 35 2c 32 35 30 |0,175,50,175,250| 00000300 0d 01 72 53 20 dc 20 32 30 30 2c 35 30 2c 32 35 |..rS . 200,50,25| 00000310 30 2c 35 30 2c 32 35 30 2c 35 30 2c 32 35 30 2c |0,50,250,50,250,| 00000320 31 35 30 2c 32 35 30 2c 31 35 30 2c 32 30 30 2c |150,250,150,200,| 00000330 31 35 30 2c 32 30 30 2c 31 35 30 2c 32 30 30 2c |150,200,150,200,| 00000340 32 35 30 2c 32 30 30 2c 32 35 30 2c 32 35 30 2c |250,200,250,250,| 00000350 32 35 30 0d 01 7c 42 20 dc 20 32 37 35 2c 35 30 |250..|B . 275,50| 00000360 2c 33 32 35 2c 35 30 2c 33 32 35 2c 35 30 2c 33 |,325,50,325,50,3| 00000370 32 35 2c 32 35 30 2c 33 32 35 2c 32 35 30 2c 32 |25,250,325,250,2| 00000380 37 35 2c 32 35 30 2c 32 37 35 2c 32 35 30 2c 32 |75,250,275,250,2| 00000390 37 35 2c 35 30 0d 01 86 42 20 dc 20 33 35 30 2c |75,50...B . 350,| 000003a0 35 30 2c 33 35 30 2c 32 35 30 2c 33 35 30 2c 32 |50,350,250,350,2| 000003b0 35 30 2c 34 30 30 2c 35 30 2c 34 30 30 2c 35 30 |50,400,50,400,50| 000003c0 2c 34 35 30 2c 32 35 30 2c 34 35 30 2c 32 35 30 |,450,250,450,250| 000003d0 2c 34 35 30 2c 35 30 0d 01 90 33 20 dc 20 34 37 |,450,50...3 . 47| 000003e0 35 2c 35 30 2c 34 37 35 2c 32 35 30 2c 34 37 35 |5,50,475,250,475| 000003f0 2c 32 35 30 2c 35 32 35 2c 35 30 2c 35 32 35 2c |,250,525,50,525,| 00000400 35 30 2c 35 32 35 2c 32 35 30 0d 01 9a 33 20 dc |50,525,250...3 .| 00000410 20 35 35 30 2c 35 30 2c 36 30 30 2c 35 30 2c 35 | 550,50,600,50,5| 00000420 37 35 2c 35 30 2c 35 37 35 2c 32 35 30 2c 35 35 |75,50,575,250,55| 00000430 30 2c 32 35 30 2c 36 30 30 2c 32 35 30 0d 01 a4 |0,250,600,250...| 00000440 34 20 dc 20 36 32 35 2c 35 30 2c 36 37 35 2c 32 |4 . 625,50,675,2| 00000450 35 30 2c 36 35 30 2c 31 35 30 2c 37 30 30 2c 31 |50,650,150,700,1| 00000460 35 30 2c 36 37 35 2c 32 35 30 2c 37 32 35 2c 35 |50,675,250,725,5| 00000470 30 0d ff |0..| 00000473