Home » Archimedes archive » Archimedes World » AW-1996-04-Disc2.adf » !ManiaDemo_MathMania » !ManiaDemo/!Run
!ManiaDemo/!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 » Archimedes archive » Archimedes World » AW-1996-04-Disc2.adf » !ManiaDemo_MathMania |
| Filename: | !ManiaDemo/!Run |
| Read OK: | ✔ |
| File size: | 032B bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
| Run file for MathMania | Set wimpslot to 544k WimpSlot -min 340K -max 340K IconSprites <Obey$Dir>.!Sprites | Check not already loaded SET math$temp "loaded" RMEnsure SFX-1 0 SET math$temp "notloaded" IF math$temp="loaded" THEN ERROR 0 Mathmania is already loaded | LOAD SOUND EFFECTS RMEnsure SFX-1 0 <OBEY$DIR>.Sounds.SFX-1 RMEnsure SFX-2 0 <OBEY$DIR>.Sounds.SFX-2 RMEnsure SFX-3 0 <OBEY$DIR>.Sounds.SFX-3 RMEnsure SFX-4 0 <OBEY$DIR>.Sounds.SFX-4 RMEnsure SFX-5 0 <OBEY$DIR>.Sounds.SFX-5 RMEnsure SFX-6�� 0 <OBEY$DIR>.Sounds.SFX-6�� | Find RISCOS Version SetEval Riscos$Ver 300 RMEnsure UtilityModule 3.10 SetEval Riscos$Ver 200 | Select appropriate template File Set Temp$Dir <Obey$Dir>.Template3D IF Riscos$ver=200 THEN SET Temp$Dir <Obey$Dir>.Template2D | Run Mathmania Run <Obey$Dir>.!RunImage %*0
00000000 7c 20 52 75 6e 20 66 69 6c 65 20 66 6f 72 20 4d || Run file for M| 00000010 61 74 68 4d 61 6e 69 61 0a 7c 20 53 65 74 20 77 |athMania.| Set w| 00000020 69 6d 70 73 6c 6f 74 20 74 6f 20 35 34 34 6b 0a |impslot to 544k.| 00000030 57 69 6d 70 53 6c 6f 74 20 2d 6d 69 6e 20 33 34 |WimpSlot -min 34| 00000040 30 4b 20 2d 6d 61 78 20 33 34 30 4b 0a 49 63 6f |0K -max 340K.Ico| 00000050 6e 53 70 72 69 74 65 73 20 3c 4f 62 65 79 24 44 |nSprites <Obey$D| 00000060 69 72 3e 2e 21 53 70 72 69 74 65 73 0a 0a 7c 20 |ir>.!Sprites..| | 00000070 43 68 65 63 6b 20 6e 6f 74 20 61 6c 72 65 61 64 |Check not alread| 00000080 79 20 6c 6f 61 64 65 64 0a 53 45 54 20 6d 61 74 |y loaded.SET mat| 00000090 68 24 74 65 6d 70 20 22 6c 6f 61 64 65 64 22 0a |h$temp "loaded".| 000000a0 52 4d 45 6e 73 75 72 65 20 53 46 58 2d 31 20 30 |RMEnsure SFX-1 0| 000000b0 20 53 45 54 20 6d 61 74 68 24 74 65 6d 70 20 22 | SET math$temp "| 000000c0 6e 6f 74 6c 6f 61 64 65 64 22 0a 49 46 20 6d 61 |notloaded".IF ma| 000000d0 74 68 24 74 65 6d 70 3d 22 6c 6f 61 64 65 64 22 |th$temp="loaded"| 000000e0 20 54 48 45 4e 20 45 52 52 4f 52 20 30 20 4d 61 | THEN ERROR 0 Ma| 000000f0 74 68 6d 61 6e 69 61 20 69 73 20 61 6c 72 65 61 |thmania is alrea| 00000100 64 79 20 6c 6f 61 64 65 64 0a 0a 7c 20 4c 4f 41 |dy loaded..| LOA| 00000110 44 20 53 4f 55 4e 44 20 45 46 46 45 43 54 53 20 |D SOUND EFFECTS | 00000120 0a 52 4d 45 6e 73 75 72 65 20 53 46 58 2d 31 20 |.RMEnsure SFX-1 | 00000130 30 20 3c 4f 42 45 59 24 44 49 52 3e 2e 53 6f 75 |0 <OBEY$DIR>.Sou| 00000140 6e 64 73 2e 53 46 58 2d 31 0a 52 4d 45 6e 73 75 |nds.SFX-1.RMEnsu| 00000150 72 65 20 53 46 58 2d 32 20 30 20 3c 4f 42 45 59 |re SFX-2 0 <OBEY| 00000160 24 44 49 52 3e 2e 53 6f 75 6e 64 73 2e 53 46 58 |$DIR>.Sounds.SFX| 00000170 2d 32 0a 52 4d 45 6e 73 75 72 65 20 53 46 58 2d |-2.RMEnsure SFX-| 00000180 33 20 30 20 3c 4f 42 45 59 24 44 49 52 3e 2e 53 |3 0 <OBEY$DIR>.S| 00000190 6f 75 6e 64 73 2e 53 46 58 2d 33 0a 52 4d 45 6e |ounds.SFX-3.RMEn| 000001a0 73 75 72 65 20 53 46 58 2d 34 20 30 20 3c 4f 42 |sure SFX-4 0 <OB| 000001b0 45 59 24 44 49 52 3e 2e 53 6f 75 6e 64 73 2e 53 |EY$DIR>.Sounds.S| 000001c0 46 58 2d 34 0a 52 4d 45 6e 73 75 72 65 20 53 46 |FX-4.RMEnsure SF| 000001d0 58 2d 35 20 30 20 3c 4f 42 45 59 24 44 49 52 3e |X-5 0 <OBEY$DIR>| 000001e0 2e 53 6f 75 6e 64 73 2e 53 46 58 2d 35 0a 52 4d |.Sounds.SFX-5.RM| 000001f0 45 6e 73 75 72 65 20 53 46 58 2d 36 a0 a0 20 30 |Ensure SFX-6.. 0| 00000200 20 3c 4f 42 45 59 24 44 49 52 3e 2e 53 6f 75 6e | <OBEY$DIR>.Soun| 00000210 64 73 2e 53 46 58 2d 36 a0 a0 0a 0a 7c 20 46 69 |ds.SFX-6....| Fi| 00000220 6e 64 20 52 49 53 43 4f 53 20 56 65 72 73 69 6f |nd RISCOS Versio| 00000230 6e 0a 53 65 74 45 76 61 6c 20 52 69 73 63 6f 73 |n.SetEval Riscos| 00000240 24 56 65 72 20 33 30 30 0a 52 4d 45 6e 73 75 72 |$Ver 300.RMEnsur| 00000250 65 20 55 74 69 6c 69 74 79 4d 6f 64 75 6c 65 20 |e UtilityModule | 00000260 33 2e 31 30 20 53 65 74 45 76 61 6c 20 52 69 73 |3.10 SetEval Ris| 00000270 63 6f 73 24 56 65 72 20 32 30 30 0a 0a 7c 20 53 |cos$Ver 200..| S| 00000280 65 6c 65 63 74 20 61 70 70 72 6f 70 72 69 61 74 |elect appropriat| 00000290 65 20 74 65 6d 70 6c 61 74 65 20 46 69 6c 65 0a |e template File.| 000002a0 53 65 74 20 54 65 6d 70 24 44 69 72 20 3c 4f 62 |Set Temp$Dir <Ob| 000002b0 65 79 24 44 69 72 3e 2e 54 65 6d 70 6c 61 74 65 |ey$Dir>.Template| 000002c0 33 44 0a 49 46 20 52 69 73 63 6f 73 24 76 65 72 |3D.IF Riscos$ver| 000002d0 3d 32 30 30 20 54 48 45 4e 20 53 45 54 20 54 65 |=200 THEN SET Te| 000002e0 6d 70 24 44 69 72 20 3c 4f 62 65 79 24 44 69 72 |mp$Dir <Obey$Dir| 000002f0 3e 2e 54 65 6d 70 6c 61 74 65 32 44 0a 0a 7c 20 |>.Template2D..| | 00000300 52 75 6e 20 4d 61 74 68 6d 61 6e 69 61 0a 52 75 |Run Mathmania.Ru| 00000310 6e 20 3c 4f 62 65 79 24 44 69 72 3e 2e 21 52 75 |n <Obey$Dir>.!Ru| 00000320 6e 49 6d 61 67 65 20 25 2a 30 0a |nImage %*0.| 0000032b
.