Home » Recent acquisitions » Acorn ADFS disks » adfs_Lemmings_2_Disk1.adf » !Lemmings2/TSLOT

!Lemmings2/TSLOT

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_Lemmings_2_Disk1.adf
Filename: !Lemmings2/TSLOT
Read OK:
File size: 01F6 bytes
Load address: FFFFFB44
Exec address: FDAF6A90
File contents
   10 MaxMem=1800*1024
   20 PROCSetMem
   30 END
   40
   50 DEFPROCSetMem
   60 SYS "XWimp_SlotSize",-1,-1 TO CurrentMem,NextMem,FreeMem
   70 REM PRINT CurrentMem/1024,NextMem/1024,FreeMem/1024
   80
   90 IF CurrentMem+FreeMem<MaxMem THEN ENDPROC
  100 IF CurrentMem<MaxMem THEN
  110 SYS "XWimp_SlotSize",MaxMem,-1
  120
  130 SYS "XWimp_SlotSize",-1,-1 TO CurrentMem,NextMem,FreeMem
  140 SYS "XWimp_SlotSize",-1,FreeMem
  150 ENDIF
  160 SYS "XWimp_SlotSize",-1,-1 TO CurrentMem,NextMem,FreeMem
  170
  180 REM PRINT CurrentMem/1024,NextMem/1024,FreeMem/1024
  190
  200 ENDPROC

 MaxMem=1800*1024
 �SetMem
 �
(
2
 ��SetMem
<; ș "XWimp_SlotSize",-1,-1 � CurrentMem,NextMem,FreeMem
F6 � PRINT CurrentMem/1024,NextMem/1024,FreeMem/1024
P
Z$ � CurrentMem+FreeMem<MaxMem � �
d � CurrentMem<MaxMem �
n" ș "XWimp_SlotSize",MaxMem,-1
x
�; ș "XWimp_SlotSize",-1,-1 � CurrentMem,NextMem,FreeMem
�# ș "XWimp_SlotSize",-1,FreeMem
� �
�; ș "XWimp_SlotSize",-1,-1 � CurrentMem,NextMem,FreeMem
�
�6 � PRINT CurrentMem/1024,NextMem/1024,FreeMem/1024
�
� �
�
00000000  0d 00 0a 15 20 4d 61 78  4d 65 6d 3d 31 38 30 30  |.... MaxMem=1800|
00000010  2a 31 30 32 34 0d 00 14  0c 20 f2 53 65 74 4d 65  |*1024.... .SetMe|
00000020  6d 0d 00 1e 06 20 e0 0d  00 28 04 0d 00 32 0d 20  |m.... ...(...2. |
00000030  dd f2 53 65 74 4d 65 6d  0d 00 3c 3b 20 c8 99 20  |..SetMem..<; .. |
00000040  22 58 57 69 6d 70 5f 53  6c 6f 74 53 69 7a 65 22  |"XWimp_SlotSize"|
00000050  2c 2d 31 2c 2d 31 20 b8  20 43 75 72 72 65 6e 74  |,-1,-1 . Current|
00000060  4d 65 6d 2c 4e 65 78 74  4d 65 6d 2c 46 72 65 65  |Mem,NextMem,Free|
00000070  4d 65 6d 0d 00 46 36 20  f4 20 50 52 49 4e 54 20  |Mem..F6 . PRINT |
00000080  43 75 72 72 65 6e 74 4d  65 6d 2f 31 30 32 34 2c  |CurrentMem/1024,|
00000090  4e 65 78 74 4d 65 6d 2f  31 30 32 34 2c 46 72 65  |NextMem/1024,Fre|
000000a0  65 4d 65 6d 2f 31 30 32  34 0d 00 50 04 0d 00 5a  |eMem/1024..P...Z|
000000b0  24 20 e7 20 43 75 72 72  65 6e 74 4d 65 6d 2b 46  |$ . CurrentMem+F|
000000c0  72 65 65 4d 65 6d 3c 4d  61 78 4d 65 6d 20 8c 20  |reeMem<MaxMem . |
000000d0  e1 0d 00 64 1a 20 e7 20  43 75 72 72 65 6e 74 4d  |...d. . CurrentM|
000000e0  65 6d 3c 4d 61 78 4d 65  6d 20 8c 0d 00 6e 22 20  |em<MaxMem ...n" |
000000f0  c8 99 20 22 58 57 69 6d  70 5f 53 6c 6f 74 53 69  |.. "XWimp_SlotSi|
00000100  7a 65 22 2c 4d 61 78 4d  65 6d 2c 2d 31 0d 00 78  |ze",MaxMem,-1..x|
00000110  04 0d 00 82 3b 20 c8 99  20 22 58 57 69 6d 70 5f  |....; .. "XWimp_|
00000120  53 6c 6f 74 53 69 7a 65  22 2c 2d 31 2c 2d 31 20  |SlotSize",-1,-1 |
00000130  b8 20 43 75 72 72 65 6e  74 4d 65 6d 2c 4e 65 78  |. CurrentMem,Nex|
00000140  74 4d 65 6d 2c 46 72 65  65 4d 65 6d 0d 00 8c 23  |tMem,FreeMem...#|
00000150  20 c8 99 20 22 58 57 69  6d 70 5f 53 6c 6f 74 53  | .. "XWimp_SlotS|
00000160  69 7a 65 22 2c 2d 31 2c  46 72 65 65 4d 65 6d 0d  |ize",-1,FreeMem.|
00000170  00 96 06 20 cd 0d 00 a0  3b 20 c8 99 20 22 58 57  |... ....; .. "XW|
00000180  69 6d 70 5f 53 6c 6f 74  53 69 7a 65 22 2c 2d 31  |imp_SlotSize",-1|
00000190  2c 2d 31 20 b8 20 43 75  72 72 65 6e 74 4d 65 6d  |,-1 . CurrentMem|
000001a0  2c 4e 65 78 74 4d 65 6d  2c 46 72 65 65 4d 65 6d  |,NextMem,FreeMem|
000001b0  0d 00 aa 04 0d 00 b4 36  20 f4 20 50 52 49 4e 54  |.......6 . PRINT|
000001c0  20 43 75 72 72 65 6e 74  4d 65 6d 2f 31 30 32 34  | CurrentMem/1024|
000001d0  2c 4e 65 78 74 4d 65 6d  2f 31 30 32 34 2c 46 72  |,NextMem/1024,Fr|
000001e0  65 65 4d 65 6d 2f 31 30  32 34 0d 00 be 04 0d 00  |eeMem/1024......|
000001f0  c8 06 20 e1 0d ff                                 |.. ...|
000001f6
!Lemmings2/TSLOT.m0
!Lemmings2/TSLOT.m1
!Lemmings2/TSLOT.m2
!Lemmings2/TSLOT.m4
!Lemmings2/TSLOT.m5