Home » Archimedes archive » Acorn Computing » 1993 09 Mega Disk.adf » 93_09 » Imagery/!Install/Overlays/40
Imagery/!Install/Overlays/40
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 » Acorn Computing » 1993 09 Mega Disk.adf » 93_09 |
| Filename: | Imagery/!Install/Overlays/40 |
| Read OK: | ✔ |
| File size: | 017C bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
40000DEFPROCCN 40010IFBS%<2THENPROCBu:ENDPROC 40020PROCCA:EF%=X%(0):EG%=Y%(0):EH%=EA%:EI%=EB% 40030IA%=VALFNH(23,9)*2:IB%=VALFNH(23,11)*4:DM%=IA%DIV2:DN%=IB%DIV2 40040IC%=EF%:ID%=EG%:PROCBH:VDU24,EF%;EG%;EH%;EI%; 40050SYS"Hourglass_On" 40060REPEAT:REPEAT:GCOLCF%,POINT(IC%+DM%,ID%+DN%)TINTTINT(IC%+DM%,ID%+DN%):RECTANGLEFILLIC%,ID%,IA%-2,IB%-4:IC%+=IA%:UNTILIC%>EH%:IC%=EF%:ID%+=IB%:UNTILID%>EI%:VDU26:PROCBN:PROCBE:BS%=0 40070SYS"Hourglass_Off" 40080ENDPROC 40090DEFPROCCi 40100PROCCI(23):PROCCk 40110ENDPROC
�@��CN �J�BS%<2��Bu:� �T+�CA:EF%=X%(0):EG%=Y%(0):EH%=EA%:EI%=EB% �^8IA%=��H(23,9)*2:IB%=��H(23,11)*4:DM%=IA%�2:DN%=IB%�2 �h,IC%=EF%:ID%=EG%:�BH:�24,EF%;EG%;EH%;EI%; �rș"Hourglass_On" �|��:�:�CF%,�IC%+DM%,ID%+DN%)ȜȜ(IC%+DM%,ID%+DN%):ȓȐIC%,ID%,IA%-2,IB%-4:IC%+=IA%:�IC%>EH%:IC%=EF%:ID%+=IB%:�ID%>EI%:�26:�BN:�BE:BS%=0 ��ș"Hourglass_Off" ��� ����Ci ���CI(23):�Ck ��� �
00000000 0d 9c 40 08 dd f2 43 4e 0d 9c 4a 10 e7 42 53 25 |..@...CN..J..BS%| 00000010 3c 32 8c f2 42 75 3a e1 0d 9c 54 2b f2 43 41 3a |<2..Bu:...T+.CA:| 00000020 45 46 25 3d 58 25 28 30 29 3a 45 47 25 3d 59 25 |EF%=X%(0):EG%=Y%| 00000030 28 30 29 3a 45 48 25 3d 45 41 25 3a 45 49 25 3d |(0):EH%=EA%:EI%=| 00000040 45 42 25 0d 9c 5e 38 49 41 25 3d bb a4 48 28 32 |EB%..^8IA%=..H(2| 00000050 33 2c 39 29 2a 32 3a 49 42 25 3d bb a4 48 28 32 |3,9)*2:IB%=..H(2| 00000060 33 2c 31 31 29 2a 34 3a 44 4d 25 3d 49 41 25 81 |3,11)*4:DM%=IA%.| 00000070 32 3a 44 4e 25 3d 49 42 25 81 32 0d 9c 68 2c 49 |2:DN%=IB%.2..h,I| 00000080 43 25 3d 45 46 25 3a 49 44 25 3d 45 47 25 3a f2 |C%=EF%:ID%=EG%:.| 00000090 42 48 3a ef 32 34 2c 45 46 25 3b 45 47 25 3b 45 |BH:.24,EF%;EG%;E| 000000a0 48 25 3b 45 49 25 3b 0d 9c 72 14 c8 99 22 48 6f |H%;EI%;..r..."Ho| 000000b0 75 72 67 6c 61 73 73 5f 4f 6e 22 0d 9c 7c 89 f5 |urglass_On"..|..| 000000c0 3a f5 3a e6 43 46 25 2c b0 49 43 25 2b 44 4d 25 |:.:.CF%,.IC%+DM%| 000000d0 2c 49 44 25 2b 44 4e 25 29 c8 9c c8 9c 28 49 43 |,ID%+DN%)....(IC| 000000e0 25 2b 44 4d 25 2c 49 44 25 2b 44 4e 25 29 3a c8 |%+DM%,ID%+DN%):.| 000000f0 93 c8 90 49 43 25 2c 49 44 25 2c 49 41 25 2d 32 |...IC%,ID%,IA%-2| 00000100 2c 49 42 25 2d 34 3a 49 43 25 2b 3d 49 41 25 3a |,IB%-4:IC%+=IA%:| 00000110 fd 49 43 25 3e 45 48 25 3a 49 43 25 3d 45 46 25 |.IC%>EH%:IC%=EF%| 00000120 3a 49 44 25 2b 3d 49 42 25 3a fd 49 44 25 3e 45 |:ID%+=IB%:.ID%>E| 00000130 49 25 3a ef 32 36 3a f2 42 4e 3a f2 42 45 3a 42 |I%:.26:.BN:.BE:B| 00000140 53 25 3d 30 0d 9c 86 15 c8 99 22 48 6f 75 72 67 |S%=0......"Hourg| 00000150 6c 61 73 73 5f 4f 66 66 22 0d 9c 90 05 e1 0d 9c |lass_Off".......| 00000160 9a 08 dd f2 43 69 0d 9c a4 0f f2 43 49 28 32 33 |....Ci.....CI(23| 00000170 29 3a f2 43 6b 0d 9c ae 05 e1 0d ff |):.Ck.......| 0000017c
.