Home » Personal collection » Acorn ADFS disks » Archimedes » RiscOs_Apps_2.ADF » !Madness/!RunImage

!Madness/!RunImage

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 ADFS disks » Archimedes » RiscOs_Apps_2.ADF
Filename: !Madness/!RunImage
Read OK:
File size: 0FE9 bytes
Load address: FFFFFB41
Exec address: 5AAC35FA
Duplicates

There are 2 duplicate copies of this file in the archive:

File contents
   10REM > !Madness.!RunImage
   20DIM taskid%4:$taskid%="TASK"
   30SYS "Wimp_Initialise",200,!taskid%,"Window Madness" TO version%
   40`wbcol=&1:`tbcol=&2:`sco=&3:`mbcol=&B:`wfcol=&7:`tfcol=&7:`sci=&D:`tbcol2=&C
   50PROCvars
   60DIM q% 256,buffers% 512,X%(255),Y%(255)
   70FORX%=0TO255:X%(X%)=4*RND(3):Y%(X%)=4*RND(3):NEXT
   80Madness%=FNcwindow:madspeed%=20
   90DATA Madness,%1010011,`wfcol,`wbcol,0,-1024,1280,0,0,0,0,0,0
  100ON ERROR PROCfinish:END
  110 
  120ONERROR PROCerrorbox:SYS CrMenu,,-1 : REM close menus!
  130q%!16=&400C1:PROCreceive(q%)
  140SYS Drag,,-1:PROCgetpointer:PROCpopup(Madness%)
  150SYS Time% TO timex%:timex%+=madspeed%:after%=Madness%
  160REPEAT
  170  SYS Poll%,0,q%,timex% TO A%
  180  CASE A% OF
  190  WHEN 0 :PROCnudge
  200  WHEN 3 :PROCcloseawindow(!q%)
  210  WHEN 17,18:PROCreceive(q%)
  220  ENDCASE
  230UNTIL FALSE
  240 
  250DEF PROCreceive(q%)
  260CASE q%!16 OF
  270WHEN 0:PROCfinish:END
  280WHEN &400C1:!q%=4:q%!4=5:q%!8=11:q%!12=12:q%!16=-1
  290SYS49,q%,q%+20:ros=q%!28+1<<q%!20:tos=q%!32+1<<q%!24
  300ENDCASE
  310ENDPROC
  320 
  330DEF FNcwindow
  340  READ A$,f%,fc%,bc%,x0%,y0%,x1%,y1%,cx0%,cy0%,cx1%,cy1%,nicons%
  350=FNcreate_window(cx0%,cy0%,cx1%,cy1%,0,0,f%,fc%,bc%,x0%,y0%,x1%,y1%,&2D,A$,nicons%)
  360 
  370DEF PROCcloseawindow(handle%)
  380PROCclose_window(handle%)
  390PROCfinish:END
  400ENDPROC
  410 
  420DEF PROCfinish
  430SYS "Wimp_CloseDown"
  440ENDPROC
  450 
  460DEF FNcreate_window(cx0%,cy0%,cx1%,cy1%,scx%,scy%,flags%,fc%,bc%,sx0%,sy0%,sx1%,sy1%,titlef%,title$,nicons%)
  470!q%=cx0%:q%!4=cy0%:q%!8=cx1%:q%!12=cy1%:q%!16=scx%:q%!20=scy%
  480q%!24=-2:q%!28=flags%
  490IFfc%=15ANDbc%=15THEN
  500  q%?32=15:q%?33=15:q%?34=fc%:q%?35=bc%
  510ELSE q%?32=`tfcol:q%?33=`tbcol:q%?34=fc%:q%?35=bc%
  520ENDIF
  530q%?36=`sco:q%?37=`tbcol:q%?38=`tbcol2:q%?39=0
  540q%!40=sx0%:q%!44=sy0%:q%!48=sx1%:q%!52=sy1%
  550q%!56=titlef%
  560q%!60=&3000      : REM work area flags
  570q%!64=0:q%!68=0  : REM reserved
  580$(q%+72)=LEFT$(title$,11)
  590q%!84=nicons%
  600LOCALI%,x0%,y0%,x1%,y1%,f%,data$:I%=q%+88
  610WHILE nicons%>0
  620  READ x0%,y0%,x1%,y1%,f%,fc%,bc%,data$
  630  I%!0=x0%:I%!4=y0%:I%!8=x1%:I%!12=y1%
  640  IF (f%AND&40)=0 THEN bc%=fc%+(bc%<<4)
  650  I%!16=f%+(bc%<<24)
  660  IF(f%AND&100)THEN
  670    READ L%:B%=FNbuffer(L%):I%!20=B%:$B%=data$:I%!24=-1:I%!28=L%
  680  ELSE
  690    $(I%+20)=data$
  700  ENDIF
  710  I%=I%+32:nicons%=nicons%-1
  720ENDWHILE
  730 SYS CreateW,,q% TO handle%
  740=handle%
  750 
  760DEF PROCfront(handle%)
  770IFhandle%=-1THENENDPROC
  780PROCgetw(handle%)
  790PROCopen_window(handle%,x0%,y0%,x1%,y1%,scx%,scy%,-1)
  800ENDPROC
  810 
  820DEF PROCpopup(handle%)
  830PROCgetw(handle%)
  840xo%=0:yo%=100
  850PROCopen_window(handle%,xo%,yo%,xo%,yo%,scx%,scy%,-2)
  860ENDPROC
  870 
  880DEF PROCopen_window(handle%,x0%,y0%,x1%,y1%,scx%,scy%,bhandle%)
  890IFhandle%=-1THENENDPROC
  900q%!0=handle%:q%!28=bhandle%
  910q%!4=x0%:q%!8=y0%:q%!12=x1%:q%!16=y1%
  920q%!20=scx%:q%!24=scy%
  930SYS OpenW,,q%
  940ENDPROC
  950 
  960DEF PROCgetw(handle%)
  970!q%=handle%:SYS GetW,,q%
  980PROCinfo(q%+4):bhandle%=q%!28:flags%=q%!32
  990ENDPROC
 1000 
 1010DEF PROCinfo(q%)
 1020x0%=!q%:y0%=q%!4:x1%=q%!8:y1%=q%!12:scx%=q%!16:scy%=q%!20
 1030bx%=x0%-scx%:by%=y1%-scy%
 1040ENDPROC
 1050 
 1060DEF PROCnudge
 1070LOCAL q%:PROCtick:q%=buffers%
 1080LOCAL ERROR
 1090ON ERROR LOCAL after%=Madness%:RESTORE ERROR:PROCpopup(Madness%):ENDPROC
 1100!q%=after%:SYS gws%,,q%:after%=q%!28
 1110IFafter%=-1 ERROR
 1120!q%=after%:SYS gws%,,q%
 1130a%=after%AND255
 1140IFq%!12>ros-64 X%(a%)=-RND(3)*4 ELSEIFq%!4<10 X%(a%)=RND(3)*4
 1150q%!4+=X%(a%):q%!12+=X%(a%)
 1160IFq%!16>tos-64 Y%(a%)=-RND(3)*4 ELSEIFq%!8<100 Y%(a%)=RND(3)*4
 1170q%!8+=Y%(a%):q%!16+=Y%(a%)
 1180SYS "Wimp_SendMessage",2,q%,after%
 1190ENDPROC
 1200 
 1210DEF PROCtick
 1220SYS Time% TO timeslip%
 1230WHILEtimeslip%>=timex%:timex%+=madspeed%:ENDWHILE
 1240ENDPROC
 1250 
 1260DEF PROCclose_window(handle%)
 1270!q%=handle%:SYS CloseW,,q%
 1280ENDPROC
 1290 
 1300DEF PROCvars
 1310Wimp    = (1<<18) + (3<<6)
 1320CreateW = Wimp+1
 1330OpenW   = Wimp+5
 1340CloseW  = Wimp+6
 1350RedrawW = Wimp+8
 1360UpdateW = Wimp+9
 1370GetR%   = Wimp+10
 1380GetW    = Wimp+11
 1390GetP    = Wimp+15
 1400Drag    = Wimp+16
 1410CrMenu  = Wimp+20
 1420DcMenu  = Wimp+21
 1430SYS "OS_SWINumberFromString",,"Wimp_PollIdle" TO Poll%
 1440SYS "OS_SWINumberFromString",,"OS_ReadMonotonicTime" TO Time%
 1450SYS "OS_SWINumberFromString",,"Wimp_GetWindowState" TO gws%
 1460ENDPROC
 1470 
 1480DEF PROCgetpointer
 1490SYS GetP,,q%
 1500mousex%=!q%:mousey%=q%!4:b%=q%!8:handle%=q%!12:icon%=q%!16:ob%=q%!20
 1510ENDPROC
 1520 
 1530DEF PROCerrorbox
 1540SYS Drag,,-1
 1550!buffers%=ERR:$(buffers%+4)=REPORT$+" at line "+STR$ERL+CHR$0
 1560SYS "Wimp_ReportError",buffers%,1,"Madness"
 1570PROCfinish:END
 1580ENDPROC

� > !Madness.!RunImage
� taskid%4:$taskid%="TASK"
Aș "Wimp_Initialise",200,!taskid%,"Window Madness" � version%
(P`wbcol=&1:`tbcol=&2:`sco=&3:`mbcol=&B:`wfcol=&7:`tfcol=&7:`sci=&D:`tbcol2=&C
2	�vars
<)� q% 256,buffers% 512,X%(255),Y%(255)
F+�X%=0�255:X%(X%)=4*�(3):Y%(X%)=4*�(3):�
P"Madness%=�cwindow:madspeed%=20
Z=� Madness,%1010011,`wfcol,`wbcol,0,-1024,1280,0,0,0,0,0,0
d� � �finish:�
n 
x/� �errorbox:ș CrMenu,,-1 : � close menus!
�q%!16=&400C1:�receive(q%)
�,ș Drag,,-1:�getpointer:�popup(Madness%)
�7ș Time% � timex%:timex%+=madspeed%:after%=Madness%
��
�  ș Poll%,0,q%,timex% � A%
�
  Ȏ A% �
�  � 0 :�nudge
�  � 3 :�closeawindow(!q%)
�  � 17,18:�receive(q%)
�  �
�� �
� 
�� �receive(q%)
Ȏ q%!16 �
� 0:�finish:�
3� &400C1:!q%=4:q%!4=5:q%!8=11:q%!12=12:q%!16=-1
"7ș49,q%,q%+20:ros=q%!28+1<<q%!20:tos=q%!32+1<<q%!24
,�
6�
@ 
J� �cwindow
TA  � A$,f%,fc%,bc%,x0%,y0%,x1%,y1%,cx0%,cy0%,cx1%,cy1%,nicons%
^V=�create_window(cx0%,cy0%,cx1%,cy1%,0,0,f%,fc%,bc%,x0%,y0%,x1%,y1%,&2D,A$,nicons%)
h 
r� �closeawindow(handle%)
|�close_window(handle%)
�
�finish:�
��
� 
�
� �finish
�ș "Wimp_CloseDown"
��
� 
�m� �create_window(cx0%,cy0%,cx1%,cy1%,scx%,scy%,flags%,fc%,bc%,sx0%,sy0%,sx1%,sy1%,titlef%,title$,nicons%)
�A!q%=cx0%:q%!4=cy0%:q%!8=cx1%:q%!12=cy1%:q%!16=scx%:q%!20=scy%
�q%!24=-2:q%!28=flags%
��fc%=15�bc%=15�
�+  q%?32=15:q%?33=15:q%?34=fc%:q%?35=bc%
�3� q%?32=`tfcol:q%?33=`tbcol:q%?34=fc%:q%?35=bc%
�
1q%?36=`sco:q%?37=`tbcol:q%?38=`tbcol2:q%?39=0
/q%!40=sx0%:q%!44=sy0%:q%!48=sx1%:q%!52=sy1%
&q%!56=titlef%
0(q%!60=&3000      : � work area flags
:!q%!64=0:q%!68=0  : � reserved
D$(q%+72)=�title$,11)
Nq%!84=nicons%
X)�I%,x0%,y0%,x1%,y1%,f%,data$:I%=q%+88
bȕ nicons%>0
l(  � x0%,y0%,x1%,y1%,f%,fc%,bc%,data$
v*  I%!0=x0%:I%!4=y0%:I%!8=x1%:I%!12=y1%
�%  � (f%�&40)=0 � bc%=fc%+(bc%<<4)
�  I%!16=f%+(bc%<<24)
�  �(f%�&100)�
�@    � L%:B%=�buffer(L%):I%!20=B%:$B%=data$:I%!24=-1:I%!28=L%
�  �
�    $(I%+20)=data$
�  �
�   I%=I%+32:nicons%=nicons%-1
��
� ș CreateW,,q% � handle%
�=handle%
� 
�� �front(handle%)
�handle%=-1��
�getw(handle%)
6�open_window(handle%,x0%,y0%,x1%,y1%,scx%,scy%,-1)
 �
* 
4� �popup(handle%)
>�getw(handle%)
Hxo%=0:yo%=100
R6�open_window(handle%,xo%,yo%,xo%,yo%,scx%,scy%,-2)
\�
f 
p>� �open_window(handle%,x0%,y0%,x1%,y1%,scx%,scy%,bhandle%)
z�handle%=-1��
�q%!0=handle%:q%!28=bhandle%
�)q%!4=x0%:q%!8=y0%:q%!12=x1%:q%!16=y1%
�q%!20=scx%:q%!24=scy%
�ș OpenW,,q%
��
� 
�� �getw(handle%)
�!q%=handle%:ș GetW,,q%
�+�info(q%+4):bhandle%=q%!28:flags%=q%!32
��
� 
�� �info(q%)
�=x0%=!q%:y0%=q%!4:x1%=q%!8:y1%=q%!12:scx%=q%!16:scy%=q%!20
bx%=x0%-scx%:by%=y1%-scy%
�
 
$� �nudge
.� q%:�tick:q%=buffers%
8� �
B0� � � after%=Madness%:� �:�popup(Madness%):�
L'!q%=after%:ș gws%,,q%:after%=q%!28
V�after%=-1 �
`!q%=after%:ș gws%,,q%
ja%=after%�255
t8�q%!12>ros-64 X%(a%)=-�(3)*4 ��q%!4<10 X%(a%)=�(3)*4
~q%!4+=X%(a%):q%!12+=X%(a%)
�9�q%!16>tos-64 Y%(a%)=-�(3)*4 ��q%!8<100 Y%(a%)=�(3)*4
�q%!8+=Y%(a%):q%!16+=Y%(a%)
�%ș "Wimp_SendMessage",2,q%,after%
��
� 
�� �tick
�ș Time% � timeslip%
�+ȕtimeslip%>=timex%:timex%+=madspeed%:�
��
� 
�� �close_window(handle%)
�!q%=handle%:ș CloseW,,q%
�

 
� �vars
Wimp    = (1<<18) + (3<<6)
(CreateW = Wimp+1
2OpenW   = Wimp+5
<CloseW  = Wimp+6
FRedrawW = Wimp+8
PUpdateW = Wimp+9
ZGetR%   = Wimp+10
dGetW    = Wimp+11
nGetP    = Wimp+15
xDrag    = Wimp+16
�CrMenu  = Wimp+20
�DcMenu  = Wimp+21
�8ș "OS_SWINumberFromString",,"Wimp_PollIdle" � Poll%
�?ș "OS_SWINumberFromString",,"OS_ReadMonotonicTime" � Time%
�=ș "OS_SWINumberFromString",,"Wimp_GetWindowState" � gws%
��
� 
�� �getpointer
�ș GetP,,q%
�Hmousex%=!q%:mousey%=q%!4:b%=q%!8:handle%=q%!12:icon%=q%!16:ob%=q%!20
��
� 
�� �errorbox
ș Drag,,-1
2!buffers%=�:$(buffers%+4)=�$+" at line "+Þ+�0
.ș "Wimp_ReportError",buffers%,1,"Madness"
"
�finish:�
,�
�
00000000  0d 00 0a 1a f4 20 3e 20  21 4d 61 64 6e 65 73 73  |..... > !Madness|
00000010  2e 21 52 75 6e 49 6d 61  67 65 0d 00 14 1e de 20  |.!RunImage..... |
00000020  74 61 73 6b 69 64 25 34  3a 24 74 61 73 6b 69 64  |taskid%4:$taskid|
00000030  25 3d 22 54 41 53 4b 22  0d 00 1e 41 c8 99 20 22  |%="TASK"...A.. "|
00000040  57 69 6d 70 5f 49 6e 69  74 69 61 6c 69 73 65 22  |Wimp_Initialise"|
00000050  2c 32 30 30 2c 21 74 61  73 6b 69 64 25 2c 22 57  |,200,!taskid%,"W|
00000060  69 6e 64 6f 77 20 4d 61  64 6e 65 73 73 22 20 b8  |indow Madness" .|
00000070  20 76 65 72 73 69 6f 6e  25 0d 00 28 50 60 77 62  | version%..(P`wb|
00000080  63 6f 6c 3d 26 31 3a 60  74 62 63 6f 6c 3d 26 32  |col=&1:`tbcol=&2|
00000090  3a 60 73 63 6f 3d 26 33  3a 60 6d 62 63 6f 6c 3d  |:`sco=&3:`mbcol=|
000000a0  26 42 3a 60 77 66 63 6f  6c 3d 26 37 3a 60 74 66  |&B:`wfcol=&7:`tf|
000000b0  63 6f 6c 3d 26 37 3a 60  73 63 69 3d 26 44 3a 60  |col=&7:`sci=&D:`|
000000c0  74 62 63 6f 6c 32 3d 26  43 0d 00 32 09 f2 76 61  |tbcol2=&C..2..va|
000000d0  72 73 0d 00 3c 29 de 20  71 25 20 32 35 36 2c 62  |rs..<). q% 256,b|
000000e0  75 66 66 65 72 73 25 20  35 31 32 2c 58 25 28 32  |uffers% 512,X%(2|
000000f0  35 35 29 2c 59 25 28 32  35 35 29 0d 00 46 2b e3  |55),Y%(255)..F+.|
00000100  58 25 3d 30 b8 32 35 35  3a 58 25 28 58 25 29 3d  |X%=0.255:X%(X%)=|
00000110  34 2a b3 28 33 29 3a 59  25 28 58 25 29 3d 34 2a  |4*.(3):Y%(X%)=4*|
00000120  b3 28 33 29 3a ed 0d 00  50 22 4d 61 64 6e 65 73  |.(3):...P"Madnes|
00000130  73 25 3d a4 63 77 69 6e  64 6f 77 3a 6d 61 64 73  |s%=.cwindow:mads|
00000140  70 65 65 64 25 3d 32 30  0d 00 5a 3d dc 20 4d 61  |peed%=20..Z=. Ma|
00000150  64 6e 65 73 73 2c 25 31  30 31 30 30 31 31 2c 60  |dness,%1010011,`|
00000160  77 66 63 6f 6c 2c 60 77  62 63 6f 6c 2c 30 2c 2d  |wfcol,`wbcol,0,-|
00000170  31 30 32 34 2c 31 32 38  30 2c 30 2c 30 2c 30 2c  |1024,1280,0,0,0,|
00000180  30 2c 30 2c 30 0d 00 64  11 ee 20 85 20 f2 66 69  |0,0,0..d.. . .fi|
00000190  6e 69 73 68 3a e0 0d 00  6e 05 20 0d 00 78 2f ee  |nish:...n. ..x/.|
000001a0  85 20 f2 65 72 72 6f 72  62 6f 78 3a c8 99 20 43  |. .errorbox:.. C|
000001b0  72 4d 65 6e 75 2c 2c 2d  31 20 3a 20 f4 20 63 6c  |rMenu,,-1 : . cl|
000001c0  6f 73 65 20 6d 65 6e 75  73 21 0d 00 82 1d 71 25  |ose menus!....q%|
000001d0  21 31 36 3d 26 34 30 30  43 31 3a f2 72 65 63 65  |!16=&400C1:.rece|
000001e0  69 76 65 28 71 25 29 0d  00 8c 2c c8 99 20 44 72  |ive(q%)...,.. Dr|
000001f0  61 67 2c 2c 2d 31 3a f2  67 65 74 70 6f 69 6e 74  |ag,,-1:.getpoint|
00000200  65 72 3a f2 70 6f 70 75  70 28 4d 61 64 6e 65 73  |er:.popup(Madnes|
00000210  73 25 29 0d 00 96 37 c8  99 20 54 69 6d 65 25 20  |s%)...7.. Time% |
00000220  b8 20 74 69 6d 65 78 25  3a 74 69 6d 65 78 25 2b  |. timex%:timex%+|
00000230  3d 6d 61 64 73 70 65 65  64 25 3a 61 66 74 65 72  |=madspeed%:after|
00000240  25 3d 4d 61 64 6e 65 73  73 25 0d 00 a0 05 f5 0d  |%=Madness%......|
00000250  00 aa 1f 20 20 c8 99 20  50 6f 6c 6c 25 2c 30 2c  |...  .. Poll%,0,|
00000260  71 25 2c 74 69 6d 65 78  25 20 b8 20 41 25 0d 00  |q%,timex% . A%..|
00000270  b4 0d 20 20 c8 8e 20 41  25 20 ca 0d 00 be 11 20  |..  .. A% ..... |
00000280  20 c9 20 30 20 3a f2 6e  75 64 67 65 0d 00 c8 1d  | . 0 :.nudge....|
00000290  20 20 c9 20 33 20 3a f2  63 6c 6f 73 65 61 77 69  |  . 3 :.closeawi|
000002a0  6e 64 6f 77 28 21 71 25  29 0d 00 d2 1a 20 20 c9  |ndow(!q%)....  .|
000002b0  20 31 37 2c 31 38 3a f2  72 65 63 65 69 76 65 28  | 17,18:.receive(|
000002c0  71 25 29 0d 00 dc 07 20  20 cb 0d 00 e6 07 fd 20  |q%)....  ...... |
000002d0  a3 0d 00 f0 05 20 0d 00  fa 12 dd 20 f2 72 65 63  |..... ..... .rec|
000002e0  65 69 76 65 28 71 25 29  0d 01 04 0e c8 8e 20 71  |eive(q%)...... q|
000002f0  25 21 31 36 20 ca 0d 01  0e 11 c9 20 30 3a f2 66  |%!16 ...... 0:.f|
00000300  69 6e 69 73 68 3a e0 0d  01 18 33 c9 20 26 34 30  |inish:....3. &40|
00000310  30 43 31 3a 21 71 25 3d  34 3a 71 25 21 34 3d 35  |0C1:!q%=4:q%!4=5|
00000320  3a 71 25 21 38 3d 31 31  3a 71 25 21 31 32 3d 31  |:q%!8=11:q%!12=1|
00000330  32 3a 71 25 21 31 36 3d  2d 31 0d 01 22 37 c8 99  |2:q%!16=-1.."7..|
00000340  34 39 2c 71 25 2c 71 25  2b 32 30 3a 72 6f 73 3d  |49,q%,q%+20:ros=|
00000350  71 25 21 32 38 2b 31 3c  3c 71 25 21 32 30 3a 74  |q%!28+1<<q%!20:t|
00000360  6f 73 3d 71 25 21 33 32  2b 31 3c 3c 71 25 21 32  |os=q%!32+1<<q%!2|
00000370  34 0d 01 2c 05 cb 0d 01  36 05 e1 0d 01 40 05 20  |4..,....6....@. |
00000380  0d 01 4a 0e dd 20 a4 63  77 69 6e 64 6f 77 0d 01  |..J.. .cwindow..|
00000390  54 41 20 20 f3 20 41 24  2c 66 25 2c 66 63 25 2c  |TA  . A$,f%,fc%,|
000003a0  62 63 25 2c 78 30 25 2c  79 30 25 2c 78 31 25 2c  |bc%,x0%,y0%,x1%,|
000003b0  79 31 25 2c 63 78 30 25  2c 63 79 30 25 2c 63 78  |y1%,cx0%,cy0%,cx|
000003c0  31 25 2c 63 79 31 25 2c  6e 69 63 6f 6e 73 25 0d  |1%,cy1%,nicons%.|
000003d0  01 5e 56 3d a4 63 72 65  61 74 65 5f 77 69 6e 64  |.^V=.create_wind|
000003e0  6f 77 28 63 78 30 25 2c  63 79 30 25 2c 63 78 31  |ow(cx0%,cy0%,cx1|
000003f0  25 2c 63 79 31 25 2c 30  2c 30 2c 66 25 2c 66 63  |%,cy1%,0,0,f%,fc|
00000400  25 2c 62 63 25 2c 78 30  25 2c 79 30 25 2c 78 31  |%,bc%,x0%,y0%,x1|
00000410  25 2c 79 31 25 2c 26 32  44 2c 41 24 2c 6e 69 63  |%,y1%,&2D,A$,nic|
00000420  6f 6e 73 25 29 0d 01 68  05 20 0d 01 72 1c dd 20  |ons%)..h. ..r.. |
00000430  f2 63 6c 6f 73 65 61 77  69 6e 64 6f 77 28 68 61  |.closeawindow(ha|
00000440  6e 64 6c 65 25 29 0d 01  7c 1a f2 63 6c 6f 73 65  |ndle%)..|..close|
00000450  5f 77 69 6e 64 6f 77 28  68 61 6e 64 6c 65 25 29  |_window(handle%)|
00000460  0d 01 86 0d f2 66 69 6e  69 73 68 3a e0 0d 01 90  |.....finish:....|
00000470  05 e1 0d 01 9a 05 20 0d  01 a4 0d dd 20 f2 66 69  |...... ..... .fi|
00000480  6e 69 73 68 0d 01 ae 17  c8 99 20 22 57 69 6d 70  |nish...... "Wimp|
00000490  5f 43 6c 6f 73 65 44 6f  77 6e 22 0d 01 b8 05 e1  |_CloseDown".....|
000004a0  0d 01 c2 05 20 0d 01 cc  6d dd 20 a4 63 72 65 61  |.... ...m. .crea|
000004b0  74 65 5f 77 69 6e 64 6f  77 28 63 78 30 25 2c 63  |te_window(cx0%,c|
000004c0  79 30 25 2c 63 78 31 25  2c 63 79 31 25 2c 73 63  |y0%,cx1%,cy1%,sc|
000004d0  78 25 2c 73 63 79 25 2c  66 6c 61 67 73 25 2c 66  |x%,scy%,flags%,f|
000004e0  63 25 2c 62 63 25 2c 73  78 30 25 2c 73 79 30 25  |c%,bc%,sx0%,sy0%|
000004f0  2c 73 78 31 25 2c 73 79  31 25 2c 74 69 74 6c 65  |,sx1%,sy1%,title|
00000500  66 25 2c 74 69 74 6c 65  24 2c 6e 69 63 6f 6e 73  |f%,title$,nicons|
00000510  25 29 0d 01 d6 41 21 71  25 3d 63 78 30 25 3a 71  |%)...A!q%=cx0%:q|
00000520  25 21 34 3d 63 79 30 25  3a 71 25 21 38 3d 63 78  |%!4=cy0%:q%!8=cx|
00000530  31 25 3a 71 25 21 31 32  3d 63 79 31 25 3a 71 25  |1%:q%!12=cy1%:q%|
00000540  21 31 36 3d 73 63 78 25  3a 71 25 21 32 30 3d 73  |!16=scx%:q%!20=s|
00000550  63 79 25 0d 01 e0 19 71  25 21 32 34 3d 2d 32 3a  |cy%....q%!24=-2:|
00000560  71 25 21 32 38 3d 66 6c  61 67 73 25 0d 01 ea 13  |q%!28=flags%....|
00000570  e7 66 63 25 3d 31 35 80  62 63 25 3d 31 35 8c 0d  |.fc%=15.bc%=15..|
00000580  01 f4 2b 20 20 71 25 3f  33 32 3d 31 35 3a 71 25  |..+  q%?32=15:q%|
00000590  3f 33 33 3d 31 35 3a 71  25 3f 33 34 3d 66 63 25  |?33=15:q%?34=fc%|
000005a0  3a 71 25 3f 33 35 3d 62  63 25 0d 01 fe 33 cc 20  |:q%?35=bc%...3. |
000005b0  71 25 3f 33 32 3d 60 74  66 63 6f 6c 3a 71 25 3f  |q%?32=`tfcol:q%?|
000005c0  33 33 3d 60 74 62 63 6f  6c 3a 71 25 3f 33 34 3d  |33=`tbcol:q%?34=|
000005d0  66 63 25 3a 71 25 3f 33  35 3d 62 63 25 0d 02 08  |fc%:q%?35=bc%...|
000005e0  05 cd 0d 02 12 31 71 25  3f 33 36 3d 60 73 63 6f  |.....1q%?36=`sco|
000005f0  3a 71 25 3f 33 37 3d 60  74 62 63 6f 6c 3a 71 25  |:q%?37=`tbcol:q%|
00000600  3f 33 38 3d 60 74 62 63  6f 6c 32 3a 71 25 3f 33  |?38=`tbcol2:q%?3|
00000610  39 3d 30 0d 02 1c 2f 71  25 21 34 30 3d 73 78 30  |9=0.../q%!40=sx0|
00000620  25 3a 71 25 21 34 34 3d  73 79 30 25 3a 71 25 21  |%:q%!44=sy0%:q%!|
00000630  34 38 3d 73 78 31 25 3a  71 25 21 35 32 3d 73 79  |48=sx1%:q%!52=sy|
00000640  31 25 0d 02 26 11 71 25  21 35 36 3d 74 69 74 6c  |1%..&.q%!56=titl|
00000650  65 66 25 0d 02 30 28 71  25 21 36 30 3d 26 33 30  |ef%..0(q%!60=&30|
00000660  30 30 20 20 20 20 20 20  3a 20 f4 20 77 6f 72 6b  |00      : . work|
00000670  20 61 72 65 61 20 66 6c  61 67 73 0d 02 3a 21 71  | area flags..:!q|
00000680  25 21 36 34 3d 30 3a 71  25 21 36 38 3d 30 20 20  |%!64=0:q%!68=0  |
00000690  3a 20 f4 20 72 65 73 65  72 76 65 64 0d 02 44 18  |: . reserved..D.|
000006a0  24 28 71 25 2b 37 32 29  3d c0 74 69 74 6c 65 24  |$(q%+72)=.title$|
000006b0  2c 31 31 29 0d 02 4e 11  71 25 21 38 34 3d 6e 69  |,11)..N.q%!84=ni|
000006c0  63 6f 6e 73 25 0d 02 58  29 ea 49 25 2c 78 30 25  |cons%..X).I%,x0%|
000006d0  2c 79 30 25 2c 78 31 25  2c 79 31 25 2c 66 25 2c  |,y0%,x1%,y1%,f%,|
000006e0  64 61 74 61 24 3a 49 25  3d 71 25 2b 38 38 0d 02  |data$:I%=q%+88..|
000006f0  62 10 c8 95 20 6e 69 63  6f 6e 73 25 3e 30 0d 02  |b... nicons%>0..|
00000700  6c 28 20 20 f3 20 78 30  25 2c 79 30 25 2c 78 31  |l(  . x0%,y0%,x1|
00000710  25 2c 79 31 25 2c 66 25  2c 66 63 25 2c 62 63 25  |%,y1%,f%,fc%,bc%|
00000720  2c 64 61 74 61 24 0d 02  76 2a 20 20 49 25 21 30  |,data$..v*  I%!0|
00000730  3d 78 30 25 3a 49 25 21  34 3d 79 30 25 3a 49 25  |=x0%:I%!4=y0%:I%|
00000740  21 38 3d 78 31 25 3a 49  25 21 31 32 3d 79 31 25  |!8=x1%:I%!12=y1%|
00000750  0d 02 80 25 20 20 e7 20  28 66 25 80 26 34 30 29  |...%  . (f%.&40)|
00000760  3d 30 20 8c 20 62 63 25  3d 66 63 25 2b 28 62 63  |=0 . bc%=fc%+(bc|
00000770  25 3c 3c 34 29 0d 02 8a  18 20 20 49 25 21 31 36  |%<<4)....  I%!16|
00000780  3d 66 25 2b 28 62 63 25  3c 3c 32 34 29 0d 02 94  |=f%+(bc%<<24)...|
00000790  11 20 20 e7 28 66 25 80  26 31 30 30 29 8c 0d 02  |.  .(f%.&100)...|
000007a0  9e 40 20 20 20 20 f3 20  4c 25 3a 42 25 3d a4 62  |.@    . L%:B%=.b|
000007b0  75 66 66 65 72 28 4c 25  29 3a 49 25 21 32 30 3d  |uffer(L%):I%!20=|
000007c0  42 25 3a 24 42 25 3d 64  61 74 61 24 3a 49 25 21  |B%:$B%=data$:I%!|
000007d0  32 34 3d 2d 31 3a 49 25  21 32 38 3d 4c 25 0d 02  |24=-1:I%!28=L%..|
000007e0  a8 07 20 20 cc 0d 02 b2  16 20 20 20 20 24 28 49  |..  .....    $(I|
000007f0  25 2b 32 30 29 3d 64 61  74 61 24 0d 02 bc 07 20  |%+20)=data$.... |
00000800  20 cd 0d 02 c6 20 20 20  49 25 3d 49 25 2b 33 32  | ....   I%=I%+32|
00000810  3a 6e 69 63 6f 6e 73 25  3d 6e 69 63 6f 6e 73 25  |:nicons%=nicons%|
00000820  2d 31 0d 02 d0 05 ce 0d  02 da 1d 20 c8 99 20 43  |-1......... .. C|
00000830  72 65 61 74 65 57 2c 2c  71 25 20 b8 20 68 61 6e  |reateW,,q% . han|
00000840  64 6c 65 25 0d 02 e4 0c  3d 68 61 6e 64 6c 65 25  |dle%....=handle%|
00000850  0d 02 ee 05 20 0d 02 f8  15 dd 20 f2 66 72 6f 6e  |.... ..... .fron|
00000860  74 28 68 61 6e 64 6c 65  25 29 0d 03 02 11 e7 68  |t(handle%).....h|
00000870  61 6e 64 6c 65 25 3d 2d  31 8c e1 0d 03 0c 12 f2  |andle%=-1.......|
00000880  67 65 74 77 28 68 61 6e  64 6c 65 25 29 0d 03 16  |getw(handle%)...|
00000890  36 f2 6f 70 65 6e 5f 77  69 6e 64 6f 77 28 68 61  |6.open_window(ha|
000008a0  6e 64 6c 65 25 2c 78 30  25 2c 79 30 25 2c 78 31  |ndle%,x0%,y0%,x1|
000008b0  25 2c 79 31 25 2c 73 63  78 25 2c 73 63 79 25 2c  |%,y1%,scx%,scy%,|
000008c0  2d 31 29 0d 03 20 05 e1  0d 03 2a 05 20 0d 03 34  |-1).. ....*. ..4|
000008d0  15 dd 20 f2 70 6f 70 75  70 28 68 61 6e 64 6c 65  |.. .popup(handle|
000008e0  25 29 0d 03 3e 12 f2 67  65 74 77 28 68 61 6e 64  |%)..>..getw(hand|
000008f0  6c 65 25 29 0d 03 48 11  78 6f 25 3d 30 3a 79 6f  |le%)..H.xo%=0:yo|
00000900  25 3d 31 30 30 0d 03 52  36 f2 6f 70 65 6e 5f 77  |%=100..R6.open_w|
00000910  69 6e 64 6f 77 28 68 61  6e 64 6c 65 25 2c 78 6f  |indow(handle%,xo|
00000920  25 2c 79 6f 25 2c 78 6f  25 2c 79 6f 25 2c 73 63  |%,yo%,xo%,yo%,sc|
00000930  78 25 2c 73 63 79 25 2c  2d 32 29 0d 03 5c 05 e1  |x%,scy%,-2)..\..|
00000940  0d 03 66 05 20 0d 03 70  3e dd 20 f2 6f 70 65 6e  |..f. ..p>. .open|
00000950  5f 77 69 6e 64 6f 77 28  68 61 6e 64 6c 65 25 2c  |_window(handle%,|
00000960  78 30 25 2c 79 30 25 2c  78 31 25 2c 79 31 25 2c  |x0%,y0%,x1%,y1%,|
00000970  73 63 78 25 2c 73 63 79  25 2c 62 68 61 6e 64 6c  |scx%,scy%,bhandl|
00000980  65 25 29 0d 03 7a 11 e7  68 61 6e 64 6c 65 25 3d  |e%)..z..handle%=|
00000990  2d 31 8c e1 0d 03 84 1f  71 25 21 30 3d 68 61 6e  |-1......q%!0=han|
000009a0  64 6c 65 25 3a 71 25 21  32 38 3d 62 68 61 6e 64  |dle%:q%!28=bhand|
000009b0  6c 65 25 0d 03 8e 29 71  25 21 34 3d 78 30 25 3a  |le%...)q%!4=x0%:|
000009c0  71 25 21 38 3d 79 30 25  3a 71 25 21 31 32 3d 78  |q%!8=y0%:q%!12=x|
000009d0  31 25 3a 71 25 21 31 36  3d 79 31 25 0d 03 98 19  |1%:q%!16=y1%....|
000009e0  71 25 21 32 30 3d 73 63  78 25 3a 71 25 21 32 34  |q%!20=scx%:q%!24|
000009f0  3d 73 63 79 25 0d 03 a2  10 c8 99 20 4f 70 65 6e  |=scy%...... Open|
00000a00  57 2c 2c 71 25 0d 03 ac  05 e1 0d 03 b6 05 20 0d  |W,,q%......... .|
00000a10  03 c0 14 dd 20 f2 67 65  74 77 28 68 61 6e 64 6c  |.... .getw(handl|
00000a20  65 25 29 0d 03 ca 1b 21  71 25 3d 68 61 6e 64 6c  |e%)....!q%=handl|
00000a30  65 25 3a c8 99 20 47 65  74 57 2c 2c 71 25 0d 03  |e%:.. GetW,,q%..|
00000a40  d4 2b f2 69 6e 66 6f 28  71 25 2b 34 29 3a 62 68  |.+.info(q%+4):bh|
00000a50  61 6e 64 6c 65 25 3d 71  25 21 32 38 3a 66 6c 61  |andle%=q%!28:fla|
00000a60  67 73 25 3d 71 25 21 33  32 0d 03 de 05 e1 0d 03  |gs%=q%!32.......|
00000a70  e8 05 20 0d 03 f2 0f dd  20 f2 69 6e 66 6f 28 71  |.. ..... .info(q|
00000a80  25 29 0d 03 fc 3d 78 30  25 3d 21 71 25 3a 79 30  |%)...=x0%=!q%:y0|
00000a90  25 3d 71 25 21 34 3a 78  31 25 3d 71 25 21 38 3a  |%=q%!4:x1%=q%!8:|
00000aa0  79 31 25 3d 71 25 21 31  32 3a 73 63 78 25 3d 71  |y1%=q%!12:scx%=q|
00000ab0  25 21 31 36 3a 73 63 79  25 3d 71 25 21 32 30 0d  |%!16:scy%=q%!20.|
00000ac0  04 06 1d 62 78 25 3d 78  30 25 2d 73 63 78 25 3a  |...bx%=x0%-scx%:|
00000ad0  62 79 25 3d 79 31 25 2d  73 63 79 25 0d 04 10 05  |by%=y1%-scy%....|
00000ae0  e1 0d 04 1a 05 20 0d 04  24 0c dd 20 f2 6e 75 64  |..... ..$.. .nud|
00000af0  67 65 0d 04 2e 1a ea 20  71 25 3a f2 74 69 63 6b  |ge..... q%:.tick|
00000b00  3a 71 25 3d 62 75 66 66  65 72 73 25 0d 04 38 07  |:q%=buffers%..8.|
00000b10  ea 20 85 0d 04 42 30 ee  20 85 20 ea 20 61 66 74  |. ...B0. . . aft|
00000b20  65 72 25 3d 4d 61 64 6e  65 73 73 25 3a f7 20 85  |er%=Madness%:. .|
00000b30  3a f2 70 6f 70 75 70 28  4d 61 64 6e 65 73 73 25  |:.popup(Madness%|
00000b40  29 3a e1 0d 04 4c 27 21  71 25 3d 61 66 74 65 72  |):...L'!q%=after|
00000b50  25 3a c8 99 20 67 77 73  25 2c 2c 71 25 3a 61 66  |%:.. gws%,,q%:af|
00000b60  74 65 72 25 3d 71 25 21  32 38 0d 04 56 10 e7 61  |ter%=q%!28..V..a|
00000b70  66 74 65 72 25 3d 2d 31  20 85 0d 04 60 1a 21 71  |fter%=-1 ...`.!q|
00000b80  25 3d 61 66 74 65 72 25  3a c8 99 20 67 77 73 25  |%=after%:.. gws%|
00000b90  2c 2c 71 25 0d 04 6a 11  61 25 3d 61 66 74 65 72  |,,q%..j.a%=after|
00000ba0  25 80 32 35 35 0d 04 74  38 e7 71 25 21 31 32 3e  |%.255..t8.q%!12>|
00000bb0  72 6f 73 2d 36 34 20 58  25 28 61 25 29 3d 2d b3  |ros-64 X%(a%)=-.|
00000bc0  28 33 29 2a 34 20 8b e7  71 25 21 34 3c 31 30 20  |(3)*4 ..q%!4<10 |
00000bd0  58 25 28 61 25 29 3d b3  28 33 29 2a 34 0d 04 7e  |X%(a%)=.(3)*4..~|
00000be0  1e 71 25 21 34 2b 3d 58  25 28 61 25 29 3a 71 25  |.q%!4+=X%(a%):q%|
00000bf0  21 31 32 2b 3d 58 25 28  61 25 29 0d 04 88 39 e7  |!12+=X%(a%)...9.|
00000c00  71 25 21 31 36 3e 74 6f  73 2d 36 34 20 59 25 28  |q%!16>tos-64 Y%(|
00000c10  61 25 29 3d 2d b3 28 33  29 2a 34 20 8b e7 71 25  |a%)=-.(3)*4 ..q%|
00000c20  21 38 3c 31 30 30 20 59  25 28 61 25 29 3d b3 28  |!8<100 Y%(a%)=.(|
00000c30  33 29 2a 34 0d 04 92 1e  71 25 21 38 2b 3d 59 25  |3)*4....q%!8+=Y%|
00000c40  28 61 25 29 3a 71 25 21  31 36 2b 3d 59 25 28 61  |(a%):q%!16+=Y%(a|
00000c50  25 29 0d 04 9c 25 c8 99  20 22 57 69 6d 70 5f 53  |%)...%.. "Wimp_S|
00000c60  65 6e 64 4d 65 73 73 61  67 65 22 2c 32 2c 71 25  |endMessage",2,q%|
00000c70  2c 61 66 74 65 72 25 0d  04 a6 05 e1 0d 04 b0 05  |,after%.........|
00000c80  20 0d 04 ba 0b dd 20 f2  74 69 63 6b 0d 04 c4 18  | ..... .tick....|
00000c90  c8 99 20 54 69 6d 65 25  20 b8 20 74 69 6d 65 73  |.. Time% . times|
00000ca0  6c 69 70 25 0d 04 ce 2b  c8 95 74 69 6d 65 73 6c  |lip%...+..timesl|
00000cb0  69 70 25 3e 3d 74 69 6d  65 78 25 3a 74 69 6d 65  |ip%>=timex%:time|
00000cc0  78 25 2b 3d 6d 61 64 73  70 65 65 64 25 3a ce 0d  |x%+=madspeed%:..|
00000cd0  04 d8 05 e1 0d 04 e2 05  20 0d 04 ec 1c dd 20 f2  |........ ..... .|
00000ce0  63 6c 6f 73 65 5f 77 69  6e 64 6f 77 28 68 61 6e  |close_window(han|
00000cf0  64 6c 65 25 29 0d 04 f6  1d 21 71 25 3d 68 61 6e  |dle%)....!q%=han|
00000d00  64 6c 65 25 3a c8 99 20  43 6c 6f 73 65 57 2c 2c  |dle%:.. CloseW,,|
00000d10  71 25 0d 05 00 05 e1 0d  05 0a 05 20 0d 05 14 0b  |q%......... ....|
00000d20  dd 20 f2 76 61 72 73 0d  05 1e 1e 57 69 6d 70 20  |. .vars....Wimp |
00000d30  20 20 20 3d 20 28 31 3c  3c 31 38 29 20 2b 20 28  |   = (1<<18) + (|
00000d40  33 3c 3c 36 29 0d 05 28  14 43 72 65 61 74 65 57  |3<<6)..(.CreateW|
00000d50  20 3d 20 57 69 6d 70 2b  31 0d 05 32 14 4f 70 65  | = Wimp+1..2.Ope|
00000d60  6e 57 20 20 20 3d 20 57  69 6d 70 2b 35 0d 05 3c  |nW   = Wimp+5..<|
00000d70  14 43 6c 6f 73 65 57 20  20 3d 20 57 69 6d 70 2b  |.CloseW  = Wimp+|
00000d80  36 0d 05 46 14 52 65 64  72 61 77 57 20 3d 20 57  |6..F.RedrawW = W|
00000d90  69 6d 70 2b 38 0d 05 50  14 55 70 64 61 74 65 57  |imp+8..P.UpdateW|
00000da0  20 3d 20 57 69 6d 70 2b  39 0d 05 5a 15 47 65 74  | = Wimp+9..Z.Get|
00000db0  52 25 20 20 20 3d 20 57  69 6d 70 2b 31 30 0d 05  |R%   = Wimp+10..|
00000dc0  64 15 47 65 74 57 20 20  20 20 3d 20 57 69 6d 70  |d.GetW    = Wimp|
00000dd0  2b 31 31 0d 05 6e 15 47  65 74 50 20 20 20 20 3d  |+11..n.GetP    =|
00000de0  20 57 69 6d 70 2b 31 35  0d 05 78 15 44 72 61 67  | Wimp+15..x.Drag|
00000df0  20 20 20 20 3d 20 57 69  6d 70 2b 31 36 0d 05 82  |    = Wimp+16...|
00000e00  15 43 72 4d 65 6e 75 20  20 3d 20 57 69 6d 70 2b  |.CrMenu  = Wimp+|
00000e10  32 30 0d 05 8c 15 44 63  4d 65 6e 75 20 20 3d 20  |20....DcMenu  = |
00000e20  57 69 6d 70 2b 32 31 0d  05 96 38 c8 99 20 22 4f  |Wimp+21...8.. "O|
00000e30  53 5f 53 57 49 4e 75 6d  62 65 72 46 72 6f 6d 53  |S_SWINumberFromS|
00000e40  74 72 69 6e 67 22 2c 2c  22 57 69 6d 70 5f 50 6f  |tring",,"Wimp_Po|
00000e50  6c 6c 49 64 6c 65 22 20  b8 20 50 6f 6c 6c 25 0d  |llIdle" . Poll%.|
00000e60  05 a0 3f c8 99 20 22 4f  53 5f 53 57 49 4e 75 6d  |..?.. "OS_SWINum|
00000e70  62 65 72 46 72 6f 6d 53  74 72 69 6e 67 22 2c 2c  |berFromString",,|
00000e80  22 4f 53 5f 52 65 61 64  4d 6f 6e 6f 74 6f 6e 69  |"OS_ReadMonotoni|
00000e90  63 54 69 6d 65 22 20 b8  20 54 69 6d 65 25 0d 05  |cTime" . Time%..|
00000ea0  aa 3d c8 99 20 22 4f 53  5f 53 57 49 4e 75 6d 62  |.=.. "OS_SWINumb|
00000eb0  65 72 46 72 6f 6d 53 74  72 69 6e 67 22 2c 2c 22  |erFromString",,"|
00000ec0  57 69 6d 70 5f 47 65 74  57 69 6e 64 6f 77 53 74  |Wimp_GetWindowSt|
00000ed0  61 74 65 22 20 b8 20 67  77 73 25 0d 05 b4 05 e1  |ate" . gws%.....|
00000ee0  0d 05 be 05 20 0d 05 c8  11 dd 20 f2 67 65 74 70  |.... ..... .getp|
00000ef0  6f 69 6e 74 65 72 0d 05  d2 0f c8 99 20 47 65 74  |ointer...... Get|
00000f00  50 2c 2c 71 25 0d 05 dc  48 6d 6f 75 73 65 78 25  |P,,q%...Hmousex%|
00000f10  3d 21 71 25 3a 6d 6f 75  73 65 79 25 3d 71 25 21  |=!q%:mousey%=q%!|
00000f20  34 3a 62 25 3d 71 25 21  38 3a 68 61 6e 64 6c 65  |4:b%=q%!8:handle|
00000f30  25 3d 71 25 21 31 32 3a  69 63 6f 6e 25 3d 71 25  |%=q%!12:icon%=q%|
00000f40  21 31 36 3a 6f 62 25 3d  71 25 21 32 30 0d 05 e6  |!16:ob%=q%!20...|
00000f50  05 e1 0d 05 f0 05 20 0d  05 fa 0f dd 20 f2 65 72  |...... ..... .er|
00000f60  72 6f 72 62 6f 78 0d 06  04 0f c8 99 20 44 72 61  |rorbox...... Dra|
00000f70  67 2c 2c 2d 31 0d 06 0e  32 21 62 75 66 66 65 72  |g,,-1...2!buffer|
00000f80  73 25 3d 9f 3a 24 28 62  75 66 66 65 72 73 25 2b  |s%=.:$(buffers%+|
00000f90  34 29 3d f6 24 2b 22 20  61 74 20 6c 69 6e 65 20  |4)=.$+" at line |
00000fa0  22 2b c3 9e 2b bd 30 0d  06 18 2e c8 99 20 22 57  |"+..+.0...... "W|
00000fb0  69 6d 70 5f 52 65 70 6f  72 74 45 72 72 6f 72 22  |imp_ReportError"|
00000fc0  2c 62 75 66 66 65 72 73  25 2c 31 2c 22 4d 61 64  |,buffers%,1,"Mad|
00000fd0  6e 65 73 73 22 0d 06 22  0d f2 66 69 6e 69 73 68  |ness".."..finish|
00000fe0  3a e0 0d 06 2c 05 e1 0d  ff                       |:...,....|
00000fe9
!Madness/!RunImage.m0
!Madness/!RunImage.m1
!Madness/!RunImage.m2
!Madness/!RunImage.m4
!Madness/!RunImage.m5