Home » Recent acquisitions » Acorn ADFS disks » adfs_FreeGamesDemoDisk.adf » !LemDemo/!Run

!LemDemo/!Run

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 » Recent acquisitions » Acorn ADFS disks » adfs_FreeGamesDemoDisk.adf
Filename: !LemDemo/!Run
Read OK:
File size: 025C bytes
Load address: FFFFEB43
Exec address: 5F51C724
File contents
Set Lem$Dir <Obey$Dir>
Rmensure TequeMemory 0 RmLoad <Lem$dir>.MemMod
echo <22> <0>
WimpSlot 0 0
TequeMem
WimpSlot 664K
Wimpslot 496K
RMensure MusicModule2 0 RMLoad <Lem$Dir>.MusMod2
Mussamplerate 3
Quit
Run <Lem$Dir>.LemBoot
Mussamplerate 2
Fx 19
Fx 19
Fx 19
RMKill TequeMemory
RMKill MusicModule2
Run <Lem$Dir>.LrestMouse
FX 15 0  
If Lem$Speaker = 1 Then *Speaker On
If Lem$Speaker = 0 Then *Speaker Off
Unset Lem$Speaker
Unset Lem$Dir
Echo <13> <10>
Echo <13> <10>
Echo Thank you for playing our demo of Lemmings. 
Echo We hope you liked it enough to buy the full game of 120 levels.




            
00000000  53 65 74 20 4c 65 6d 24  44 69 72 20 3c 4f 62 65  |Set Lem$Dir <Obe|
00000010  79 24 44 69 72 3e 0a 52  6d 65 6e 73 75 72 65 20  |y$Dir>.Rmensure |
00000020  54 65 71 75 65 4d 65 6d  6f 72 79 20 30 20 52 6d  |TequeMemory 0 Rm|
00000030  4c 6f 61 64 20 3c 4c 65  6d 24 64 69 72 3e 2e 4d  |Load <Lem$dir>.M|
00000040  65 6d 4d 6f 64 0a 65 63  68 6f 20 3c 32 32 3e 20  |emMod.echo <22> |
00000050  3c 30 3e 0a 57 69 6d 70  53 6c 6f 74 20 30 20 30  |<0>.WimpSlot 0 0|
00000060  0a 54 65 71 75 65 4d 65  6d 0a 57 69 6d 70 53 6c  |.TequeMem.WimpSl|
00000070  6f 74 20 36 36 34 4b 0a  57 69 6d 70 73 6c 6f 74  |ot 664K.Wimpslot|
00000080  20 34 39 36 4b 0a 52 4d  65 6e 73 75 72 65 20 4d  | 496K.RMensure M|
00000090  75 73 69 63 4d 6f 64 75  6c 65 32 20 30 20 52 4d  |usicModule2 0 RM|
000000a0  4c 6f 61 64 20 3c 4c 65  6d 24 44 69 72 3e 2e 4d  |Load <Lem$Dir>.M|
000000b0  75 73 4d 6f 64 32 0a 4d  75 73 73 61 6d 70 6c 65  |usMod2.Mussample|
000000c0  72 61 74 65 20 33 0a 51  75 69 74 0a 52 75 6e 20  |rate 3.Quit.Run |
000000d0  3c 4c 65 6d 24 44 69 72  3e 2e 4c 65 6d 42 6f 6f  |<Lem$Dir>.LemBoo|
000000e0  74 0a 4d 75 73 73 61 6d  70 6c 65 72 61 74 65 20  |t.Mussamplerate |
000000f0  32 0a 46 78 20 31 39 0a  46 78 20 31 39 0a 46 78  |2.Fx 19.Fx 19.Fx|
00000100  20 31 39 0a 52 4d 4b 69  6c 6c 20 54 65 71 75 65  | 19.RMKill Teque|
00000110  4d 65 6d 6f 72 79 0a 52  4d 4b 69 6c 6c 20 4d 75  |Memory.RMKill Mu|
00000120  73 69 63 4d 6f 64 75 6c  65 32 0a 52 75 6e 20 3c  |sicModule2.Run <|
00000130  4c 65 6d 24 44 69 72 3e  2e 4c 72 65 73 74 4d 6f  |Lem$Dir>.LrestMo|
00000140  75 73 65 0a 46 58 20 31  35 20 30 20 20 0a 49 66  |use.FX 15 0  .If|
00000150  20 4c 65 6d 24 53 70 65  61 6b 65 72 20 3d 20 31  | Lem$Speaker = 1|
00000160  20 54 68 65 6e 20 2a 53  70 65 61 6b 65 72 20 4f  | Then *Speaker O|
00000170  6e 0a 49 66 20 4c 65 6d  24 53 70 65 61 6b 65 72  |n.If Lem$Speaker|
00000180  20 3d 20 30 20 54 68 65  6e 20 2a 53 70 65 61 6b  | = 0 Then *Speak|
00000190  65 72 20 4f 66 66 0a 55  6e 73 65 74 20 4c 65 6d  |er Off.Unset Lem|
000001a0  24 53 70 65 61 6b 65 72  0a 55 6e 73 65 74 20 4c  |$Speaker.Unset L|
000001b0  65 6d 24 44 69 72 0a 45  63 68 6f 20 3c 31 33 3e  |em$Dir.Echo <13>|
000001c0  20 3c 31 30 3e 0a 45 63  68 6f 20 3c 31 33 3e 20  | <10>.Echo <13> |
000001d0  3c 31 30 3e 0a 45 63 68  6f 20 54 68 61 6e 6b 20  |<10>.Echo Thank |
000001e0  79 6f 75 20 66 6f 72 20  70 6c 61 79 69 6e 67 20  |you for playing |
000001f0  6f 75 72 20 64 65 6d 6f  20 6f 66 20 4c 65 6d 6d  |our demo of Lemm|
00000200  69 6e 67 73 2e 20 0a 45  63 68 6f 20 57 65 20 68  |ings. .Echo We h|
00000210  6f 70 65 20 79 6f 75 20  6c 69 6b 65 64 20 69 74  |ope you liked it|
00000220  20 65 6e 6f 75 67 68 20  74 6f 20 62 75 79 20 74  | enough to buy t|
00000230  68 65 20 66 75 6c 6c 20  67 61 6d 65 20 6f 66 20  |he full game of |
00000240  31 32 30 20 6c 65 76 65  6c 73 2e 0a 0a 0a 0a 0a  |120 levels......|
00000250  20 20 20 20 20 20 20 20  20 20 20 20              |            |
0000025c
!LemDemo/!Run.m0
!LemDemo/!Run.m1
!LemDemo/!Run.m2
!LemDemo/!Run.m4
!LemDemo/!Run.m5