Home » Personal collection » Acorn hard disk » apps » sibelius » SibFull/!Sibelius6/Startup
SibFull/!Sibelius6/Startup
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 hard disk » apps » sibelius |
Filename: | SibFull/!Sibelius6/Startup |
Read OK: | ✔ |
File size: | 0AB0 bytes |
Load address: | 0000 |
Exec address: | 0000 |
Duplicates
There is 1 duplicate copy of this file in the archive:
- Personal collection » Acorn ADFS disks » Archimedes » Sibelius_6_Disk_1B.ADF » !InstallS6/!Sibelius6/Startup
- Personal collection » Acorn hard disk » apps » sibelius » SibFull/!Sibelius6/Startup
File contents
10 20REM Startup program for Sibelius 6 30 40REM Loads 16-colour sprite in 16-colour mode 50REM Decompresses 256-colour sprite in 256-colour mode iff Squash module present 60REM Else does nothing (e.g. in 2-colour modes) 70 80ON ERROR END: REM no harm done 90 100squashsize256%=16751: REM exact file size of squashed S6logo 256 110spritesize256%=144088: REM exact file size of unsquashed S6logo 256 120squashsize16%=10128: REM exact size of squashed S6logo 16 file 130spritesize16%=71944: REM exact size of unsquashed S6logo 16 file 140w%=480:h%=299 150 160DIM sprite% spritesize256%+4,scale% 16,squash% squashsize256% 170 180SYS"OS_ReadModeVariable",-1,9 TO ,,C% 190CASE C% OF 200 WHEN 2: PROCloadsprite16 210 WHEN 3: PROCloadsprite256 220 OTHERWISE: END 230ENDCASE 240 250SYS "Wimp_Initialise",310,&4b534154,"Sibelius startup",0 TO ,han% 260 270SYS"OS_ReadModeVariable",-1,4 TO ,,xeig% 280w%=w%<<xeig%: REM OS units 290SYS"OS_ReadModeVariable",-1,11 TO ,,x% 300x%=((x%+1)<<xeig%)/2: REM centre of screen 310 320SYS"OS_ReadModeVariable",-1,5 TO ,,yeig% 330h%=h%<<yeig%: REM OS units 340SYS"OS_ReadModeVariable",-1,12 TO ,,y% 350y%=((y%+1)<<yeig%)/2+50: REM just above centre of screen 360 370REPEAT 380 READ size%,delay% 390 !scale%=2:scale%!4=2 400 scale%!8=size%:scale%!12=size%<<(yeig%-xeig%) 410 SYS"OS_SpriteOp",52+256,sprite%,"screen",x%-w%/2*(2/scale%!8),y%-h%/2*(2/scale%!12),0,scale%,0 420 TIME=0:REPEAT UNTIL TIME > delay% 430UNTIL size%=2 440 450SYS "Wimp_ForceRedraw",-1,x%-w%/2,y%-w%/2,x%+w%/2,y%+w%/2 460SYS "Wimp_CloseDown",han%,&4b534154 470END 480 490REM scale factor of frames = 2/n, delay 500DATA 2, 100 510 520REM used to be: 530DATA 12, 10 540DATA 11, 11 550DATA 10, 12 560DATA 9, 13 570DATA 8, 14 580DATA 7, 15 590DATA 6, 16 600DATA 5, 17 610DATA 4, 18 620DATA 3, 24 630DATA 2, 300 640 650 660DEF PROCloadsprite16 670SYS"OS_Module",18,"Squash" TO X% 680IF X%<>18 END: REM error because no Squash module 690 700SYS"Squash_Decompress",%1000,squashsize16%-20 TO worksize%: REM squash workspace, 17K say 710DIM work% worksize% 720 730OSCLI "LOAD <Obey$Dir>.S6logo�16 "+STR$~squash% 740 750!sprite% = spritesize16%+4: REM 'initialize' sprite area; rest of header loaded from sprite file 760 770SYS"Squash_Decompress",%0100,work%,squash%+20,squashsize16%-20,sprite%+4,spritesize16% TO X% 780IF X%<>0 END: REM decompress failed for some reason 790ENDPROC 800 810 820DEF PROCloadsprite256 830SYS"OS_Module",18,"Squash" TO X% 840IF X%<>18 END: REM error because no Squash module 850 860SYS"Squash_Decompress",%1000,squashsize256%-20 TO worksize%: REM squash workspace, 17K say 870DIM work% worksize% 880 890OSCLI "LOAD <Obey$Dir>.S6logo�256 "+STR$~squash% 900 910!sprite% = spritesize256%+4: REM 'initialize' sprite area; rest of header loaded from sprite file 920 930SYS"Squash_Decompress",%0100,work%,squash%+20,squashsize256%-20,sprite%+4,spritesize256% TO X% 940IF X%<>0 END: REM decompress failed for some reason 950 960ENDPROC
$� Startup program for Sibelius 6 (.� Loads 16-colour sprite in 16-colour mode 2Q� Decompresses 256-colour sprite in 256-colour mode iff Squash module present <0� Else does nothing (e.g. in 2-colour modes) F P� � �: � no harm done Z dBsquashsize256%=16751: � exact file size of squashed S6logo 256 nEspritesize256%=144088: � exact file size of unsquashed S6logo 256 x@squashsize16%=10128: � exact size of squashed S6logo 16 file �Bspritesize16%=71944: � exact size of unsquashed S6logo 16 file �w%=480:h%=299 � �?� sprite% spritesize256%+4,scale% 16,squash% squashsize256% � �'ș"OS_ReadModeVariable",-1,9 � ,,C% �Ȏ C% � � � 2: �loadsprite16 � � 3: �loadsprite256 � : � �� � �Cș "Wimp_Initialise",310,&4b534154,"Sibelius startup",0 � ,han% *ș"OS_ReadModeVariable",-1,4 � ,,xeig% w%=w%<<xeig%: � OS units "(ș"OS_ReadModeVariable",-1,11 � ,,x% ,,x%=((x%+1)<<xeig%)/2: � centre of screen 6 @*ș"OS_ReadModeVariable",-1,5 � ,,yeig% Jh%=h%<<yeig%: � OS units T(ș"OS_ReadModeVariable",-1,12 � ,,y% ^:y%=((y%+1)<<yeig%)/2+50: � just above centre of screen h r� | � size%,delay% � !scale%=2:scale%!4=2 �3 scale%!8=size%:scale%!12=size%<<(yeig%-xeig%) �c ș"OS_SpriteOp",52+256,sprite%,"screen",x%-w%/2*(2/scale%!8),y%-h%/2*(2/scale%!12),0,scale%,0 � �=0:� � � > delay% � � size%=2 � �<ș "Wimp_ForceRedraw",-1,x%-w%/2,y%-w%/2,x%+w%/2,y%+w%/2 �&ș "Wimp_CloseDown",han%,&4b534154 �� � �)� scale factor of frames = 2/n, delay �� 2, 100 � � used to be: � 12, 10 � 11, 11 &� 10, 12 0� 9, 13 :� 8, 14 D� 7, 15 N� 6, 16 X� 5, 17 b� 4, 18 l� 3, 24 v� 2, 300 � � �� �loadsprite16 �"ș"OS_Module",18,"Squash" � X% �0� X%<>18 �: � error because no Squash module � �Yș"Squash_Decompress",%1000,squashsize16%-20 � worksize%: � squash workspace, 17K say �� work% worksize% � �,� "LOAD <Obey$Dir>.S6logo�16 "+�~squash% � �b!sprite% = spritesize16%+4: � 'initialize' sprite area; rest of header loaded from sprite file � ^ș"Squash_Decompress",%0100,work%,squash%+20,squashsize16%-20,sprite%+4,spritesize16% � X% 2� X%<>0 �: � decompress failed for some reason � * 4� �loadsprite256 >"ș"OS_Module",18,"Squash" � X% H0� X%<>18 �: � error because no Squash module R \Zș"Squash_Decompress",%1000,squashsize256%-20 � worksize%: � squash workspace, 17K say f� work% worksize% p z-� "LOAD <Obey$Dir>.S6logo�256 "+�~squash% � �c!sprite% = spritesize256%+4: � 'initialize' sprite area; rest of header loaded from sprite file � �`ș"Squash_Decompress",%0100,work%,squash%+20,squashsize256%-20,sprite%+4,spritesize256% � X% �2� X%<>0 �: � decompress failed for some reason � �� �
00000000 0d 00 0a 04 0d 00 14 24 f4 20 53 74 61 72 74 75 |.......$. Startu| 00000010 70 20 70 72 6f 67 72 61 6d 20 66 6f 72 20 53 69 |p program for Si| 00000020 62 65 6c 69 75 73 20 36 0d 00 1e 04 0d 00 28 2e |belius 6......(.| 00000030 f4 20 4c 6f 61 64 73 20 31 36 2d 63 6f 6c 6f 75 |. Loads 16-colou| 00000040 72 20 73 70 72 69 74 65 20 69 6e 20 31 36 2d 63 |r sprite in 16-c| 00000050 6f 6c 6f 75 72 20 6d 6f 64 65 0d 00 32 51 f4 20 |olour mode..2Q. | 00000060 44 65 63 6f 6d 70 72 65 73 73 65 73 20 32 35 36 |Decompresses 256| 00000070 2d 63 6f 6c 6f 75 72 20 73 70 72 69 74 65 20 69 |-colour sprite i| 00000080 6e 20 32 35 36 2d 63 6f 6c 6f 75 72 20 6d 6f 64 |n 256-colour mod| 00000090 65 20 69 66 66 20 53 71 75 61 73 68 20 6d 6f 64 |e iff Squash mod| 000000a0 75 6c 65 20 70 72 65 73 65 6e 74 0d 00 3c 30 f4 |ule present..<0.| 000000b0 20 45 6c 73 65 20 64 6f 65 73 20 6e 6f 74 68 69 | Else does nothi| 000000c0 6e 67 20 28 65 2e 67 2e 20 69 6e 20 32 2d 63 6f |ng (e.g. in 2-co| 000000d0 6c 6f 75 72 20 6d 6f 64 65 73 29 0d 00 46 04 0d |lour modes)..F..| 000000e0 00 50 19 ee 20 85 20 e0 3a 20 f4 20 6e 6f 20 68 |.P.. . .: . no h| 000000f0 61 72 6d 20 64 6f 6e 65 0d 00 5a 04 0d 00 64 42 |arm done..Z...dB| 00000100 73 71 75 61 73 68 73 69 7a 65 32 35 36 25 3d 31 |squashsize256%=1| 00000110 36 37 35 31 3a 20 f4 20 65 78 61 63 74 20 66 69 |6751: . exact fi| 00000120 6c 65 20 73 69 7a 65 20 6f 66 20 73 71 75 61 73 |le size of squas| 00000130 68 65 64 20 53 36 6c 6f 67 6f 20 32 35 36 0d 00 |hed S6logo 256..| 00000140 6e 45 73 70 72 69 74 65 73 69 7a 65 32 35 36 25 |nEspritesize256%| 00000150 3d 31 34 34 30 38 38 3a 20 f4 20 65 78 61 63 74 |=144088: . exact| 00000160 20 66 69 6c 65 20 73 69 7a 65 20 6f 66 20 75 6e | file size of un| 00000170 73 71 75 61 73 68 65 64 20 53 36 6c 6f 67 6f 20 |squashed S6logo | 00000180 32 35 36 0d 00 78 40 73 71 75 61 73 68 73 69 7a |256..x@squashsiz| 00000190 65 31 36 25 3d 31 30 31 32 38 3a 20 f4 20 65 78 |e16%=10128: . ex| 000001a0 61 63 74 20 73 69 7a 65 20 6f 66 20 73 71 75 61 |act size of squa| 000001b0 73 68 65 64 20 53 36 6c 6f 67 6f 20 31 36 20 66 |shed S6logo 16 f| 000001c0 69 6c 65 0d 00 82 42 73 70 72 69 74 65 73 69 7a |ile...Bspritesiz| 000001d0 65 31 36 25 3d 37 31 39 34 34 3a 20 f4 20 65 78 |e16%=71944: . ex| 000001e0 61 63 74 20 73 69 7a 65 20 6f 66 20 75 6e 73 71 |act size of unsq| 000001f0 75 61 73 68 65 64 20 53 36 6c 6f 67 6f 20 31 36 |uashed S6logo 16| 00000200 20 66 69 6c 65 0d 00 8c 11 77 25 3d 34 38 30 3a | file....w%=480:| 00000210 68 25 3d 32 39 39 0d 00 96 04 0d 00 a0 3f de 20 |h%=299.......?. | 00000220 73 70 72 69 74 65 25 20 73 70 72 69 74 65 73 69 |sprite% spritesi| 00000230 7a 65 32 35 36 25 2b 34 2c 73 63 61 6c 65 25 20 |ze256%+4,scale% | 00000240 31 36 2c 73 71 75 61 73 68 25 20 73 71 75 61 73 |16,squash% squas| 00000250 68 73 69 7a 65 32 35 36 25 0d 00 aa 04 0d 00 b4 |hsize256%.......| 00000260 27 c8 99 22 4f 53 5f 52 65 61 64 4d 6f 64 65 56 |'.."OS_ReadModeV| 00000270 61 72 69 61 62 6c 65 22 2c 2d 31 2c 39 20 b8 20 |ariable",-1,9 . | 00000280 2c 2c 43 25 0d 00 be 0b c8 8e 20 43 25 20 ca 0d |,,C%...... C% ..| 00000290 00 c8 18 20 20 c9 20 32 3a 20 f2 6c 6f 61 64 73 |... . 2: .loads| 000002a0 70 72 69 74 65 31 36 0d 00 d2 19 20 20 c9 20 33 |prite16.... . 3| 000002b0 3a 20 f2 6c 6f 61 64 73 70 72 69 74 65 32 35 36 |: .loadsprite256| 000002c0 0d 00 dc 0a 20 20 7f 3a 20 e0 0d 00 e6 05 cb 0d |.... .: .......| 000002d0 00 f0 04 0d 00 fa 43 c8 99 20 22 57 69 6d 70 5f |......C.. "Wimp_| 000002e0 49 6e 69 74 69 61 6c 69 73 65 22 2c 33 31 30 2c |Initialise",310,| 000002f0 26 34 62 35 33 34 31 35 34 2c 22 53 69 62 65 6c |&4b534154,"Sibel| 00000300 69 75 73 20 73 74 61 72 74 75 70 22 2c 30 20 b8 |ius startup",0 .| 00000310 20 2c 68 61 6e 25 0d 01 04 04 0d 01 0e 2a c8 99 | ,han%.......*..| 00000320 22 4f 53 5f 52 65 61 64 4d 6f 64 65 56 61 72 69 |"OS_ReadModeVari| 00000330 61 62 6c 65 22 2c 2d 31 2c 34 20 b8 20 2c 2c 78 |able",-1,4 . ,,x| 00000340 65 69 67 25 0d 01 18 1c 77 25 3d 77 25 3c 3c 78 |eig%....w%=w%<<x| 00000350 65 69 67 25 3a 20 f4 20 4f 53 20 75 6e 69 74 73 |eig%: . OS units| 00000360 0d 01 22 28 c8 99 22 4f 53 5f 52 65 61 64 4d 6f |.."(.."OS_ReadMo| 00000370 64 65 56 61 72 69 61 62 6c 65 22 2c 2d 31 2c 31 |deVariable",-1,1| 00000380 31 20 b8 20 2c 2c 78 25 0d 01 2c 2c 78 25 3d 28 |1 . ,,x%..,,x%=(| 00000390 28 78 25 2b 31 29 3c 3c 78 65 69 67 25 29 2f 32 |(x%+1)<<xeig%)/2| 000003a0 3a 20 f4 20 63 65 6e 74 72 65 20 6f 66 20 73 63 |: . centre of sc| 000003b0 72 65 65 6e 0d 01 36 04 0d 01 40 2a c8 99 22 4f |reen..6...@*.."O| 000003c0 53 5f 52 65 61 64 4d 6f 64 65 56 61 72 69 61 62 |S_ReadModeVariab| 000003d0 6c 65 22 2c 2d 31 2c 35 20 b8 20 2c 2c 79 65 69 |le",-1,5 . ,,yei| 000003e0 67 25 0d 01 4a 1c 68 25 3d 68 25 3c 3c 79 65 69 |g%..J.h%=h%<<yei| 000003f0 67 25 3a 20 f4 20 4f 53 20 75 6e 69 74 73 0d 01 |g%: . OS units..| 00000400 54 28 c8 99 22 4f 53 5f 52 65 61 64 4d 6f 64 65 |T(.."OS_ReadMode| 00000410 56 61 72 69 61 62 6c 65 22 2c 2d 31 2c 31 32 20 |Variable",-1,12 | 00000420 b8 20 2c 2c 79 25 0d 01 5e 3a 79 25 3d 28 28 79 |. ,,y%..^:y%=((y| 00000430 25 2b 31 29 3c 3c 79 65 69 67 25 29 2f 32 2b 35 |%+1)<<yeig%)/2+5| 00000440 30 3a 20 f4 20 6a 75 73 74 20 61 62 6f 76 65 20 |0: . just above | 00000450 63 65 6e 74 72 65 20 6f 66 20 73 63 72 65 65 6e |centre of screen| 00000460 0d 01 68 04 0d 01 72 05 f5 0d 01 7c 14 20 20 f3 |..h...r....|. .| 00000470 20 73 69 7a 65 25 2c 64 65 6c 61 79 25 0d 01 86 | size%,delay%...| 00000480 1a 20 20 21 73 63 61 6c 65 25 3d 32 3a 73 63 61 |. !scale%=2:sca| 00000490 6c 65 25 21 34 3d 32 0d 01 90 33 20 20 73 63 61 |le%!4=2...3 sca| 000004a0 6c 65 25 21 38 3d 73 69 7a 65 25 3a 73 63 61 6c |le%!8=size%:scal| 000004b0 65 25 21 31 32 3d 73 69 7a 65 25 3c 3c 28 79 65 |e%!12=size%<<(ye| 000004c0 69 67 25 2d 78 65 69 67 25 29 0d 01 9a 63 20 20 |ig%-xeig%)...c | 000004d0 c8 99 22 4f 53 5f 53 70 72 69 74 65 4f 70 22 2c |.."OS_SpriteOp",| 000004e0 35 32 2b 32 35 36 2c 73 70 72 69 74 65 25 2c 22 |52+256,sprite%,"| 000004f0 73 63 72 65 65 6e 22 2c 78 25 2d 77 25 2f 32 2a |screen",x%-w%/2*| 00000500 28 32 2f 73 63 61 6c 65 25 21 38 29 2c 79 25 2d |(2/scale%!8),y%-| 00000510 68 25 2f 32 2a 28 32 2f 73 63 61 6c 65 25 21 31 |h%/2*(2/scale%!1| 00000520 32 29 2c 30 2c 73 63 61 6c 65 25 2c 30 0d 01 a4 |2),0,scale%,0...| 00000530 18 20 20 d1 3d 30 3a f5 20 fd 20 91 20 3e 20 64 |. .=0:. . . > d| 00000540 65 6c 61 79 25 0d 01 ae 0d fd 20 73 69 7a 65 25 |elay%..... size%| 00000550 3d 32 0d 01 b8 04 0d 01 c2 3c c8 99 20 22 57 69 |=2.......<.. "Wi| 00000560 6d 70 5f 46 6f 72 63 65 52 65 64 72 61 77 22 2c |mp_ForceRedraw",| 00000570 2d 31 2c 78 25 2d 77 25 2f 32 2c 79 25 2d 77 25 |-1,x%-w%/2,y%-w%| 00000580 2f 32 2c 78 25 2b 77 25 2f 32 2c 79 25 2b 77 25 |/2,x%+w%/2,y%+w%| 00000590 2f 32 0d 01 cc 26 c8 99 20 22 57 69 6d 70 5f 43 |/2...&.. "Wimp_C| 000005a0 6c 6f 73 65 44 6f 77 6e 22 2c 68 61 6e 25 2c 26 |loseDown",han%,&| 000005b0 34 62 35 33 34 31 35 34 0d 01 d6 05 e0 0d 01 e0 |4b534154........| 000005c0 04 0d 01 ea 29 f4 20 73 63 61 6c 65 20 66 61 63 |....). scale fac| 000005d0 74 6f 72 20 6f 66 20 66 72 61 6d 65 73 20 3d 20 |tor of frames = | 000005e0 32 2f 6e 2c 20 64 65 6c 61 79 0d 01 f4 0c dc 20 |2/n, delay..... | 000005f0 32 2c 20 31 30 30 0d 01 fe 04 0d 02 08 11 f4 20 |2, 100......... | 00000600 75 73 65 64 20 74 6f 20 62 65 3a 0d 02 12 0c dc |used to be:.....| 00000610 20 31 32 2c 20 31 30 0d 02 1c 0c dc 20 31 31 2c | 12, 10..... 11,| 00000620 20 31 31 0d 02 26 0c dc 20 31 30 2c 20 31 32 0d | 11..&.. 10, 12.| 00000630 02 30 0b dc 20 39 2c 20 31 33 0d 02 3a 0b dc 20 |.0.. 9, 13..:.. | 00000640 38 2c 20 31 34 0d 02 44 0b dc 20 37 2c 20 31 35 |8, 14..D.. 7, 15| 00000650 0d 02 4e 0b dc 20 36 2c 20 31 36 0d 02 58 0b dc |..N.. 6, 16..X..| 00000660 20 35 2c 20 31 37 0d 02 62 0b dc 20 34 2c 20 31 | 5, 17..b.. 4, 1| 00000670 38 0d 02 6c 0b dc 20 33 2c 20 32 34 0d 02 76 0c |8..l.. 3, 24..v.| 00000680 dc 20 32 2c 20 33 30 30 0d 02 80 04 0d 02 8a 04 |. 2, 300........| 00000690 0d 02 94 13 dd 20 f2 6c 6f 61 64 73 70 72 69 74 |..... .loadsprit| 000006a0 65 31 36 0d 02 9e 22 c8 99 22 4f 53 5f 4d 6f 64 |e16...".."OS_Mod| 000006b0 75 6c 65 22 2c 31 38 2c 22 53 71 75 61 73 68 22 |ule",18,"Squash"| 000006c0 20 b8 20 58 25 0d 02 a8 30 e7 20 58 25 3c 3e 31 | . X%...0. X%<>1| 000006d0 38 20 e0 3a 20 f4 20 65 72 72 6f 72 20 62 65 63 |8 .: . error bec| 000006e0 61 75 73 65 20 6e 6f 20 53 71 75 61 73 68 20 6d |ause no Squash m| 000006f0 6f 64 75 6c 65 0d 02 b2 04 0d 02 bc 59 c8 99 22 |odule.......Y.."| 00000700 53 71 75 61 73 68 5f 44 65 63 6f 6d 70 72 65 73 |Squash_Decompres| 00000710 73 22 2c 25 31 30 30 30 2c 73 71 75 61 73 68 73 |s",%1000,squashs| 00000720 69 7a 65 31 36 25 2d 32 30 20 b8 20 77 6f 72 6b |ize16%-20 . work| 00000730 73 69 7a 65 25 3a 20 f4 20 73 71 75 61 73 68 20 |size%: . squash | 00000740 77 6f 72 6b 73 70 61 63 65 2c 20 31 37 4b 20 73 |workspace, 17K s| 00000750 61 79 0d 02 c6 15 de 20 77 6f 72 6b 25 20 77 6f |ay..... work% wo| 00000760 72 6b 73 69 7a 65 25 0d 02 d0 04 0d 02 da 2c ff |rksize%.......,.| 00000770 20 22 4c 4f 41 44 20 3c 4f 62 65 79 24 44 69 72 | "LOAD <Obey$Dir| 00000780 3e 2e 53 36 6c 6f 67 6f a0 31 36 20 22 2b c3 7e |>.S6logo.16 "+.~| 00000790 73 71 75 61 73 68 25 0d 02 e4 04 0d 02 ee 62 21 |squash%.......b!| 000007a0 73 70 72 69 74 65 25 20 3d 20 73 70 72 69 74 65 |sprite% = sprite| 000007b0 73 69 7a 65 31 36 25 2b 34 3a 20 f4 20 27 69 6e |size16%+4: . 'in| 000007c0 69 74 69 61 6c 69 7a 65 27 20 73 70 72 69 74 65 |itialize' sprite| 000007d0 20 61 72 65 61 3b 20 72 65 73 74 20 6f 66 20 68 | area; rest of h| 000007e0 65 61 64 65 72 20 6c 6f 61 64 65 64 20 66 72 6f |eader loaded fro| 000007f0 6d 20 73 70 72 69 74 65 20 66 69 6c 65 0d 02 f8 |m sprite file...| 00000800 04 0d 03 02 5e c8 99 22 53 71 75 61 73 68 5f 44 |....^.."Squash_D| 00000810 65 63 6f 6d 70 72 65 73 73 22 2c 25 30 31 30 30 |ecompress",%0100| 00000820 2c 77 6f 72 6b 25 2c 73 71 75 61 73 68 25 2b 32 |,work%,squash%+2| 00000830 30 2c 73 71 75 61 73 68 73 69 7a 65 31 36 25 2d |0,squashsize16%-| 00000840 32 30 2c 73 70 72 69 74 65 25 2b 34 2c 73 70 72 |20,sprite%+4,spr| 00000850 69 74 65 73 69 7a 65 31 36 25 20 b8 20 58 25 0d |itesize16% . X%.| 00000860 03 0c 32 e7 20 58 25 3c 3e 30 20 e0 3a 20 f4 20 |..2. X%<>0 .: . | 00000870 64 65 63 6f 6d 70 72 65 73 73 20 66 61 69 6c 65 |decompress faile| 00000880 64 20 66 6f 72 20 73 6f 6d 65 20 72 65 61 73 6f |d for some reaso| 00000890 6e 0d 03 16 05 e1 0d 03 20 04 0d 03 2a 04 0d 03 |n....... ...*...| 000008a0 34 14 dd 20 f2 6c 6f 61 64 73 70 72 69 74 65 32 |4.. .loadsprite2| 000008b0 35 36 0d 03 3e 22 c8 99 22 4f 53 5f 4d 6f 64 75 |56..>".."OS_Modu| 000008c0 6c 65 22 2c 31 38 2c 22 53 71 75 61 73 68 22 20 |le",18,"Squash" | 000008d0 b8 20 58 25 0d 03 48 30 e7 20 58 25 3c 3e 31 38 |. X%..H0. X%<>18| 000008e0 20 e0 3a 20 f4 20 65 72 72 6f 72 20 62 65 63 61 | .: . error beca| 000008f0 75 73 65 20 6e 6f 20 53 71 75 61 73 68 20 6d 6f |use no Squash mo| 00000900 64 75 6c 65 0d 03 52 04 0d 03 5c 5a c8 99 22 53 |dule..R...\Z.."S| 00000910 71 75 61 73 68 5f 44 65 63 6f 6d 70 72 65 73 73 |quash_Decompress| 00000920 22 2c 25 31 30 30 30 2c 73 71 75 61 73 68 73 69 |",%1000,squashsi| 00000930 7a 65 32 35 36 25 2d 32 30 20 b8 20 77 6f 72 6b |ze256%-20 . work| 00000940 73 69 7a 65 25 3a 20 f4 20 73 71 75 61 73 68 20 |size%: . squash | 00000950 77 6f 72 6b 73 70 61 63 65 2c 20 31 37 4b 20 73 |workspace, 17K s| 00000960 61 79 0d 03 66 15 de 20 77 6f 72 6b 25 20 77 6f |ay..f.. work% wo| 00000970 72 6b 73 69 7a 65 25 0d 03 70 04 0d 03 7a 2d ff |rksize%..p...z-.| 00000980 20 22 4c 4f 41 44 20 3c 4f 62 65 79 24 44 69 72 | "LOAD <Obey$Dir| 00000990 3e 2e 53 36 6c 6f 67 6f a0 32 35 36 20 22 2b c3 |>.S6logo.256 "+.| 000009a0 7e 73 71 75 61 73 68 25 0d 03 84 04 0d 03 8e 63 |~squash%.......c| 000009b0 21 73 70 72 69 74 65 25 20 3d 20 73 70 72 69 74 |!sprite% = sprit| 000009c0 65 73 69 7a 65 32 35 36 25 2b 34 3a 20 f4 20 27 |esize256%+4: . '| 000009d0 69 6e 69 74 69 61 6c 69 7a 65 27 20 73 70 72 69 |initialize' spri| 000009e0 74 65 20 61 72 65 61 3b 20 72 65 73 74 20 6f 66 |te area; rest of| 000009f0 20 68 65 61 64 65 72 20 6c 6f 61 64 65 64 20 66 | header loaded f| 00000a00 72 6f 6d 20 73 70 72 69 74 65 20 66 69 6c 65 0d |rom sprite file.| 00000a10 03 98 04 0d 03 a2 60 c8 99 22 53 71 75 61 73 68 |......`.."Squash| 00000a20 5f 44 65 63 6f 6d 70 72 65 73 73 22 2c 25 30 31 |_Decompress",%01| 00000a30 30 30 2c 77 6f 72 6b 25 2c 73 71 75 61 73 68 25 |00,work%,squash%| 00000a40 2b 32 30 2c 73 71 75 61 73 68 73 69 7a 65 32 35 |+20,squashsize25| 00000a50 36 25 2d 32 30 2c 73 70 72 69 74 65 25 2b 34 2c |6%-20,sprite%+4,| 00000a60 73 70 72 69 74 65 73 69 7a 65 32 35 36 25 20 b8 |spritesize256% .| 00000a70 20 58 25 0d 03 ac 32 e7 20 58 25 3c 3e 30 20 e0 | X%...2. X%<>0 .| 00000a80 3a 20 f4 20 64 65 63 6f 6d 70 72 65 73 73 20 66 |: . decompress f| 00000a90 61 69 6c 65 64 20 66 6f 72 20 73 6f 6d 65 20 72 |ailed for some r| 00000aa0 65 61 73 6f 6e 0d 03 b6 04 0d 03 c0 05 e1 0d ff |eason...........| 00000ab0