Ass_dev M:4 DEF libhdr.h[802] Ass_dev=4
Ass_dir M:2 DEF libhdr.h[800] Ass_dir=2
Ass_link M:0 DEF libhdr.h[798] Ass_link=0
Ass_name M:5 DEF libhdr.h[803] Ass_name=5
Ass_task M:1 DEF libhdr.h[799] Ass_task=1
Ass_type M:3 DEF libhdr.h[801] Ass_type=3
B2Wsh M:2 DEF libhdr.h[26] B2Wsh=1+32/32
B2Wsh M:2 MAN libhdr.h[253] bytesperword=1<<B2Wsh
B2Wsh M:2 MAN libhdr.h[28] W2Bsh=B2Wsh
CloseObj M:1 DEF libhdr.h[303] CloseObj=1
Dcb_arg M:4 DEF libhdr.h[742] Dcb_arg=4
Dcb_cvp M:16 DEF libhdr.h[756] Dcb_cvp=16
Dcb_devid M:1 DEF libhdr.h[739] Dcb_devid=1
Dcb_flag M:7 DEF libhdr.h[745] Dcb_flag=7
Dcb_intson M:6 DEF libhdr.h[744] Dcb_intson=6
Dcb_irq M:5 DEF libhdr.h[743] Dcb_irq=5
Dcb_op M:3 DEF libhdr.h[741] Dcb_op=3
Dcb_threadp M:14 DEF libhdr.h[755] Dcb_threadp=14
Dcb_type M:0 DEF libhdr.h[738] Dcb_type=0
Dcb_upb M:17 DEF libhdr.h[760] Dcb_upb=17
Dcb_var0 M:8 DEF libhdr.h[749] Dcb_var0=8
Dcb_var1 M:9 DEF libhdr.h[750] Dcb_var1=9
Dcb_var2 M:10 DEF libhdr.h[751] Dcb_var2=10
Dcb_var3 M:11 DEF libhdr.h[752] Dcb_var3=11
Dcb_var4 M:12 DEF libhdr.h[753] Dcb_var4=12
Dcb_wkq M:2 DEF libhdr.h[740] Dcb_wkq=2
Devc_create M:1 DEF libhdr.h[770] Devc_create=1
Devc_destroy M:2 DEF libhdr.h[771] Devc_destroy=2
Devc_setintson M:5 DEF libhdr.h[774] Devc_setintson=5
Devc_start M:3 DEF libhdr.h[772] Devc_start=3
Devc_stop M:4 DEF libhdr.h[773] Devc_stop=4
Devt_clk M:1 DEF libhdr.h[763] Devt_clk=1
Devt_fileop M:4 DEF libhdr.h[766] Devt_fileop=4
Devt_tcpdev M:5 DEF libhdr.h[767] Devt_tcpdev=5
Devt_ttyin M:2 DEF libhdr.h[764] Devt_ttyin=2
Devt_ttyout M:3 DEF libhdr.h[765] Devt_ttyout=3
GB2312 M:-2 DEF libhdr.h[671] GB2312=-2
InitObj M:0 DEF libhdr.h[302] InitObj=0
ON64 M:0 DEF libhdr.h[29] ON64=32=64
One FG:211 DEF com/bucketflt.b[35] FLT One=
One FG:211 LG com/bucketflt.b[294] d#:=One
One FG:211 SG com/bucketflt.b[1141] One#:= 1.000#- 0.000
OneK FG:212 DEF com/bucketflt.b[36] FLT OneK=
OneK FG:212 SG com/bucketflt.b[1143] OneK#:= 1000.000
State_dead M:12 DEF libhdr.h[789] State_dead=12
State_hold M:2 DEF libhdr.h[786] State_hold=2
State_int M:8 DEF libhdr.h[788] State_int=8
State_pkt M:1 DEF libhdr.h[785] State_pkt=1
State_wait M:4 DEF libhdr.h[787] State_wait=4
Sys_alsa M:72 DEF libhdr.h[516] Sys_alsa=72
Sys_buttons M:56 DEF libhdr.h[496] Sys_buttons=56
Sys_callc M:59 DEF libhdr.h[499] Sys_callc=59
Sys_callnative M:53 DEF libhdr.h[493] Sys_callnative=53
Sys_close M:16 DEF libhdr.h[459] Sys_close=16
Sys_cputime M:30 DEF libhdr.h[472] Sys_cputime=30
Sys_datstamp M:44 DEF libhdr.h[484] Sys_datstamp=44
Sys_delay M:57 DEF libhdr.h[497] Sys_delay=57
Sys_deletefile M:17 DEF libhdr.h[460] Sys_deletefile=17
Sys_devcom M:43 DEF libhdr.h[483] Sys_devcom=43
Sys_dumpmem M:52 DEF libhdr.h[492] Sys_dumpmem=52
Sys_errwrch M:75 DEF libhdr.h[523] Sys_errwrch=75
Sys_ext M:68 DEF libhdr.h[510] Sys_ext=68
Sys_filemodtime M:31 DEF libhdr.h[473] Sys_filemodtime=31
Sys_filesize M:46 DEF libhdr.h[486] Sys_filesize=46
Sys_flt M:63 DEF libhdr.h[504] Sys_flt=63
Sys_flt M:63 MAN com/bucketflt.b[800]
    sys(Sys_flt,fl_sqrt,B*B- 4.000*A*C)#/ 2.000*A
Sys_flt M:63 MAN sdl.b[66] sys(Sys_flt,fl_sqrt,x*x+y*y+z*z)
Sys_flt M:63 MAN sdl.b[67]
    TEST r#<sys(Sys_flt,fl_mk,1,-10) THEN .. ELSE ..
Sys_flt M:63 MAN sdl.b[83]
    RESULTIS sys(Sys_flt,fl_sqrt,dx*dx+dy*dy+dz*dz)
Sys_flt M:63 MAN sdl.b[89] RESULTIS sys(Sys_flt,fl_sqrt,x*x+y*y+z*z)
Sys_freevec M:22 DEF libhdr.h[465] Sys_freevec=22
Sys_getbuildno M:71 DEF libhdr.h[513] Sys_getbuildno=71
Sys_getpid M:51 DEF libhdr.h[491] Sys_getpid=51
Sys_getprefix M:33 DEF libhdr.h[475] Sys_getprefix=33
Sys_getsysval M:48 DEF libhdr.h[488] Sys_getsysval=48
Sys_gettrval M:62 DEF libhdr.h[503] Sys_gettrval=62
Sys_getvec M:21 DEF libhdr.h[464] Sys_getvec=21
Sys_gl M:67 DEF libhdr.h[509] Sys_gl=67
Sys_globin M:24 DEF libhdr.h[467] Sys_globin=24
Sys_graphics M:34 DEF libhdr.h[476] Sys_graphics=34
Sys_inc M:55 DEF libhdr.h[495] Sys_inc=55
Sys_incdcount M:65 DEF libhdr.h[506] Sys_incdcount=65
Sys_interpret M:7 DEF libhdr.h[451] Sys_interpret=7
Sys_intflag M:28 DEF libhdr.h[470] Sys_intflag=28
Sys_joy M:69 DEF libhdr.h[511] Sys_joy=69
Sys_loadseg M:23 DEF libhdr.h[466] Sys_loadseg=23
Sys_lockirq M:41 DEF libhdr.h[481] Sys_lockirq=41
Sys_memmovebytes M:74 DEF libhdr.h[520] Sys_memmovebytes=74
Sys_memmovewords M:73 DEF libhdr.h[517] Sys_memmovewords=73
Sys_muldiv M:26 DEF libhdr.h[469] Sys_muldiv=26
Sys_openappend M:19 DEF libhdr.h[462] Sys_openappend=19
Sys_openread M:14 DEF libhdr.h[457] Sys_openread=14
Sys_openreadwrite M:47 DEF libhdr.h[487] Sys_openreadwrite=47
Sys_openwrite M:15 DEF libhdr.h[458] Sys_openwrite=15
Sys_platform M:54 DEF libhdr.h[494] Sys_platform=54
Sys_pollsardch M:64 DEF libhdr.h[505] Sys_pollsardch=64
Sys_putsysval M:49 DEF libhdr.h[489] Sys_putsysval=49
Sys_quit M:0 DEF libhdr.h[444] Sys_quit=0
Sys_read M:12 DEF libhdr.h[455] Sys_read=12
Sys_renamefile M:18 DEF libhdr.h[461] Sys_renamefile=18
Sys_rti M:1 DEF libhdr.h[445] Sys_rti=1
Sys_sardch M:10 DEF libhdr.h[453] Sys_sardch=10
Sys_saveregs M:2 DEF libhdr.h[446] Sys_saveregs=2
Sys_sawrch M:11 DEF libhdr.h[454] Sys_sawrch=11
Sys_sdl M:66 DEF libhdr.h[508] Sys_sdl=66
Sys_sdl M:66 MAN com/bucketflt.b[1152]
    UNLESS sys(Sys_sdl,sdl_avail) DO ..
Sys_sdl M:66 MAN sdl.b[167]
    IF sys(Sys_sdl,sdl_init,sdl_init_everything) DO ..
Sys_sdl M:66 MAN sdl.b[169] sys(Sys_sdl,sdl_geterror,mes)
Sys_sdl M:66 MAN sdl.b[229]
    ok:=sys(Sys_sdl,sdl_setvideomode,screenxsize,...)
Sys_sdl M:66 MAN sdl.b[240] sys(Sys_sdl,sdl_geterror,mes)
Sys_sdl M:66 MAN sdl.b[253]
    sys(Sys_sdl,sdl_getsurfaceinfo,@screen,@flags)
Sys_sdl M:66 MAN sdl.b[280] sys(Sys_sdl,sdl_maprgb,@format,r,g,b)
Sys_sdl M:66 MAN sdl.b[282] sys(Sys_sdl,sdl_wm_setcaption,title,0)
Sys_sdl M:66 MAN sdl.b[290] sys(Sys_sdl,sdl_quit)
Sys_sdl M:66 MAN sdl.b[296] sys(Sys_sdl,sdl_setcolourkey,surfptr,col)
Sys_sdl M:66 MAN sdl.b[300]
    sys(Sys_sdl,sdl_mksurface,@format,w,h,surfptr)
Sys_sdl M:66 MAN sdl.b[304] sys(Sys_sdl,sdl_freesurface,surfptr)
Sys_sdl M:66 MAN sdl.b[314]
    RESULTIS sys(Sys_sdl,sdl_pollevent,@eventtype)
Sys_sdl M:66 MAN sdl.b[318] sys(Sys_sdl,sdl_delay,msecs)
Sys_sdl M:66 MAN sdl.b[320] sys(Sys_sdl,sdl_getticks)
Sys_sdl M:66 MAN sdl.b[323] sys(Sys_sdl,sdl_hidecursor)
Sys_sdl M:66 MAN sdl.b[325] sys(Sys_sdl,sdl_showcursor)
Sys_sdl M:66 MAN sdl.b[328] sys(Sys_sdl,sdl_flip,@screen)
Sys_sdl M:66 MAN sdl.b[337]
    sys(Sys_sdl,sdl_blitsurface,srcptr,0,dstptr,@dx)
Sys_sdl M:66 MAN sdl.b[346]
    sys(Sys_sdl,sdl_blitsurface,srcptr,0,dstptr,@dx)
Sys_sdl M:66 MAN sdl.b[350] sys(Sys_sdl,sdl_fillsurf,@currsurf,col)
Sys_sdl M:66 MAN sdl.b[3754]
    sys(Sys_sdl,sdl_fillrect,@currsurf,xmin,currysize-ymax,...,...)
Sys_sdl M:66 MAN sdl.b[398]
    sys(Sys_sdl,sdl_fillrect,@currsurf,x,currysize-y,1,...)
Sys_seek M:38 DEF libhdr.h[478] Sys_seek=38
Sys_setcount M:-1 DEF libhdr.h[443] Sys_setcount=-1
Sys_setprefix M:32 DEF libhdr.h[474] Sys_setprefix=32
Sys_setraster M:29 DEF libhdr.h[471] Sys_setraster=29
Sys_setst M:3 DEF libhdr.h[447] Sys_setst=3
Sys_settracing M:70 DEF libhdr.h[512] Sys_settracing=70
Sys_settrcount M:61 DEF libhdr.h[502] Sys_settrcount=61
Sys_shellcom M:50 DEF libhdr.h[490] Sys_shellcom=50
Sys_sound M:58 DEF libhdr.h[498] Sys_sound=58
Sys_tally M:6 DEF libhdr.h[450] Sys_tally=6
Sys_tell M:39 DEF libhdr.h[479] Sys_tell=39
Sys_tracing M:4 DEF libhdr.h[448] Sys_tracing=4
Sys_trpush M:60 DEF libhdr.h[501] Sys_trpush=60
Sys_unloadseg M:25 DEF libhdr.h[468] Sys_unloadseg=25
Sys_unlockirq M:42 DEF libhdr.h[482] Sys_unlockirq=42
Sys_waitirq M:40 DEF libhdr.h[480] Sys_waitirq=40
Sys_watch M:5 DEF libhdr.h[449] Sys_watch=5
Sys_write M:13 DEF libhdr.h[456] Sys_write=13
Task_cli M:1 DEF libhdr.h[777] Task_cli=1
Task_consolehandler M:3 DEF libhdr.h[779] Task_consolehandler=3
Task_debug M:2 DEF libhdr.h[778] Task_debug=2
Task_filehandler M:4 DEF libhdr.h[780] Task_filehandler=4
Task_mbxhandler M:5 DEF libhdr.h[781] Task_mbxhandler=5
Task_tcphandler M:6 DEF libhdr.h[782] Task_tcphandler=6
UTF8 M:-1 DEF libhdr.h[670] UTF8=-1
W2Bsh M:2 DEF libhdr.h[28] W2Bsh=B2Wsh
abort G:28 DEF libhdr.h[67] abort=28
abort G:28 LG com/bucketflt.b[1014] abort(7668)
abort G:28 LG com/bucketflt.b[1332] abort(1234)
abort G:28 LG com/bucketflt.b[1334] abort(1235)
abort G:28 LG com/bucketflt.b[760] abort(5676)
abort G:28 LG com/bucketflt.b[904] abort(7660)
abort G:28 LG com/bucketflt.b[910] abort(1236)
abort G:28 LG com/bucketflt.b[913] abort(7661)
abort G:28 LG com/bucketflt.b[918] abort(7662)
abort G:28 LG com/bucketflt.b[928] abort(7663)
abort G:28 LG com/bucketflt.b[937] abort(7664)
abort G:28 LG com/bucketflt.b[950] abort(7665)
abort G:28 LG com/bucketflt.b[962] abort(7666)
abort G:28 LG com/bucketflt.b[974] abort(7667)
abort G:28 LG sdl.b[358] abort(999)
abort G:28 LG sdl.b[3683] abort(999)
abort G:28 LG sdl.b[4140] abort(5556)
abort G:28 LG sdl.b[4166] abort(999)
abort G:28 LG sdl.b[4396] abort(998)
activebat G:307 DEF com/bucketflt.b[134] activebat=
activebat G:307 LG com/bucketflt.b[1058] activebat:=~activebat
activebat G:307 LG com/bucketflt.b[569] IF activebat DO ..
activebat G:307 SG com/bucketflt.b[1058] activebat:=~activebat
activebat G:307 SG com/bucketflt.b[1106] activebat:=FALSE
activebat G:307 SG com/bucketflt.b[1110] activebat:=FALSE
activebat G:307 SG com/bucketflt.b[1120] activebat:=FALSE
activebat G:307 SG com/bucketflt.b[1124] activebat:=FALSE
activebat G:307 SG com/bucketflt.b[1193] activebat:=TRUE&FALSE
ag FG:218 DEF com/bucketflt.b[44] FLT ag=
ag FG:218 LG com/bucketflt.b[510] ay1#:=#-ag
ag FG:218 LG com/bucketflt.b[511] ay2#:=#-ag
ag FG:218 LG com/bucketflt.b[512] ay3#:=#-ag
ag FG:218 LG com/bucketflt.b[797] ag#/ 2.000
ag FG:218 SG com/bucketflt.b[1150] ag#:= 50.000
alloc2dvecs F:60 LF sdl.b[261] alloc2dvecs()
alloc2dvecs F:60 LF sdl.b[4157] alloc2dvecs()
alloc2dvecs F:60 RT sdl.b[3676] LET alloc2dvecs()BE..
alloc3dvecs F:75 LF sdl.b[275] alloc3dvecs()
alloc3dvecs F:75 RT sdl.b[4156] LET alloc3dvecs()BE..
appendstream G:66 DEF libhdr.h[105] appendstream=66
ax1 FG:288 DEF com/bucketflt.b[124] FLT ax1=
ax1 FG:288 LG com/bucketflt.b[463] writef("ax1=%'3=%9.5f*n",ax1,ax2,ax3)
ax1 FG:288 LG com/bucketflt.b[515]
    ax1#:=ax1#+FLOAT (...-1001)#/ 100000.000
ax1 FG:288 LG com/bucketflt.b[552] cgx1dot#:=cgx1dot#+ax1#/sps
ax1 FG:288 SG com/bucketflt.b[1295] ax1#:= 0.000
ax1 FG:288 SG com/bucketflt.b[510] ax1#:= 0.000
ax1 FG:288 SG com/bucketflt.b[515]
    ax1#:=ax1#+FLOAT (...-1001)#/ 100000.000
ax2 FG:294 DEF com/bucketflt.b[125] FLT ax2=
ax2 FG:294 LG com/bucketflt.b[463] writef("ax1=%'3=%9.5f*n",ax1,ax2,ax3)
ax2 FG:294 LG com/bucketflt.b[516]
    ax2#:=ax2#+FLOAT (...-1001)#/ 100000.000
ax2 FG:294 LG com/bucketflt.b[554] cgx2dot#:=cgx2dot#+ax2#/sps
ax2 FG:294 SG com/bucketflt.b[1296] ax2#:= 0.000
ax2 FG:294 SG com/bucketflt.b[511] ax2#:= 0.000
ax2 FG:294 SG com/bucketflt.b[516]
    ax2#:=ax2#+FLOAT (...-1001)#/ 100000.000
ax3 FG:300 DEF com/bucketflt.b[126] FLT ax3=
ax3 FG:300 LG com/bucketflt.b[463] writef("ax1=%'3=%9.5f*n",ax1,ax2,ax3)
ax3 FG:300 LG com/bucketflt.b[517]
    ax3#:=ax3#+FLOAT (...-1001)#/ 100000.000
ax3 FG:300 LG com/bucketflt.b[556] cgx3dot#:=cgx3dot#+ax3#/sps
ax3 FG:300 SG com/bucketflt.b[1297] ax3#:= 0.000
ax3 FG:300 SG com/bucketflt.b[512] ax3#:= 0.000
ax3 FG:300 SG com/bucketflt.b[517]
    ax3#:=ax3#+FLOAT (...-1001)#/ 100000.000
ay1 FG:289 DEF com/bucketflt.b[124] FLT ay1=
ay1 FG:289 LG com/bucketflt.b[553] cgy1dot#:=cgy1dot#+ay1#/sps
ay1 FG:289 SG com/bucketflt.b[1295] ay1#:= 0.000
ay1 FG:289 SG com/bucketflt.b[510] ay1#:=#-ag
ay1 FG:289 SG com/bucketflt.b[529] ay1#:= 0.000
ay1 FG:289 SG com/bucketflt.b[537] ay1#:= 0.000
ay2 FG:295 DEF com/bucketflt.b[125] FLT ay2=
ay2 FG:295 LG com/bucketflt.b[555] cgy2dot#:=cgy2dot#+ay2#/sps
ay2 FG:295 SG com/bucketflt.b[1296] ay2#:= 0.000
ay2 FG:295 SG com/bucketflt.b[511] ay2#:=#-ag
ay2 FG:295 SG com/bucketflt.b[529] ay2#:= 0.000
ay2 FG:295 SG com/bucketflt.b[545] ay2#:= 0.000
ay3 FG:301 DEF com/bucketflt.b[126] FLT ay3=
ay3 FG:301 LG com/bucketflt.b[557] cgy3dot#:=cgy3dot#+ay3#/sps
ay3 FG:301 SG com/bucketflt.b[1297] ay3#:= 0.000
ay3 FG:301 SG com/bucketflt.b[512] ay3#:=#-ag
ay3 FG:301 SG com/bucketflt.b[537] ay3#:= 0.000
ay3 FG:301 SG com/bucketflt.b[545] ay3#:= 0.000
backcolour G:245 DEF com/bucketflt.b[93] backcolour=
backcolour G:245 LG com/bucketflt.b[830] fillsurf(backcolour)
backcolour G:245 LG com/bucketflt.b[852] fillsurf(backcolour)
backcolour G:245 LG com/bucketflt.b[882] fillsurf(backcolour)
backcolour G:245 LG com/bucketflt.b[890] fillsurf(backcolour)
backcolour G:245 SG com/bucketflt.b[1211]
    backcolour:=maprgb(120,120,120)
ball1colour G:248 DEF com/bucketflt.b[96] ball1colour=
ball1colour G:248 LG com/bucketflt.b[897]
    ball1surfok:=initballsurf(@ball1surf,ball1colour)
ball1colour G:248 LG com/bucketflt.b[940] setcolour(ball1colour)
ball1colour G:248 SG com/bucketflt.b[1214] ball1colour:=maprgb(255,0,0)
ball1surf G:237 DEF com/bucketflt.b[81] ball1surf=
ball1surf G:237 LLG com/bucketflt.b[1365] freesurface(@ball1surf)
ball1surf G:237 LLG com/bucketflt.b[897]
    ball1surfok:=initballsurf(@ball1surf,ball1colour)
ball1surf G:237 LLG com/bucketflt.b[942]
    blitsurf(@ball1surf,@screen,FIX (cgx1-ballradius),FIX (cgy1+ballradius))
ball1surfok G:238 DEF com/bucketflt.b[82] ball1surfok=
ball1surfok G:238 LG com/bucketflt.b[1365] IF ball1surfok DO ..
ball1surfok G:238 LG com/bucketflt.b[896] UNLESS ball1surfok DO ..
ball1surfok G:238 LG com/bucketflt.b[941] IF ball1surfok DO ..
ball1surfok G:238 SG com/bucketflt.b[1164] ball1surfok:=FALSE
ball1surfok G:238 SG com/bucketflt.b[897]
    ball1surfok:=initballsurf(@ball1surf,ball1colour)
ball2colour G:249 DEF com/bucketflt.b[97] ball2colour=
ball2colour G:249 LG com/bucketflt.b[899]
    ball2surfok:=initballsurf(@ball2surf,ball2colour)
ball2colour G:249 LG com/bucketflt.b[952] setcolour(ball2colour)
ball2colour G:249 SG com/bucketflt.b[1215] ball2colour:=maprgb(0,255,0)
ball2surf G:239 DEF com/bucketflt.b[84] ball2surf=
ball2surf G:239 LLG com/bucketflt.b[1366] freesurface(@ball2surf)
ball2surf G:239 LLG com/bucketflt.b[899]
    ball2surfok:=initballsurf(@ball2surf,ball2colour)
ball2surf G:239 LLG com/bucketflt.b[954]
    blitsurf(@ball2surf,@screen,FIX (cgx2-ballradius),FIX (cgy2+ballradius))
ball2surfok G:240 DEF com/bucketflt.b[85] ball2surfok=
ball2surfok G:240 LG com/bucketflt.b[1366] IF ball2surfok DO ..
ball2surfok G:240 LG com/bucketflt.b[898] UNLESS ball2surfok DO ..
ball2surfok G:240 LG com/bucketflt.b[953] IF ball2surfok DO ..
ball2surfok G:240 SG com/bucketflt.b[1165] ball2surfok:=FALSE
ball2surfok G:240 SG com/bucketflt.b[899]
    ball2surfok:=initballsurf(@ball2surf,ball2colour)
ball3colour G:250 DEF com/bucketflt.b[98] ball3colour=
ball3colour G:250 LG com/bucketflt.b[901]
    ball3surfok:=initballsurf(@ball3surf,ball3colour)
ball3colour G:250 LG com/bucketflt.b[964] setcolour(ball3colour)
ball3colour G:250 SG com/bucketflt.b[1216] ball3colour:=maprgb(0,0,255)
ball3surf G:241 DEF com/bucketflt.b[87] ball3surf=
ball3surf G:241 LLG com/bucketflt.b[1367] freesurface(@ball3surf)
ball3surf G:241 LLG com/bucketflt.b[901]
    ball3surfok:=initballsurf(@ball3surf,ball3colour)
ball3surf G:241 LLG com/bucketflt.b[966]
    blitsurf(@ball3surf,@screen,FIX (cgx3-ballradius),FIX (cgy3+ballradius))
ball3surfok G:242 DEF com/bucketflt.b[88] ball3surfok=
ball3surfok G:242 LG com/bucketflt.b[1367] IF ball3surfok DO ..
ball3surfok G:242 LG com/bucketflt.b[900] UNLESS ball3surfok DO ..
ball3surfok G:242 LG com/bucketflt.b[965] IF ball3surfok DO ..
ball3surfok G:242 SG com/bucketflt.b[1166] ball3surfok:=FALSE
ball3surfok G:242 SG com/bucketflt.b[901]
    ball3surfok:=initballsurf(@ball3surf,ball3colour)
ballbounces G:317 DEF com/bucketflt.b[147] ballbounces=
ballbounces G:317 LG com/bucketflt.b[522] ballbounces(@cgx1)
ballbounces G:317 LG com/bucketflt.b[523] ballbounces(@cgx2)
ballbounces G:317 LG com/bucketflt.b[524] ballbounces(@cgx3)
ballbounces G:317 RT com/bucketflt.b[314] LET ballbounces(p)BE..
ballpushtime G:227 DEF com/bucketflt.b[57] ballpushtime=
ballpushxdot G:228 DEF com/bucketflt.b[58] ballpushxdot=
ballradius FG:214 DEF com/bucketflt.b[39] FLT ballradius=
ballradius FG:214 LG com/bucketflt.b[1018]
    cgy1#:=bucket_byt#+ballradius#+ 10.000
ballradius FG:214 LG com/bucketflt.b[1019]
    cgy2#:=bucket_byt#+3#*ballradius#+ 20.000
ballradius FG:214 LG com/bucketflt.b[1020]
    cgy3#:=bucket_byt#+5#*ballradius#+ 30.000
ballradius FG:214 LG com/bucketflt.b[1149]
    pushlevel#:=ballradius#* 6.000
ballradius FG:214 LG com/bucketflt.b[1264]
    bucket_lxr#:=screen_xc#-ballradius#* 2.500
ballradius FG:214 LG com/bucketflt.b[1268]
    bucket_rxl#:=screen_xc#+ballradius#* 2.500
ballradius FG:214 LG com/bucketflt.b[1272]
    bucket_tyt#:=ceiling_yb#- 6.000#*ballradius
ballradius FG:214 LG com/bucketflt.b[1276]
    bucket_byt#:=bucket_tyt#- 6.000#*ballradius
ballradius FG:214 LG com/bucketflt.b[1280]
    xlim_lwall#:=wall_lx#+ballradius
ballradius FG:214 LG com/bucketflt.b[1281]
    xlim_rwall#:=wall_rx#-ballradius
ballradius FG:214 LG com/bucketflt.b[1282]
    ylim_floor#:=floor_yt#+ballradius
ballradius FG:214 LG com/bucketflt.b[1283]
    ylim_ceiling#:=ceiling_yb#-ballradius
ballradius FG:214 LG com/bucketflt.b[1284]
    xlim_bucket_ll#:=bucket_lxl#-ballradius
ballradius FG:214 LG com/bucketflt.b[1285]
    xlim_bucket_lr#:=bucket_lxr#+ballradius
ballradius FG:214 LG com/bucketflt.b[1286]
    xlim_bucket_rl#:=bucket_rxl#-ballradius
ballradius FG:214 LG com/bucketflt.b[1287]
    xlim_bucket_rr#:=bucket_rxr#+ballradius
ballradius FG:214 LG com/bucketflt.b[1289]
    ylim_topt#:=bucket_tyt#+ballradius
ballradius FG:214 LG com/bucketflt.b[1290]
    ylim_baseb#:=bucket_byb#-ballradius
ballradius FG:214 LG com/bucketflt.b[1291]
    ylim_baset#:=bucket_byt#+ballradius
ballradius FG:214 LG com/bucketflt.b[1301]
    ylim_bat#:=floor_yt#+batradius#+ballradius
ballradius FG:214 LG com/bucketflt.b[331]
    IF incontact(@x1,p,endradius#+ballradius) DO ..
ballradius FG:214 LG com/bucketflt.b[338]
    IF incontact(@x1,p,endradius#+ballradius) DO ..
ballradius FG:214 LG com/bucketflt.b[398]
    IF incontact(@x1,p,endradius#+ballradius) DO ..
ballradius FG:214 LG com/bucketflt.b[405]
    IF incontact(@x1,p,endradius#+ballradius) DO ..
ballradius FG:214 LG com/bucketflt.b[417]
    IF incontact(@batx,p,batradius#+ballradius) DO ..
ballradius FG:214 LG com/bucketflt.b[528]
    IF incontact(@cgx1,@cgx2,ballradius#+ballradius) DO ..
ballradius FG:214 LG com/bucketflt.b[536]
    IF incontact(@cgx1,@cgx3,ballradius#+ballradius) DO ..
ballradius FG:214 LG com/bucketflt.b[544]
    IF incontact(@cgx2,@cgx3,ballradius#+ballradius) DO ..
ballradius FG:214 LG com/bucketflt.b[662] tx#:=selx#-8#*ballradius
ballradius FG:214 LG com/bucketflt.b[663] tx#:=selx#+8#*ballradius
ballradius FG:214 LG com/bucketflt.b[799] ballradius#-y
ballradius FG:214 LG com/bucketflt.b[805] xbounce#-wall_lx#+ballradius
ballradius FG:214 LG com/bucketflt.b[807]
    xbounce#:=wall_lx#+ballradius#-d
ballradius FG:214 LG com/bucketflt.b[810]
    d#:=xbounce#-wall_rx#-ballradius
ballradius FG:214 LG com/bucketflt.b[812]
    xbounce#:=wall_rx#-ballradius#-d
ballradius FG:214 LG com/bucketflt.b[860]  2.000#*ballradius#+ 2.000
ballradius FG:214 LG com/bucketflt.b[942]
    blitsurf(@ball1surf,@screen,FIX (cgx1#-ballradius),FIX (cgy1#+ballradius))
ballradius FG:214 LG com/bucketflt.b[942]
    blitsurf(@ball1surf,@screen,FIX (cgx1#-ballradius),FIX (cgy1+ballradius))
ballradius FG:214 LG com/bucketflt.b[954]
    blitsurf(@ball2surf,@screen,FIX (cgx2#-ballradius),FIX (cgy2#+ballradius))
ballradius FG:214 LG com/bucketflt.b[954]
    blitsurf(@ball2surf,@screen,FIX (cgx2#-ballradius),FIX (cgy2+ballradius))
ballradius FG:214 LG com/bucketflt.b[966]
    blitsurf(@ball3surf,@screen,FIX (cgx3#-ballradius),FIX (cgy3#+ballradius))
ballradius FG:214 LG com/bucketflt.b[966]
    blitsurf(@ball3surf,@screen,FIX (cgx3#-ballradius),FIX (cgy3+ballradius))
ballradius FG:214 SG com/bucketflt.b[1146] ballradius#:= 25.000
ballselecttime G:314 DEF com/bucketflt.b[140] ballselecttime=
ballselecttime G:314 LG com/bucketflt.b[474]
    IF displaytime>ballselecttime DO ..
ballselecttime G:314 SG com/bucketflt.b[1157] ballselecttime:=0
ballselecttime G:314 SG com/bucketflt.b[476]
    ballselecttime:=displaytime+5000
batcolour G:251 DEF com/bucketflt.b[99] batcolour=
batcolour G:251 LG com/bucketflt.b[883] setcolour(batcolour)
batcolour G:251 SG com/bucketflt.b[1217] batcolour:=maprgb(40,40,40)
batpushtime G:315 DEF com/bucketflt.b[144] batpushtime=
batpushtime G:315 LG com/bucketflt.b[1094]
    writef("displ'e=%9.2d*n",displaytime,batpushtime)
batpushtime G:315 LG com/bucketflt.b[619]
    IF displaytime>batpushtime DO ..
batpushtime G:315 LG com/bucketflt.b[622]
    writef("Displ'=%10.5d*n",displaytime,batpushtime,batpushxdotdot)
batpushtime G:315 LG com/bucketflt.b[647]
    IF displaytime>batpushtime DO ..
batpushtime G:315 SG com/bucketflt.b[1073] batpushtime:=0
batpushtime G:315 SG com/bucketflt.b[1158] batpushtime:=0
batpushtime G:315 SG com/bucketflt.b[621] batpushtime:=displaytime+200
batpushtime G:315 SG com/bucketflt.b[651] batpushtime:=displaytime+500
batpushxdotdot FG:316 DEF com/bucketflt.b[145] FLT batpushxdotdot=
batpushxdotdot FG:316 LG com/bucketflt.b[1092]
    writef("selxd't=%8.5f*n",selxdot,selydot,batpushxdotdot)
batpushxdotdot FG:316 LG com/bucketflt.b[622]
    writef("Displ'=%10.5d*n",displaytime,batpushtime,batpushxdotdot)
batpushxdotdot FG:316 LG com/bucketflt.b[625]
    batxdotdot#:=batpushxdotdot
batpushxdotdot FG:316 LG com/bucketflt.b[656]
    batxdotdot#:=batpushxdotdot
batpushxdotdot FG:316 SG com/bucketflt.b[1160] batpushxdotdot#:= 0.000
batpushxdotdot FG:316 SG com/bucketflt.b[620]
    batpushxdotdot#:=(midx#-batx)#* 3.000#/ 4.000
batpushxdotdot FG:316 SG com/bucketflt.b[649]
    batpushxdotdot#:=batx#<selx#->(Op175),#- 50200000.000
batradius FG:213 DEF com/bucketflt.b[38] FLT batradius=
batradius FG:213 LG com/bucketflt.b[1300] baty#:=floor_yt#+batradius
batradius FG:213 LG com/bucketflt.b[1301]
    ylim_bat#:=floor_yt#+batradius#+ballradius
batradius FG:213 LG com/bucketflt.b[417]
    IF incontact(@batx,p,batradius#+ballradius) DO ..
batradius FG:213 LG com/bucketflt.b[692]
    IF batx#>wall_rx#-batradius DO ..
batradius FG:213 LG com/bucketflt.b[693] batx#:=wall_rx#-batradius
batradius FG:213 LG com/bucketflt.b[694] IF batx#<batradius DO ..
batradius FG:213 LG com/bucketflt.b[695] batx#:=batradius
batradius FG:213 LG com/bucketflt.b[698]
    baty#:=baty#-(baty#-batradius)#/ 10.000
batradius FG:213 LG com/bucketflt.b[878]  2.000#*batradius#+ 2.900
batradius FG:213 LG com/bucketflt.b[884]
    drawfillcircle(FIX batradius,FIX (batradius#+ 1.000),FIX batradius)
batradius FG:213 LG com/bucketflt.b[884]
    drawfillcircle(FIX batradius,FIX (batradius+ 1.000),FIX batradius)
batradius FG:213 LG com/bucketflt.b[932]
    writef("Calli' %n %n)*n",@batsurf,@screen,FIX (batx#-batradius),FIX (baty#+batradius))
batradius FG:213 LG com/bucketflt.b[932]
    writef("Calli' %n %n)*n",@batsurf,@screen,FIX (batx#-batradius),FIX (baty+batradius))
batradius FG:213 LG com/bucketflt.b[935]
    blitsurf(@batsurf,@screen,FIX (batx#-batradius),FIX (baty#+batradius))
batradius FG:213 LG com/bucketflt.b[935]
    blitsurf(@batsurf,@screen,FIX (batx#-batradius),FIX (baty+batradius))
batradius FG:213 SG com/bucketflt.b[1145] batradius#:= 10.000
batsurf G:243 DEF com/bucketflt.b[90] batsurf=
batsurf G:243 LLG com/bucketflt.b[1368] freesurface(@batsurf)
batsurf G:243 LLG com/bucketflt.b[903] batsurfok:=initbatsurf(@batsurf)
batsurf G:243 LLG com/bucketflt.b[932]
    writef("Calli' %n %n)*n",@batsurf,@screen,FIX (batx-batradius),FIX (baty+batradius))
batsurf G:243 LLG com/bucketflt.b[935]
    blitsurf(@batsurf,@screen,FIX (batx-batradius),FIX (baty+batradius))
batsurfok G:244 DEF com/bucketflt.b[91] batsurfok=
batsurfok G:244 LG com/bucketflt.b[1368] IF batsurfok DO ..
batsurfok G:244 LG com/bucketflt.b[902] UNLESS batsurfok DO ..
batsurfok G:244 LG com/bucketflt.b[931] IF batsurfok DO ..
batsurfok G:244 SG com/bucketflt.b[1167] batsurfok:=FALSE
batsurfok G:244 SG com/bucketflt.b[903] batsurfok:=initbatsurf(@batsurf)
batx FG:302 DEF com/bucketflt.b[132] FLT batx=
batx FG:302 LG com/bucketflt.b[1010]
    drawf(30,175,"Bat  't=%10.5f",batx,baty,batxdot)
batx FG:302 LG com/bucketflt.b[1318] batxdotdot#:=(midx#-batx)#/4
batx FG:302 LG com/bucketflt.b[1320] batx#:=batx#+batxdot#/sps
batx FG:302 LG com/bucketflt.b[464]
    writef("batx='t=%9.5f*n",batx,baty,batxdot)
batx FG:302 LG com/bucketflt.b[620] batpushxdotdot#:=(midx#-batx)#*3#/4
batx FG:302 LG com/bucketflt.b[649]
    batpushxdotdot#:=batx#<selx#->+#x02FDFDC0,-#x02FDFDC0
batx FG:302 LG com/bucketflt.b[665]
    batxdotdot#:=chooseaccel(tx,selxdot,batx,...)
batx FG:302 LG com/bucketflt.b[690] batx#:=batx#+batxdot#/sps
batx FG:302 LG com/bucketflt.b[692] IF batx#>wall_rx-batradius DO ..
batx FG:302 LG com/bucketflt.b[694] IF batx#<batradius DO ..
batx FG:302 LG com/bucketflt.b[932]
    writef("Calli' %n %n)*n",@batsurf,@screen,FIX (batx#-batradius),FIX (baty+batradius))
batx FG:302 LG com/bucketflt.b[935]
    blitsurf(@batsurf,@screen,FIX (batx#-batradius),FIX (baty+batradius))
batx FG:302 LLG com/bucketflt.b[417]
    IF incontact(@batx,p,batradius+ballradius) DO ..
batx FG:302 LLG com/bucketflt.b[419] cbounce(@batx,p, 5.000, 1.000)
batx FG:302 SG com/bucketflt.b[1299] batx#:=screen_xc
batx FG:302 SG com/bucketflt.b[1320] batx#:=batx#+batxdot#/sps
batx FG:302 SG com/bucketflt.b[690] batx#:=batx#+batxdot#/sps
batx FG:302 SG com/bucketflt.b[693] batx#:=wall_rx#-batradius
batx FG:302 SG com/bucketflt.b[695] batx#:=batradius
batxdot FG:304 DEF com/bucketflt.b[132] FLT batxdot=
batxdot FG:304 LG com/bucketflt.b[1010]
    drawf(30,175,"Bat  't=%10.5f",batx,baty,batxdot)
batxdot FG:304 LG com/bucketflt.b[1319]
    batxdot#:=batxdot#+batxdotdot#/sps
batxdot FG:304 LG com/bucketflt.b[1320] batx#:=batx#+batxdot#/sps
batxdot FG:304 LG com/bucketflt.b[464]
    writef("batx='t=%9.5f*n",batx,baty,batxdot)
batxdot FG:304 LG com/bucketflt.b[665]
    batxdotdot#:=chooseaccel(tx,selxdot,batx,...)
batxdot FG:304 LG com/bucketflt.b[681]
    batxdot#:=batxdot#+batxdotdot#/sps
batxdot FG:304 LG com/bucketflt.b[682] batxdot#:=batxdot#-batxdot#/sps
batxdot FG:304 LG com/bucketflt.b[682] batxdot#:=batxdot#-batxdot/sps
batxdot FG:304 LG com/bucketflt.b[686] IF batxdot#>#x03938700 DO ..
batxdot FG:304 LG com/bucketflt.b[687] IF batxdot#<-#x03938700 DO ..
batxdot FG:304 LG com/bucketflt.b[690] batx#:=batx#+batxdot#/sps
batxdot FG:304 LG com/bucketflt.b[693] batxdot#:=#-batxdot
batxdot FG:304 LG com/bucketflt.b[695] batxdot#:=#-batxdot
batxdot FG:304 SG com/bucketflt.b[1303] batxdot#:= 150.000
batxdot FG:304 SG com/bucketflt.b[1319]
    batxdot#:=batxdot#+batxdotdot#/sps
batxdot FG:304 SG com/bucketflt.b[681]
    batxdot#:=batxdot#+batxdotdot#/sps
batxdot FG:304 SG com/bucketflt.b[682] batxdot#:=batxdot#-batxdot#/sps
batxdot FG:304 SG com/bucketflt.b[686] batxdot#:= 60000000.000
batxdot FG:304 SG com/bucketflt.b[687] batxdot#:=#- 60000000.000
batxdot FG:304 SG com/bucketflt.b[693] batxdot#:=#-batxdot
batxdot FG:304 SG com/bucketflt.b[695] batxdot#:=#-batxdot
batxdotdot FG:306 DEF com/bucketflt.b[132] FLT batxdotdot=
batxdotdot FG:306 LG com/bucketflt.b[1105]
    batxdotdot#:=batxdotdot#+ 750.000
batxdotdot FG:306 LG com/bucketflt.b[1109]
    batxdotdot#:=batxdotdot#- 750.000
batxdotdot FG:306 LG com/bucketflt.b[1119]
    batxdotdot#:=batxdotdot#- 750.000
batxdotdot FG:306 LG com/bucketflt.b[1123]
    batxdotdot#:=batxdotdot#+ 750.000
batxdotdot FG:306 LG com/bucketflt.b[1319]
    batxdot#:=batxdot#+batxdotdot#/sps
batxdotdot FG:306 LG com/bucketflt.b[676]
    IF batxdotdot#>#x03473BC0 DO ..
batxdotdot FG:306 LG com/bucketflt.b[677]
    IF batxdotdot#<-#x03473BC0 DO ..
batxdotdot FG:306 LG com/bucketflt.b[681]
    batxdot#:=batxdot#+batxdotdot#/sps
batxdotdot FG:306 SG com/bucketflt.b[1060] batxdotdot#:= 0.000
batxdotdot FG:306 SG com/bucketflt.b[1105]
    batxdotdot#:=batxdotdot#+ 750.000
batxdotdot FG:306 SG com/bucketflt.b[1109]
    batxdotdot#:=batxdotdot#- 750.000
batxdotdot FG:306 SG com/bucketflt.b[1119]
    batxdotdot#:=batxdotdot#- 750.000
batxdotdot FG:306 SG com/bucketflt.b[1123]
    batxdotdot#:=batxdotdot#+ 750.000
batxdotdot FG:306 SG com/bucketflt.b[1305] batxdotdot#:= 0.000
batxdotdot FG:306 SG com/bucketflt.b[1318]
    batxdotdot#:=(midx#-batx)#/ 4.000
batxdotdot FG:306 SG com/bucketflt.b[625] batxdotdot#:=batpushxdotdot
batxdotdot FG:306 SG com/bucketflt.b[656] batxdotdot#:=batpushxdotdot
batxdotdot FG:306 SG com/bucketflt.b[665]
    batxdotdot#:=chooseaccel(tx,selxdot,batx,...)
batxdotdot FG:306 SG com/bucketflt.b[676] batxdotdot#:= 55000000.000
batxdotdot FG:306 SG com/bucketflt.b[677] batxdotdot#:=#- 55000000.000
baty FG:303 DEF com/bucketflt.b[132] FLT baty=
baty FG:303 LG com/bucketflt.b[1010]
    drawf(30,175,"Bat  't=%10.5f",batx,baty,batxdot)
baty FG:303 LG com/bucketflt.b[464]
    writef("batx='t=%9.5f*n",batx,baty,batxdot)
baty FG:303 LG com/bucketflt.b[698]
    baty#:=baty#-(baty#-batradius)#/ 10.000
baty FG:303 LG com/bucketflt.b[698]
    baty#:=baty#-(baty-batradius)/ 10.000
baty FG:303 LG com/bucketflt.b[932]
    writef("Calli' %n %n)*n",@batsurf,@screen,FIX (batx#-batradius),FIX (baty#+batradius))
baty FG:303 LG com/bucketflt.b[935]
    blitsurf(@batsurf,@screen,FIX (batx#-batradius),FIX (baty#+batradius))
baty FG:303 SG com/bucketflt.b[1300] baty#:=floor_yt#+batradius
baty FG:303 SG com/bucketflt.b[698]
    baty#:=baty#-(baty#-batradius)#/ 10.000
batydot FG:305 DEF com/bucketflt.b[132] FLT batydot=
batydot FG:305 SG com/bucketflt.b[1304] batydot#:= 0.000
batydot FG:305 SG com/bucketflt.b[420] batydot#:= 0.000
binrdch G:39 DEF libhdr.h[78] binrdch=39
binwrch G:42 DEF libhdr.h[81] binwrch=42
bitsperbyte M:8 DEF libhdr.h[254] bitsperbyte=8
bitsperbyte M:8 MAN libhdr.h[255] bitsperword=bitsperbyte*bytesperword
bitsperword M:32 DEF libhdr.h[255] bitsperword=bitsperbyte*bytesperword
bitsperword M:32 MAN libhdr.h[257] minint=1<<bitsperword-1
bld_CYGWIN M:43 DEF libhdr.h[560] bld_CYGWIN=43
bld_MacOSX M:31 DEF libhdr.h[552] bld_MacOSX=31
bld_MacOSXSDL M:32 DEF libhdr.h[553] bld_MacOSXSDL=32
bld_MacOSXSDL2 M:33 DEF libhdr.h[554] bld_MacOSXSDL2=33
bld_MacOSXSDL2GL M:35 DEF libhdr.h[556] bld_MacOSXSDL2GL=35
bld_MacOSXSDLGL M:34 DEF libhdr.h[555] bld_MacOSXSDLGL=34
bld_Raspi M:21 DEF libhdr.h[546] bld_Raspi=21
bld_RaspiSDL M:22 DEF libhdr.h[547] bld_RaspiSDL=22
bld_RaspiSDL2 M:23 DEF libhdr.h[548] bld_RaspiSDL2=23
bld_RaspiSDL2GL M:25 DEF libhdr.h[550] bld_RaspiSDL2GL=25
bld_RaspiSDLGL M:24 DEF libhdr.h[549] bld_RaspiSDLGL=24
bld_VmsVax M:41 DEF libhdr.h[558] bld_VmsVax=41
bld_Win32 M:42 DEF libhdr.h[559] bld_Win32=42
bld_linux M:1 DEF libhdr.h[538] bld_linux=1
bld_linuxGL M:4 DEF libhdr.h[541] bld_linuxGL=4
bld_linuxSDL M:2 DEF libhdr.h[539] bld_linuxSDL=2
bld_linuxSDL2 M:3 DEF libhdr.h[540] bld_linuxSDL2=3
bld_linuxSDL2GL M:6 DEF libhdr.h[543] bld_linuxSDL2GL=6
bld_linuxSDLGL M:5 DEF libhdr.h[542] bld_linuxSDLGL=5
bld_linuxiSH M:7 DEF libhdr.h[544] bld_linuxiSH=7
bld_unknown M:0 DEF libhdr.h[537] bld_unknown=0
bldf_ALSAavail M:8 DEF libhdr.h[567] bldf_ALSAavail=1<<3
bldf_GLavail M:32 DEF libhdr.h[569] bldf_GLavail=1<<5
bldf_SDLavail M:16 DEF libhdr.h[568] bldf_SDLavail=1<<4
bldf_callc M:2 DEF libhdr.h[565] bldf_callc=1<<1
bldf_joystick M:4 DEF libhdr.h[566] bldf_joystick=1<<2
bldf_sound M:1 DEF libhdr.h[564] bldf_sound=1
blitsurf G:527 DEF sdl.h[202] blitsurf=
blitsurf G:527 LG com/bucketflt.b[911]
    blitsurf(@bucketwallsurf,@screen,FIX bucket_lxl,FIX bucket_tyt)
blitsurf G:527 LG com/bucketflt.b[917]
    blitsurf(@bucketwallsurf,@screen,FIX bucket_rxl,FIX bucket_tyt)
blitsurf G:527 LG com/bucketflt.b[925]
    blitsurf(@bucketbasesurf,@screen,FIX bucket_lxc,FIX (bucket_byt#- 1.000))
blitsurf G:527 LG com/bucketflt.b[935]
    blitsurf(@batsurf,@screen,FIX (batx#-batradius),FIX (baty#+batradius))
blitsurf G:527 LG com/bucketflt.b[942]
    blitsurf(@ball1surf,@screen,FIX (cgx1#-ballradius),FIX (cgy1#+ballradius))
blitsurf G:527 LG com/bucketflt.b[954]
    blitsurf(@ball2surf,@screen,FIX (cgx2#-ballradius),FIX (cgy2#+ballradius))
blitsurf G:527 LG com/bucketflt.b[966]
    blitsurf(@ball3surf,@screen,FIX (cgx3#-ballradius),FIX (cgy3#+ballradius))
blitsurf G:527 RT sdl.b[330] LET blitsurf(srcptr,dstptr,x,y)BE..
blitsurfrect G:528 DEF sdl.h[203] blitsurfrect=
blitsurfrect G:528 RT sdl.b[341]
    LET blitsurfrect(srcptr,srcrect,dstptr,x,y)BE..
bootregs M:11 DEF libhdr.h[525] bootregs=11
bouncepos FF:58 FN com/bucketflt.b[768]
    LET FLT bouncepos(FLT x,FLT y,FLT xdot,FLT ydot)=..
bouncepos FF:58 LF com/bucketflt.b[635]
    bouncepos(selx,sely,selxdot,selydot)
bucket_byb FG:267 DEF com/bucketflt.b[112] FLT bucket_byb=
bucket_byb FG:267 LG com/bucketflt.b[1290]
    ylim_baseb#:=bucket_byb#-ballradius
bucket_byb FG:267 LG com/bucketflt.b[826] bucket_tyt#-bucket_byb#+ 2.000
bucket_byb FG:267 SG com/bucketflt.b[1278]
    bucket_byb#:=bucket_byt#-bucketthickness
bucket_byc FG:268 DEF com/bucketflt.b[112] FLT bucket_byc=
bucket_byc FG:268 LG com/bucketflt.b[347] IF y#>=bucket_byc DO ..
bucket_byc FG:268 LG com/bucketflt.b[378] IF y#<bucket_byc DO ..
bucket_byc FG:268 LG com/bucketflt.b[385]
    IF bucket_byc#<=y&y<=ylim_baset DO ..
bucket_byc FG:268 LG com/bucketflt.b[396] IF y#<bucket_byc DO ..
bucket_byc FG:268 LG com/bucketflt.b[397] bucket_byc
bucket_byc FG:268 LG com/bucketflt.b[602]
    UNLESS cgy1#>bucket_byc&bucket_lxc<cgx1&cgx1<bucket_rxc DO ..
bucket_byc FG:268 LG com/bucketflt.b[605]
    UNLESS cgy2#>bucket_byc&bucket_lxc<cgx2&cgx2<bucket_rxc DO ..
bucket_byc FG:268 LG com/bucketflt.b[608]
    UNLESS cgy3#>bucket_byc&bucket_lxc<cgx3&cgx3<bucket_rxc DO ..
bucket_byc FG:268 SG com/bucketflt.b[1277]
    bucket_byc#:=bucket_byt#-endradius
bucket_byt FG:269 DEF com/bucketflt.b[112] FLT bucket_byt=
bucket_byt FG:269 LG com/bucketflt.b[1018]
    cgy1#:=bucket_byt#+ballradius#+ 10.000
bucket_byt FG:269 LG com/bucketflt.b[1019]
    cgy2#:=bucket_byt#+ 3.000#*ballradius#+ 20.000
bucket_byt FG:269 LG com/bucketflt.b[1020]
    cgy3#:=bucket_byt#+ 5.000#*ballradius#+ 30.000
bucket_byt FG:269 LG com/bucketflt.b[1277]
    bucket_byc#:=bucket_byt#-endradius
bucket_byt FG:269 LG com/bucketflt.b[1278]
    bucket_byb#:=bucket_byt#-bucketthickness
bucket_byt FG:269 LG com/bucketflt.b[1291]
    ylim_baset#:=bucket_byt#+ballradius
bucket_byt FG:269 LG com/bucketflt.b[496]
    IF ...&...&...&...&bucket_lxc<cgx3&cgx3<bucket_rxc&ABS cgy1dot< 2.000&ABS cgy2dot< 2.000&ABS cgy3dot< 2.000 DO ..
bucket_byt FG:269 LG com/bucketflt.b[925]
    blitsurf(@bucketbasesurf,@screen,FIX bucket_lxc,FIX (bucket_byt#- 1.000))
bucket_byt FG:269 SG com/bucketflt.b[1276]
    bucket_byt#:=bucket_tyt#- 6.000#*ballradius
bucket_lxc FG:259 DEF com/bucketflt.b[109] FLT bucket_lxc=
bucket_lxc FG:259 LG com/bucketflt.b[1064]
    UNLESS ylim_baseb#<cgy1&...&...&ylim_baseb#<cgy2&bucket_lxc#<cgx2&cgx2#<bucket_rxc&ylim_baseb#<cgy3&bucket_lxc#<cgx3&cgx3<bucket_rxc DO ..
bucket_lxc FG:259 LG com/bucketflt.b[1064]
    UNLESS ylim_baseb#<cgy1&...&...&ylim_baseb#<cgy2&bucket_lxc#<cgx2&cgx2<bucket_rxc&ylim_baseb<cgy3&bucket_lxc<cgx3&cgx3<bucket_rxc DO ..
bucket_lxc FG:259 LG com/bucketflt.b[1064]
    UNLESS ylim_baseb#<cgy1&...&...&ylim_baseb<cgy2&bucket_lxc<cgx2&cgx2<bucket_rxc&ylim_baseb<cgy3&bucket_lxc<cgx3&cgx3<bucket_rxc DO ..
bucket_lxc FG:259 LG com/bucketflt.b[329] bucket_lxc
bucket_lxc FG:259 LG com/bucketflt.b[350] IF x#<=bucket_lxc DO ..
bucket_lxc FG:259 LG com/bucketflt.b[355]
    IF bucket_lxc#<x&x<=xlim_bucket_lr DO ..
bucket_lxc FG:259 LG com/bucketflt.b[376]
    IF bucket_lxc#<=x&x<=bucket_rxc DO ..
bucket_lxc FG:259 LG com/bucketflt.b[397] bucket_lxc
bucket_lxc FG:259 LG com/bucketflt.b[483]
    IF ylim_baseb#<cgy1&bucket_lxc#<cgx1&cgx1<bucket_rxc DO ..
bucket_lxc FG:259 LG com/bucketflt.b[484]
    IF ylim_baseb#<cgy2&bucket_lxc#<cgx2&cgx2<bucket_rxc DO ..
bucket_lxc FG:259 LG com/bucketflt.b[485]
    IF ylim_baseb#<cgy3&bucket_lxc#<cgx3&cgx3<bucket_rxc DO ..
bucket_lxc FG:259 LG com/bucketflt.b[496]
    IF ...&...&...&...&bucket_lxc#<cgx3&cgx3<bucket_rxc&ABS cgy1dot< 2.000&ABS cgy2dot< 2.000&ABS cgy3dot< 2.000 DO ..
bucket_lxc FG:259 LG com/bucketflt.b[496]
    IF ...&...&...&...&bucket_lxc<cgx3&cgx3<bucket_rxc&ABS cgy1dot< 2.000&ABS cgy2dot< 2.000&ABS cgy3dot< 2.000 DO ..
bucket_lxc FG:259 LG com/bucketflt.b[602]
    UNLESS cgy1#>bucket_byc&bucket_lxc#<cgx1&cgx1<bucket_rxc DO ..
bucket_lxc FG:259 LG com/bucketflt.b[605]
    UNLESS cgy2#>bucket_byc&bucket_lxc#<cgx2&cgx2<bucket_rxc DO ..
bucket_lxc FG:259 LG com/bucketflt.b[608]
    UNLESS cgy3#>bucket_byc&bucket_lxc#<cgx3&cgx3<bucket_rxc DO ..
bucket_lxc FG:259 LG com/bucketflt.b[848] bucket_rxc#-bucket_lxc#+ 1.000
bucket_lxc FG:259 LG com/bucketflt.b[925]
    blitsurf(@bucketbasesurf,@screen,FIX bucket_lxc,FIX (bucket_byt- 1.000))
bucket_lxc FG:259 SG com/bucketflt.b[1265]
    bucket_lxc#:=bucket_lxr#-endradius
bucket_lxl FG:258 DEF com/bucketflt.b[109] FLT bucket_lxl=
bucket_lxl FG:258 LG com/bucketflt.b[1284]
    xlim_bucket_ll#:=bucket_lxl#-ballradius
bucket_lxl FG:258 LG com/bucketflt.b[908]
    writef("calli'%n, %n)*n",FIX bucket_lxl,FIX bucket_tyt)
bucket_lxl FG:258 LG com/bucketflt.b[911]
    blitsurf(@bucketwallsurf,@screen,FIX bucket_lxl,FIX bucket_tyt)
bucket_lxl FG:258 SG com/bucketflt.b[1266]
    bucket_lxl#:=bucket_lxr#-bucketthickness
bucket_lxr FG:260 DEF com/bucketflt.b[109] FLT bucket_lxr=
bucket_lxr FG:260 LG com/bucketflt.b[1265]
    bucket_lxc#:=bucket_lxr#-endradius
bucket_lxr FG:260 LG com/bucketflt.b[1266]
    bucket_lxl#:=bucket_lxr#-bucketthickness
bucket_lxr FG:260 LG com/bucketflt.b[1285]
    xlim_bucket_lr#:=bucket_lxr#+ballradius
bucket_lxr FG:260 SG com/bucketflt.b[1264]
    bucket_lxr#:=screen_xc#-ballradius#* 2.500
bucket_rxc FG:262 DEF com/bucketflt.b[110] FLT bucket_rxc=
bucket_rxc FG:262 LG com/bucketflt.b[1064]
    UNLESS ylim_baseb#<cgy1&...&...&ylim_baseb#<cgy2&bucket_lxc#<cgx2&cgx2#<bucket_rxc&ylim_baseb#<cgy3&bucket_lxc#<cgx3&cgx3#<bucket_rxc DO ..
bucket_rxc FG:262 LG com/bucketflt.b[1064]
    UNLESS ylim_baseb#<cgy1&...&...&ylim_baseb#<cgy2&bucket_lxc#<cgx2&cgx2#<bucket_rxc&ylim_baseb<cgy3&bucket_lxc<cgx3&cgx3<bucket_rxc DO ..
bucket_rxc FG:262 LG com/bucketflt.b[1064]
    UNLESS ylim_baseb#<cgy1&...&...&ylim_baseb<cgy2&bucket_lxc<cgx2&cgx2<bucket_rxc&ylim_baseb<cgy3&bucket_lxc<cgx3&cgx3<bucket_rxc DO ..
bucket_rxc FG:262 LG com/bucketflt.b[336] x1#:=bucket_rxc
bucket_rxc FG:262 LG com/bucketflt.b[360]
    IF xlim_bucket_rl#<=x&x#<bucket_rxc DO ..
bucket_rxc FG:262 LG com/bucketflt.b[365] IF bucket_rxc#<x DO ..
bucket_rxc FG:262 LG com/bucketflt.b[376]
    IF bucket_lxc#<=x&x#<=bucket_rxc DO ..
bucket_rxc FG:262 LG com/bucketflt.b[404] x1#:=bucket_rxc
bucket_rxc FG:262 LG com/bucketflt.b[483]
    IF ylim_baseb#<cgy1&bucket_lxc#<cgx1&cgx1#<bucket_rxc DO ..
bucket_rxc FG:262 LG com/bucketflt.b[484]
    IF ylim_baseb#<cgy2&bucket_lxc#<cgx2&cgx2#<bucket_rxc DO ..
bucket_rxc FG:262 LG com/bucketflt.b[485]
    IF ylim_baseb#<cgy3&bucket_lxc#<cgx3&cgx3#<bucket_rxc DO ..
bucket_rxc FG:262 LG com/bucketflt.b[496]
    IF ...&...&...&...&bucket_lxc#<cgx3&cgx3#<bucket_rxc&ABS cgy1dot< 2.000&ABS cgy2dot< 2.000&ABS cgy3dot< 2.000 DO ..
bucket_rxc FG:262 LG com/bucketflt.b[496]
    IF ...&...&...&...&bucket_lxc<cgx3&cgx3<bucket_rxc&ABS cgy1dot< 2.000&ABS cgy2dot< 2.000&ABS cgy3dot< 2.000 DO ..
bucket_rxc FG:262 LG com/bucketflt.b[602]
    UNLESS cgy1#>bucket_byc&bucket_lxc#<cgx1&cgx1#<bucket_rxc DO ..
bucket_rxc FG:262 LG com/bucketflt.b[605]
    UNLESS cgy2#>bucket_byc&bucket_lxc#<cgx2&cgx2#<bucket_rxc DO ..
bucket_rxc FG:262 LG com/bucketflt.b[608]
    UNLESS cgy3#>bucket_byc&bucket_lxc#<cgx3&cgx3#<bucket_rxc DO ..
bucket_rxc FG:262 LG com/bucketflt.b[848] bucket_rxc#-bucket_lxc#+ 1.000
bucket_rxc FG:262 SG com/bucketflt.b[1269]
    bucket_rxc#:=bucket_rxl#+endradius
bucket_rxl FG:261 DEF com/bucketflt.b[110] FLT bucket_rxl=
bucket_rxl FG:261 LG com/bucketflt.b[1269]
    bucket_rxc#:=bucket_rxl#+endradius
bucket_rxl FG:261 LG com/bucketflt.b[1270]
    bucket_rxr#:=bucket_rxl#+bucketthickness
bucket_rxl FG:261 LG com/bucketflt.b[1286]
    xlim_bucket_rl#:=bucket_rxl#-ballradius
bucket_rxl FG:261 LG com/bucketflt.b[917]
    blitsurf(@bucketwallsurf,@screen,FIX bucket_rxl,FIX bucket_tyt)
bucket_rxl FG:261 SG com/bucketflt.b[1268]
    bucket_rxl#:=screen_xc#+ballradius#* 2.500
bucket_rxr FG:263 DEF com/bucketflt.b[110] FLT bucket_rxr=
bucket_rxr FG:263 LG com/bucketflt.b[1287]
    xlim_bucket_rr#:=bucket_rxr#+ballradius
bucket_rxr FG:263 SG com/bucketflt.b[1270]
    bucket_rxr#:=bucket_rxl#+bucketthickness
bucket_tyb FG:264 DEF com/bucketflt.b[111] FLT bucket_tyb=
bucket_tyb FG:264 LG com/bucketflt.b[496]
    IF ...&...&...&...&bucket_lxc<cgx3&cgx3<bucket_rxc&ABS cgy1dot< 2.000&ABS cgy2dot< 2.000&ABS cgy3dot< 2.000 DO ..
bucket_tyb FG:264 SG com/bucketflt.b[1274]
    bucket_tyb#:=bucket_tyt#-bucketthickness
bucket_tyc FG:265 DEF com/bucketflt.b[111] FLT bucket_tyc=
bucket_tyc FG:265 LG com/bucketflt.b[328] IF y#>bucket_tyc DO ..
bucket_tyc FG:265 LG com/bucketflt.b[329] bucket_tyc
bucket_tyc FG:265 SG com/bucketflt.b[1273]
    bucket_tyc#:=bucket_tyt#-endradius
bucket_tyt FG:266 DEF com/bucketflt.b[111] FLT bucket_tyt=
bucket_tyt FG:266 LG com/bucketflt.b[1273]
    bucket_tyc#:=bucket_tyt#-endradius
bucket_tyt FG:266 LG com/bucketflt.b[1274]
    bucket_tyb#:=bucket_tyt#-bucketthickness
bucket_tyt FG:266 LG com/bucketflt.b[1276]
    bucket_byt#:=bucket_tyt#- 6.000*ballradius
bucket_tyt FG:266 LG com/bucketflt.b[1289]
    ylim_topt#:=bucket_tyt#+ballradius
bucket_tyt FG:266 LG com/bucketflt.b[826] bucket_tyt#-bucket_byb#+ 2.000
bucket_tyt FG:266 LG com/bucketflt.b[908]
    writef("calli'%n, %n)*n",FIX bucket_lxl,FIX bucket_tyt)
bucket_tyt FG:266 LG com/bucketflt.b[911]
    blitsurf(@bucketwallsurf,@screen,FIX bucket_lxl,FIX bucket_tyt)
bucket_tyt FG:266 LG com/bucketflt.b[917]
    blitsurf(@bucketwallsurf,@screen,FIX bucket_rxl,FIX bucket_tyt)
bucket_tyt FG:266 SG com/bucketflt.b[1272]
    bucket_tyt#:=ceiling_yb#- 6.000#*ballradius
bucketbasesurf G:235 DEF com/bucketflt.b[78] bucketbasesurf=
bucketbasesurf G:235 LLG com/bucketflt.b[1364]
    freesurface(@bucketbasesurf)
bucketbasesurf G:235 LLG com/bucketflt.b[895]
    bucketbasesurfok:=initbucketbasesurf(@bucketbasesurf)
bucketbasesurf G:235 LLG com/bucketflt.b[925]
    blitsurf(@bucketbasesurf,@screen,FIX bucket_lxc,FIX (bucket_byt- 1.000))
bucketbasesurfok G:236 DEF com/bucketflt.b[79] bucketbasesurfok=
bucketbasesurfok G:236 LG com/bucketflt.b[1364]
    IF bucketbasesurfok DO ..
bucketbasesurfok G:236 LG com/bucketflt.b[894]
    UNLESS bucketbasesurfok DO ..
bucketbasesurfok G:236 LG com/bucketflt.b[921] IF bucketbasesurfok DO ..
bucketbasesurfok G:236 SG com/bucketflt.b[1163] bucketbasesurfok:=FALSE
bucketbasesurfok G:236 SG com/bucketflt.b[895]
    bucketbasesurfok:=initbucketbasesurf(@bucketbasesurf)
bucketcolour G:246 DEF com/bucketflt.b[94] bucketcolour=
bucketcolour G:246 LG com/bucketflt.b[835] setcolour(bucketcolour)
bucketcolour G:246 LG com/bucketflt.b[840] setcolour(bucketcolour)
bucketcolour G:246 LG com/bucketflt.b[853] setcolour(bucketcolour)
bucketcolour G:246 SG com/bucketflt.b[1212]
    bucketcolour:=maprgb(170,60,30)
bucketendcolour G:247 DEF com/bucketflt.b[95] bucketendcolour=
bucketendcolour G:247 LG com/bucketflt.b[834] setcolour(bucketendcolour)
bucketendcolour G:247 SG com/bucketflt.b[1213]
    bucketendcolour:=maprgb(140,30,30)
bucketthickness FG:216 DEF com/bucketflt.b[41] FLT bucketthickness=
bucketthickness FG:216 LG com/bucketflt.b[1266]
    bucket_lxl#:=bucket_lxr#-bucketthickness
bucketthickness FG:216 LG com/bucketflt.b[1270]
    bucket_rxr#:=bucket_rxl#+bucketthickness
bucketthickness FG:216 LG com/bucketflt.b[1274]
    bucket_tyb#:=bucket_tyt#-bucketthickness
bucketthickness FG:216 LG com/bucketflt.b[1278]
    bucket_byb#:=bucket_byt#-bucketthickness
bucketthickness FG:216 SG com/bucketflt.b[1148]
    bucketthickness#:= 2.000#*endradius
bucketwallsurf G:233 DEF com/bucketflt.b[75] bucketwallsurf=
bucketwallsurf G:233 LLG com/bucketflt.b[1050]
    freesurface(@bucketwallsurf)
bucketwallsurf G:233 LLG com/bucketflt.b[1363]
    freesurface(@bucketwallsurf)
bucketwallsurf G:233 LLG com/bucketflt.b[893]
    bucketwallsurfok:=initbucketwallsurf(@bucketwallsurf)
bucketwallsurf G:233 LLG com/bucketflt.b[911]
    blitsurf(@bucketwallsurf,@screen,FIX bucket_lxl,FIX bucket_tyt)
bucketwallsurf G:233 LLG com/bucketflt.b[917]
    blitsurf(@bucketwallsurf,@screen,FIX bucket_rxl,FIX bucket_tyt)
bucketwallsurfok G:234 DEF com/bucketflt.b[76] bucketwallsurfok=
bucketwallsurfok G:234 LG com/bucketflt.b[1049]
    IF bucketwallsurfok DO ..
bucketwallsurfok G:234 LG com/bucketflt.b[1363]
    IF bucketwallsurfok DO ..
bucketwallsurfok G:234 LG com/bucketflt.b[892]
    UNLESS bucketwallsurfok DO ..
bucketwallsurfok G:234 LG com/bucketflt.b[907] IF bucketwallsurfok DO ..
bucketwallsurfok G:234 LG com/bucketflt.b[916] IF bucketwallsurfok DO ..
bucketwallsurfok G:234 SG com/bucketflt.b[1051] bucketwallsurfok:=FALSE
bucketwallsurfok G:234 SG com/bucketflt.b[1162] bucketwallsurfok:=FALSE
bucketwallsurfok G:234 SG com/bucketflt.b[893]
    bucketwallsurfok:=initbucketwallsurf(@bucketwallsurf)
bytesperword M:4 DEF libhdr.h[253] bytesperword=1<<B2Wsh
bytesperword M:4 MAN libhdr.h[255] bitsperword=bitsperbyte*bytesperword
bytesperword M:4 MAN libhdr.h[256] mcaddrinc=bytesperword
bytesperword M:4 MAN libhdr.h[615]
    scb_nameeend=scb_name+scb_maxnamelen/bytesperword
bytesperword M:4 MAN libhdr.h[735]
    tcb_upb=tcb_namebase+15/bytesperword+1
bytesperword M:4 MAN sdl.b[147] LET mes=VEC 256/bytesperword
bytesperword M:4 MAN sdl.b[215] LET mes=VEC 256/bytesperword
bytesperword M:4 MAN sdl.b[3612] LET s=VEC 256/bytesperword
callco G:19 DEF libhdr.h[58] callco=19
callseg G:107 DEF libhdr.h[147] callseg=107
capitalch G:96 DEF libhdr.h[136] capitalch=96
capitalch G:96 LG com/bucketflt.b[1038]
    SWITCHON capitalch(eventa2) INTO..
capitalch G:96 LG com/bucketflt.b[1115]
    SWITCHON capitalch(eventa2) INTO..
cbounce F:11 LF com/bucketflt.b[332] cbounce(@x1,p, 1.000, 0.000)
cbounce F:11 LF com/bucketflt.b[339] cbounce(@x1,p, 1.000, 0.000)
cbounce F:11 LF com/bucketflt.b[400] cbounce(@x1,p, 1.000, 0.000)
cbounce F:11 LF com/bucketflt.b[407] cbounce(@x1,p, 1.900, 0.000)
cbounce F:11 LF com/bucketflt.b[419] cbounce(@batx,p, 5.000, 1.000)
cbounce F:11 LF com/bucketflt.b[532] cbounce(@cgx1,@cgx2, 1.000, 1.000)
cbounce F:11 LF com/bucketflt.b[540] cbounce(@cgx1,@cgx3, 1.000, 1.000)
cbounce F:11 LF com/bucketflt.b[548] cbounce(@cgx2,@cgx3, 1.000, 1.000)
cbounce F:11 RT com/bucketflt.b[162]
    LET cbounce(p1,p2,FLT m1,FLT m2)BE..
ceiling_yb FG:255 DEF com/bucketflt.b[104] FLT ceiling_yb=
ceiling_yb FG:255 LG com/bucketflt.b[1272]
    bucket_tyt#:=ceiling_yb#- 6.000*ballradius
ceiling_yb FG:255 LG com/bucketflt.b[1283]
    ylim_ceiling#:=ceiling_yb#-ballradius
ceiling_yb FG:255 SG com/bucketflt.b[1260]
    ceiling_yb#:=FLOAT (screenysize-1)
cgx1 FG:284 DEF com/bucketflt.b[124] FLT cgx1=
cgx1 FG:284 LG com/bucketflt.b[1004]
    drawf(30,220,"Ball1't=%10.5f",cgx1,cgy1,cgx1dot,cgy1dot)
cgx1 FG:284 LG com/bucketflt.b[1064]
    UNLESS ylim_baseb#<cgy1&...&...&ylim_baseb<cgy2&bucket_lxc<cgx2&cgx2<bucket_rxc&ylim_baseb<cgy3&bucket_lxc<cgx3&cgx3<bucket_rxc DO ..
cgx1 FG:284 LG com/bucketflt.b[1087]
    writef("cgx1='t=%8.5f*n",cgx1,cgx1dot)
cgx1 FG:284 LG com/bucketflt.b[1089]
    writef("cgx3='t=%8.5f*n",cgx1,cgx3dot)
cgx1 FG:284 LG com/bucketflt.b[457]
    writef("cgx1='t=%9.5f*n",cgx1,cgy1,cgx1dot,cgy1dot)
cgx1 FG:284 LG com/bucketflt.b[483]
    IF ylim_baseb#<cgy1&bucket_lxc#<cgx1&cgx1#<bucket_rxc DO ..
cgx1 FG:284 LG com/bucketflt.b[483]
    IF ylim_baseb#<cgy1&bucket_lxc#<cgx1&cgx1<bucket_rxc DO ..
cgx1 FG:284 LG com/bucketflt.b[496]
    IF ...&...&...&...&bucket_lxc<cgx3&cgx3<bucket_rxc&ABS cgy1dot< 2.000&ABS cgy2dot< 2.000&ABS cgy3dot< 2.000 DO ..
cgx1 FG:284 LG com/bucketflt.b[559] cgx1#:=cgx1#+cgx1dot#/sps
cgx1 FG:284 LG com/bucketflt.b[602]
    UNLESS cgy1#>bucket_byc&bucket_lxc#<cgx1&cgx1#<bucket_rxc DO ..
cgx1 FG:284 LG com/bucketflt.b[602]
    UNLESS cgy1#>bucket_byc&bucket_lxc#<cgx1&cgx1<bucket_rxc DO ..
cgx1 FG:284 LG com/bucketflt.b[629] selx#:=cgx1
cgx1 FG:284 LG com/bucketflt.b[942]
    blitsurf(@ball1surf,@screen,FIX (cgx1#-ballradius),FIX (cgy1+ballradius))
cgx1 FG:284 LG com/bucketflt.b[947]
    drawfillrect(FIX cgx1-5,FIX cgy1-5,FIX cgx1+5,FIX cgy1+5)
cgx1 FG:284 LLG com/bucketflt.b[522] ballbounces(@cgx1)
cgx1 FG:284 LLG com/bucketflt.b[528]
    IF incontact(@cgx1,@cgx2,ballradius+ballradius) DO ..
cgx1 FG:284 LLG com/bucketflt.b[532] cbounce(@cgx1,@cgx2, 1.000, 1.000)
cgx1 FG:284 LLG com/bucketflt.b[536]
    IF incontact(@cgx1,@cgx3,ballradius+ballradius) DO ..
cgx1 FG:284 LLG com/bucketflt.b[540] cbounce(@cgx1,@cgx3, 1.000, 1.000)
cgx1 FG:284 SG com/bucketflt.b[1021] cgx1#:=screen_xc
cgx1 FG:284 SG com/bucketflt.b[559] cgx1#:=cgx1#+cgx1dot#/sps
cgx1dot FG:286 DEF com/bucketflt.b[124] FLT cgx1dot=
cgx1dot FG:286 LG com/bucketflt.b[1004]
    drawf(30,220,"Ball1't=%10.5f",cgx1,cgy1,cgx1dot,cgy1dot)
cgx1dot FG:286 LG com/bucketflt.b[1087]
    writef("cgx1='t=%8.5f*n",cgx1,cgx1dot)
cgx1dot FG:286 LG com/bucketflt.b[457]
    writef("cgx1='t=%9.5f*n",cgx1,cgy1,cgx1dot,cgy1dot)
cgx1dot FG:286 LG com/bucketflt.b[552] cgx1dot#:=cgx1dot#+ax1#/sps
cgx1dot FG:286 LG com/bucketflt.b[559] cgx1#:=cgx1#+cgx1dot#/sps
cgx1dot FG:286 LG com/bucketflt.b[629] selxdot#:=cgx1dot
cgx1dot FG:286 SG com/bucketflt.b[1024] cgx1dot#:= 0.000
cgx1dot FG:286 SG com/bucketflt.b[552] cgx1dot#:=cgx1dot#+ax1#/sps
cgx2 FG:290 DEF com/bucketflt.b[125] FLT cgx2=
cgx2 FG:290 LG com/bucketflt.b[1006]
    drawf(30,205,"Ball2't=%10.5f",cgx2,cgy2,cgx2dot,cgy2dot)
cgx2 FG:290 LG com/bucketflt.b[1064]
    UNLESS ylim_baseb#<cgy1&...&...&ylim_baseb#<cgy2&bucket_lxc#<cgx2&cgx2#<bucket_rxc&ylim_baseb<cgy3&bucket_lxc<cgx3&cgx3<bucket_rxc DO ..
cgx2 FG:290 LG com/bucketflt.b[1064]
    UNLESS ylim_baseb#<cgy1&...&...&ylim_baseb#<cgy2&bucket_lxc#<cgx2&cgx2<bucket_rxc&ylim_baseb<cgy3&bucket_lxc<cgx3&cgx3<bucket_rxc DO ..
cgx2 FG:290 LG com/bucketflt.b[1088]
    writef("cgx2='t=%8.5f*n",cgx2,cgx2dot)
cgx2 FG:290 LG com/bucketflt.b[459]
    writef("cgx2='t=%9.5f*n",cgx2,cgy2,cgx2dot,cgy2dot)
cgx2 FG:290 LG com/bucketflt.b[484]
    IF ylim_baseb#<cgy2&bucket_lxc#<cgx2&cgx2#<bucket_rxc DO ..
cgx2 FG:290 LG com/bucketflt.b[484]
    IF ylim_baseb#<cgy2&bucket_lxc#<cgx2&cgx2<bucket_rxc DO ..
cgx2 FG:290 LG com/bucketflt.b[496]
    IF ...&...&...&...&bucket_lxc<cgx3&cgx3<bucket_rxc&ABS cgy1dot< 2.000&ABS cgy2dot< 2.000&ABS cgy3dot< 2.000 DO ..
cgx2 FG:290 LG com/bucketflt.b[560] cgx2#:=cgx2#+cgx2dot#/sps
cgx2 FG:290 LG com/bucketflt.b[605]
    UNLESS cgy2#>bucket_byc&bucket_lxc#<cgx2&cgx2#<bucket_rxc DO ..
cgx2 FG:290 LG com/bucketflt.b[605]
    UNLESS cgy2#>bucket_byc&bucket_lxc#<cgx2&cgx2<bucket_rxc DO ..
cgx2 FG:290 LG com/bucketflt.b[631] selx#:=cgx2
cgx2 FG:290 LG com/bucketflt.b[954]
    blitsurf(@ball2surf,@screen,FIX (cgx2#-ballradius),FIX (cgy2+ballradius))
cgx2 FG:290 LG com/bucketflt.b[959]
    drawfillrect(FIX cgx2-5,FIX cgy2-5,FIX cgx2+5,FIX cgy2+5)
cgx2 FG:290 LLG com/bucketflt.b[523] ballbounces(@cgx2)
cgx2 FG:290 LLG com/bucketflt.b[528]
    IF incontact(@cgx1,@cgx2,ballradius+ballradius) DO ..
cgx2 FG:290 LLG com/bucketflt.b[532] cbounce(@cgx1,@cgx2, 1.000, 1.000)
cgx2 FG:290 LLG com/bucketflt.b[544]
    IF incontact(@cgx2,@cgx3,ballradius+ballradius) DO ..
cgx2 FG:290 LLG com/bucketflt.b[548] cbounce(@cgx2,@cgx3, 1.000, 1.000)
cgx2 FG:290 SG com/bucketflt.b[1022] cgx2#:=screen_xc
cgx2 FG:290 SG com/bucketflt.b[560] cgx2#:=cgx2#+cgx2dot#/sps
cgx2dot FG:292 DEF com/bucketflt.b[125] FLT cgx2dot=
cgx2dot FG:292 LG com/bucketflt.b[1006]
    drawf(30,205,"Ball2't=%10.5f",cgx2,cgy2,cgx2dot,cgy2dot)
cgx2dot FG:292 LG com/bucketflt.b[1088]
    writef("cgx2='t=%8.5f*n",cgx2,cgx2dot)
cgx2dot FG:292 LG com/bucketflt.b[459]
    writef("cgx2='t=%9.5f*n",cgx2,cgy2,cgx2dot,cgy2dot)
cgx2dot FG:292 LG com/bucketflt.b[554] cgx2dot#:=cgx2dot#+ax2#/sps
cgx2dot FG:292 LG com/bucketflt.b[560] cgx2#:=cgx2#+cgx2dot#/sps
cgx2dot FG:292 LG com/bucketflt.b[631] selxdot#:=cgx2dot
cgx2dot FG:292 SG com/bucketflt.b[1024] cgx2dot#:= 0.000
cgx2dot FG:292 SG com/bucketflt.b[554] cgx2dot#:=cgx2dot#+ax2#/sps
cgx3 FG:296 DEF com/bucketflt.b[126] FLT cgx3=
cgx3 FG:296 LG com/bucketflt.b[1008]
    drawf(30,190,"Ball3't=%10.5f",cgx3,cgy3,cgx3dot,cgy3dot)
cgx3 FG:296 LG com/bucketflt.b[1064]
    UNLESS ylim_baseb#<cgy1&...&...&ylim_baseb#<cgy2&bucket_lxc#<cgx2&cgx2#<bucket_rxc&ylim_baseb#<cgy3&bucket_lxc#<cgx3&cgx3#<bucket_rxc DO ..
cgx3 FG:296 LG com/bucketflt.b[1064]
    UNLESS ylim_baseb#<cgy1&...&...&ylim_baseb#<cgy2&bucket_lxc#<cgx2&cgx2#<bucket_rxc&ylim_baseb#<cgy3&bucket_lxc#<cgx3&cgx3<bucket_rxc DO ..
cgx3 FG:296 LG com/bucketflt.b[461]
    writef("cgx3='t=%9.5f*n",cgx3,cgy3,cgx3dot,cgy3dot)
cgx3 FG:296 LG com/bucketflt.b[485]
    IF ylim_baseb#<cgy3&bucket_lxc#<cgx3&cgx3#<bucket_rxc DO ..
cgx3 FG:296 LG com/bucketflt.b[485]
    IF ylim_baseb#<cgy3&bucket_lxc#<cgx3&cgx3<bucket_rxc DO ..
cgx3 FG:296 LG com/bucketflt.b[496]
    IF ...&...&...&...&bucket_lxc#<cgx3&cgx3#<bucket_rxc&ABS cgy1dot< 2.000&ABS cgy2dot< 2.000&ABS cgy3dot< 2.000 DO ..
cgx3 FG:296 LG com/bucketflt.b[496]
    IF ...&...&...&...&bucket_lxc#<cgx3&cgx3<bucket_rxc&ABS cgy1dot< 2.000&ABS cgy2dot< 2.000&ABS cgy3dot< 2.000 DO ..
cgx3 FG:296 LG com/bucketflt.b[561] cgx3#:=cgx3#+cgx3dot#/sps
cgx3 FG:296 LG com/bucketflt.b[608]
    UNLESS cgy3#>bucket_byc&bucket_lxc#<cgx3&cgx3#<bucket_rxc DO ..
cgx3 FG:296 LG com/bucketflt.b[608]
    UNLESS cgy3#>bucket_byc&bucket_lxc#<cgx3&cgx3<bucket_rxc DO ..
cgx3 FG:296 LG com/bucketflt.b[633] selx#:=cgx3
cgx3 FG:296 LG com/bucketflt.b[966]
    blitsurf(@ball3surf,@screen,FIX (cgx3#-ballradius),FIX (cgy3+ballradius))
cgx3 FG:296 LG com/bucketflt.b[971]
    drawfillrect(FIX cgx3-5,FIX cgy3-5,FIX cgx3+5,FIX cgy3+5)
cgx3 FG:296 LLG com/bucketflt.b[524] ballbounces(@cgx3)
cgx3 FG:296 LLG com/bucketflt.b[536]
    IF incontact(@cgx1,@cgx3,ballradius+ballradius) DO ..
cgx3 FG:296 LLG com/bucketflt.b[540] cbounce(@cgx1,@cgx3, 1.000, 1.000)
cgx3 FG:296 LLG com/bucketflt.b[544]
    IF incontact(@cgx2,@cgx3,ballradius+ballradius) DO ..
cgx3 FG:296 LLG com/bucketflt.b[548] cbounce(@cgx2,@cgx3, 1.000, 1.000)
cgx3 FG:296 SG com/bucketflt.b[1023] cgx3#:=screen_xc
cgx3 FG:296 SG com/bucketflt.b[561] cgx3#:=cgx3#+cgx3dot#/sps
cgx3dot FG:298 DEF com/bucketflt.b[126] FLT cgx3dot=
cgx3dot FG:298 LG com/bucketflt.b[1008]
    drawf(30,190,"Ball3't=%10.5f",cgx3,cgy3,cgx3dot,cgy3dot)
cgx3dot FG:298 LG com/bucketflt.b[1089]
    writef("cgx3='t=%8.5f*n",cgx1,cgx3dot)
cgx3dot FG:298 LG com/bucketflt.b[461]
    writef("cgx3='t=%9.5f*n",cgx3,cgy3,cgx3dot,cgy3dot)
cgx3dot FG:298 LG com/bucketflt.b[556] cgx3dot#:=cgx3dot#+ax3#/sps
cgx3dot FG:298 LG com/bucketflt.b[561] cgx3#:=cgx3#+cgx3dot#/sps
cgx3dot FG:298 LG com/bucketflt.b[633] selxdot#:=cgx3dot
cgx3dot FG:298 SG com/bucketflt.b[1024] cgx3dot#:= 0.000
cgx3dot FG:298 SG com/bucketflt.b[556] cgx3dot#:=cgx3dot#+ax3#/sps
cgy1 G:285 DEF com/bucketflt.b[124] cgy1=
cgy1 G:285 LG com/bucketflt.b[1004]
    drawf(30,220,"Ball1't=%10.5f",cgx1,cgy1,cgx1dot,cgy1dot)
cgy1 G:285 LG com/bucketflt.b[1064]
    UNLESS ylim_baseb#<cgy1&...&...&ylim_baseb<cgy2&bucket_lxc<cgx2&cgx2<bucket_rxc&ylim_baseb<cgy3&bucket_lxc<cgx3&cgx3<bucket_rxc DO ..
cgy1 G:285 LG com/bucketflt.b[457]
    writef("cgx1='t=%9.5f*n",cgx1,cgy1,cgx1dot,cgy1dot)
cgy1 G:285 LG com/bucketflt.b[483]
    IF ylim_baseb#<cgy1&bucket_lxc<cgx1&cgx1<bucket_rxc DO ..
cgy1 G:285 LG com/bucketflt.b[496]
    IF ...&...&...&...&bucket_lxc<cgx3&cgx3<bucket_rxc&ABS cgy1dot< 2.000&ABS cgy2dot< 2.000&ABS cgy3dot< 2.000 DO ..
cgy1 G:285 LG com/bucketflt.b[559] cgy1#:=cgy1#+cgy1dot#/sps
cgy1 G:285 LG com/bucketflt.b[602] IF cgy1#>sely DO ..
cgy1 G:285 LG com/bucketflt.b[602]
    UNLESS cgy1#>bucket_byc&bucket_lxc<cgx1&cgx1<bucket_rxc DO ..
cgy1 G:285 LG com/bucketflt.b[604] sely#:=cgy1
cgy1 G:285 LG com/bucketflt.b[629] sely#:=cgy1
cgy1 G:285 LG com/bucketflt.b[942]
    blitsurf(@ball1surf,@screen,FIX (cgx1#-ballradius),FIX (cgy1#+ballradius))
cgy1 G:285 LG com/bucketflt.b[947]
    drawfillrect(FIX cgx1-5,FIX cgy1-5,FIX cgx1+5,FIX cgy1+5)
cgy1 G:285 SG com/bucketflt.b[1018]
    cgy1#:=bucket_byt#+ballradius#+ 10.000
cgy1 G:285 SG com/bucketflt.b[559] cgy1#:=cgy1#+cgy1dot#/sps
cgy1dot FG:287 DEF com/bucketflt.b[124] FLT cgy1dot=
cgy1dot FG:287 LG com/bucketflt.b[1004]
    drawf(30,220,"Ball1't=%10.5f",cgx1,cgy1,cgx1dot,cgy1dot)
cgy1dot FG:287 LG com/bucketflt.b[457]
    writef("cgx1='t=%9.5f*n",cgx1,cgy1,cgx1dot,cgy1dot)
cgy1dot FG:287 LG com/bucketflt.b[496]
    IF ...&...&...&...&bucket_lxc#<cgx3&cgx3#<bucket_rxc&#ABS cgy1dot#< 2.000&ABS cgy2dot< 2.000&ABS cgy3dot< 2.000 DO ..
cgy1dot FG:287 LG com/bucketflt.b[553] cgy1dot#:=cgy1dot#+ay1#/sps
cgy1dot FG:287 LG com/bucketflt.b[559] cgy1#:=cgy1#+cgy1dot#/sps
cgy1dot FG:287 LG com/bucketflt.b[629] selydot#:=cgy1dot
cgy1dot FG:287 SG com/bucketflt.b[1025] cgy1dot#:= 0.000
cgy1dot FG:287 SG com/bucketflt.b[553] cgy1dot#:=cgy1dot#+ay1#/sps
cgy2 G:291 DEF com/bucketflt.b[125] cgy2=
cgy2 G:291 LG com/bucketflt.b[1006]
    drawf(30,205,"Ball2't=%10.5f",cgx2,cgy2,cgx2dot,cgy2dot)
cgy2 G:291 LG com/bucketflt.b[1064]
    UNLESS ylim_baseb#<cgy1&...&...&ylim_baseb#<cgy2&bucket_lxc<cgx2&cgx2<bucket_rxc&ylim_baseb<cgy3&bucket_lxc<cgx3&cgx3<bucket_rxc DO ..
cgy2 G:291 LG com/bucketflt.b[459]
    writef("cgx2='t=%9.5f*n",cgx2,cgy2,cgx2dot,cgy2dot)
cgy2 G:291 LG com/bucketflt.b[484]
    IF ylim_baseb#<cgy2&bucket_lxc<cgx2&cgx2<bucket_rxc DO ..
cgy2 G:291 LG com/bucketflt.b[496]
    IF ...&...&...&...&bucket_lxc<cgx3&cgx3<bucket_rxc&ABS cgy1dot< 2.000&ABS cgy2dot< 2.000&ABS cgy3dot< 2.000 DO ..
cgy2 G:291 LG com/bucketflt.b[560] cgy2#:=cgy2#+cgy2dot#/sps
cgy2 G:291 LG com/bucketflt.b[605] IF cgy2#>sely DO ..
cgy2 G:291 LG com/bucketflt.b[605]
    UNLESS cgy2#>bucket_byc&bucket_lxc<cgx2&cgx2<bucket_rxc DO ..
cgy2 G:291 LG com/bucketflt.b[607] sely#:=cgy2
cgy2 G:291 LG com/bucketflt.b[631] sely#:=cgy2
cgy2 G:291 LG com/bucketflt.b[954]
    blitsurf(@ball2surf,@screen,FIX (cgx2#-ballradius),FIX (cgy2#+ballradius))
cgy2 G:291 LG com/bucketflt.b[959]
    drawfillrect(FIX cgx2-5,FIX cgy2-5,FIX cgx2+5,FIX cgy2+5)
cgy2 G:291 SG com/bucketflt.b[1019]
    cgy2#:=bucket_byt#+ 3.000#*ballradius#+ 20.000
cgy2 G:291 SG com/bucketflt.b[560] cgy2#:=cgy2#+cgy2dot#/sps
cgy2dot FG:293 DEF com/bucketflt.b[125] FLT cgy2dot=
cgy2dot FG:293 LG com/bucketflt.b[1006]
    drawf(30,205,"Ball2't=%10.5f",cgx2,cgy2,cgx2dot,cgy2dot)
cgy2dot FG:293 LG com/bucketflt.b[459]
    writef("cgx2='t=%9.5f*n",cgx2,cgy2,cgx2dot,cgy2dot)
cgy2dot FG:293 LG com/bucketflt.b[496]
    IF ...&...&...&...&bucket_lxc#<cgx3&cgx3#<bucket_rxc&#ABS cgy1dot#< 2.000&#ABS cgy2dot#< 2.000&ABS cgy3dot< 2.000 DO ..
cgy2dot FG:293 LG com/bucketflt.b[555] cgy2dot#:=cgy2dot#+ay2#/sps
cgy2dot FG:293 LG com/bucketflt.b[560] cgy2#:=cgy2#+cgy2dot#/sps
cgy2dot FG:293 LG com/bucketflt.b[631] selydot#:=cgy2dot
cgy2dot FG:293 SG com/bucketflt.b[1025] cgy2dot#:= 0.000
cgy2dot FG:293 SG com/bucketflt.b[555] cgy2dot#:=cgy2dot#+ay2#/sps
cgy3 G:297 DEF com/bucketflt.b[126] cgy3=
cgy3 G:297 LG com/bucketflt.b[1008]
    drawf(30,190,"Ball3't=%10.5f",cgx3,cgy3,cgx3dot,cgy3dot)
cgy3 G:297 LG com/bucketflt.b[1064]
    UNLESS ylim_baseb#<cgy1&...&...&ylim_baseb#<cgy2&bucket_lxc#<cgx2&cgx2#<bucket_rxc&ylim_baseb#<cgy3&bucket_lxc<cgx3&cgx3<bucket_rxc DO ..
cgy3 G:297 LG com/bucketflt.b[461]
    writef("cgx3='t=%9.5f*n",cgx3,cgy3,cgx3dot,cgy3dot)
cgy3 G:297 LG com/bucketflt.b[485]
    IF ylim_baseb#<cgy3&bucket_lxc<cgx3&cgx3<bucket_rxc DO ..
cgy3 G:297 LG com/bucketflt.b[496]
    IF ...&...&...&...&bucket_lxc<cgx3&cgx3<bucket_rxc&ABS cgy1dot< 2.000&ABS cgy2dot< 2.000&ABS cgy3dot< 2.000 DO ..
cgy3 G:297 LG com/bucketflt.b[561] cgy3#:=cgy3#+cgy3dot#/sps
cgy3 G:297 LG com/bucketflt.b[608] IF cgy3#>sely DO ..
cgy3 G:297 LG com/bucketflt.b[608]
    UNLESS cgy3#>bucket_byc&bucket_lxc<cgx3&cgx3<bucket_rxc DO ..
cgy3 G:297 LG com/bucketflt.b[610] sely#:=cgy3
cgy3 G:297 LG com/bucketflt.b[633] sely#:=cgy3
cgy3 G:297 LG com/bucketflt.b[966]
    blitsurf(@ball3surf,@screen,FIX (cgx3#-ballradius),FIX (cgy3#+ballradius))
cgy3 G:297 LG com/bucketflt.b[971]
    drawfillrect(FIX cgx3-5,FIX cgy3-5,FIX cgx3+5,FIX cgy3+5)
cgy3 G:297 SG com/bucketflt.b[1020]
    cgy3#:=bucket_byt#+ 5.000#*ballradius#+ 30.000
cgy3 G:297 SG com/bucketflt.b[561] cgy3#:=cgy3#+cgy3dot#/sps
cgy3dot FG:299 DEF com/bucketflt.b[126] FLT cgy3dot=
cgy3dot FG:299 LG com/bucketflt.b[1008]
    drawf(30,190,"Ball3't=%10.5f",cgx3,cgy3,cgx3dot,cgy3dot)
cgy3dot FG:299 LG com/bucketflt.b[461]
    writef("cgx3='t=%9.5f*n",cgx3,cgy3,cgx3dot,cgy3dot)
cgy3dot FG:299 LG com/bucketflt.b[496]
    IF ...&...&...&...&bucket_lxc#<cgx3&cgx3#<bucket_rxc&#ABS cgy1dot#< 2.000&#ABS cgy2dot#< 2.000&#ABS cgy3dot#< 2.000 DO ..
cgy3dot FG:299 LG com/bucketflt.b[557] cgy3dot#:=cgy3dot#+ay3#/sps
cgy3dot FG:299 LG com/bucketflt.b[561] cgy3#:=cgy3#+cgy3dot#/sps
cgy3dot FG:299 LG com/bucketflt.b[633] selydot#:=cgy3dot
cgy3dot FG:299 SG com/bucketflt.b[1025] cgy3dot#:= 0.000
cgy3dot FG:299 SG com/bucketflt.b[557] cgy3dot#:=cgy3dot#+ay3#/sps
changeco G:6 DEF libhdr.h[44] changeco=6
changepri G:155 DEF libhdr.h[209] changepri=155
charHsep G:518 DEF sdl.h[182] charHsep=
charHsep G:518 LG sdl.b[419] currx:=currx+fontW+charHsep
charHsep G:518 SG sdl.b[403] charHsep:=3
charHsep G:518 SG sdl.b[408] charHsep:=2
charLmargin G:520 DEF sdl.h[184] charLmargin=
charLmargin G:520 LG sdl.b[414] currx:=charLmargin
charLmargin G:520 SG sdl.b[404] charLmargin:=10
charLmargin G:520 SG sdl.b[409] charLmargin:=10
charVsep G:519 DEF sdl.h[183] charVsep=
charVsep G:519 LG sdl.b[415] curry:=curry-fontH-charVsep
charVsep G:519 SG sdl.b[403] charVsep:=4
charVsep G:519 SG sdl.b[408] charVsep:=3
chklimits F:78 RT sdl.b[4425] LET chklimits()BE..
chooseaccel FF:57 FN com/bucketflt.b[701]
    LET FLT chooseaccel(tx,txdot,bx,bxdot,speed,t)=..
chooseaccel FF:57 LF com/bucketflt.b[665]
    batxdotdot#:=chooseaccel(tx,selxdot,batx,...)
cis G:12 DEF libhdr.h[51] cis=12
clear_words G:115 DEF libhdr.h[155] clear_words=115
cli_commanddir G:136 DEF libhdr.h[179] cli_commanddir=136
cli_commandfile G:143 DEF libhdr.h[190] cli_commandfile=143
cli_commandname G:138 DEF libhdr.h[185] cli_commandname=138
cli_currentinput G:142 DEF libhdr.h[189] cli_currentinput=142
cli_currentoutput G:146 DEF libhdr.h[196] cli_currentoutput=146
cli_data G:135 DEF libhdr.h[178] cli_data=135
cli_defaultstack G:147 DEF libhdr.h[197] cli_defaultstack=147
cli_faillevel G:139 DEF libhdr.h[186] cli_faillevel=139
cli_init G:133 DEF libhdr.h[176] cli_init=133
cli_initialfaillevel M:10 DEF libhdr.h[679]
    cli_initialfaillevel=return_hard
cli_initialstack M:50000 DEF libhdr.h[678] cli_initialstack=50000
cli_module G:149 DEF libhdr.h[199] cli_module=149
cli_module_gn M:149 DEF libhdr.h[677] cli_module_gn=149
cli_preloadlist G:145 DEF libhdr.h[195] cli_preloadlist=145
cli_prompt G:140 DEF libhdr.h[187] cli_prompt=140
cli_result2 G:134 DEF libhdr.h[177] cli_result2=134
cli_returncode G:137 DEF libhdr.h[180] cli_returncode=137
cli_standardinput G:141 DEF libhdr.h[188] cli_standardinput=141
cli_standardoutput G:148 DEF libhdr.h[198] cli_standardoutput=148
cli_status G:144 DEF libhdr.h[192] cli_status=144
cli_tallyflag G:132 DEF libhdr.h[175] cli_tallyflag=132
clibit_comcom M:4 DEF libhdr.h[684] clibit_comcom=4
clibit_endcli M:256 DEF libhdr.h[690] clibit_endcli=256
clibit_eofdel M:2 DEF libhdr.h[683] clibit_eofdel=2
clibit_maincli M:8 DEF libhdr.h[685] clibit_maincli=8
clibit_mbxcli M:64 DEF libhdr.h[688] clibit_mbxcli=64
clibit_newcli M:16 DEF libhdr.h[686] clibit_newcli=16
clibit_noprompt M:1 DEF libhdr.h[682] clibit_noprompt=1
clibit_runcli M:32 DEF libhdr.h[687] clibit_runcli=32
clibit_tcpcli M:128 DEF libhdr.h[689] clibit_tcpcli=128
clihook G:4 DEF libhdr.h[42] clihook=4
cliregs M:21 DEF libhdr.h[526] cliregs=21
closesdl G:505 DEF sdl.h[159] closesdl=
closesdl G:505 LG com/bucketflt.b[1370] closesdl()
closesdl G:505 RT sdl.b[284] LET closesdl()BE..
cmpdats G:184 DEF libhdr.h[236] cmpdats=184
co_c M:5 DEF libhdr.h[300] co_c=
co_fn M:3 DEF libhdr.h[298] co_fn=
co_list M:2 DEF libhdr.h[297] co_list=
co_parent M:1 DEF libhdr.h[296] co_parent=
co_pptr M:0 DEF libhdr.h[295] co_pptr=0
co_size M:4 DEF libhdr.h[299] co_size=
codewrch G:126 DEF libhdr.h[166] codewrch=126
colist G:8 DEF libhdr.h[46] colist=8
compch G:97 DEF libhdr.h[137] compch=97
compstring G:98 DEF libhdr.h[138] compstring=98
consoletask G:171 DEF libhdr.h[222] consoletask=171
copy_bytes G:116 DEF libhdr.h[156] copy_bytes=116
copy_words G:114 DEF libhdr.h[154] copy_words=114
copydir G:79 DEF libhdr.h[118] copydir=79
copyobj G:75 DEF libhdr.h[114] copyobj=75
copystring G:99 DEF libhdr.h[139] copystring=99
cos G:13 DEF libhdr.h[52] cos=13
cosines F:13 FN com/bucketflt.b[289] LET cosines(FLT dx,FLT dy)=..
cosines F:13 LF com/bucketflt.b[1175] c#:=cosines( 1.000,dy)
cosines F:13 LF com/bucketflt.b[182] cosines(x2#-x1,y2#-y1)
cowait G:20 DEF libhdr.h[59] cowait=20
createco G:17 DEF libhdr.h[56] createco=17
createdev G:172 DEF libhdr.h[223] createdev=172
createdir G:82 DEF libhdr.h[121] createdir=82
createtask G:153 DEF libhdr.h[207] createtask=153
crossprod G:451 DEF sdl.h[67] crossprod=
crossprod G:451 RT sdl.b[52] LET crossprod(v,w,r)BE..
currballno G:308 DEF com/bucketflt.b[135] currballno=
currballno G:308 LG com/bucketflt.b[1090]
    writef("currb'y=%8.5f*n",currballno,selx,sely)
currballno G:308 LG com/bucketflt.b[1317] IF currballno<0 DO ..
currballno G:308 LG com/bucketflt.b[456]
    writef("%9.3f'llno=%n*n",displaytime,currballno)
currballno G:308 LG com/bucketflt.b[599] IF currballno<0 DO ..
currballno G:308 LG com/bucketflt.b[615]
    TEST currballno<=0 THEN .. ELSE ..
currballno G:308 LG com/bucketflt.b[628] IF currballno=1 DO ..
currballno G:308 LG com/bucketflt.b[630] IF currballno=2 DO ..
currballno G:308 LG com/bucketflt.b[632] IF currballno=3 DO ..
currballno G:308 LG com/bucketflt.b[741]
    writef("*ncurr'llno=%n*n",currballno)
currballno G:308 LG com/bucketflt.b[943] IF currballno=1 DO ..
currballno G:308 LG com/bucketflt.b[955] IF currballno=2 DO ..
currballno G:308 LG com/bucketflt.b[967] IF currballno=3 DO ..
currballno G:308 SG com/bucketflt.b[1059] currballno:=-1
currballno G:308 SG com/bucketflt.b[1194] currballno:=-1
currballno G:308 SG com/bucketflt.b[475] currballno:=-1
currballno G:308 SG com/bucketflt.b[489] currballno:=-1
currballno G:308 SG com/bucketflt.b[604] currballno:=1
currballno G:308 SG com/bucketflt.b[607] currballno:=2
currballno G:308 SG com/bucketflt.b[610] currballno:=3
currballno G:308 SG com/bucketflt.b[981] currballno:=-1
currco G:7 DEF libhdr.h[45] currco=7
currcolour G:485 DEF sdl.h[123] currcolour=
currcolour G:485 LG sdl.b[1687] currcolour
currcolour G:485 LG sdl.b[3565] currcolour
currcolour G:485 LG sdl.b[3754]
    sys(Sys_sdl,sdl_fillrect,@currsurf,xmin,currysize-ymax,...,...)
currcolour G:485 LG sdl.b[398]
    sys(Sys_sdl,sdl_fillrect,@currsurf,x,currysize-y,1,...)
currcolour G:485 SG sdl.b[293] currcolour:=col
current_language G:190 DEF libhdr.h[239] current_language=190
currentdir G:14 DEF libhdr.h[53] currentdir=14
currsurf G:457 DEF sdl.h[74] currsurf=
currsurf G:457 LLG sdl.b[350] sys(Sys_sdl,sdl_fillsurf,@currsurf,col)
currsurf G:457 LLG sdl.b[3754]
    sys(Sys_sdl,sdl_fillrect,@currsurf,xmin,currysize-ymax,...,...)
currsurf G:457 LLG sdl.b[398]
    sys(Sys_sdl,sdl_fillrect,@currsurf,x,currysize-y,1,...)
currsurf G:457 SG sdl.b[307] currsurf:=surfptr!0
currsurf1 G:458 DEF sdl.h[74] currsurf1=
currsurf1 G:458 SG sdl.b[307] currsurf1:=surfptr!1
currsz3d G:490 DEF sdl.h[135] currsz3d=
currsz3d G:490 LG sdl.b[3986] currsz3d:=currsz3d+dsz
currsz3d G:490 LG sdl.b[3990]
    drawto3d(currx3d+dx,curry3d+dy,currsz3d+dsz)
currsz3d G:490 LG sdl.b[4014] currsz3d
currsz3d G:490 SG sdl.b[187] currsz3d:=0
currsz3d G:490 SG sdl.b[3981] currsz3d:=sz
currsz3d G:490 SG sdl.b[3986] currsz3d:=currsz3d+dsz
currsz3d G:490 SG sdl.b[4031] currsz3d:=sz1
currx G:486 DEF sdl.h[125] currx=
currx G:486 LG sdl.b[1722] currx
currx G:486 LG sdl.b[366] moveto(currx+dx,curry+dy)
currx G:486 LG sdl.b[369] currx
currx G:486 LG sdl.b[392] drawto(currx+dx,curry+dy)
currx G:486 LG sdl.b[418]
    write_ch_slice(currx,curry+fontH-1-line,ch,line)
currx G:486 LG sdl.b[419] currx:=currx+fontW+charHsep
currx G:486 LG sdl.b[424] currx
currx G:486 SG sdl.b[1717] currx:=cx
currx G:486 SG sdl.b[183] currx:=0
currx G:486 SG sdl.b[3601] currx:=cx
currx G:486 SG sdl.b[365] currx:=x
currx G:486 SG sdl.b[3745] currx:=x0
currx G:486 SG sdl.b[3757] currx:=x0
currx G:486 SG sdl.b[3816] currx:=x0
currx G:486 SG sdl.b[383] currx:=x
currx G:486 SG sdl.b[3887] currx:=x0
currx G:486 SG sdl.b[414] currx:=charLmargin
currx G:486 SG sdl.b[419] currx:=currx+fontW+charHsep
currx3d G:488 DEF sdl.h[132] currx3d=
currx3d G:488 LG sdl.b[3984] currx3d:=currx3d+dx
currx3d G:488 LG sdl.b[3990]
    drawto3d(currx3d+dx,curry3d+dy,currsz3d+dsz)
currx3d G:488 LG sdl.b[4014] currx3d
currx3d G:488 SG sdl.b[187] currx3d:=0
currx3d G:488 SG sdl.b[3981] currx3d:=x
currx3d G:488 SG sdl.b[3984] currx3d:=currx3d+dx
currx3d G:488 SG sdl.b[4031] currx3d:=x1
currx3d G:488 SG sdl.b[4031] currx3d:=y1
currxsize G:469 DEF sdl.h[90] currxsize=
currxsize G:469 LG sdl.b[191] depthvupb:=currxsize*currysize-1
currxsize G:469 LG sdl.b[397] IF 0<=x&x<currxsize&0<=y&y<currysize DO ..
currxsize G:469 LG sdl.b[4000]
    IF 0<=x&x<currxsize&0<=y&y<currysize DO ..
currxsize G:469 LG sdl.b[4002] x+y*currxsize
currxsize G:469 LG sdl.b[4363] leftxv!y:=currxsize
currxsize G:469 LG sdl.b[4382] IF x1>=currxsize DO ..
currxsize G:469 LG sdl.b[4383] sz1:=interpolate(currxsize-1,x0,x1,...)
currxsize G:469 LG sdl.b[4384] x1:=currxsize-1
currxsize G:469 LG sdl.b[4420] leftxv!y:=currxsize
currxsize G:469 SG sdl.b[202] currxsize:=0
currxsize G:469 SG sdl.b[308] currxsize:=xsize
currxupb G:471 DEF sdl.h[93] currxupb=
curry G:487 DEF sdl.h[126] curry=
curry G:487 LG sdl.b[1722] curry
curry G:487 LG sdl.b[366] moveto(currx+dx,curry+dy)
curry G:487 LG sdl.b[369] curry
curry G:487 LG sdl.b[392] drawto(currx+dx,curry+dy)
curry G:487 LG sdl.b[415] curry:=curry-fontH-charVsep
curry G:487 LG sdl.b[418]
    write_ch_slice(currx,curry+fontH-1-line,ch,line)
curry G:487 LG sdl.b[424] curry
curry G:487 SG sdl.b[1717] curry:=cy
curry G:487 SG sdl.b[183] curry:=0
curry G:487 SG sdl.b[3601] curry:=cy
curry G:487 SG sdl.b[365] curry:=y
curry G:487 SG sdl.b[3745] curry:=y0
curry G:487 SG sdl.b[3757] curry:=y0
curry G:487 SG sdl.b[3816] curry:=y0
curry G:487 SG sdl.b[383] curry:=y
curry G:487 SG sdl.b[3887] curry:=y0
curry G:487 SG sdl.b[415] curry:=curry-fontH-charVsep
curry3d G:489 DEF sdl.h[133] curry3d=
curry3d G:489 LG sdl.b[3985] curry3d:=curry3d+dy
curry3d G:489 LG sdl.b[3990]
    drawto3d(currx3d+dx,curry3d+dy,currsz3d+dsz)
curry3d G:489 LG sdl.b[4014] curry3d
curry3d G:489 SG sdl.b[187] curry3d:=0
curry3d G:489 SG sdl.b[3981] curry3d:=y
curry3d G:489 SG sdl.b[3985] curry3d:=curry3d+dy
currysize G:470 DEF sdl.h[91] currysize=
currysize G:470 LG sdl.b[191] depthvupb:=currxsize*currysize-1
currysize G:470 LG sdl.b[309] curryupb:=currysize-1
currysize G:470 LG sdl.b[333] currysize-y-1
currysize G:470 LG sdl.b[345] currysize-y-1
currysize G:470 LG sdl.b[3647] IF 0<=y&y<currysize DO ..
currysize G:470 LG sdl.b[3687] leftxv!y:=currysize
currysize G:470 LG sdl.b[3697] miny:=currysize
currysize G:470 LG sdl.b[3721] leftxv!y:=currysize-1
currysize G:470 LG sdl.b[3754]
    sys(Sys_sdl,sdl_fillrect,@currsurf,xmin,currysize-ymax,...,...)
currysize G:470 LG sdl.b[397] IF 0<=x&x<currxsize&0<=y&y<currysize DO ..
currysize G:470 LG sdl.b[398]
    sys(Sys_sdl,sdl_fillrect,@currsurf,x,currysize-y,1,...)
currysize G:470 LG sdl.b[4000]
    IF 0<=x&x<currxsize&0<=y&y<currysize DO ..
currysize G:470 LG sdl.b[4170] leftzv!y:=currysize
currysize G:470 LG sdl.b[4361] miny:=currysize
currysize G:470 LG sdl.b[4363] FOR y=0 TO currysize-1 DO..
currysize G:470 LG sdl.b[4428] FOR y=0 TO currysize-1 DO..
currysize G:470 SG sdl.b[202] currysize:=0
currysize G:470 SG sdl.b[308] currysize:=ysize
curryupb G:472 DEF sdl.h[94] curryupb=
curryupb G:472 LG sdl.b[3679] leftxv:=getvec(curryupb)
curryupb G:472 LG sdl.b[3680] rightxv:=getvec(curryupb)
curryupb G:472 LG sdl.b[3686] FOR y=0 TO curryupb DO..
curryupb G:472 LG sdl.b[4066] IF y0>curryupb DO ..
curryupb G:472 LG sdl.b[4069] x0:=interpolate(curryupb,y0,y1,...)
curryupb G:472 LG sdl.b[4070] sz0:=interpolate(curryupb,y0,y1,...)
curryupb G:472 LG sdl.b[4071] y0:=curryupb
curryupb G:472 LG sdl.b[4084] IF y1>curryupb DO ..
curryupb G:472 LG sdl.b[4087] x1:=interpolate(curryupb,y0,y1,...)
curryupb G:472 LG sdl.b[4088] sz1:=interpolate(curryupb,y0,y1,...)
curryupb G:472 LG sdl.b[4089] y1:=curryupb
curryupb G:472 LG sdl.b[4160] leftzv:=getvec(curryupb)
curryupb G:472 LG sdl.b[4161] rightzv:=getvec(curryupb)
curryupb G:472 LG sdl.b[4169] FOR y=0 TO curryupb DO..
curryupb G:472 SG sdl.b[309] curryupb:=currysize-1
dat_to_strings G:110 DEF libhdr.h[150] dat_to_strings=110
datstamp G:109 DEF libhdr.h[149] datstamp=109
datstring G:108 DEF libhdr.h[148] datstring=108
deadcode M:#xDEADC0DE DEF libhdr.h[277] deadcode=-#x21523F22
debugging G:231 DEF com/bucketflt.b[62] debugging=
debugging G:231 LG com/bucketflt.b[1003] IF debugging DO ..
debugging G:231 LG com/bucketflt.b[1048] debugging:=~debugging
debugging G:231 LG com/bucketflt.b[833] TEST debugging THEN .. ELSE ..
debugging G:231 SG com/bucketflt.b[1048] debugging:=~debugging
debugging G:231 SG com/bucketflt.b[1201] debugging:=FALSE
delay G:128 DEF libhdr.h[168] delay=128
delayuntil G:129 DEF libhdr.h[169] delayuntil=129
deleteco G:18 DEF libhdr.h[57] deleteco=18
deletedev G:173 DEF libhdr.h[224] deletedev=173
deletefile G:76 DEF libhdr.h[115] deletefile=76
deleteself G:125 DEF libhdr.h[165] deleteself=125
deletetask G:154 DEF libhdr.h[208] deletetask=154
deplete G:43 DEF libhdr.h[82] deplete=43
depthv G:479 DEF sdl.h[112] depthv=
depthv G:479 LG sdl.b[289] IF depthv DO ..
depthv G:479 LG sdl.b[289] freevec(depthv)
depthv G:479 LG sdl.b[351] IF depthv DO ..
depthv G:479 LG sdl.b[351] depthv!p:=maxdepth
depthv G:479 LG sdl.b[4003] IF sz<=depthv!p DO ..
depthv G:479 LG sdl.b[4007] depthv!p:=sz
depthv G:479 LG sdl.b[4164] UNLESS leftzv*rightzv*depthv DO ..
depthv G:479 LG sdl.b[4172] depthv!i:=maxdepth
depthv G:479 SG sdl.b[192] depthv:=0
depthv G:479 SG sdl.b[226] depthv:=0
depthv G:479 SG sdl.b[4162] depthv:=getvec(depthvupb)
depthvupb G:480 DEF sdl.h[114] depthvupb=
depthvupb G:480 LG sdl.b[351] FOR p=0 TO depthvupb DO..
depthvupb G:480 LG sdl.b[4162] depthv:=getvec(depthvupb)
depthvupb G:480 LG sdl.b[4172] FOR i=0 TO depthvupb DO..
depthvupb G:480 SG sdl.b[191] depthvupb:=currxsize*currysize-1
depthvupb G:480 SG sdl.b[227] depthvupb:=-1
depthvupb G:480 SG sdl.b[274] depthvupb:=xsize*ysize-1
displaytime G:226 DEF com/bucketflt.b[55] displaytime=
displaytime G:226 LG com/bucketflt.b[1094]
    writef("displ'e=%9.2d*n",displaytime,batpushtime)
displaytime G:226 LG com/bucketflt.b[456]
    writef("%9.3f'llno=%n*n",displaytime,currballno)
displaytime G:226 LG com/bucketflt.b[474]
    IF displaytime>ballselecttime DO ..
displaytime G:226 LG com/bucketflt.b[476]
    ballselecttime:=displaytime+5000
displaytime G:226 LG com/bucketflt.b[477]
    writef("%8.3d' a ball*n",displaytime)
displaytime G:226 LG com/bucketflt.b[619]
    IF displaytime>batpushtime DO ..
displaytime G:226 LG com/bucketflt.b[621] batpushtime:=displaytime+200
displaytime G:226 LG com/bucketflt.b[622]
    writef("Displ'=%10.5d*n",displaytime,batpushtime,batpushxdotdot)
displaytime G:226 LG com/bucketflt.b[637]
    writef("displ't=%9.5f*n",displaytime,selx,sely,selxdot,selydot)
displaytime G:226 LG com/bucketflt.b[647]
    IF displaytime>batpushtime DO ..
displaytime G:226 LG com/bucketflt.b[651] batpushtime:=displaytime+500
displaytime G:226 LG com/bucketflt.b[739] IF displaytime>10000 DO ..
displaytime G:226 LG com/bucketflt.b[740]
    writef("*ndisp'e=%9.3d*n",displaytime)
displaytime G:226 LG com/bucketflt.b[817]
    writef("bounc'= %9.5f*n",xbounce,tbounce#+displaytime)
displaytime G:226 LG com/bucketflt.b[819] result2#:=displaytime#+tbounce
displaytime G:226 LG com/bucketflt.b[987]
    drawf(30,350,"Time %9.2d",displaytime/10)
displaytime G:226 SG com/bucketflt.b[1030] displaytime:=-1
displaytime G:226 SG com/bucketflt.b[1072] displaytime:=-1
displaytime G:226 SG com/bucketflt.b[1101] displaytime:=-1
displaytime G:226 SG com/bucketflt.b[1204] displaytime:=-1
displaytime G:226 SG com/bucketflt.b[473]
    displaytime:=sdlmsecs()-starttime
displaytime G:226 SG com/bucketflt.b[491] displaytime:=0
displayusage G:230 DEF com/bucketflt.b[61] displayusage=
displayusage G:230 LG com/bucketflt.b[1000] IF displayusage DO ..
displayusage G:230 LG com/bucketflt.b[1055] displayusage:=~displayusage
displayusage G:230 SG com/bucketflt.b[1055] displayusage:=~displayusage
displayusage G:230 SG com/bucketflt.b[1207] displayusage:=FALSE
distance G:453 DEF sdl.h[69] distance=
distance G:453 FN sdl.b[79] LET distance(p,q)=..
done G:210 DEF com/bucketflt.b[33] done=ug
done G:210 LG com/bucketflt.b[1309] UNTIL done DO ..
done G:210 SG com/bucketflt.b[1041] done:=TRUE
done G:210 SG com/bucketflt.b[1131] done:=TRUE
done G:210 SG com/bucketflt.b[1307] done:=FALSE
done G:210 SG com/bucketflt.b[982] done:=TRUE
drawby G:514 DEF sdl.h[174] drawby=
drawby G:514 RT sdl.b[392] LET drawby(dx,dy)BE..
drawby3d G:546 DEF sdl.h[243] drawby3d=
drawby3d G:546 RT sdl.b[3989] LET drawby3d(dx,dy,dsz)BE..
drawch G:515 DEF sdl.h[177] drawch=
drawch G:515 LG sdl.b[3606] drawch(s%i)
drawch G:515 RT sdl.b[413] LET drawch(ch)BE..
drawcircle G:535 DEF sdl.h[218] drawcircle=
drawcircle G:535 RT sdl.b[3890] LET drawcircle(x0,y0,radius)BE..
drawellipse G:538 DEF sdl.h[222] drawellipse=
drawf G:559 DEF sdl.h[285] drawf=
drawf G:559 LG com/bucketflt.b[1001]
    drawf(30,245,"CPU u' = %8.5f",usage,sps)
drawf G:559 LG com/bucketflt.b[1004]
    drawf(30,220,"Ball1't=%10.5f",cgx1,cgy1,cgx1dot,cgy1dot)
drawf G:559 LG com/bucketflt.b[1006]
    drawf(30,205,"Ball2't=%10.5f",cgx2,cgy2,cgx2dot,cgy2dot)
drawf G:559 LG com/bucketflt.b[1008]
    drawf(30,190,"Ball3't=%10.5f",cgx3,cgy3,cgx3dot,cgy3dot)
drawf G:559 LG com/bucketflt.b[1010]
    drawf(30,175,"Bat  't=%10.5f",batx,baty,batxdot)
drawf G:559 LG com/bucketflt.b[980] drawf(30,370,"Finis'll Done!")
drawf G:559 LG com/bucketflt.b[987]
    drawf(30,350,"Time %9.2d",displaytime/10)
drawf G:559 LG com/bucketflt.b[990] drawf(30,150,"R  -- Reset")
drawf G:559 LG com/bucketflt.b[991] drawf(30,135,"S  --'the game")
drawf G:559 LG com/bucketflt.b[992] drawf(30,120,"P  --'Continue")
drawf G:559 LG com/bucketflt.b[993] drawf(30,105,"H  --'ormation")
drawf G:559 LG com/bucketflt.b[994] drawf(30,90,"B  --'m motion")
drawf G:559 LG com/bucketflt.b[995] drawf(30,75,"D  --'ebugging")
drawf G:559 LG com/bucketflt.b[996] drawf(30,60,"U  --'le usage")
drawf G:559 LG com/bucketflt.b[997] drawf(30,45,"Left/' the bat")
drawf G:559 RT sdl.b[3609] LET drawf(x,y,form,a,b,c,d,...)BE..
drawfillcircle G:539 DEF sdl.h[224] drawfillcircle=
drawfillcircle G:539 LG com/bucketflt.b[836]
    drawfillcircle(FIX endradius,FIX endradius,FIX endradius-1)
drawfillcircle G:539 LG com/bucketflt.b[837]
    drawfillcircle(FIX endradius,FIX (height#-endradius),FIX endradius-1)
drawfillcircle G:539 LG com/bucketflt.b[884]
    drawfillcircle(FIX batradius,FIX (batradius#+ 1.000),FIX batradius)
drawfillcircle G:539 RT sdl.b[3926] LET drawfillcircle(x0,y0,radius)BE..
drawfillellipse G:542 DEF sdl.h[227] drawfillellipse=
drawfillrect G:540 DEF sdl.h[225] drawfillrect=
drawfillrect G:540 LG com/bucketflt.b[841]
    drawfillrect(0,FIX endradius,FIX width,FIX (height#-endradius))
drawfillrect G:540 LG com/bucketflt.b[854]
    drawfillrect(0,0,FIX width,FIX height)
drawfillrect G:540 LG com/bucketflt.b[947]
    drawfillrect(FIX cgx1-5,FIX cgy1-5,FIX cgx1+5,FIX cgy1+5)
drawfillrect G:540 LG com/bucketflt.b[959]
    drawfillrect(FIX cgx2-5,FIX cgy2-5,FIX cgx2+5,FIX cgy2+5)
drawfillrect G:540 LG com/bucketflt.b[971]
    drawfillrect(FIX cgx3-5,FIX cgy3-5,FIX cgx3+5,FIX cgy3+5)
drawfillrect G:540 RT sdl.b[3748] LET drawfillrect(x0,y0,x1,y1)BE..
drawfillrndrect G:541 DEF sdl.h[226] drawfillrndrect=
drawfillrndrect G:541 RT sdl.b[3819]
    LET drawfillrndrect(x0,y0,x1,y1,radius)BE..
drawfstr G:560 DEF sdl.h[287] drawfstr=
drawfstr G:560 LG sdl.b[3614] drawfstr%0:=0
drawfstr G:560 LG sdl.b[3618] drawstr(x,y,drawfstr)
drawfstr G:560 LG sdl.b[3622] drawfstr%0+1
drawfstr G:560 LG sdl.b[3623] drawfstr%strlen:=ch
drawfstr G:560 LG sdl.b[3624] drawfstr%0:=strlen
drawfstr G:560 SG sdl.b[3613] drawfstr:=s
drawpoint G:530 DEF sdl.h[207] drawpoint=
drawpoint G:530 LG sdl.b[1703] drawpoint(x+0,y)
drawpoint G:530 LG sdl.b[1704] drawpoint(x+1,y)
drawpoint G:530 LG sdl.b[1705] drawpoint(x+2,y)
drawpoint G:530 LG sdl.b[1706] drawpoint(x+3,y)
drawpoint G:530 LG sdl.b[1707] drawpoint(x+4,y)
drawpoint G:530 LG sdl.b[1708] drawpoint(x+5,y)
drawpoint G:530 LG sdl.b[1709] drawpoint(x+6,y)
drawpoint G:530 LG sdl.b[1710] drawpoint(x+7,y)
drawpoint G:530 LG sdl.b[3587] drawpoint(x+0,y)
drawpoint G:530 LG sdl.b[3588] drawpoint(x+1,y)
drawpoint G:530 LG sdl.b[3589] drawpoint(x+2,y)
drawpoint G:530 LG sdl.b[3590] drawpoint(x+3,y)
drawpoint G:530 LG sdl.b[3591] drawpoint(x+4,y)
drawpoint G:530 LG sdl.b[3592] drawpoint(x+5,y)
drawpoint G:530 LG sdl.b[3593] drawpoint(x+6,y)
drawpoint G:530 LG sdl.b[3594] drawpoint(x+7,y)
drawpoint G:530 LG sdl.b[3595] drawpoint(x+8,y)
drawpoint G:530 LG sdl.b[3596] drawpoint(x+9,y)
drawpoint G:530 LG sdl.b[3597] drawpoint(x+10,y)
drawpoint G:530 LG sdl.b[3598] drawpoint(x+11,y)
drawpoint G:530 LG sdl.b[3738] drawpoint(x,ymin)
drawpoint G:530 LG sdl.b[3739] drawpoint(x,ymax)
drawpoint G:530 LG sdl.b[3742] drawpoint(xmin,y)
drawpoint G:530 LG sdl.b[3743] drawpoint(xmax,y)
drawpoint G:530 LG sdl.b[3773] drawpoint(x,ymin)
drawpoint G:530 LG sdl.b[3774] drawpoint(x,ymax)
drawpoint G:530 LG sdl.b[3777] drawpoint(xmin,y)
drawpoint G:530 LG sdl.b[3778] drawpoint(xmax,y)
drawpoint G:530 LG sdl.b[3789] drawpoint(xmax,ymin+r)
drawpoint G:530 LG sdl.b[3790] drawpoint(xmin,ymin+r)
drawpoint G:530 LG sdl.b[3791] drawpoint(xmax,ymax-r)
drawpoint G:530 LG sdl.b[3792] drawpoint(xmin,ymax-r)
drawpoint G:530 LG sdl.b[3806] drawpoint(xmax-r+x,ymax-r+y)
drawpoint G:530 LG sdl.b[3807] drawpoint(xmin+r-x,ymax-r+y)
drawpoint G:530 LG sdl.b[3808] drawpoint(xmax-r+x,ymin+r-y)
drawpoint G:530 LG sdl.b[3809] drawpoint(xmin+r-x,ymin+r-y)
drawpoint G:530 LG sdl.b[3810] drawpoint(xmax-r+y,ymax-r+x)
drawpoint G:530 LG sdl.b[3811] drawpoint(xmin+r-y,ymax-r+x)
drawpoint G:530 LG sdl.b[3812] drawpoint(xmax-r+y,ymin+r-x)
drawpoint G:530 LG sdl.b[3813] drawpoint(xmin+r-y,ymin+r-x)
drawpoint G:530 LG sdl.b[381] drawpoint(x,y)
drawpoint G:530 LG sdl.b[3833] drawpoint(x,y)
drawpoint G:530 LG sdl.b[3834] drawpoint(x,y)
drawpoint G:530 LG sdl.b[3846] drawpoint(xmax,ymin+r)
drawpoint G:530 LG sdl.b[3847] drawpoint(xmin,ymin+r)
drawpoint G:530 LG sdl.b[3848] drawpoint(xmax,ymax-r)
drawpoint G:530 LG sdl.b[3849] drawpoint(xmin,ymax-r)
drawpoint G:530 LG sdl.b[3863] drawpoint(xmax-r+x,ymax-r+y)
drawpoint G:530 LG sdl.b[3864] drawpoint(xmin+r-x,ymax-r+y)
drawpoint G:530 LG sdl.b[3865] drawpoint(xmax-r+x,ymin+r-y)
drawpoint G:530 LG sdl.b[3866] drawpoint(xmin+r-x,ymin+r-y)
drawpoint G:530 LG sdl.b[3867] drawpoint(xmax-r+y,ymax-r+x)
drawpoint G:530 LG sdl.b[3868] drawpoint(xmin+r-y,ymax-r+x)
drawpoint G:530 LG sdl.b[3869] drawpoint(xmax-r+y,ymin+r-x)
drawpoint G:530 LG sdl.b[3870] drawpoint(xmin+r-y,ymin+r-x)
drawpoint G:530 LG sdl.b[3874] drawpoint(fx,ymax-r+x)
drawpoint G:530 LG sdl.b[3875] drawpoint(fx,ymin+r-x)
drawpoint G:530 LG sdl.b[3881] drawpoint(fx,ymax-r+y)
drawpoint G:530 LG sdl.b[3882] drawpoint(fx,ymin+r-y)
drawpoint G:530 LG sdl.b[3898] drawpoint(x0,y0+radius)
drawpoint G:530 LG sdl.b[3899] drawpoint(x0,y0-radius)
drawpoint G:530 LG sdl.b[3900] drawpoint(x0+radius,y0)
drawpoint G:530 LG sdl.b[3901] drawpoint(x0-radius,y0)
drawpoint G:530 LG sdl.b[3915] drawpoint(x0+x,y0+y)
drawpoint G:530 LG sdl.b[3916] drawpoint(x0-x,y0+y)
drawpoint G:530 LG sdl.b[3917] drawpoint(x0+x,y0-y)
drawpoint G:530 LG sdl.b[3918] drawpoint(x0-x,y0-y)
drawpoint G:530 LG sdl.b[3919] drawpoint(x0+y,y0+x)
drawpoint G:530 LG sdl.b[3920] drawpoint(x0-y,y0+x)
drawpoint G:530 LG sdl.b[3921] drawpoint(x0+y,y0-x)
drawpoint G:530 LG sdl.b[3922] drawpoint(x0-y,y0-x)
drawpoint G:530 LG sdl.b[3935] drawpoint(x0,y0+radius)
drawpoint G:530 LG sdl.b[3936] drawpoint(x0,y0-radius)
drawpoint G:530 LG sdl.b[3937] drawpoint(x,y0)
drawpoint G:530 LG sdl.b[3951] drawpoint(x0+x,y0+y)
drawpoint G:530 LG sdl.b[3952] drawpoint(x0-x,y0+y)
drawpoint G:530 LG sdl.b[3953] drawpoint(x0+x,y0-y)
drawpoint G:530 LG sdl.b[3954] drawpoint(x0-x,y0-y)
drawpoint G:530 LG sdl.b[3955] drawpoint(x0+y,y0+x)
drawpoint G:530 LG sdl.b[3956] drawpoint(x0-y,y0+x)
drawpoint G:530 LG sdl.b[3957] drawpoint(x0+y,y0-x)
drawpoint G:530 LG sdl.b[3958] drawpoint(x0-y,y0-x)
drawpoint G:530 LG sdl.b[3961] drawpoint(fx,y0+x)
drawpoint G:530 LG sdl.b[3962] drawpoint(fx,y0-x)
drawpoint G:530 LG sdl.b[3968] drawpoint(fx,y0+y)
drawpoint G:530 LG sdl.b[3969] drawpoint(fx,y0-y)
drawpoint G:530 LG sdl.b[4008] drawpoint(x,y)
drawpoint G:530 RT sdl.b[394] LET drawpoint(x,y)BE..
drawpoint3d G:547 DEF sdl.h[249] drawpoint3d=
drawpoint3d G:547 LG sdl.b[4037] drawpoint3d(x,y,sz)
drawpoint3d G:547 LG sdl.b[4405] drawpoint3d(x0,y,sz)
drawpoint3d G:547 LG sdl.b[4411] drawpoint3d(x,y,sz)
drawpoint3d G:547 RT sdl.b[3992] LET drawpoint3d(x,y,sz)BE..
drawquad G:533 DEF sdl.h[211] drawquad=
drawquad G:533 RT sdl.b[3725] LET drawquad(x1,y1,x2,y2,x3,y3,x4,y4)BE..
drawquad3d G:549 DEF sdl.h[258] drawquad3d=
drawquad3d G:549 RT sdl.b[4177]
    LET drawquad3d(x1,y1,z1,x2,y2,z2,x3,...)BE..
drawrect G:536 DEF sdl.h[220] drawrect=
drawrect G:536 RT sdl.b[3731] LET drawrect(x0,y0,x1,y1)BE..
drawrndrect G:537 DEF sdl.h[221] drawrndrect=
drawrndrect G:537 RT sdl.b[3760] LET drawrndrect(x0,y0,x1,y1,radius)BE..
drawstr G:531 DEF sdl.h[208] drawstr=
drawstr G:531 LG sdl.b[3618] drawstr(x,y,drawfstr)
drawstr G:531 RT sdl.b[3604] LET drawstr(x,y,s)BE..
drawto G:513 DEF sdl.h[172] drawto=
drawto G:513 LG sdl.b[3719] drawto(rightxv!y,y)
drawto G:513 LG sdl.b[392] drawto(currx+dx,curry+dy)
drawto G:513 RT sdl.b[368] LET drawto(x1,y1)BE..
drawto3d G:545 DEF sdl.h[240] drawto3d=
drawto3d G:545 LG sdl.b[3990]
    drawto3d(currx3d+dx,curry3d+dy,currsz3d+dsz)
drawto3d G:545 RT sdl.b[4013] LET drawto3d(x1,y1,sz1)BE..
drawtriangle G:532 DEF sdl.h[209] drawtriangle=
drawtriangle G:532 LG sdl.b[3727] drawtriangle(x1,y1,x2,y2,x3,y3)
drawtriangle G:532 LG sdl.b[3728] drawtriangle(x2,y2,x3,y3,x4,y4)
drawtriangle G:532 RT sdl.b[3690]
    LET drawtriangle(x1,y1,x2,y2,x3,y3)BE..
drawtriangle3d G:548 DEF sdl.h[253] drawtriangle3d=
drawtriangle3d G:548 LG sdl.b[4182]
    drawtriangle3d(x1,y1,z1,x2,y2,z2,...)
drawtriangle3d G:548 LG sdl.b[4183]
    drawtriangle3d(x1,y1,z1,x3,y3,z3,...)
drawtriangle3d G:548 LG sdl.b[4212]
    drawtriangle3d(x1,y1,z1,x3,y3,z3,...)
drawtriangle3d G:548 LG sdl.b[4213]
    drawtriangle3d(x3,y3,z3,x1,y1,z1,...)
drawtriangle3d G:548 LG sdl.b[4218]
    drawtriangle3d(x2,y2,z2,x1,y1,z1,...)
drawtriangle3d G:548 LG sdl.b[4219]
    drawtriangle3d(x2,y2,z2,x3,y3,z3,...)
drawtriangle3d G:548 LG sdl.b[4220]
    drawtriangle3d(x3,y3,z3,x2,y2,z2,...)
drawtriangle3d G:548 LG sdl.b[4253]
    drawtriangle3d(x1,y1,z1,x3,y3,z3,...)
drawtriangle3d G:548 LG sdl.b[4285]
    drawtriangle3d(x1,y1,z1,x4,y4,z4,...)
drawtriangle3d G:548 LG sdl.b[4286]
    drawtriangle3d(x1,y1,z1,x2,y2,z2,...)
drawtriangle3d G:548 LG sdl.b[4317]
    drawtriangle3d(x1,y1,z1,x3,y3,z3,...)
drawtriangle3d G:548 LG sdl.b[4346]
    drawtriangle3d(x1,y1,z1,x2,y2,z2,...)
drawtriangle3d G:548 LG sdl.b[4347]
    drawtriangle3d(x2,y2,z2,x3,y3,z3,...)
drawtriangle3d G:548 RT sdl.b[4186]
    LET drawtriangle3d(x1,y1,z1,x2,y2,z2,x3,...)BE..
drawwrch F:58 LF sdl.b[3615] wrch:=drawwrch
drawwrch F:58 RT sdl.b[3621] LET drawwrch(ch)BE..
endradius FG:215 DEF com/bucketflt.b[40] FLT endradius=
endradius FG:215 LG com/bucketflt.b[1148]
    bucketthickness#:= 2.000#*endradius
endradius FG:215 LG com/bucketflt.b[1265]
    bucket_lxc#:=bucket_lxr#-endradius
endradius FG:215 LG com/bucketflt.b[1269]
    bucket_rxc#:=bucket_rxl#+endradius
endradius FG:215 LG com/bucketflt.b[1273]
    bucket_tyc#:=bucket_tyt#-endradius
endradius FG:215 LG com/bucketflt.b[1277]
    bucket_byc#:=bucket_byt#-endradius
endradius FG:215 LG com/bucketflt.b[331]
    IF incontact(@x1,p,endradius#+ballradius) DO ..
endradius FG:215 LG com/bucketflt.b[338]
    IF incontact(@x1,p,endradius#+ballradius) DO ..
endradius FG:215 LG com/bucketflt.b[398]
    IF incontact(@x1,p,endradius#+ballradius) DO ..
endradius FG:215 LG com/bucketflt.b[405]
    IF incontact(@x1,p,endradius#+ballradius) DO ..
endradius FG:215 LG com/bucketflt.b[825]  2.000#*endradius#+ 1.000
endradius FG:215 LG com/bucketflt.b[836]
    drawfillcircle(FIX endradius,FIX endradius,FIX endradius-1)
endradius FG:215 LG com/bucketflt.b[837]
    drawfillcircle(FIX endradius,FIX (height#-endradius),FIX endradius-1)
endradius FG:215 LG com/bucketflt.b[837]
    drawfillcircle(FIX endradius,FIX (height-endradius),FIX endradius-1)
endradius FG:215 LG com/bucketflt.b[841]
    drawfillrect(0,FIX endradius,FIX width,FIX (height#-endradius))
endradius FG:215 LG com/bucketflt.b[841]
    drawfillrect(0,FIX endradius,FIX width,FIX (height-endradius))
endradius FG:215 LG com/bucketflt.b[849] 2#*endradius#+ 1.000
endradius FG:215 SG com/bucketflt.b[1147] endradius#:= 15.000
endread G:60 DEF libhdr.h[99] endread=60
endstream G:62 DEF libhdr.h[101] endstream=62
endstreamch M:-1 DEF libhdr.h[260] endstreamch=-1
endtask G:162 DEF libhdr.h[216] endtask=162
endwrite G:61 DEF libhdr.h[100] endwrite=61
entryword M:57311 DEF libhdr.h[279] entryword=57311
errwrch G:191 DEF libhdr.h[242] errwrch=191
errwritef G:192 DEF libhdr.h[243] errwritef=192
eventa1 G:495 DEF sdl.h[147] eventa1=
eventa2 G:496 DEF sdl.h[148] eventa2=
eventa2 G:496 LG com/bucketflt.b[1038]
    SWITCHON capitalch(eventa2) INTO..
eventa2 G:496 LG com/bucketflt.b[1115]
    SWITCHON capitalch(eventa2) INTO..
eventa3 G:497 DEF sdl.h[149] eventa3=
eventa4 G:498 DEF sdl.h[150] eventa4=
eventa5 G:499 DEF sdl.h[151] eventa5=
eventtype G:494 DEF sdl.h[146] eventtype=
eventtype G:494 LG com/bucketflt.b[1033] SWITCHON eventtype INTO..
eventtype G:494 LLG sdl.b[314]
    RESULTIS sys(Sys_sdl,sdl_pollevent,@eventtype)
fardepth G:484 DEF sdl.h[120] fardepth=
fardepth G:484 LG sdl.b[4229] IF z3>fardepth|z1<neardepth DO ..
fardepth G:484 LG sdl.b[4233] IF z1>fardepth DO ..
fardepth G:484 LG sdl.b[4233] TEST z2>fardepth THEN .. ELSE ..
fardepth G:484 LG sdl.b[4245] x1:=interpolate(fardepth,z3,z1,...)
fardepth G:484 LG sdl.b[4246] y1:=interpolate(fardepth,z3,z1,...)
fardepth G:484 LG sdl.b[4247] z1:=fardepth
fardepth G:484 LG sdl.b[4248] x2:=interpolate(fardepth,z3,z2,...)
fardepth G:484 LG sdl.b[4249] y2:=interpolate(fardepth,z3,z2,...)
fardepth G:484 LG sdl.b[4250] z2:=fardepth
fardepth G:484 LG sdl.b[4276] interpolate(fardepth,z2,z1,x2,x1)
fardepth G:484 LG sdl.b[4277] interpolate(fardepth,z2,z1,y2,y1)
fardepth G:484 LG sdl.b[4278] fardepth
fardepth G:484 LG sdl.b[4279] x1:=interpolate(fardepth,z3,z1,...)
fardepth G:484 LG sdl.b[4280] y1:=interpolate(fardepth,z3,z1,...)
fardepth G:484 LG sdl.b[4281] z1:=fardepth
fardepth G:484 LG sdl.b[4390]
    writef("drawt'th = %n*n",neardepth,fardepth)
fardepth G:484 SG sdl.b[4436] fardepth:=far
fault G:182 DEF libhdr.h[234] fault=182
fillsurf G:525 DEF sdl.h[192] fillsurf=
fillsurf G:525 LG com/bucketflt.b[830] fillsurf(backcolour)
fillsurf G:525 LG com/bucketflt.b[852] fillsurf(backcolour)
fillsurf G:525 LG com/bucketflt.b[882] fillsurf(backcolour)
fillsurf G:525 LG com/bucketflt.b[890] fillsurf(backcolour)
fillsurf G:525 RT sdl.b[349] LET fillsurf(col)BE..
findappend G:130 DEF libhdr.h[170] findappend=130
findarg G:104 DEF libhdr.h[144] findarg=104
findinoutput G:50 DEF libhdr.h[89] findinoutput=50
findinput G:48 DEF libhdr.h[87] findinput=48
findoutput G:49 DEF libhdr.h[88] findoutput=49
findstream G:52 DEF libhdr.h[91] findstream=52
findupdate G:51 DEF libhdr.h[90] findupdate=51
finished G:224 DEF com/bucketflt.b[52] finished=
finished G:224 LG com/bucketflt.b[472] UNLESS finished DO ..
finished G:224 LG com/bucketflt.b[495] UNLESS finished DO ..
finished G:224 LG com/bucketflt.b[979] IF finished DO ..
finished G:224 LG com/bucketflt.b[986] IF started|finished DO ..
finished G:224 SG com/bucketflt.b[1029] finished:=FALSE
finished G:224 SG com/bucketflt.b[1070] finished:=FALSE
finished G:224 SG com/bucketflt.b[1099] finished:=FALSE
finished G:224 SG com/bucketflt.b[1200] finished:=FALSE
finished G:224 SG com/bucketflt.b[488] finished:=FALSE
finished G:224 SG com/bucketflt.b[504] finished:=TRUE
finprod F:14 FN com/bucketflt.b[312]
    LET finprod(FLT dx,FLT dy,FLT c,FLT s)=..
finprod F:14 LF com/bucketflt.b[215] finprod(rx1dot,ry1dot,c,s)
finprod F:14 LF com/bucketflt.b[216] finprod(rx1dot,ry1dot,#-s,c)
finprod F:14 LF com/bucketflt.b[224] rx1dot#:=finprod(t1dot,w1dot,c,...)
finprod F:14 LF com/bucketflt.b[225] ry1dot#:=finprod(t1dot,w1dot,s,c)
finprod F:14 LF com/bucketflt.b[254] finprod(rx1dot,ry1dot,c,s)
finprod F:14 LF com/bucketflt.b[255] finprod(rx1dot,ry1dot,#-s,c)
finprod F:14 LF com/bucketflt.b[256] finprod(rx2dot,ry2dot,c,s)
finprod F:14 LF com/bucketflt.b[257] finprod(rx2dot,ry2dot,#-s,c)
finprod F:14 LF com/bucketflt.b[266] rx1dot#:=finprod(t1dot,w1dot,c,...)
finprod F:14 LF com/bucketflt.b[267] ry1dot#:=finprod(t1dot,w1dot,s,c)
finprod F:14 LF com/bucketflt.b[268] rx2dot#:=finprod(t2dot,w2dot,c,...)
finprod F:14 LF com/bucketflt.b[269] ry2dot#:=finprod(t2dot,w2dot,s,c)
fl_32to64 M:46 DEF libhdr.h[664] fl_32to64=
fl_64to32 M:45 DEF libhdr.h[661] fl_64to32=
fl_F2N M:42 DEF libhdr.h[658] fl_F2N=
fl_N2F M:41 DEF libhdr.h[657] fl_N2F=
fl_abs M:5 DEF libhdr.h[628] fl_abs=
fl_acos M:20 DEF libhdr.h[633] fl_acos=20
fl_add M:9 DEF libhdr.h[630] fl_add=
fl_asin M:21 DEF libhdr.h[634] fl_asin=
fl_atan M:22 DEF libhdr.h[635] fl_atan=
fl_atan2 M:23 DEF libhdr.h[636] fl_atan2=
fl_avail M:0 DEF libhdr.h[626] fl_avail=0
fl_ceil M:38 DEF libhdr.h[651] fl_ceil=
fl_cos M:24 DEF libhdr.h[637] fl_cos=
fl_cosh M:27 DEF libhdr.h[640] fl_cosh=
fl_div M:7 DEF libhdr.h[629] fl_div=
fl_eq M:13 DEF libhdr.h[631] fl_eq=
fl_exp M:30 DEF libhdr.h[643] fl_exp=
fl_fix M:4 DEF libhdr.h[628] fl_fix=
fl_float M:3 DEF libhdr.h[628] fl_float=
fl_floor M:39 DEF libhdr.h[652] fl_floor=
fl_frexp M:31 DEF libhdr.h[644] fl_frexp=
fl_ge M:18 DEF libhdr.h[631] fl_ge=
fl_gr M:16 DEF libhdr.h[631] fl_gr=
fl_ldexp M:32 DEF libhdr.h[645] fl_ldexp=
fl_le M:17 DEF libhdr.h[631] fl_le=
fl_log M:33 DEF libhdr.h[646] fl_log=
fl_log10 M:34 DEF libhdr.h[647] fl_log10=
fl_ls M:15 DEF libhdr.h[631] fl_ls=
fl_mk M:1 DEF libhdr.h[627] fl_mk=
fl_mk M:1 MAN sdl.b[67] TEST r#<sys(Sys_flt,fl_mk,1,-10) THEN .. ELSE ..
fl_mod M:8 DEF libhdr.h[629] fl_mod=
fl_modf M:40 DEF libhdr.h[653] fl_modf=
fl_mul M:6 DEF libhdr.h[629] fl_mul=
fl_ne M:14 DEF libhdr.h[631] fl_ne=
fl_neg M:12 DEF libhdr.h[630] fl_neg=
fl_pos M:11 DEF libhdr.h[630] fl_pos=
fl_pow M:36 DEF libhdr.h[649] fl_pow=36
fl_radius2 M:43 DEF libhdr.h[659] fl_radius2=
fl_radius3 M:44 DEF libhdr.h[660] fl_radius3=
fl_sin M:25 DEF libhdr.h[638] fl_sin=
fl_sinh M:28 DEF libhdr.h[641] fl_sinh=
fl_sqrt M:37 DEF libhdr.h[650] fl_sqrt=
fl_sqrt M:37 MAN com/bucketflt.b[800]
    sys(Sys_flt,fl_sqrt,B*B- 4.000*A*C)#/ 2.000*A
fl_sqrt M:37 MAN sdl.b[66] sys(Sys_flt,fl_sqrt,x*x+y*y+z*z)
fl_sqrt M:37 MAN sdl.b[83]
    RESULTIS sys(Sys_flt,fl_sqrt,dx*dx+dy*dy+dz*dz)
fl_sqrt M:37 MAN sdl.b[89] RESULTIS sys(Sys_flt,fl_sqrt,x*x+y*y+z*z)
fl_sub M:10 DEF libhdr.h[630] fl_sub=
fl_tan M:26 DEF libhdr.h[639] fl_tan=
fl_tanh M:29 DEF libhdr.h[642] fl_tanh=
fl_unmk M:2 DEF libhdr.h[627] fl_unmk=
flag_a M:1 DEF libhdr.h[791] flag_a=1<<0
flag_b M:2 DEF libhdr.h[792] flag_b=1<<1
flag_c M:4 DEF libhdr.h[793] flag_c=1<<2
flag_d M:8 DEF libhdr.h[794] flag_d=1<<3
flag_e M:16 DEF libhdr.h[795] flag_e=1<<4
floor_yt FG:254 DEF com/bucketflt.b[103] FLT floor_yt=
floor_yt FG:254 LG com/bucketflt.b[1282]
    ylim_floor#:=floor_yt#+ballradius
floor_yt FG:254 LG com/bucketflt.b[1300] baty#:=floor_yt#+batradius
floor_yt FG:254 LG com/bucketflt.b[1301]
    ylim_bat#:=floor_yt#+batradius#+ballradius
floor_yt FG:254 SG com/bucketflt.b[1259] floor_yt#:= 0.000
fontH G:517 DEF sdl.h[181] fontH=
fontH G:517 LG sdl.b[415] curry:=curry-fontH-charVsep
fontH G:517 LG sdl.b[417] FOR line=0 TO fontH-1 DO..
fontH G:517 LG sdl.b[418]
    write_ch_slice(currx,curry+fontH-1-line,ch,line)
fontH G:517 SG sdl.b[402] fontH:=18
fontH G:517 SG sdl.b[407] fontH:=12
fontW G:516 DEF sdl.h[180] fontW=
fontW G:516 LG sdl.b[419] currx:=currx+fontW+charHsep
fontW G:516 SG sdl.b[402] fontW:=12
fontW G:516 SG sdl.b[407] fontW:=8
fonttab G:522 DEF sdl.h[187] fonttab=
format G:459 DEF sdl.h[77] format=
format G:459 LLG sdl.b[280] sys(Sys_sdl,sdl_maprgb,@format,r,g,b)
format G:459 LLG sdl.b[300]
    sys(Sys_sdl,sdl_mksurface,@format,w,h,surfptr)
format G:459 SG sdl.b[255] format:=fmt
format1 G:460 DEF sdl.h[78] format1=
format1 G:460 SG sdl.b[255] format1:=fmt1
freeobj G:78 DEF libhdr.h[117] freeobj=78
freesurface G:509 DEF sdl.h[166] freesurface=
freesurface G:509 LG com/bucketflt.b[1050] freesurface(@bucketwallsurf)
freesurface G:509 LG com/bucketflt.b[1363] freesurface(@bucketwallsurf)
freesurface G:509 LG com/bucketflt.b[1364] freesurface(@bucketbasesurf)
freesurface G:509 LG com/bucketflt.b[1365] freesurface(@ball1surf)
freesurface G:509 LG com/bucketflt.b[1366] freesurface(@ball2surf)
freesurface G:509 LG com/bucketflt.b[1367] freesurface(@ball3surf)
freesurface G:509 LG com/bucketflt.b[1368] freesurface(@batsurf)
freesurface G:509 RT sdl.b[304] LET freesurface(surfptr)BE..
freevec G:27 DEF libhdr.h[66] freevec=27
freevec G:27 LG sdl.b[285] freevec(leftxv)
freevec G:27 LG sdl.b[286] freevec(rightxv)
freevec G:27 LG sdl.b[287] freevec(leftzv)
freevec G:27 LG sdl.b[288] freevec(rightzv)
freevec G:27 LG sdl.b[289] freevec(depthv)
fscreencentrex FG:467 DEF sdl.h[87] FLT fscreencentrex=
fscreencentrey FG:468 DEF sdl.h[88] FLT fscreencentrey=
fscreenxsize FG:465 DEF sdl.h[85] FLT fscreenxsize=
fscreenxsize FG:465 SG sdl.b[221] fscreenxsize#:=FLOAT xsize
fscreenysize FG:466 DEF sdl.h[86] FLT fscreenysize=
fscreenysize FG:466 SG sdl.b[221] fscreenysize#:=FLOAT ysize
g_alsabase M:500 DEF libhdr.h[810] g_alsabase=500
g_bdrawbase M:450 DEF libhdr.h[806] g_bdrawbase=450
g_colist M:8 DEF libhdr.h[285] g_colist=8
g_currco M:7 DEF libhdr.h[284] g_currco=7
g_extbase M:950 DEF libhdr.h[811] g_extbase=950
g_glbase M:450 DEF libhdr.h[808] g_glbase=450
g_globsize M:0 DEF libhdr.h[282] g_globsize=0
g_grbase M:450 DEF libhdr.h[805] g_grbase=450
g_keyboard M:20 DEF libhdr.h[290] g_keyboard=20
g_memsize M:14 DEF libhdr.h[289] g_memsize=14
g_result2 M:10 DEF libhdr.h[287] g_result2=10
g_rootnode M:9 DEF libhdr.h[286] g_rootnode=9
g_screen M:21 DEF libhdr.h[291] g_screen=21
g_sdlbase M:450 DEF libhdr.h[807] g_sdlbase=450
g_sdlbase M:450 MAN sdl.h[66] inprod=g_sdlbase
g_sndbase M:450 DEF libhdr.h[809] g_sndbase=450
g_sys M:3 DEF libhdr.h[283] g_sys=3
get_record G:71 DEF libhdr.h[110] get_record=71
get_text G:93 DEF libhdr.h[133] get_text=93
get_textblib G:93 DEF libhdr.h[132] get_textblib=93
getevent G:553 DEF sdl.h[276] getevent=
getevent G:553 FN sdl.b[312] LET getevent()=..
getevent G:553 LG com/bucketflt.b[1033] WHILE getevent() DO ..
getlogname G:118 DEF libhdr.h[158] getlogname=118
getmousestate G:552 DEF sdl.h[275] getmousestate=
getmousestate G:552 FN sdl.b[356] LET getmousestate()=..
getremipaddr G:54 DEF libhdr.h[93] getremipaddr=54
getvec G:25 DEF libhdr.h[64] getvec=25
getvec G:25 LG sdl.b[3679] leftxv:=getvec(curryupb)
getvec G:25 LG sdl.b[3680] rightxv:=getvec(curryupb)
getvec G:25 LG sdl.b[4160] leftzv:=getvec(curryupb)
getvec G:25 LG sdl.b[4161] rightzv:=getvec(curryupb)
getvec G:25 LG sdl.b[4162] depthv:=getvec(depthvupb)
getword G:32 DEF libhdr.h[71] getword=32
glob0 G:0 DEF libhdr.h[37] glob0=0
globin G:24 DEF libhdr.h[63] globin=24
globsize G:0 DEF libhdr.h[38] globsize=0
globword M:#x8F8F0000 DEF libhdr.h[275] globword=-#x70710000
help G:219 DEF com/bucketflt.b[46] help=
help G:219 LG com/bucketflt.b[1045] help:=~help
help G:219 LG com/bucketflt.b[989] IF help DO ..
help G:219 SG com/bucketflt.b[1045] help:=~help
help G:219 SG com/bucketflt.b[1191] help:=TRUE&FALSE
hidecursor G:556 DEF sdl.h[281] hidecursor=
hidecursor G:556 FN sdl.b[323] LET hidecursor()=..
hold G:158 DEF libhdr.h[212] hold=158
id_appendscb M:132 DEF libhdr.h[575] id_appendscb=132
id_inoutscb M:131 DEF libhdr.h[574] id_inoutscb=131
id_inscb M:129 DEF libhdr.h[572] id_inscb=129
id_outscb M:130 DEF libhdr.h[573] id_outscb=130
incontact F:10 FN com/bucketflt.b[150] LET incontact(p1,p2,FLT d)=..
incontact F:10 LF com/bucketflt.b[331]
    IF incontact(@x1,p,endradius#+ballradius) DO ..
incontact F:10 LF com/bucketflt.b[338]
    IF incontact(@x1,p,endradius#+ballradius) DO ..
incontact F:10 LF com/bucketflt.b[398]
    IF incontact(@x1,p,endradius#+ballradius) DO ..
incontact F:10 LF com/bucketflt.b[405]
    IF incontact(@x1,p,endradius#+ballradius) DO ..
incontact F:10 LF com/bucketflt.b[417]
    IF incontact(@batx,p,batradius#+ballradius) DO ..
incontact F:10 LF com/bucketflt.b[528]
    IF incontact(@cgx1,@cgx2,ballradius#+ballradius) DO ..
incontact F:10 LF com/bucketflt.b[536]
    IF incontact(@cgx1,@cgx3,ballradius#+ballradius) DO ..
incontact F:10 LF com/bucketflt.b[544]
    IF incontact(@cgx2,@cgx3,ballradius#+ballradius) DO ..
initballsurf F:61 FN com/bucketflt.b[858]
    LET initballsurf(surfptr,col)=..
initballsurf F:61 LF com/bucketflt.b[897]
    ball1surfok:=initballsurf(@ball1surf,ball1colour)
initballsurf F:61 LF com/bucketflt.b[899]
    ball2surfok:=initballsurf(@ball2surf,ball2colour)
initballsurf F:61 LF com/bucketflt.b[901]
    ball3surfok:=initballsurf(@ball3surf,ball3colour)
initbatsurf F:62 FN com/bucketflt.b[876] LET initbatsurf(surfptr)=..
initbatsurf F:62 LF com/bucketflt.b[903]
    batsurfok:=initbatsurf(@batsurf)
initbucketbasesurf F:60 FN com/bucketflt.b[846]
    LET initbucketbasesurf(surfptr,col)=..
initbucketbasesurf F:60 LF com/bucketflt.b[895]
    bucketbasesurfok:=initbucketbasesurf(@bucketbasesurf)
initbucketwallsurf F:59 FN com/bucketflt.b[823]
    LET initbucketwallsurf(surfptr)=..
initbucketwallsurf F:59 LF com/bucketflt.b[893]
    bucketwallsurfok:=initbucketwallsurf(@bucketwallsurf)
initco G:22 DEF libhdr.h[61] initco=22
initio G:46 DEF libhdr.h[85] initio=46
initsdl G:500 DEF sdl.h[154] initsdl=
initsdl G:500 FN sdl.b[145] LET initsdl()=..
initsdl G:500 LG com/bucketflt.b[1187] initsdl()
inprod G:450 DEF sdl.h[66] inprod=g_sdlbase
inprod G:450 FN sdl.b[45] LET inprod(v,w)=..
input G:58 DEF libhdr.h[97] input=58
instrcount G:121 DEF libhdr.h[161] instrcount=121
interpolate G:529 DEF sdl.h[205] interpolate=
interpolate G:529 FN sdl.b[92] LET interpolate(p,p1,p2,q1,q2)=..
interpolate G:529 LG sdl.b[118] RESULTIS interpolate(p,p2,p1,q2,q1)
interpolate G:529 LG sdl.b[130] res:=interpolate(p,p1,midp,...)
interpolate G:529 LG sdl.b[131] res:=interpolate(p-midp,midp,p2,...)
interpolate G:529 LG sdl.b[141] interpolate(p,p1,p2,q1,q2)
interpolate G:529 LG sdl.b[4060] x0:=interpolate(0,y0,y1,...)
interpolate G:529 LG sdl.b[4061] sz0:=interpolate(0,y0,y1,...)
interpolate G:529 LG sdl.b[4069] x0:=interpolate(curryupb,y0,y1,...)
interpolate G:529 LG sdl.b[4070] sz0:=interpolate(curryupb,y0,y1,...)
interpolate G:529 LG sdl.b[4078] x1:=interpolate(0,y0,y1,...)
interpolate G:529 LG sdl.b[4079] sz1:=interpolate(0,y0,y1,...)
interpolate G:529 LG sdl.b[4087] x1:=interpolate(curryupb,y0,y1,...)
interpolate G:529 LG sdl.b[4088] sz1:=interpolate(curryupb,y0,y1,...)
interpolate G:529 LG sdl.b[4123] leftzv!y:=interpolate(s,0,smax,...)
interpolate G:529 LG sdl.b[4130] rightzv!y:=interpolate(s,0,smax,...)
interpolate G:529 LG sdl.b[4245] x1:=interpolate(fardepth,z3,z1,...)
interpolate G:529 LG sdl.b[4246] y1:=interpolate(fardepth,z3,z1,...)
interpolate G:529 LG sdl.b[4248] x2:=interpolate(fardepth,z3,z2,...)
interpolate G:529 LG sdl.b[4249] y2:=interpolate(fardepth,z3,z2,...)
interpolate G:529 LG sdl.b[4276] interpolate(fardepth,z2,z1,x2,x1)
interpolate G:529 LG sdl.b[4277] interpolate(fardepth,z2,z1,y2,y1)
interpolate G:529 LG sdl.b[4279] x1:=interpolate(fardepth,z3,z1,...)
interpolate G:529 LG sdl.b[4280] y1:=interpolate(fardepth,z3,z1,...)
interpolate G:529 LG sdl.b[4309] x2:=interpolate(neardepth,z2,z1,...)
interpolate G:529 LG sdl.b[4310] y2:=interpolate(neardepth,z2,z1,...)
interpolate G:529 LG sdl.b[4312] x3:=interpolate(neardepth,z3,z1,...)
interpolate G:529 LG sdl.b[4313] y3:=interpolate(neardepth,z3,z1,...)
interpolate G:529 LG sdl.b[4338] interpolate(neardepth,z3,z2,x3,x2)
interpolate G:529 LG sdl.b[4339] interpolate(neardepth,z3,z2,y3,y2)
interpolate G:529 LG sdl.b[4341] x3:=interpolate(neardepth,z3,z1,...)
interpolate G:529 LG sdl.b[4342] y3:=interpolate(neardepth,z3,z1,...)
interpolate G:529 LG sdl.b[4379] sz0:=interpolate(0,x0,x1,...)
interpolate G:529 LG sdl.b[4383] sz1:=interpolate(currxsize-1,x0,x1,...)
interpolate G:529 LG sdl.b[4409] interpolate(x,x0,x1,sz0,sz1)
interpolate1 F:16 FN sdl.b[98] LET interpolate1(p,p1,p2,q1,q2)=..
interpolate1 F:16 LF sdl.b[93] interpolate1(p,p1,p2,q1,q2)
intflag G:119 DEF libhdr.h[159] intflag=119
isrregs M:41 DEF libhdr.h[532] isrregs=41
joystick G:461 DEF sdl.h[80] joystick=
joystick1 G:462 DEF sdl.h[80] joystick1=
klibregs M:21 DEF libhdr.h[527] klibregs=21
leftxv G:473 DEF sdl.h[96] leftxv=
leftxv G:473 LG sdl.b[285] IF leftxv DO ..
leftxv G:473 LG sdl.b[285] freevec(leftxv)
leftxv G:473 LG sdl.b[3649] IF leftxv!y>x DO ..
leftxv G:473 LG sdl.b[3650] leftxv!y:=x
leftxv G:473 LG sdl.b[3681] UNLESS leftxv&rightxv DO ..
leftxv G:473 LG sdl.b[3687] leftxv!y:=currysize
leftxv G:473 LG sdl.b[3718] moveto(leftxv!y,y)
leftxv G:473 LG sdl.b[3721] leftxv!y:=currysize-1
leftxv G:473 LG sdl.b[4120] IF leftxv!y>=x DO ..
leftxv G:473 LG sdl.b[4121] leftxv!y:=x
leftxv G:473 LG sdl.b[4136]
    writef("*nleft'maxy=%n*n",leftxv!y,leftzv!y,rightxv!y,rightzv!y,miny,maxy)
leftxv G:473 LG sdl.b[4363] leftxv!y:=currxsize
leftxv G:473 LG sdl.b[4373] leftxv!y
leftxv G:473 LG sdl.b[4420] leftxv!y:=currxsize
leftxv G:473 LG sdl.b[4428] IF leftxv!y<=rightxv!y DO ..
leftxv G:473 LG sdl.b[4429]
    writef("y=%i3'n %n:%n*n",y,leftxv!y,leftzv!y,rightxv!y,rightzv!y)
leftxv G:473 SG sdl.b[199] leftxv:=0
leftxv G:473 SG sdl.b[3679] leftxv:=getvec(curryupb)
leftzv G:474 DEF sdl.h[98] leftzv=
leftzv G:474 LG sdl.b[287] IF leftzv DO ..
leftzv G:474 LG sdl.b[287] freevec(leftzv)
leftzv G:474 LG sdl.b[4123] leftzv!y:=interpolate(s,0,smax,...)
leftzv G:474 LG sdl.b[4135] IF leftzv!y=500 DO ..
leftzv G:474 LG sdl.b[4136]
    writef("*nleft'maxy=%n*n",leftxv!y,leftzv!y,rightxv!y,rightzv!y,miny,maxy)
leftzv G:474 LG sdl.b[4164] UNLESS leftzv*rightzv*depthv DO ..
leftzv G:474 LG sdl.b[4170] leftzv!y:=currysize
leftzv G:474 LG sdl.b[4373] leftzv!y
leftzv G:474 LG sdl.b[4421] leftzv!y:=0
leftzv G:474 LG sdl.b[4429]
    writef("y=%i3'n %n:%n*n",y,leftxv!y,leftzv!y,rightxv!y,rightzv!y)
leftzv G:474 SG sdl.b[188] leftzv:=0
leftzv G:474 SG sdl.b[4160] leftzv:=getvec(curryupb)
level G:15 DEF libhdr.h[54] level=15
loadseg G:105 DEF libhdr.h[145] loadseg=105
locatedir G:80 DEF libhdr.h[119] locatedir=80
locateobj G:81 DEF libhdr.h[120] locateobj=81
longjump G:16 DEF libhdr.h[55] longjump=16
maprgb G:503 DEF sdl.h[157] maprgb=
maprgb G:503 FN sdl.b[280] LET maprgb(r,g,b)=..
maprgb G:503 LG com/bucketflt.b[1211] backcolour:=maprgb(120,120,120)
maprgb G:503 LG com/bucketflt.b[1212] bucketcolour:=maprgb(170,60,30)
maprgb G:503 LG com/bucketflt.b[1213] bucketendcolour:=maprgb(140,30,30)
maprgb G:503 LG com/bucketflt.b[1214] ball1colour:=maprgb(255,0,0)
maprgb G:503 LG com/bucketflt.b[1215] ball2colour:=maprgb(0,255,0)
maprgb G:503 LG com/bucketflt.b[1216] ball3colour:=maprgb(0,0,255)
maprgb G:503 LG com/bucketflt.b[1217] batcolour:=maprgb(40,40,40)
maprgb G:503 LG com/bucketflt.b[862] maprgb(64,64,64)
maprgb G:503 LG com/bucketflt.b[976] setcolour(maprgb(255,255,255))
maxdepth G:481 DEF sdl.h[116] maxdepth=
maxdepth G:481 LG sdl.b[351] depthv!p:=maxdepth
maxdepth G:481 LG sdl.b[4172] depthv!i:=maxdepth
maxdepth G:481 SG sdl.b[194] maxdepth:=#x3B9ACA00
maxint M:#x7FFFFFFF DEF libhdr.h[258] maxint=minint-1
maxy G:478 DEF sdl.h[109] maxy=
maxy G:478 LG sdl.b[3652] IF maxy<y DO ..
maxy G:478 LG sdl.b[3657] IF maxy<y DO ..
maxy G:478 LG sdl.b[3714] FOR y=miny TO maxy DO..
maxy G:478 LG sdl.b[4125] IF y>maxy DO ..
maxy G:478 LG sdl.b[4132] IF y>maxy DO ..
maxy G:478 LG sdl.b[4136]
    writef("*nleft'maxy=%n*n",leftxv!y,leftzv!y,rightxv!y,rightzv!y,miny,maxy)
maxy G:478 LG sdl.b[4371] FOR y=miny TO maxy DO..
maxy G:478 LG sdl.b[4427] writef("chkli'maxy=%n*n",miny,maxy)
maxy G:478 SG sdl.b[200] maxy:=-1
maxy G:478 SG sdl.b[3652] maxy:=y
maxy G:478 SG sdl.b[3657] maxy:=y
maxy G:478 SG sdl.b[3697] maxy:=-1
maxy G:478 SG sdl.b[4125] maxy:=y
maxy G:478 SG sdl.b[4132] maxy:=y
maxy G:478 SG sdl.b[4361] maxy:=-1
mcaddrinc M:4 DEF libhdr.h[256] mcaddrinc=bytesperword
memoryfree G:131 DEF libhdr.h[171] memoryfree=131
midx FG:256 DEF com/bucketflt.b[105] FLT midx=
midx FG:256 LG com/bucketflt.b[1318] batxdotdot#:=(midx#-batx)#/4
midx FG:256 LG com/bucketflt.b[620] batpushxdotdot#:=(midx#-batx)#*3#/4
midx FG:256 LG com/bucketflt.b[661] TEST selx#>midx THEN .. ELSE ..
midx FG:256 SG com/bucketflt.b[1257] midx#:=(wall_lx#+wall_rx)#/ 2.000
mindepth G:482 DEF sdl.h[117] mindepth=
mindepth G:482 SG sdl.b[195] mindepth:=-#x3B9ACA00
minint M:#x80000000 DEF libhdr.h[257] minint=1<<bitsperword-1
minint M:#x80000000 MAN libhdr.h[258] maxint=minint-1
miny G:477 DEF sdl.h[108] miny=
miny G:477 LG sdl.b[3651] IF miny>y DO ..
miny G:477 LG sdl.b[3656] IF miny>y DO ..
miny G:477 LG sdl.b[3714] FOR y=miny TO maxy DO..
miny G:477 LG sdl.b[4124] IF y<miny DO ..
miny G:477 LG sdl.b[4131] IF y<miny DO ..
miny G:477 LG sdl.b[4136]
    writef("*nleft'maxy=%n*n",leftxv!y,leftzv!y,rightxv!y,rightzv!y,miny,maxy)
miny G:477 LG sdl.b[4371] FOR y=miny TO maxy DO..
miny G:477 LG sdl.b[4427] writef("chkli'maxy=%n*n",miny,maxy)
miny G:477 SG sdl.b[200] miny:=0
miny G:477 SG sdl.b[3651] miny:=y
miny G:477 SG sdl.b[3656] miny:=y
miny G:477 SG sdl.b[3697] miny:=currysize
miny G:477 SG sdl.b[4124] miny:=y
miny G:477 SG sdl.b[4131] miny:=y
miny G:477 SG sdl.b[4361] miny:=currysize
mkscreen G:501 DEF sdl.h[155] mkscreen=
mkscreen G:501 FN sdl.b[208] LET mkscreen(title,xsize,ysize)=..
mkscreen G:501 LG com/bucketflt.b[1188]
    mkscreen("Ball 'd Bucket",800,500)
mkscreen G:501 LG sdl.b[271] UNLESS mkscreen(title,xsize,ysize) DO ..
mkscreen3d G:502 DEF sdl.h[156] mkscreen3d=
mkscreen3d G:502 FN sdl.b[266] LET mkscreen3d(title,xsize,ysize)=..
mksurface G:508 DEF sdl.h[165] mksurface=
mksurface G:508 FN sdl.b[298] LET mksurface(w,h,surfptr)=..
mksurface G:508 LG com/bucketflt.b[828]
    UNLESS mksurface(FIX width,FIX height,surfptr) DO ..
mksurface G:508 LG com/bucketflt.b[850]
    UNLESS mksurface(FIX width,FIX height,surfptr) DO ..
mksurface G:508 LG com/bucketflt.b[880]
    UNLESS mksurface(FIX width,FIX height,surfptr) DO ..
mousebuttons G:493 DEF sdl.h[143] mousebuttons=
mousex G:491 DEF sdl.h[140] mousex=
mousey G:492 DEF sdl.h[141] mousey=
moveby G:512 DEF sdl.h[171] moveby=
moveby G:512 RT sdl.b[366] LET moveby(dx,dy)BE..
moveby3d G:544 DEF sdl.h[238] moveby3d=
moveby3d G:544 RT sdl.b[3983] LET moveby3d(dx,dy,dsz)BE..
movesurf G:526 DEF sdl.h[196] movesurf=
moveto G:511 DEF sdl.h[170] moveto=
moveto G:511 LG sdl.b[3605] moveto(x,y)
moveto G:511 LG sdl.b[366] moveto(currx+dx,curry+dy)
moveto G:511 LG sdl.b[3718] moveto(leftxv!y,y)
moveto G:511 RT sdl.b[365] LET moveto(x,y)BE..
moveto3d G:543 DEF sdl.h[235] moveto3d=
moveto3d G:543 RT sdl.b[3980] LET moveto3d(x,y,sz)BE..
muldiv G:5 DEF libhdr.h[43] muldiv=5
muldiv G:5 LG sdl.b[112] RESULTIS q1+muldiv(q2-q1,p-p1,p2-p1)
muldiv G:5 LG sdl.b[137] RESULTIS q1+muldiv(q2-q1,p-p1,p2-p1)
neardepth G:483 DEF sdl.h[119] neardepth=
neardepth G:483 LG sdl.b[4229] IF z3>fardepth|z1<neardepth DO ..
neardepth G:483 LG sdl.b[4290] IF z3<neardepth DO ..
neardepth G:483 LG sdl.b[4290] TEST z2<neardepth THEN .. ELSE ..
neardepth G:483 LG sdl.b[4309] x2:=interpolate(neardepth,z2,z1,...)
neardepth G:483 LG sdl.b[4310] y2:=interpolate(neardepth,z2,z1,...)
neardepth G:483 LG sdl.b[4311] z2:=neardepth
neardepth G:483 LG sdl.b[4312] x3:=interpolate(neardepth,z3,z1,...)
neardepth G:483 LG sdl.b[4313] y3:=interpolate(neardepth,z3,z1,...)
neardepth G:483 LG sdl.b[4314] z3:=neardepth
neardepth G:483 LG sdl.b[4338] interpolate(neardepth,z3,z2,x3,x2)
neardepth G:483 LG sdl.b[4339] interpolate(neardepth,z3,z2,y3,y2)
neardepth G:483 LG sdl.b[4340] neardepth
neardepth G:483 LG sdl.b[4341] x3:=interpolate(neardepth,z3,z1,...)
neardepth G:483 LG sdl.b[4342] y3:=interpolate(neardepth,z3,z1,...)
neardepth G:483 LG sdl.b[4343] z3:=neardepth
neardepth G:483 LG sdl.b[4390]
    writef("drawt'th = %n*n",neardepth,fardepth)
neardepth G:483 SG sdl.b[4436] neardepth:=near
newline G:84 DEF libhdr.h[123] newline=84
newline G:84 LG com/bucketflt.b[1086] newline()
newline G:84 LG sdl.b[4430] newline()
newpage G:120 DEF libhdr.h[160] newpage=120
note G:63 DEF libhdr.h[102] note=63
notinuse M:-1 DEF libhdr.h[693] notinuse=-1
output G:59 DEF libhdr.h[98] output=59
packstring G:30 DEF libhdr.h[69] packstring=30
pathfindinput G:53 DEF libhdr.h[92] pathfindinput=53
peercom G:179 DEF libhdr.h[228] peercom=179
pkt_a1 M:5 DEF libhdr.h[702] pkt_a1=5
pkt_a2 M:6 DEF libhdr.h[703] pkt_a2=6
pkt_a3 M:7 DEF libhdr.h[704] pkt_a3=7
pkt_a4 M:8 DEF libhdr.h[705] pkt_a4=8
pkt_a5 M:9 DEF libhdr.h[706] pkt_a5=9
pkt_a6 M:10 DEF libhdr.h[707] pkt_a6=10
pkt_arg1 M:5 DEF libhdr.h[702] pkt_arg1=5
pkt_arg2 M:6 DEF libhdr.h[703] pkt_arg2=6
pkt_arg3 M:7 DEF libhdr.h[704] pkt_arg3=7
pkt_arg4 M:8 DEF libhdr.h[705] pkt_arg4=8
pkt_arg5 M:9 DEF libhdr.h[706] pkt_arg5=9
pkt_arg6 M:10 DEF libhdr.h[707] pkt_arg6=10
pkt_devid M:1 DEF libhdr.h[698] pkt_devid=1
pkt_devtaskid M:1 DEF libhdr.h[698] pkt_devtaskid=1
pkt_id M:1 DEF libhdr.h[698] pkt_id=1
pkt_link M:0 DEF libhdr.h[697] pkt_link=0
pkt_op M:2 DEF libhdr.h[699] pkt_op=2
pkt_r1 M:3 DEF libhdr.h[700] pkt_r1=3
pkt_r2 M:4 DEF libhdr.h[701] pkt_r2=4
pkt_res1 M:3 DEF libhdr.h[700] pkt_res1=3
pkt_res2 M:4 DEF libhdr.h[701] pkt_res2=4
pkt_taskid M:1 DEF libhdr.h[698] pkt_taskid=1
pkt_type M:2 DEF libhdr.h[699] pkt_type=2
plotscreen F:63 LF com/bucketflt.b[1333] plotscreen()
plotscreen F:63 RT com/bucketflt.b[888] LET plotscreen()BE..
point G:64 DEF libhdr.h[103] point=64
pollingch M:-3 DEF libhdr.h[262] pollingch=-3
prevballno G:309 DEF com/bucketflt.b[136] prevballno=
processevents F:65 LF com/bucketflt.b[1314] processevents()
processevents F:65 RT com/bucketflt.b[1033] LET processevents()BE..
prstate F:16 LF com/bucketflt.b[470] prstate()
prstate F:16 RT com/bucketflt.b[455] LET prstate()BE..
pushlevel FG:217 DEF com/bucketflt.b[42] FLT pushlevel=
pushlevel FG:217 LG com/bucketflt.b[1091]
    writef("pushl'l=%8.5f*n",pushlevel)
pushlevel FG:217 LG com/bucketflt.b[643]
    TEST sely#<pushlevel THEN .. ELSE ..
pushlevel FG:217 SG com/bucketflt.b[1149] pushlevel#:=ballradius#* 6.000
put_record G:72 DEF libhdr.h[111] put_record=72
putword G:33 DEF libhdr.h[72] putword=33
qpkt G:161 DEF libhdr.h[215] qpkt=161
radius G:454 DEF sdl.h[70] radius=
radius G:454 FN sdl.b[86] LET radius(v)=..
randno G:34 DEF libhdr.h[73] randno=34
randno G:34 LG com/bucketflt.b[515]
    ax1#:=ax1#+FLOAT (...-1001)#/ 100000.000
randno G:34 LG com/bucketflt.b[516]
    ax2#:=ax2#+FLOAT (...-1001)#/ 100000.000
randno G:34 LG com/bucketflt.b[517]
    ax3#:=ax3#+FLOAT (...-1001)#/ 100000.000
randseed G:127 DEF libhdr.h[167] randseed=127
randseed G:127 SG com/bucketflt.b[1139] randseed:=12345
rdargs G:102 DEF libhdr.h[142] rdargs=102
rdargs2 G:26 DEF libhdr.h[65] rdargs2=26
rdch G:38 DEF libhdr.h[77] rdch=38
rditem G:103 DEF libhdr.h[143] rditem=103
readflt G:74 DEF libhdr.h[113] readflt=74
readn G:83 DEF libhdr.h[122] readn=83
readwords G:44 DEF libhdr.h[83] readwords=44
rebound F:12 FN com/bucketflt.b[287] LET rebound(FLT vel)=..
rebound F:12 LF com/bucketflt.b[197] tdot#:=rebound(tdot)
rebound F:12 LF com/bucketflt.b[221] t1dot#:=rebound(t1dot)
rebound F:12 LF com/bucketflt.b[262] t1dot#:=rebound(t1dot)
rebound F:12 LF com/bucketflt.b[263] t2dot#:=rebound(t2dot)
rebound F:12 LF com/bucketflt.b[353] p!2:=rebound(xdot)
rebound F:12 LF com/bucketflt.b[358] p!2:=rebound(xdot)
rebound F:12 LF com/bucketflt.b[363] p!2:=rebound(xdot)
rebound F:12 LF com/bucketflt.b[368] p!2:=rebound(xdot)
rebound F:12 LF com/bucketflt.b[381] p!3:=rebound(ydot)
rebound F:12 LF com/bucketflt.b[388] p!3:=rebound(ydot)
rebound F:12 LF com/bucketflt.b[426] p!2:=rebound(xdot)
rebound F:12 LF com/bucketflt.b[432] p!2:=rebound(xdot)
rebound F:12 LF com/bucketflt.b[438] p!3:=rebound(ydot)
rebound F:12 LF com/bucketflt.b[447] p!3:=rebound(ydot)
recordnote G:70 DEF libhdr.h[109] recordnote=70
recordpoint G:69 DEF libhdr.h[108] recordpoint=69
release G:159 DEF libhdr.h[213] release=159
renamefile G:77 DEF libhdr.h[116] renamefile=77
resetballs F:64 LF com/bucketflt.b[1067] resetballs()
resetballs F:64 LF com/bucketflt.b[1098] resetballs()
resetballs F:64 LF com/bucketflt.b[1293] resetballs()
resetballs F:64 RT com/bucketflt.b[1017] LET resetballs()BE..
resizescreen G:523 DEF sdl.h[189] resizescreen=
result2 G:10 DEF libhdr.h[48] result2=10
result2 G:10 LG com/bucketflt.b[1176] s#:=result2
result2 G:10 LG com/bucketflt.b[183] result2
result2 G:10 LG com/bucketflt.b[636] result2
result2 G:10 SG com/bucketflt.b[308] result2#:=s
result2 G:10 SG com/bucketflt.b[819] result2#:=displaytime#+tbounce
resumeco G:21 DEF libhdr.h[60] resumeco=21
return_hard M:10 DEF libhdr.h[674] return_hard=10
return_hard M:10 MAN libhdr.h[679] cli_initialfaillevel=return_hard
return_ok M:0 DEF libhdr.h[676] return_ok=0
return_severe M:20 DEF libhdr.h[673] return_severe=20
return_soft M:5 DEF libhdr.h[675] return_soft=5
returnpkt G:169 DEF libhdr.h[220] returnpkt=169
rewindstream G:65 DEF libhdr.h[104] rewindstream=65
rightxv G:475 DEF sdl.h[102] rightxv=
rightxv G:475 LG sdl.b[286] IF rightxv DO ..
rightxv G:475 LG sdl.b[286] freevec(rightxv)
rightxv G:475 LG sdl.b[3654] IF rightxv!y<x DO ..
rightxv G:475 LG sdl.b[3655] rightxv!y:=x
rightxv G:475 LG sdl.b[3681] UNLESS leftxv&rightxv DO ..
rightxv G:475 LG sdl.b[3687] rightxv!y:=-1
rightxv G:475 LG sdl.b[3719] drawto(rightxv!y,y)
rightxv G:475 LG sdl.b[3721] rightxv!y:=0
rightxv G:475 LG sdl.b[4127] IF rightxv!y<x DO ..
rightxv G:475 LG sdl.b[4128] rightxv!y:=x
rightxv G:475 LG sdl.b[4136]
    writef("*nleft'maxy=%n*n",leftxv!y,leftzv!y,rightxv!y,rightzv!y,miny,maxy)
rightxv G:475 LG sdl.b[4363] rightxv!y:=-1
rightxv G:475 LG sdl.b[4374] rightxv!y
rightxv G:475 LG sdl.b[4420] rightxv!y:=-1
rightxv G:475 LG sdl.b[4428] IF leftxv!y<=rightxv!y DO ..
rightxv G:475 LG sdl.b[4429]
    writef("y=%i3'n %n:%n*n",y,leftxv!y,leftzv!y,rightxv!y,rightzv!y)
rightxv G:475 SG sdl.b[199] rightxv:=0
rightxv G:475 SG sdl.b[3680] rightxv:=getvec(curryupb)
rightzv G:476 DEF sdl.h[104] rightzv=
rightzv G:476 LG sdl.b[288] IF rightzv DO ..
rightzv G:476 LG sdl.b[288] freevec(rightzv)
rightzv G:476 LG sdl.b[4130] rightzv!y:=interpolate(s,0,smax,...)
rightzv G:476 LG sdl.b[4136]
    writef("*nleft'maxy=%n*n",leftxv!y,leftzv!y,rightxv!y,rightzv!y,miny,maxy)
rightzv G:476 LG sdl.b[4164] UNLESS leftzv*rightzv*depthv DO ..
rightzv G:476 LG sdl.b[4170] rightzv!y:=-1
rightzv G:476 LG sdl.b[4374] rightzv!y
rightzv G:476 LG sdl.b[4421] rightzv!y:=0
rightzv G:476 LG sdl.b[4429]
    writef("y=%i3'n %n:%n*n",y,leftxv!y,leftzv!y,rightxv!y,rightzv!y)
rightzv G:476 SG sdl.b[188] rightzv:=0
rightzv G:476 SG sdl.b[4161] rightzv:=getvec(curryupb)
rootnode G:9 DEF libhdr.h[47] rootnode=9
rootnodeaddr M:100 DEF libhdr.h[307] rootnodeaddr=100
rtn_abortcode M:27 DEF libhdr.h[343] rtn_abortcode=
rtn_adjclock M:33 DEF libhdr.h[361] rtn_adjclock=
rtn_blib M:19 DEF libhdr.h[332] rtn_blib=
rtn_blklist M:4 DEF libhdr.h[314] rtn_blklist=
rtn_boot M:17 DEF libhdr.h[330] rtn_boot=
rtn_boottrace M:39 DEF libhdr.h[376] rtn_boottrace=
rtn_bptaddr M:9 DEF libhdr.h[321] rtn_bptaddr=
rtn_bptinstr M:10 DEF libhdr.h[322] rtn_bptinstr=
rtn_clkintson M:6 DEF libhdr.h[317] rtn_clkintson=
rtn_clwkq M:12 DEF libhdr.h[325] rtn_clwkq=
rtn_context M:28 DEF libhdr.h[344] rtn_context=
rtn_crntask M:3 DEF libhdr.h[313] rtn_crntask=
rtn_days M:40 DEF libhdr.h[379] rtn_days=
rtn_dbgvars M:11 DEF libhdr.h[323] rtn_dbgvars=
rtn_dcountv M:34 DEF libhdr.h[363] rtn_dcountv=
rtn_devtab M:1 DEF libhdr.h[311] rtn_devtab=
rtn_dumpflag M:25 DEF libhdr.h[340] rtn_dumpflag=
rtn_envlist M:26 DEF libhdr.h[341] rtn_envlist=
rtn_fast M:67 DEF libhdr.h[434] rtn_fast=
rtn_gvecsize M:63 DEF libhdr.h[413] rtn_gvecsize=
rtn_hdrsvar M:37 DEF libhdr.h[372] rtn_hdrsvar=
rtn_hostaddsize M:62 DEF libhdr.h[410] rtn_hostaddsize=
rtn_icountmax M:48 DEF libhdr.h[393] rtn_icountmax=
rtn_idletcb M:32 DEF libhdr.h[360] rtn_idletcb=
rtn_info M:15 DEF libhdr.h[328] rtn_info=
rtn_insadebug M:8 DEF libhdr.h[319] rtn_insadebug=
rtn_intflag M:24 DEF libhdr.h[339] rtn_intflag=
rtn_joyaxis0 M:55 DEF libhdr.h[402] rtn_joyaxis0=
rtn_joyaxis1 M:56 DEF libhdr.h[403] rtn_joyaxis1=
rtn_joyaxis2 M:57 DEF libhdr.h[404] rtn_joyaxis2=
rtn_joyaxis3 M:58 DEF libhdr.h[405] rtn_joyaxis3=
rtn_joyaxis4 M:59 DEF libhdr.h[406] rtn_joyaxis4=
rtn_joyaxis5 M:60 DEF libhdr.h[407] rtn_joyaxis5=
rtn_joyaxis6 M:61 DEF libhdr.h[408] rtn_joyaxis6=
rtn_joyaxiscount M:52 DEF libhdr.h[399] rtn_joyaxiscount=
rtn_joybuttoncount M:51 DEF libhdr.h[398] rtn_joybuttoncount=
rtn_joybuttons M:54 DEF libhdr.h[401] rtn_joybuttons=
rtn_joycurrbuttons M:53 DEF libhdr.h[400] rtn_joycurrbuttons=
rtn_joystickfd M:49 DEF libhdr.h[396] rtn_joystickfd=
rtn_joystickfd1 M:50 DEF libhdr.h[397] rtn_joystickfd1=
rtn_keyboard M:20 DEF libhdr.h[333] rtn_keyboard=
rtn_klib M:18 DEF libhdr.h[331] rtn_klib=
rtn_lastch M:7 DEF libhdr.h[318] rtn_lastch=
rtn_mc0 M:43 DEF libhdr.h[385] rtn_mc0=
rtn_mc1 M:44 DEF libhdr.h[387] rtn_mc1=
rtn_mc2 M:45 DEF libhdr.h[388] rtn_mc2=
rtn_mc3 M:46 DEF libhdr.h[389] rtn_mc3=
rtn_membase M:13 DEF libhdr.h[326] rtn_membase=
rtn_memsize M:14 DEF libhdr.h[327] rtn_memsize=
rtn_msecs M:41 DEF libhdr.h[380] rtn_msecs=
rtn_pathvar M:36 DEF libhdr.h[370] rtn_pathvar=
rtn_quietflag M:66 DEF libhdr.h[424] rtn_quietflag=
rtn_rootvar M:35 DEF libhdr.h[368] rtn_rootvar=
rtn_screen M:21 DEF libhdr.h[334] rtn_screen=
rtn_scriptsvar M:38 DEF libhdr.h[374] rtn_scriptsvar=
rtn_stderr M:68 DEF libhdr.h[438] rtn_stderr=
rtn_sys M:16 DEF libhdr.h[329] rtn_sys=
rtn_sysg M:30 DEF libhdr.h[353] rtn_sysg=
rtn_sysp M:29 DEF libhdr.h[352] rtn_sysp=
rtn_sysst M:31 DEF libhdr.h[354] rtn_sysst=
rtn_system M:47 DEF libhdr.h[391] rtn_system=
rtn_tallyv M:5 DEF libhdr.h[315] rtn_tallyv=
rtn_tasktab M:0 DEF libhdr.h[310] rtn_tasktab=0
rtn_tcblist M:2 DEF libhdr.h[312] rtn_tcblist=
rtn_ttyinwkq M:64 DEF libhdr.h[421] rtn_ttyinwkq=
rtn_ttyinwkqe M:65 DEF libhdr.h[422] rtn_ttyinwkqe=
rtn_upb M:80 DEF libhdr.h[440] rtn_upb=80
rtn_usecs M:42 DEF libhdr.h[381] rtn_usecs=
rtn_vecstatsv M:22 DEF libhdr.h[336] rtn_vecstatsv=
rtn_vecstatsvupb M:23 DEF libhdr.h[337] rtn_vecstatsvupb=
sardch G:36 DEF libhdr.h[75] sardch=36
saveregs M:31 DEF libhdr.h[528] saveregs=31
sawrch G:37 DEF libhdr.h[76] sawrch=37
sawritef G:95 DEF libhdr.h[135] sawritef=95
sawritef G:95 LG sdl.b[3682] sawritef("getve'failure*n")
scb_blength M:14 DEF libhdr.h[600] scb_blength=
scb_block M:9 DEF libhdr.h[595] scb_block=
scb_buf M:3 DEF libhdr.h[589] scb_buf=
scb_bufend M:11 DEF libhdr.h[597] scb_bufend=
scb_encoding M:20 DEF libhdr.h[611] scb_encoding=
scb_end M:5 DEF libhdr.h[591] scb_end=
scb_endfn M:8 DEF libhdr.h[594] scb_endfn=
scb_fd M:16 DEF libhdr.h[602] scb_fd=
scb_fd1 M:17 DEF libhdr.h[603] scb_fd1=
scb_id M:0 DEF libhdr.h[586] scb_id=0
scb_lblock M:12 DEF libhdr.h[598] scb_lblock=
scb_ldata M:13 DEF libhdr.h[599] scb_ldata=
scb_maxnamelen M:31 DEF libhdr.h[584] scb_maxnamelen=31
scb_maxnamelen M:31 MAN libhdr.h[615]
    scb_nameeend=scb_name+scb_maxnamelen/bytesperword
scb_name M:21 DEF libhdr.h[613] scb_name=
scb_name M:21 MAN libhdr.h[615]
    scb_nameeend=scb_name+scb_maxnamelen/bytesperword
scb_nameeend M:28 DEF libhdr.h[615]
    scb_nameeend=scb_name+scb_maxnamelen/bytesperword
scb_pos M:4 DEF libhdr.h[590] scb_pos=
scb_rdfn M:6 DEF libhdr.h[592] scb_rdfn=
scb_reclen M:15 DEF libhdr.h[601] scb_reclen=
scb_size M:29 DEF libhdr.h[618] scb_size=
scb_size M:29 MAN libhdr.h[619] scb_upb=scb_size-1
scb_task M:2 DEF libhdr.h[588] scb_task=
scb_timeout M:18 DEF libhdr.h[604] scb_timeout=
scb_timeoutact M:19 DEF libhdr.h[607] scb_timeoutact=
scb_type M:1 DEF libhdr.h[587] scb_type=
scb_upb M:28 DEF libhdr.h[619] scb_upb=scb_size-1
scb_wrfn M:7 DEF libhdr.h[593] scb_wrfn=
scb_write M:10 DEF libhdr.h[596] scb_write=
scbt_console M:-1 DEF libhdr.h[580] scbt_console=-1
scbt_file M:1 DEF libhdr.h[578] scbt_file=1
scbt_mbx M:-2 DEF libhdr.h[581] scbt_mbx=-2
scbt_net M:2 DEF libhdr.h[577] scbt_net=2
scbt_ram M:0 DEF libhdr.h[579] scbt_ram=0
scbt_tcp M:-3 DEF libhdr.h[582] scbt_tcp=-3
screen G:455 DEF sdl.h[72] screen=
screen G:455 LLG com/bucketflt.b[889]
    selectsurface(@screen,screenxsize,screenysize)
screen G:455 LLG com/bucketflt.b[911]
    blitsurf(@bucketwallsurf,@screen,FIX bucket_lxl,FIX bucket_tyt)
screen G:455 LLG com/bucketflt.b[917]
    blitsurf(@bucketwallsurf,@screen,FIX bucket_rxl,FIX bucket_tyt)
screen G:455 LLG com/bucketflt.b[925]
    blitsurf(@bucketbasesurf,@screen,FIX bucket_lxc,FIX (bucket_byt- 1.000))
screen G:455 LLG com/bucketflt.b[932]
    writef("Calli' %n %n)*n",@batsurf,@screen,FIX (batx-batradius),FIX (baty+batradius))
screen G:455 LLG com/bucketflt.b[935]
    blitsurf(@batsurf,@screen,FIX (batx-batradius),FIX (baty+batradius))
screen G:455 LLG com/bucketflt.b[942]
    blitsurf(@ball1surf,@screen,FIX (cgx1-ballradius),FIX (cgy1+ballradius))
screen G:455 LLG com/bucketflt.b[954]
    blitsurf(@ball2surf,@screen,FIX (cgx2-ballradius),FIX (cgy2+ballradius))
screen G:455 LLG com/bucketflt.b[966]
    blitsurf(@ball3surf,@screen,FIX (cgx3-ballradius),FIX (cgy3+ballradius))
screen G:455 LLG sdl.b[229]
    ok:=sys(Sys_sdl,sdl_setvideomode,screenxsize,...)
screen G:455 LLG sdl.b[253]
    sys(Sys_sdl,sdl_getsurfaceinfo,@screen,@flags)
screen G:455 LLG sdl.b[259] selectsurface(@screen,xsize,ysize)
screen G:455 LLG sdl.b[328] sys(Sys_sdl,sdl_flip,@screen)
screen1 G:456 DEF sdl.h[72] screen1=
screen_xc FG:257 DEF com/bucketflt.b[107] FLT screen_xc=
screen_xc FG:257 LG com/bucketflt.b[1021] cgx1#:=screen_xc
screen_xc FG:257 LG com/bucketflt.b[1022] cgx2#:=screen_xc
screen_xc FG:257 LG com/bucketflt.b[1023] cgx3#:=screen_xc
screen_xc FG:257 LG com/bucketflt.b[1264]
    bucket_lxr#:=screen_xc#-ballradius* 2.500
screen_xc FG:257 LG com/bucketflt.b[1268]
    bucket_rxl#:=screen_xc#+ballradius#* 2.500
screen_xc FG:257 LG com/bucketflt.b[1299] batx#:=screen_xc
screen_xc FG:257 SG com/bucketflt.b[1262]
    screen_xc#:=FLOAT (screenxsize/2)
screenxsize G:463 DEF sdl.h[83] screenxsize=
screenxsize G:463 LG com/bucketflt.b[1256]
    wall_rx#:=FLOAT (screenxsize-1)
screenxsize G:463 LG com/bucketflt.b[1262]
    screen_xc#:=FLOAT (screenxsize/2)
screenxsize G:463 LG com/bucketflt.b[889]
    selectsurface(@screen,screenxsize,screenysize)
screenxsize G:463 LG sdl.b[223] TEST screenxsize>300 THEN .. ELSE ..
screenxsize G:463 LG sdl.b[229]
    ok:=sys(Sys_sdl,sdl_setvideomode,screenxsize,...)
screenxsize G:463 SG sdl.b[220] screenxsize:=xsize
screenysize G:464 DEF sdl.h[84] screenysize=
screenysize G:464 LG com/bucketflt.b[1260]
    ceiling_yb#:=FLOAT (screenysize-1)
screenysize G:464 LG com/bucketflt.b[889]
    selectsurface(@screen,screenxsize,screenysize)
screenysize G:464 LG sdl.b[229]
    ok:=sys(Sys_sdl,sdl_setvideomode,screenxsize,...)
screenysize G:464 SG sdl.b[220] screenysize:=ysize
sdl_ANYFORMAT M:#x10000000 DEF sdl.h[397] sdl_ANYFORMAT=#x10000000
sdl_DOUBLEBUF M:#x40000000 DEF sdl.h[399] sdl_DOUBLEBUF=#x40000000
sdl_FULLSCREEN M:#x80000000 DEF sdl.h[400] sdl_FULLSCREEN=-#x80000000
sdl_HWPALETTE M:#x20000000 DEF sdl.h[398] sdl_HWPALETTE=#x20000000
sdl_HWSURFACE M:1 DEF sdl.h[395] sdl_HWSURFACE=1
sdl_NOFRAME M:32 DEF sdl.h[404] sdl_NOFRAME=32
sdl_OPENGL M:2 DEF sdl.h[401] sdl_OPENGL=2
sdl_OPENGLBLIT M:10 DEF sdl.h[402] sdl_OPENGLBLIT=10
sdl_RESIZABLE M:16 DEF sdl.h[403] sdl_RESIZABLE=16
sdl_SWSURFACE M:0 DEF sdl.h[394] sdl_SWSURFACE=0
sdl_SWSURFACE M:0 MAN sdl.b[229]
    ok:=sys(Sys_sdl,sdl_setvideomode,screenxsize,...)
sdl_avail M:0 DEF sdl.h[296] sdl_avail=0
sdl_avail M:0 MAN com/bucketflt.b[1152]
    UNLESS sys(Sys_sdl,sdl_avail) DO ..
sdl_blitsurface M:11 DEF sdl.h[309] sdl_blitsurface=
sdl_blitsurface M:11 MAN sdl.b[337]
    sys(Sys_sdl,sdl_blitsurface,srcptr,0,dstptr,@dx)
sdl_blitsurface M:11 MAN sdl.b[346]
    sys(Sys_sdl,sdl_blitsurface,srcptr,0,dstptr,@dx)
sdl_delay M:16 DEF sdl.h[314] sdl_delay=
sdl_delay M:16 MAN sdl.b[318] sys(Sys_sdl,sdl_delay,msecs)
sdl_displayformat M:18 DEF sdl.h[316] sdl_displayformat=
sdl_drawcircle M:30 DEF sdl.h[331] sdl_drawcircle=
sdl_drawellipse M:33 DEF sdl.h[334] sdl_drawellipse=
sdl_drawfillcircle M:37 DEF sdl.h[338] sdl_drawfillcircle=
sdl_drawfillellipse M:34 DEF sdl.h[335] sdl_drawfillellipse=
sdl_drawfillrect M:38 DEF sdl.h[339] sdl_drawfillrect=
sdl_drawfillround M:36 DEF sdl.h[337] sdl_drawfillround=
sdl_drawhline M:28 DEF sdl.h[329] sdl_drawhline=
sdl_drawline M:27 DEF sdl.h[328] sdl_drawline=
sdl_drawpixel M:32 DEF sdl.h[333] sdl_drawpixel=
sdl_drawrect M:31 DEF sdl.h[332] sdl_drawrect=
sdl_drawround M:35 DEF sdl.h[336] sdl_drawround=
sdl_drawvline M:29 DEF sdl.h[330] sdl_drawvline=
sdl_enable M:1 DEF sdl.h[369] sdl_enable=1
sdl_fillrect M:39 DEF sdl.h[341] sdl_fillrect=
sdl_fillrect M:39 MAN sdl.b[3754]
    sys(Sys_sdl,sdl_fillrect,@currsurf,xmin,currysize-ymax,...,...)
sdl_fillrect M:39 MAN sdl.b[398]
    sys(Sys_sdl,sdl_fillrect,@currsurf,x,currysize-y,1,...)
sdl_fillsurf M:40 DEF sdl.h[342] sdl_fillsurf=
sdl_fillsurf M:40 MAN sdl.b[350] sys(Sys_sdl,sdl_fillsurf,@currsurf,col)
sdl_flip M:17 DEF sdl.h[315] sdl_flip=
sdl_flip M:17 MAN sdl.b[328] sys(Sys_sdl,sdl_flip,@screen)
sdl_freesurface M:13 DEF sdl.h[311] sdl_freesurface=
sdl_freesurface M:13 MAN sdl.b[304] sys(Sys_sdl,sdl_freesurface,surfptr)
sdl_freewav M:23 DEF sdl.h[323] sdl_freewav=
sdl_geterror M:8 DEF sdl.h[306] sdl_geterror=
sdl_geterror M:8 MAN sdl.b[169] sys(Sys_sdl,sdl_geterror,mes)
sdl_geterror M:8 MAN sdl.b[240] sys(Sys_sdl,sdl_geterror,mes)
sdl_getfmtinfo M:7 DEF sdl.h[303] sdl_getfmtinfo=
sdl_getmousestate M:21 DEF sdl.h[321] sdl_getmousestate=
sdl_getsurfaceinfo M:6 DEF sdl.h[302] sdl_getsurfaceinfo=
sdl_getsurfaceinfo M:6 MAN sdl.b[253]
    sys(Sys_sdl,sdl_getsurfaceinfo,@screen,@flags)
sdl_getticks M:50 DEF sdl.h[355] sdl_getticks=
sdl_getticks M:50 MAN sdl.b[320] sys(Sys_sdl,sdl_getticks)
sdl_hidecursor M:52 DEF sdl.h[358] sdl_hidecursor=
sdl_hidecursor M:52 MAN sdl.b[323] sys(Sys_sdl,sdl_hidecursor)
sdl_ignore M:0 DEF sdl.h[368] sdl_ignore=0
sdl_imgload M:15 DEF sdl.h[313] sdl_imgload=
sdl_init M:1 DEF sdl.h[297] sdl_init=
sdl_init M:1 MAN sdl.b[167]
    IF sys(Sys_sdl,sdl_init,sdl_init_everything) DO ..
sdl_init_everything M:65535 DEF sdl.h[392] sdl_init_everything=65535
sdl_init_everything M:65535 MAN sdl.b[167]
    IF sys(Sys_sdl,sdl_init,sdl_init_everything) DO ..
sdl_joystickclose M:43 DEF sdl.h[347] sdl_joystickclose=
sdl_joystickeventstate M:49 DEF sdl.h[354] sdl_joystickeventstate=
sdl_joystickgetaxis M:56 DEF sdl.h[363] sdl_joystickgetaxis=
sdl_joystickgetball M:57 DEF sdl.h[364] sdl_joystickgetball=
sdl_joystickgetbutton M:55 DEF sdl.h[362] sdl_joystickgetbutton=
sdl_joystickgethat M:58 DEF sdl.h[365] sdl_joystickgethat=
sdl_joystickname M:44 DEF sdl.h[348] sdl_joystickname=
sdl_joysticknumaxes M:45 DEF sdl.h[349] sdl_joysticknumaxes=
sdl_joysticknumballs M:47 DEF sdl.h[351] sdl_joysticknumballs=
sdl_joysticknumbuttons M:46 DEF sdl.h[350] sdl_joysticknumbuttons=
sdl_joysticknumhats M:48 DEF sdl.h[352] sdl_joysticknumhats=
sdl_joystickopen M:42 DEF sdl.h[346] sdl_joystickopen=
sdl_loadbmp M:10 DEF sdl.h[308] sdl_loadbmp=
sdl_loadwav M:22 DEF sdl.h[322] sdl_loadwav=
sdl_locksurface M:4 DEF sdl.h[300] sdl_locksurface=
sdl_maprgb M:26 DEF sdl.h[327] sdl_maprgb=
sdl_maprgb M:26 MAN sdl.b[280] sys(Sys_sdl,sdl_maprgb,@format,r,g,b)
sdl_mksurface M:53 DEF sdl.h[359] sdl_mksurface=
sdl_mksurface M:53 MAN sdl.b[300]
    sys(Sys_sdl,sdl_mksurface,@format,w,h,surfptr)
sdl_numjoysticks M:41 DEF sdl.h[345] sdl_numjoysticks=
sdl_pollevent M:20 DEF sdl.h[319] sdl_pollevent=
sdl_pollevent M:20 MAN sdl.b[314]
    RESULTIS sys(Sys_sdl,sdl_pollevent,@eventtype)
sdl_quit M:3 DEF sdl.h[299] sdl_quit=
sdl_quit M:3 MAN sdl.b[290] sys(Sys_sdl,sdl_quit)
sdl_setalpha M:14 DEF sdl.h[312] sdl_setalpha=
sdl_setcolourkey M:12 DEF sdl.h[310] sdl_setcolourkey=
sdl_setcolourkey M:54 DEF sdl.h[360] sdl_setcolourkey=
sdl_setcolourkey M:54 MAN sdl.b[296]
    sys(Sys_sdl,sdl_setcolourkey,surfptr,col)
sdl_setvideomode M:2 DEF sdl.h[298] sdl_setvideomode=
sdl_setvideomode M:2 MAN sdl.b[229]
    ok:=sys(Sys_sdl,sdl_setvideomode,screenxsize,...)
sdl_showcursor M:51 DEF sdl.h[357] sdl_showcursor=
sdl_showcursor M:51 MAN sdl.b[325] sys(Sys_sdl,sdl_showcursor)
sdl_unlocksurface M:5 DEF sdl.h[301] sdl_unlocksurface=
sdl_updaterect M:9 DEF sdl.h[307] sdl_updaterect=
sdl_videoinfo M:25 DEF sdl.h[326] sdl_videoinfo=
sdl_waitevent M:19 DEF sdl.h[317] sdl_waitevent=
sdl_wm_setcaption M:24 DEF sdl.h[325] sdl_wm_setcaption=
sdl_wm_setcaption M:24 MAN sdl.b[282]
    sys(Sys_sdl,sdl_wm_setcaption,title,0)
sdldelay G:554 DEF sdl.h[278] sdldelay=
sdldelay G:554 LG com/bucketflt.b[1361] sdldelay(500)
sdldelay G:554 RT sdl.b[317] LET sdldelay(msecs)BE..
sdle_active M:1 DEF sdl.h[371] sdle_active=1
sdle_arrowdown M:274 DEF sdl.h[388] sdle_arrowdown=274
sdle_arrowleft M:276 DEF sdl.h[390] sdle_arrowleft=276
sdle_arrowleft M:276 MAN com/bucketflt.b[1108] CASE sdle_arrowleft:.. 
sdle_arrowleft M:276 MAN com/bucketflt.b[1122] CASE sdle_arrowleft:.. 
sdle_arrowright M:275 DEF sdl.h[389] sdle_arrowright=275
sdle_arrowright M:275 MAN com/bucketflt.b[1104] CASE sdle_arrowright:.. 
sdle_arrowright M:275 MAN com/bucketflt.b[1118] CASE sdle_arrowright:.. 
sdle_arrowup M:273 DEF sdl.h[387] sdle_arrowup=273
sdle_joyaxismotion M:7 DEF sdl.h[377] sdle_joyaxismotion=7
sdle_joyballmotion M:8 DEF sdl.h[378] sdle_joyballmotion=8
sdle_joybuttondown M:10 DEF sdl.h[380] sdle_joybuttondown=10
sdle_joybuttonup M:11 DEF sdl.h[381] sdle_joybuttonup=11
sdle_joyhatmotion M:9 DEF sdl.h[379] sdle_joyhatmotion=9
sdle_keydown M:2 DEF sdl.h[372] sdle_keydown=2
sdle_keydown M:2 MAN com/bucketflt.b[1037] CASE sdle_keydown:.. 
sdle_keyup M:3 DEF sdl.h[373] sdle_keyup=3
sdle_keyup M:3 MAN com/bucketflt.b[1114] CASE sdle_keyup:.. 
sdle_mousebuttondown M:5 DEF sdl.h[375] sdle_mousebuttondown=5
sdle_mousebuttonup M:6 DEF sdl.h[376] sdle_mousebuttonup=6
sdle_mousemotion M:4 DEF sdl.h[374] sdle_mousemotion=4
sdle_quit M:12 DEF sdl.h[382] sdle_quit=12
sdle_quit M:12 MAN com/bucketflt.b[1129] CASE sdle_quit:.. 
sdle_syswmevent M:13 DEF sdl.h[383] sdle_syswmevent=13
sdle_userevent M:15 DEF sdl.h[385] sdle_userevent=15
sdle_videoresize M:14 DEF sdl.h[384] sdle_videoresize=14
sdlmsecs G:555 DEF sdl.h[279] sdlmsecs=
sdlmsecs G:555 FN sdl.b[320] LET sdlmsecs()=..
sdlmsecs G:555 LG com/bucketflt.b[1310] sdlmsecs()
sdlmsecs G:555 LG com/bucketflt.b[1349] t1:=sdlmsecs()
sdlmsecs G:555 LG com/bucketflt.b[473] displaytime:=sdlmsecs()-starttime
sdlmsecs G:555 LG com/bucketflt.b[490] starttime:=sdlmsecs()
sectword M:64991 DEF libhdr.h[278] sectword=64991
selectfont G:524 DEF sdl.h[190] selectfont=
selectfont G:524 LG sdl.b[152] selectfont(12)
selectfont G:524 LG sdl.b[223] selectfont(18)
selectfont G:524 LG sdl.b[224] selectfont(12)
selectfont G:524 RT sdl.b[401] LET selectfont(h)BE..
selectinput G:56 DEF libhdr.h[95] selectinput=56
selectoutput G:57 DEF libhdr.h[96] selectoutput=57
selectsurface G:510 DEF sdl.h[167] selectsurface=
selectsurface G:510 LG com/bucketflt.b[829]
    selectsurface(surfptr,FIX width,FIX height)
selectsurface G:510 LG com/bucketflt.b[851]
    selectsurface(surfptr,FIX width,FIX height)
selectsurface G:510 LG com/bucketflt.b[866]
    selectsurface(surfptr,FIX width,FIX height)
selectsurface G:510 LG com/bucketflt.b[881]
    selectsurface(surfptr,FIX width,FIX height)
selectsurface G:510 LG com/bucketflt.b[889]
    selectsurface(@screen,screenxsize,screenysize)
selectsurface G:510 LG sdl.b[259] selectsurface(@screen,xsize,ysize)
selectsurface G:510 RT sdl.b[306]
    LET selectsurface(surfptr,xsize,ysize)BE..
selx FG:310 DEF com/bucketflt.b[137] FLT selx=
selx FG:310 LG com/bucketflt.b[1090]
    writef("currb'y=%8.5f*n",currballno,selx,sely)
selx FG:310 LG com/bucketflt.b[635] bouncepos(selx,sely,selxdot,selydot)
selx FG:310 LG com/bucketflt.b[637]
    writef("displ't=%9.5f*n",displaytime,selx,sely,selxdot,selydot)
selx FG:310 LG com/bucketflt.b[649]
    batpushxdotdot#:=batx#<selx#->+#x02FDFDC0,-#x02FDFDC0
selx FG:310 LG com/bucketflt.b[661] TEST selx#>midx THEN .. ELSE ..
selx FG:310 LG com/bucketflt.b[662] tx#:=selx#-8*ballradius
selx FG:310 LG com/bucketflt.b[663] tx#:=selx#+ 8.000#*ballradius
selx FG:310 SG com/bucketflt.b[629] selx#:=cgx1
selx FG:310 SG com/bucketflt.b[631] selx#:=cgx2
selx FG:310 SG com/bucketflt.b[633] selx#:=cgx3
selxdot FG:312 DEF com/bucketflt.b[138] FLT selxdot=
selxdot FG:312 LG com/bucketflt.b[1092]
    writef("selxd't=%8.5f*n",selxdot,selydot,batpushxdotdot)
selxdot FG:312 LG com/bucketflt.b[635]
    bouncepos(selx,sely,selxdot,selydot)
selxdot FG:312 LG com/bucketflt.b[637]
    writef("displ't=%9.5f*n",displaytime,selx,sely,selxdot,selydot)
selxdot FG:312 LG com/bucketflt.b[665]
    batxdotdot#:=chooseaccel(tx,selxdot,batx,...)
selxdot FG:312 SG com/bucketflt.b[629] selxdot#:=cgx1dot
selxdot FG:312 SG com/bucketflt.b[631] selxdot#:=cgx2dot
selxdot FG:312 SG com/bucketflt.b[633] selxdot#:=cgx3dot
sely FG:311 DEF com/bucketflt.b[137] FLT sely=
sely FG:311 LG com/bucketflt.b[1090]
    writef("currb'y=%8.5f*n",currballno,selx,sely)
sely FG:311 LG com/bucketflt.b[602] IF cgy1#>sely DO ..
sely FG:311 LG com/bucketflt.b[605] IF cgy2#>sely DO ..
sely FG:311 LG com/bucketflt.b[608] IF cgy3#>sely DO ..
sely FG:311 LG com/bucketflt.b[635] bouncepos(selx,sely,selxdot,selydot)
sely FG:311 LG com/bucketflt.b[637]
    writef("displ't=%9.5f*n",displaytime,selx,sely,selxdot,selydot)
sely FG:311 LG com/bucketflt.b[643] TEST sely#<pushlevel THEN .. ELSE ..
sely FG:311 SG com/bucketflt.b[600] sely#:=#- 1.000
sely FG:311 SG com/bucketflt.b[604] sely#:=cgy1
sely FG:311 SG com/bucketflt.b[607] sely#:=cgy2
sely FG:311 SG com/bucketflt.b[610] sely#:=cgy3
sely FG:311 SG com/bucketflt.b[629] sely#:=cgy1
sely FG:311 SG com/bucketflt.b[631] sely#:=cgy2
sely FG:311 SG com/bucketflt.b[633] sely#:=cgy3
selydot FG:313 DEF com/bucketflt.b[138] FLT selydot=
selydot FG:313 LG com/bucketflt.b[1092]
    writef("selxd't=%8.5f*n",selxdot,selydot,batpushxdotdot)
selydot FG:313 LG com/bucketflt.b[635]
    bouncepos(selx,sely,selxdot,selydot)
selydot FG:313 LG com/bucketflt.b[637]
    writef("displ't=%9.5f*n",displaytime,selx,sely,selxdot,selydot)
selydot FG:313 SG com/bucketflt.b[629] selydot#:=cgy1dot
selydot FG:313 SG com/bucketflt.b[631] selydot#:=cgy2dot
selydot FG:313 SG com/bucketflt.b[633] selydot#:=cgy3dot
sendpkt G:165 DEF libhdr.h[218] sendpkt=165
set_process_name G:175 DEF libhdr.h[226] set_process_name=175
setbit G:112 DEF libhdr.h[152] setbit=112
setbulk G:122 DEF libhdr.h[162] setbulk=122
setcaption G:504 DEF sdl.h[158] setcaption=
setcaption G:504 LG sdl.b[258] setcaption(title)
setcaption G:504 RT sdl.b[282] LET setcaption(title)BE..
setcolour G:506 DEF sdl.h[161] setcolour=
setcolour G:506 LG com/bucketflt.b[834] setcolour(bucketendcolour)
setcolour G:506 LG com/bucketflt.b[835] setcolour(bucketcolour)
setcolour G:506 LG com/bucketflt.b[840] setcolour(bucketcolour)
setcolour G:506 LG com/bucketflt.b[853] setcolour(bucketcolour)
setcolour G:506 LG com/bucketflt.b[883] setcolour(batcolour)
setcolour G:506 LG com/bucketflt.b[940] setcolour(ball1colour)
setcolour G:506 LG com/bucketflt.b[944] setcolour(#xFFFFFF)
setcolour G:506 LG com/bucketflt.b[952] setcolour(ball2colour)
setcolour G:506 LG com/bucketflt.b[956] setcolour(#xFFFFFF)
setcolour G:506 LG com/bucketflt.b[964] setcolour(ball3colour)
setcolour G:506 LG com/bucketflt.b[968] setcolour(#xFFFFFF)
setcolour G:506 LG com/bucketflt.b[976] setcolour(maprgb(255,255,255))
setcolour G:506 RT sdl.b[293] LET setcolour(col)BE..
setcolourkey G:507 DEF sdl.h[162] setcolourkey=
setcolourkey G:507 RT sdl.b[295] LET setcolourkey(surfptr,col)BE..
setdepthlimits G:551 DEF sdl.h[269] setdepthlimits=
setdepthlimits G:551 LG sdl.b[149] setdepthlimits(1,#x3B9ACA00)
setdepthlimits G:551 LG sdl.b[190] setdepthlimits(1,#x3B9ACA00)
setdepthlimits G:551 LG sdl.b[4174] setdepthlimits(1,#x3B9ACA00)
setdepthlimits G:551 RT sdl.b[4433] LET setdepthlimits(near,far)BE..
setflags G:156 DEF libhdr.h[210] setflags=156
setlims G:534 DEF sdl.h[215] setlims=
setlims G:534 LG sdl.b[3710] setlims(x1,y1,x2,y2)
setlims G:534 LG sdl.b[3711] setlims(x2,y2,x3,y3)
setlims G:534 LG sdl.b[3712] setlims(x3,y3,x1,y1)
setlims G:534 RT sdl.b[3627] LET setlims(x0,y0,x1,y1)BE..
setlims3d G:550 DEF sdl.h[265] setlims3d=
setlims3d G:550 LG sdl.b[4365] setlims3d(x1,y1,z1,x2,y2,z2)
setlims3d G:550 LG sdl.b[4366] setlims3d(x2,y2,z2,x3,y3,z3)
setlims3d G:550 LG sdl.b[4367] setlims3d(x3,y3,z3,x1,y1,z1)
setlims3d G:550 RT sdl.b[4047] LET setlims3d(x0,y0,sz0,x1,y1,sz1)BE..
setlogname G:117 DEF libhdr.h[157] setlogname=117
setrecordlength G:68 DEF libhdr.h[107] setrecordlength=68
setseed G:35 DEF libhdr.h[74] setseed=35
settimeout G:55 DEF libhdr.h[94] settimeout=55
settimeoutact G:124 DEF libhdr.h[164] settimeoutact=124
setvec G:181 DEF libhdr.h[233] setvec=181
showcursor G:557 DEF sdl.h[282] showcursor=
showcursor G:557 FN sdl.b[325] LET showcursor()=..
singlestepping G:221 DEF com/bucketflt.b[48] singlestepping=
singlestepping G:221 LG com/bucketflt.b[1325] IF singlestepping DO ..
singlestepping G:221 SG com/bucketflt.b[1082] singlestepping:=TRUE
singlestepping G:221 SG com/bucketflt.b[1197] singlestepping:=FALSE
singlestepping G:221 SG com/bucketflt.b[1327] singlestepping:=FALSE
splitname G:47 DEF libhdr.h[86] splitname=47
sps FG:232 DEF com/bucketflt.b[64] FLT sps=
sps FG:232 LG com/bucketflt.b[1001]
    drawf(30,245,"CPU u' = %8.5f",usage,sps)
sps FG:232 LG com/bucketflt.b[1209] stepmsecs#:= 1000.000#/sps
sps FG:232 LG com/bucketflt.b[1319] batxdot#:=batxdot#+batxdotdot#/sps
sps FG:232 LG com/bucketflt.b[1320] batx#:=batx#+batxdot#/sps
sps FG:232 LG com/bucketflt.b[1342] sps#:=sps#-1
sps FG:232 LG com/bucketflt.b[1343] sps#:=sps#+ 1.000
sps FG:232 LG com/bucketflt.b[1344] IF sps#< 5.000 DO ..
sps FG:232 LG com/bucketflt.b[1345] IF sps#> 100.000 DO ..
sps FG:232 LG com/bucketflt.b[1346] stepmsecs#:= 1000.000#/sps
sps FG:232 LG com/bucketflt.b[552] cgx1dot#:=cgx1dot#+ax1#/sps
sps FG:232 LG com/bucketflt.b[553] cgy1dot#:=cgy1dot#+ay1#/sps
sps FG:232 LG com/bucketflt.b[554] cgx2dot#:=cgx2dot#+ax2#/sps
sps FG:232 LG com/bucketflt.b[555] cgy2dot#:=cgy2dot#+ay2#/sps
sps FG:232 LG com/bucketflt.b[556] cgx3dot#:=cgx3dot#+ax3#/sps
sps FG:232 LG com/bucketflt.b[557] cgy3dot#:=cgy3dot#+ay3#/sps
sps FG:232 LG com/bucketflt.b[559] cgx1#:=cgx1#+cgx1dot#/sps
sps FG:232 LG com/bucketflt.b[559] cgy1#:=cgy1#+cgy1dot#/sps
sps FG:232 LG com/bucketflt.b[560] cgx2#:=cgx2#+cgx2dot#/sps
sps FG:232 LG com/bucketflt.b[560] cgy2#:=cgy2#+cgy2dot#/sps
sps FG:232 LG com/bucketflt.b[561] cgx3#:=cgx3#+cgx3dot#/sps
sps FG:232 LG com/bucketflt.b[561] cgy3#:=cgy3#+cgy3dot#/sps
sps FG:232 LG com/bucketflt.b[681] batxdot#:=batxdot#+batxdotdot#/sps
sps FG:232 LG com/bucketflt.b[682] batxdot#:=batxdot#-batxdot#/sps
sps FG:232 LG com/bucketflt.b[690] batx#:=batx#+batxdot#/sps
sps FG:232 SG com/bucketflt.b[1208] sps#:= 40.000
sps FG:232 SG com/bucketflt.b[1342] sps#:=sps#- 1.000
sps FG:232 SG com/bucketflt.b[1343] sps#:=sps#+ 1.000
sps FG:232 SG com/bucketflt.b[1344] sps#:= 5.000
sps FG:232 SG com/bucketflt.b[1345] sps#:= 100.000
srchwk G:150 DEF libhdr.h[204] srchwk=150
stackfree G:123 DEF libhdr.h[163] stackfree=123
stackword M:#xABCD1234 DEF libhdr.h[276] stackword=-#x5432EDCC
standardize G:452 DEF sdl.h[68] standardize=
standardize G:452 RT sdl.b[62] LET standardize(v)BE..
start G:1 DEF libhdr.h[39] start=1
start G:1 FN com/bucketflt.b[1135] LET start()=..
startco G:23 DEF libhdr.h[62] startco=23
started G:223 DEF com/bucketflt.b[50] started=
started G:223 LG com/bucketflt.b[472] IF started DO ..
started G:223 LG com/bucketflt.b[495] IF started DO ..
started G:223 LG com/bucketflt.b[986] IF started|finished DO ..
started G:223 SG com/bucketflt.b[1028] started:=FALSE
started G:223 SG com/bucketflt.b[1069] started:=FALSE
started G:223 SG com/bucketflt.b[1199] started:=FALSE
started G:223 SG com/bucketflt.b[487] started:=TRUE
starting G:222 DEF com/bucketflt.b[49] starting=
starting G:222 LG com/bucketflt.b[374] UNLESS starting DO ..
starting G:222 LG com/bucketflt.b[482] WHILE starting DO ..
starting G:222 LG com/bucketflt.b[921] UNLESS starting DO ..
starting G:222 SG com/bucketflt.b[1027] starting:=FALSE
starting G:222 SG com/bucketflt.b[1068] starting:=TRUE
starting G:222 SG com/bucketflt.b[1100] starting:=FALSE
starting G:222 SG com/bucketflt.b[1198] starting:=TRUE
starting G:222 SG com/bucketflt.b[486] starting:=FALSE
starttime G:225 DEF com/bucketflt.b[54] starttime=
starttime G:225 LG com/bucketflt.b[473]
    displaytime:=sdlmsecs()-starttime
starttime G:225 SG com/bucketflt.b[1071] starttime:=-1
starttime G:225 SG com/bucketflt.b[1203] starttime:=-1
starttime G:225 SG com/bucketflt.b[490] starttime:=sdlmsecs()
step F:56 LF com/bucketflt.b[1323] step()
step F:56 RT com/bucketflt.b[467] LET step()BE..
stepping G:220 DEF com/bucketflt.b[47] stepping=
stepping G:220 LG com/bucketflt.b[1077] stepping:=~stepping
stepping G:220 LG com/bucketflt.b[1323] IF stepping DO ..
stepping G:220 SG com/bucketflt.b[1077] stepping:=~stepping
stepping G:220 SG com/bucketflt.b[1081] stepping:=TRUE
stepping G:220 SG com/bucketflt.b[1196] stepping:=TRUE
stepping G:220 SG com/bucketflt.b[1326] stepping:=FALSE
stepstream G:67 DEF libhdr.h[106] stepstream=67
stop G:2 DEF libhdr.h[40] stop=2
str2numb G:101 DEF libhdr.h[141] str2numb=101
string_to_dat G:111 DEF libhdr.h[151] string_to_dat=111
string_to_number G:100 DEF libhdr.h[140] string_to_number=100
sxpushval G:183 DEF libhdr.h[235] sxpushval=183
sys G:3 DEF libhdr.h[41] sys=3
sys G:3 LG com/bucketflt.b[1152] UNLESS sys(Sys_sdl,sdl_avail) DO ..
sys G:3 LG com/bucketflt.b[800]
    sys(Sys_flt,fl_sqrt,B#*B#- 4.000#*A#*C)#/ 2.000*A
sys G:3 LG sdl.b[167] IF sys(Sys_sdl,sdl_init,sdl_init_everything) DO ..
sys G:3 LG sdl.b[169] sys(Sys_sdl,sdl_geterror,mes)
sys G:3 LG sdl.b[229] ok:=sys(Sys_sdl,sdl_setvideomode,screenxsize,...)
sys G:3 LG sdl.b[240] sys(Sys_sdl,sdl_geterror,mes)
sys G:3 LG sdl.b[253] sys(Sys_sdl,sdl_getsurfaceinfo,@screen,@flags)
sys G:3 LG sdl.b[280] sys(Sys_sdl,sdl_maprgb,@format,r,g,b)
sys G:3 LG sdl.b[282] sys(Sys_sdl,sdl_wm_setcaption,title,0)
sys G:3 LG sdl.b[290] sys(Sys_sdl,sdl_quit)
sys G:3 LG sdl.b[296] sys(Sys_sdl,sdl_setcolourkey,surfptr,col)
sys G:3 LG sdl.b[300] sys(Sys_sdl,sdl_mksurface,@format,w,h,surfptr)
sys G:3 LG sdl.b[304] sys(Sys_sdl,sdl_freesurface,surfptr)
sys G:3 LG sdl.b[314] RESULTIS sys(Sys_sdl,sdl_pollevent,@eventtype)
sys G:3 LG sdl.b[318] sys(Sys_sdl,sdl_delay,msecs)
sys G:3 LG sdl.b[320] sys(Sys_sdl,sdl_getticks)
sys G:3 LG sdl.b[323] sys(Sys_sdl,sdl_hidecursor)
sys G:3 LG sdl.b[325] sys(Sys_sdl,sdl_showcursor)
sys G:3 LG sdl.b[328] sys(Sys_sdl,sdl_flip,@screen)
sys G:3 LG sdl.b[337] sys(Sys_sdl,sdl_blitsurface,srcptr,0,dstptr,@dx)
sys G:3 LG sdl.b[346] sys(Sys_sdl,sdl_blitsurface,srcptr,0,dstptr,@dx)
sys G:3 LG sdl.b[350] sys(Sys_sdl,sdl_fillsurf,@currsurf,col)
sys G:3 LG sdl.b[3754]
    sys(Sys_sdl,sdl_fillrect,@currsurf,xmin,currysize-ymax,...,...)
sys G:3 LG sdl.b[398]
    sys(Sys_sdl,sdl_fillrect,@currsurf,x,currysize-y,1,...)
sys G:3 LG sdl.b[66] sys(Sys_flt,fl_sqrt,x#*x#+y#*y#+z#*z)
sys G:3 LG sdl.b[67] TEST r#<sys(Sys_flt,fl_mk,1,-10) THEN .. ELSE ..
sys G:3 LG sdl.b[83]
    RESULTIS sys(Sys_flt,fl_sqrt,dx#*dx#+dy#*dy#+dz#*dz)
sys G:3 LG sdl.b[89] RESULTIS sys(Sys_flt,fl_sqrt,x#*x#+y#*y#+z#*z)
sysabort G:29 DEF libhdr.h[68] sysabort=29
t_bhunk M:3000 DEF libhdr.h[272] t_bhunk=3000
t_bhunk64 M:4000 DEF libhdr.h[273] t_bhunk64=4000
t_end M:1002 DEF libhdr.h[268] t_end=1002
t_end64 M:2002 DEF libhdr.h[271] t_end64=2002
t_hunk M:1000 DEF libhdr.h[266] t_hunk=1000
t_hunk64 M:2000 DEF libhdr.h[269] t_hunk64=2000
t_reloc M:1001 DEF libhdr.h[267] t_reloc=1001
t_reloc64 M:2001 DEF libhdr.h[270] t_reloc64=2001
taskid G:152 DEF libhdr.h[206] taskid=152
taskwait G:160 DEF libhdr.h[214] taskwait=160
tcb G:151 DEF libhdr.h[205] tcb=151
tcb_a M:11 DEF libhdr.h[724] tcb_a=tcb_regs
tcb_active M:10 DEF libhdr.h[721] tcb_active=10
tcb_b M:12 DEF libhdr.h[725] tcb_b=12
tcb_c M:13 DEF libhdr.h[726] tcb_c=13
tcb_count M:18 DEF libhdr.h[731] tcb_count=18
tcb_flags M:5 DEF libhdr.h[716] tcb_flags=5
tcb_g M:15 DEF libhdr.h[728] tcb_g=15
tcb_gbase M:8 DEF libhdr.h[719] tcb_gbase=8
tcb_link M:0 DEF libhdr.h[711] tcb_link=0
tcb_namebase M:19 DEF libhdr.h[733] tcb_namebase=19
tcb_namebase M:19 MAN libhdr.h[735]
    tcb_upb=tcb_namebase+15/bytesperword+1
tcb_p M:14 DEF libhdr.h[727] tcb_p=14
tcb_pc M:17 DEF libhdr.h[730] tcb_pc=17
tcb_pri M:2 DEF libhdr.h[713] tcb_pri=2
tcb_regs M:11 DEF libhdr.h[723] tcb_regs=11
tcb_regs M:11 MAN libhdr.h[724] tcb_a=tcb_regs
tcb_sbase M:9 DEF libhdr.h[720] tcb_sbase=9
tcb_seglist M:7 DEF libhdr.h[718] tcb_seglist=7
tcb_st M:16 DEF libhdr.h[729] tcb_st=16
tcb_state M:4 DEF libhdr.h[715] tcb_state=4
tcb_stsiz M:6 DEF libhdr.h[717] tcb_stsiz=6
tcb_taskid M:1 DEF libhdr.h[712] tcb_taskid=1
tcb_upb M:23 DEF libhdr.h[735] tcb_upb=tcb_namebase+15/bytesperword+1
tcb_wkq M:3 DEF libhdr.h[714] tcb_wkq=3
tempval G:11 DEF libhdr.h[49] tempval=11
testbit G:113 DEF libhdr.h[153] testbit=113
testflags G:157 DEF libhdr.h[211] testflags=157
tg M:200 DEF libhdr.h[248] tg=200
timeoutch M:-2 DEF libhdr.h[261] timeoutch=-2
tstinterpolate F:17 LF sdl.b[155] tstinterpolate(150,100,200,2000,3000)
tstinterpolate F:17 LF sdl.b[156]
    tstinterpolate(-150,-100,-200,2000,3000)
tstinterpolate F:17 LF sdl.b[157]
    tstinterpolate(150,100,200,-2000,-3000)
tstinterpolate F:17 LF sdl.b[158]
    tstinterpolate(-150,-100,-200,-2000,-3000)
tstinterpolate F:17 LF sdl.b[160]
    tstinterpolate(#x59682F00,#x3B9ACA00,#x77359400,2000,3000)
tstinterpolate F:17 LF sdl.b[161]
    tstinterpolate(-#x59682F00,-#x3B9ACA00,-#x77359400,2000,3000)
tstinterpolate F:17 LF sdl.b[162]
    tstinterpolate(#x59682F00,#x3B9ACA00,#x77359400,-2000,-3000)
tstinterpolate F:17 LF sdl.b[163]
    tstinterpolate(-#x59682F00,-#x3B9ACA00,-#x77359400,-2000,-3000)
tstinterpolate F:17 RT sdl.b[140] LET tstinterpolate(p,p1,p2,q1,q2)BE..
ug M:210 DEF libhdr.h[249] ug=210
ug M:210 MAN com/bucketflt.b[33] done=ug
unhold G:159 DEF libhdr.h[213] unhold=159
unloadseg G:106 DEF libhdr.h[146] unloadseg=106
unpackstring G:31 DEF libhdr.h[70] unpackstring=31
unrdch G:40 DEF libhdr.h[79] unrdch=40
updatescreen G:558 DEF sdl.h[283] updatescreen=
updatescreen G:558 LG com/bucketflt.b[1337] updatescreen()
updatescreen G:558 RT sdl.b[327] LET updatescreen()BE..
usage G:229 DEF com/bucketflt.b[60] usage=
usage G:229 LG com/bucketflt.b[1001]
    drawf(30,245,"CPU u' = %8.5f",usage,sps)
usage G:229 LG com/bucketflt.b[1340] UNLESS 80<usage&usage<95 DO ..
usage G:229 LG com/bucketflt.b[1341] TEST usage>90 THEN .. ELSE ..
usage G:229 SG com/bucketflt.b[1206] usage:=0
usage G:229 SG com/bucketflt.b[1330] usage:=100*comptime/(stepmsecs|1)
wall_lx FG:252 DEF com/bucketflt.b[101] FLT wall_lx=
wall_lx FG:252 LG com/bucketflt.b[1257]
    midx#:=(wall_lx#+wall_rx)#/ 2.000
wall_lx FG:252 LG com/bucketflt.b[1280] xlim_lwall#:=wall_lx#+ballradius
wall_lx FG:252 LG com/bucketflt.b[805] xbounce#-wall_lx#+ballradius
wall_lx FG:252 LG com/bucketflt.b[807] xbounce#:=wall_lx#+ballradius#-d
wall_lx FG:252 SG com/bucketflt.b[1255] wall_lx#:= 0.000
wall_rx FG:253 DEF com/bucketflt.b[102] FLT wall_rx=
wall_rx FG:253 LG com/bucketflt.b[1257]
    midx#:=(wall_lx#+wall_rx)#/ 2.000
wall_rx FG:253 LG com/bucketflt.b[1281] xlim_rwall#:=wall_rx#-ballradius
wall_rx FG:253 LG com/bucketflt.b[692] IF batx#>wall_rx#-batradius DO ..
wall_rx FG:253 LG com/bucketflt.b[693] batx#:=wall_rx#-batradius
wall_rx FG:253 LG com/bucketflt.b[810] d#:=xbounce#-wall_rx#-ballradius
wall_rx FG:253 LG com/bucketflt.b[812] xbounce#:=wall_rx#-ballradius#-d
wall_rx FG:253 SG com/bucketflt.b[1256] wall_rx#:=FLOAT (screenxsize-1)
wrch G:41 DEF libhdr.h[80] wrch=41
wrch G:41 LG sdl.b[3611] wrch
wrch G:41 SG sdl.b[3615] wrch:=drawwrch
wrch G:41 SG sdl.b[3617] wrch:=oldwrch
write_ch_slice G:521 DEF sdl.h[186] write_ch_slice=
write_ch_slice G:521 LG sdl.b[418]
    write_ch_slice(currx,curry+fontH-1-line,ch,line)
write_ch_slice G:521 SG sdl.b[405] write_ch_slice:=write_ch_slice18
write_ch_slice G:521 SG sdl.b[410] write_ch_slice:=write_ch_slice12
write_ch_slice12 F:54 LF sdl.b[410] write_ch_slice:=write_ch_slice12
write_ch_slice12 F:54 RT sdl.b[422]
    LET write_ch_slice12(x,y,ch,line)BE..
write_ch_slice18 F:55 LF sdl.b[405] write_ch_slice:=write_ch_slice18
write_ch_slice18 F:55 RT sdl.b[1720]
    LET write_ch_slice18(x,y,ch,line)BE..
writed G:85 DEF libhdr.h[124] writed=85
writee G:180 DEF libhdr.h[232] writee=180
writef G:94 DEF libhdr.h[134] writef=94
writef G:94 LG com/bucketflt.b[1087]
    writef("cgx1='t=%8.5f*n",cgx1,cgx1dot)
writef G:94 LG com/bucketflt.b[1088]
    writef("cgx2='t=%8.5f*n",cgx2,cgx2dot)
writef G:94 LG com/bucketflt.b[1089]
    writef("cgx3='t=%8.5f*n",cgx1,cgx3dot)
writef G:94 LG com/bucketflt.b[1090]
    writef("currb'y=%8.5f*n",currballno,selx,sely)
writef G:94 LG com/bucketflt.b[1091] writef("pushl'l=%8.5f*n",pushlevel)
writef G:94 LG com/bucketflt.b[1092]
    writef("selxd't=%8.5f*n",selxdot,selydot,batpushxdotdot)
writef G:94 LG com/bucketflt.b[1094]
    writef("displ'e=%9.2d*n",displaytime,batpushtime)
writef G:94 LG com/bucketflt.b[1130] writef("QUIT*n")
writef G:94 LG com/bucketflt.b[1153] writef("*nThe 'ailable*n")
writef G:94 LG com/bucketflt.b[1178]
    writef("dx=%9'q=%9.5f*n", 1.000,dy,c,s,rsq)
writef G:94 LG com/bucketflt.b[1183]
    writef("Error' -%7.5f*n",e1#- 1.000, 1.000#-e2)
writef G:94 LG com/bucketflt.b[1312] writef("About'vents()*n")
writef G:94 LG com/bucketflt.b[1331] writef("About'creen()*n")
writef G:94 LG com/bucketflt.b[1336] writef("About'reen()*n*n")
writef G:94 LG com/bucketflt.b[1360] writef("*nQuitting*n")
writef G:94 LG com/bucketflt.b[456]
    writef("%9.3f'llno=%n*n",displaytime,currballno)
writef G:94 LG com/bucketflt.b[457]
    writef("cgx1='t=%9.5f*n",cgx1,cgy1,cgx1dot,cgy1dot)
writef G:94 LG com/bucketflt.b[459]
    writef("cgx2='t=%9.5f*n",cgx2,cgy2,cgx2dot,cgy2dot)
writef G:94 LG com/bucketflt.b[461]
    writef("cgx3='t=%9.5f*n",cgx3,cgy3,cgx3dot,cgy3dot)
writef G:94 LG com/bucketflt.b[463]
    writef("ax1=%'3=%9.5f*n",ax1,ax2,ax3)
writef G:94 LG com/bucketflt.b[464]
    writef("batx='t=%9.5f*n",batx,baty,batxdot)
writef G:94 LG com/bucketflt.b[477]
    writef("%8.3d' a ball*n",displaytime)
writef G:94 LG com/bucketflt.b[622]
    writef("Displ'=%10.5d*n",displaytime,batpushtime,batpushxdotdot)
writef G:94 LG com/bucketflt.b[637]
    writef("displ't=%9.5f*n",displaytime,selx,sely,selxdot,selydot)
writef G:94 LG com/bucketflt.b[639]
    writef("xboun'= %7.3f*n",xbounce,tbounce)
writef G:94 LG com/bucketflt.b[740]
    writef("*ndisp'e=%9.3d*n",displaytime)
writef G:94 LG com/bucketflt.b[741]
    writef("*ncurr'llno=%n*n",currballno)
writef G:94 LG com/bucketflt.b[742] writef("ftx  '= %9.5f*n",ftx)
writef G:94 LG com/bucketflt.b[743] writef("ftxdo'= %9.5f*n",ftxdot)
writef G:94 LG com/bucketflt.b[744] writef("fbx  '= %9.5f*n",fbx)
writef G:94 LG com/bucketflt.b[745] writef("fbxdo'= %9.5f*n",fbxdot)
writef G:94 LG com/bucketflt.b[746] writef("ft   '= %9.5f*n",ft)
writef G:94 LG com/bucketflt.b[747] writef("(ftx-')=%9.5f*n",ftx#-fbx)
writef G:94 LG com/bucketflt.b[748]
    writef("(ftxd')=%9.5f*n",ftxdot#-fbxdot)
writef G:94 LG com/bucketflt.b[749]
    writef("(ftxd't=%9.5f*n",(ftxdot#-fbxdot)#*ft)
writef G:94 LG com/bucketflt.b[750]
    writef("((ftx')=%9.5f*n",(ftx#-fbx#+(ftxdot#-fbxdot)#*ft)#* 2.000#/ft#*ft)
writef G:94 LG com/bucketflt.b[752] writef("fa   '= %9.5f*n",fa)
writef G:94 LG com/bucketflt.b[758]
    writef("fdt=%'=%10.5f*n",fdt,tpos,bpos)
writef G:94 LG com/bucketflt.b[817]
    writef("bounc'= %9.5f*n",xbounce,tbounce#+displaytime)
writef G:94 LG com/bucketflt.b[827]
    writef("Calli'=%10.5f*n",width,height)
writef G:94 LG com/bucketflt.b[908]
    writef("calli'%n, %n)*n",FIX bucket_lxl,FIX bucket_tyt)
writef G:94 LG com/bucketflt.b[932]
    writef("Calli' %n %n)*n",@batsurf,@screen,FIX (batx#-batradius),FIX (baty#+batradius))
writef G:94 LG sdl.b[142] writef("inter') => %n*n",p,p1,p2,q1,q2,res)
writef G:94 LG sdl.b[170] writef("Unabl'SDL: %s*n",mes)
writef G:94 LG sdl.b[241] writef("Unabl'ode: %s*n",mes)
writef G:94 LG sdl.b[357] writef("*ngetm'ailable*n")
writef G:94 LG sdl.b[3616] writef(form,a,b,c,d,e,...)
writef G:94 LG sdl.b[4136]
    writef("*nleft'maxy=%n*n",leftxv!y,leftzv!y,rightxv!y,rightzv!y,miny,maxy)
writef G:94 LG sdl.b[4165] writef("getve'failure*n")
writef G:94 LG sdl.b[4390] writef("drawt'th = %n*n",neardepth,fardepth)
writef G:94 LG sdl.b[4392] writef("drawt'pth=%8i*n",x1,y1,z1)
writef G:94 LG sdl.b[4393] writef("drawt'pth=%8i*n",x2,y2,z2)
writef G:94 LG sdl.b[4394] writef("drawt'pth=%8i*n",x3,y3,z3)
writef G:94 LG sdl.b[4395] writef("y=%n 'o %n:%n*n",y,x0,sz0,x1,sz1)
writef G:94 LG sdl.b[4427] writef("chkli'maxy=%n*n",miny,maxy)
writef G:94 LG sdl.b[4429]
    writef("y=%i3'n %n:%n*n",y,leftxv!y,leftzv!y,rightxv!y,rightzv!y)
writeflt G:73 DEF libhdr.h[112] writeflt=73
writehex G:87 DEF libhdr.h[126] writehex=87
writen G:86 DEF libhdr.h[125] writen=86
writeoct G:88 DEF libhdr.h[127] writeoct=88
writes G:89 DEF libhdr.h[128] writes=89
writet G:90 DEF libhdr.h[129] writet=90
writeu G:91 DEF libhdr.h[130] writeu=91
writewords G:45 DEF libhdr.h[84] writewords=45
writez G:92 DEF libhdr.h[131] writez=92
xlim_bucket_lc FG:275 DEF com/bucketflt.b[117] FLT xlim_bucket_lc=
xlim_bucket_ll FG:274 DEF com/bucketflt.b[117] FLT xlim_bucket_ll=
xlim_bucket_ll FG:274 LG com/bucketflt.b[321]
    TEST xlim_bucket_ll#<x&x<xlim_bucket_rr&ylim_baseb<y&y<ylim_topt THEN .. ELSE ..
xlim_bucket_ll FG:274 LG com/bucketflt.b[352] p!0#:=xlim_bucket_ll
xlim_bucket_ll FG:274 SG com/bucketflt.b[1284]
    xlim_bucket_ll#:=bucket_lxl#-ballradius
xlim_bucket_lr FG:276 DEF com/bucketflt.b[117] FLT xlim_bucket_lr=
xlim_bucket_lr FG:276 LG com/bucketflt.b[355]
    IF bucket_lxc#<x&x#<=xlim_bucket_lr DO ..
xlim_bucket_lr FG:276 LG com/bucketflt.b[357] p!0#:=xlim_bucket_lr
xlim_bucket_lr FG:276 SG com/bucketflt.b[1285]
    xlim_bucket_lr#:=bucket_lxr#+ballradius
xlim_bucket_rc FG:278 DEF com/bucketflt.b[118] FLT xlim_bucket_rc=
xlim_bucket_rl FG:277 DEF com/bucketflt.b[118] FLT xlim_bucket_rl=
xlim_bucket_rl FG:277 LG com/bucketflt.b[360]
    IF xlim_bucket_rl#<=x&x<bucket_rxc DO ..
xlim_bucket_rl FG:277 LG com/bucketflt.b[362] p!0#:=xlim_bucket_rl
xlim_bucket_rl FG:277 SG com/bucketflt.b[1286]
    xlim_bucket_rl#:=bucket_rxl#-ballradius
xlim_bucket_rr FG:279 DEF com/bucketflt.b[118] FLT xlim_bucket_rr=
xlim_bucket_rr FG:279 LG com/bucketflt.b[321]
    TEST xlim_bucket_ll#<x&x#<xlim_bucket_rr&ylim_baseb<y&y<ylim_topt THEN .. ELSE ..
xlim_bucket_rr FG:279 LG com/bucketflt.b[367] p!0#:=xlim_bucket_rr
xlim_bucket_rr FG:279 SG com/bucketflt.b[1287]
    xlim_bucket_rr#:=bucket_rxr#+ballradius
xlim_lwall FG:270 DEF com/bucketflt.b[115] FLT xlim_lwall=
xlim_lwall FG:270 LG com/bucketflt.b[424] IF x#<=xlim_lwall DO ..
xlim_lwall FG:270 LG com/bucketflt.b[425] p!0#:=xlim_lwall
xlim_lwall FG:270 SG com/bucketflt.b[1280]
    xlim_lwall#:=wall_lx#+ballradius
xlim_rwall FG:271 DEF com/bucketflt.b[115] FLT xlim_rwall=
xlim_rwall FG:271 LG com/bucketflt.b[430] IF x#>=xlim_rwall DO ..
xlim_rwall FG:271 LG com/bucketflt.b[431] p!0#:=xlim_rwall
xlim_rwall FG:271 SG com/bucketflt.b[1281]
    xlim_rwall#:=wall_rx#-ballradius
ylim_baseb FG:281 DEF com/bucketflt.b[120] FLT ylim_baseb=
ylim_baseb FG:281 LG com/bucketflt.b[1064]
    UNLESS ylim_baseb#<cgy1&...&...&ylim_baseb#<cgy2&bucket_lxc#<cgx2&cgx2#<bucket_rxc&ylim_baseb#<cgy3&bucket_lxc<cgx3&cgx3<bucket_rxc DO ..
ylim_baseb FG:281 LG com/bucketflt.b[1064]
    UNLESS ylim_baseb#<cgy1&...&...&ylim_baseb#<cgy2&bucket_lxc<cgx2&cgx2<bucket_rxc&ylim_baseb<cgy3&bucket_lxc<cgx3&cgx3<bucket_rxc DO ..
ylim_baseb FG:281 LG com/bucketflt.b[1064]
    UNLESS ylim_baseb#<cgy1&...&...&ylim_baseb<cgy2&bucket_lxc<cgx2&cgx2<bucket_rxc&ylim_baseb<cgy3&bucket_lxc<cgx3&cgx3<bucket_rxc DO ..
ylim_baseb FG:281 LG com/bucketflt.b[321]
    TEST xlim_bucket_ll#<x&x#<xlim_bucket_rr&ylim_baseb#<y&y<ylim_topt THEN .. ELSE ..
ylim_baseb FG:281 LG com/bucketflt.b[380] p!1#:=ylim_baseb
ylim_baseb FG:281 LG com/bucketflt.b[483]
    IF ylim_baseb#<cgy1&bucket_lxc<cgx1&cgx1<bucket_rxc DO ..
ylim_baseb FG:281 LG com/bucketflt.b[484]
    IF ylim_baseb#<cgy2&bucket_lxc<cgx2&cgx2<bucket_rxc DO ..
ylim_baseb FG:281 LG com/bucketflt.b[485]
    IF ylim_baseb#<cgy3&bucket_lxc<cgx3&cgx3<bucket_rxc DO ..
ylim_baseb FG:281 SG com/bucketflt.b[1290]
    ylim_baseb#:=bucket_byb#-ballradius
ylim_baset FG:282 DEF com/bucketflt.b[120] FLT ylim_baset=
ylim_baset FG:282 LG com/bucketflt.b[385]
    IF bucket_byc#<=y&y#<=ylim_baset DO ..
ylim_baset FG:282 LG com/bucketflt.b[387] p!1#:=ylim_baset
ylim_baset FG:282 SG com/bucketflt.b[1291]
    ylim_baset#:=bucket_byt#+ballradius
ylim_bat FG:283 DEF com/bucketflt.b[121] FLT ylim_bat=
ylim_bat FG:283 SG com/bucketflt.b[1301]
    ylim_bat#:=floor_yt#+batradius#+ballradius
ylim_ceiling FG:273 DEF com/bucketflt.b[116] FLT ylim_ceiling=
ylim_ceiling FG:273 LG com/bucketflt.b[436] IF y#>=ylim_ceiling DO ..
ylim_ceiling FG:273 LG com/bucketflt.b[437] p!1#:=ylim_ceiling
ylim_ceiling FG:273 SG com/bucketflt.b[1283]
    ylim_ceiling#:=ceiling_yb#-ballradius
ylim_floor FG:272 DEF com/bucketflt.b[116] FLT ylim_floor=
ylim_floor FG:272 LG com/bucketflt.b[444] IF y#<=ylim_floor DO ..
ylim_floor FG:272 LG com/bucketflt.b[445] p!1#:=ylim_floor
ylim_floor FG:272 SG com/bucketflt.b[1282]
    ylim_floor#:=floor_yt#+ballradius
ylim_topt FG:280 DEF com/bucketflt.b[119] FLT ylim_topt=
ylim_topt FG:280 LG com/bucketflt.b[321]
    TEST xlim_bucket_ll#<x&x#<xlim_bucket_rr&ylim_baseb#<y&y#<ylim_topt THEN .. ELSE ..
ylim_topt FG:280 SG com/bucketflt.b[1289]
    ylim_topt#:=bucket_tyt#+ballradius
