GfABASICNNN,..0V000000001L1L1L1LSCR_MEMXQWYZAROMOU_BTNMOUBTNBEARXX600SPINY_40FALLSCALE LEFT_SCALE RIGHT_SCALE LEFT_LINE RIGHT_LINELEFTRIGHTTRUEFALSEOFSPFS NUM_VALUEC RIGHT_VALUE LEFT_VALUE HI_DIDGET LOW_DIDGET MID_DIDGETPLAY TEMP_BEARDELAYCORRECTCORECTSPREADRSPREADLSPREADR_SPREADL_SPREADPARTRYSL_4ATKEYBMKMOUSE STILL_TALKINGKBEARYH484KLICK KEY_KLICKTALKINGHI_DIGETHI_DIGIT MID_DIGIT LOW_DIGITNUMBOMBGOATALKSCREENTEMPSCRYCHRDECOBJCHRNUMBERDECOBJ_DATAOBJ.DATAASSIGN_OBJECTS POLE_DATAASSIGN_OBJECTSTEST SCREEN_SETUPMAINLEFTRIGHTWALK ENTER_GAMEFALL_NUMSCALESFIGURE_OFF_SET SHOW_VALUESDO_COLOREXPLODE EXPLODE_COLOR SET_TARGETBULL REMOVE_SCALESCALESHITSPINSPIN_UP SPIN_DOWNEND_SPINREWARDDANCEFIGURES_OFF_SET SPREAD_WEIGHT SHOW_VALUESET_UPPARCORRECTOPENING_SCREENSET_UP1 DO_COLORSTALKSHIFT(------------------------------------ -Teady Bear Math $by Stephen Everman & Paul Pratt -(c) 1988, Antic Publishing  c cЈ FV)!A |T E D D Y B E A R M A T H | | REQUIRES MEDIUM RESOLUTION!!SORRY!1FTqF! F!E4  F0EF * F* F!F$l !`Fkey click off ,Fu,EF"EFM FM F-M#F-F#,FP,F-F"l !pFkey click on YFqF4------------------------------------------------- +F fd"F6 e#20  20  # T HH F, F-,F F E" eX20 20 F2,@@ F F" e20 20 F,@ F F* e#20  20  F, F"M#F e"FF EFaFMF,FMF F F* f\#20  20  1F, F-EFFF-,FF,F-Y! "B` F FdF".F:------------------------------------------------------- +F-fEG F 6!!!F, F fFG 6!!!F.F:------------------------------------------------------- + Fx$ g p  FF !6! !F!F, !6! !F {Fz! !`!FF !6!  !F {@F0 !F z!!!F F.F8---------------------------------------------------- + Fu hf TFrEFEFEFE@@F- hFEFEFEFE=F FEE#  @@F-.F 6--------------------------------------------------- + F-E F iT<F 4!!< !Fe F i=<F \!!= !Fe F !!> !Fe E F j<F h!!< !Fe F jR=<F r!!= !Fe F |!!> !Fe.F8---------------------------------------------------- +F- l$9F$ !@! 00!!Fk6EGV F, F{FE !H!!F kFGEPPFk  F0!F.y! !#P  ! !F  !! !F !!!F!kFF y!!!!F !@!!F,F-, F !! !F0-!F,$F, F, Fu lF-F YF(!!!F'!H!T I L TFY! "B` F {FF F.F<-------------------------------------------------------- +F-$4!! !F$\!! !F$!! !F$h!! !F$r!! !F$|!! !F .F<-------------------------------------------------------- +$F nFt 0!F0!F 1!F n>F 0!F0!F 1!F F nbF, F, F ,F F.F4------------------------------------------------- +  Ft#F$!!!F z!!zz!HF !!!HF$!!!F !!ll!FH!! !F.F8---------------------------------------------------- +F-,FF, FEFEFEttFeEttFe,F-EFEV@ #% F ,E#  F-EF p V@ F,F p*FF,$F F, F, Fu.F6--------------------------------------------------- P this procedure not only spreads the weight onto both plates but, determines " the difficulty of the numbers  h+F-F*EV F +E*F p* +FqD+*pF1+!V  FqFqr*+pF1*!V  FqDF EV%  F0+!F0*!F,E#(+*  FE*FEF,$FiE+FEF,$Fi.F8---------------------------------------------------- +F- r8-,F0%!F r`F% r\%`Fa1%!F F F%.F6--------------------------------------------------- +F-Y! "B` F { F,F {Fd,F.F6--------------------------------------------------- +FPEF For Y=0 To 130 Step 12 Fo EFFFor Spin=3 Downto 1 2y!P!#  ! !F6! !@ !F*! ! !F Next Spin D  Next Y 5 F sD F0!@Fs:F !p!@ !F !!  !F y!P!# ! F4y!P!#  ! ! F y!!!!F.F:------------------------------------------------------ +Fu.EGF6!FE uFG#F$!!!F%!!F(!!! F'!!B@ F& !XFF"!H!P!! F!H! !FEFvnEGFvVEGF*'@!!B@ F-,&@@@!XXF- uF`E@@F uFG"vE@GpH0FX!!@ !F vF!%!!F,4 !G!!`!a !a FwTEGF<@!H!@@@!! F wF!8! !8F- !H!` !F 2!H! !FF.F-6--------------------------------------------------- +F xj"FF EFEttFEttFEFEF,F, F-, F, F,FP,F,F F.F8----------------------------------------------------- + F-YF !F$!!!F#F!! !FF! ! ! F !`! !`F #F$!!@ !Fe$!=!@ !=Fe%!!F(!!!F2/ !! ! TEDDY BEAR MATH FY& ! F(!!!@FP' !L!9 By Stephen Everman & Paul Pratt (c) 1988 ANTIC Pub.F(!!!FF/ !! !(USE JOYSTICK OR ARROW KEYS TO MOVE TEDDYF(!!! F >!0!` !F :!`! !F$'f!H!= END THE GAMEF&'f!x!= MAKE GAME EASYF%!!F$ !!!>F$%!! !>FS(!!!F"/p!6!>!PLAYF"/9!6!>!STOPFF2YF.F4------------------------------------------------ +#F-6!FF-6EF EF5 !!  !F|EG@FM F |xFG:EF }N:F!* |#20  20  F :EF FE" }20 20 F2,@@ F F0 }F#20 20    FW,@ F F|F5MF }p F"EF FE6EFYFE.F6-------------------------------------------------- BThis procedure physically pokes the objects into screen memory u8then uses the GET command to put them into an array. e+F-!!!(! F"!!!`! F~EGF 6!!!F ~FFRFEGF1XEGF0NEG(FQ!F"poke object into screen memory  !F" !F ~F ~F put object into array !!!(! F ~FG!! !F!.FB8----------------------------------------------------- + F-E@@F(F0!Fl.y! !#P  ! !F !! !F!!` !FFYFEG F6! V !V@ !F{V@ F F! y!!!!F, Fu.F 8----------------------------------------------------- + F- 6!!!F6!@!!F6! !@!`F6!`! !F.F-8----------------------------------------------------- |FWord # 1 Rotating Bear 0,31,0,17,0,31,0,17 (2016,2047,3296,3313,2016,2047,480,497 &224,255,96,113,2016,2047,4064,4081 9(4080,4095,2045,2045,1023,1023,499,499 &481,511,480,497,1008,1023,1009,1009 511,511,123,123 Word # 2 Rotating Bear 0,0,0,0,0,0,0,0 2-1024,-1024,-6656,-6656,-1024,-1024,-4096,-4096 4-8192,-8192,-16384,-16384,-1024,-1024,-0512,-0512 2-0512,-0512,-1024,-1024,-2048,-2048,-4096,-4096 2-4096,-4096,-4096,-4096,-2048,-2048,-2048,-2048 -4096,-4096,-16384,-16384 *Word # 1 Second position Rotating Bear n0,31,0,17,0,31,0,17 "126,127,255,255,511,511,511,511 $255,255,255,255,510,511,1020,1021 *1016,1023,1023,1023,1023,1023,1016,1017 *1008,1023,1008,1009,1016,1023,1023,1023 511,511,124,125 Word # 2 ,0,0,0,0,0,0,0,0 &0,0,0,0,-32768,-32768,-16384,-16384 &-16384,-16384,-32768,-32768,0,0,0,0 -32768,-32768,0,0,0,0,0,0 0,0,0,0,0,0,0,0 -32768,-32768,0,0 third position rotating bear t0,31,0,17,0,31,0,17 (2016,2047,4095,4095,2047,2047,511,511 &255,255,127,127,2047,2047,4095,4095 &4095,4095,2047,2047,767,767,511,511 "511,511,511,511,511,511,511,511 241,255,32,49 Word # 2 ,0,0,0,0,0,0,0,0 2-1024,-1024,-0512,-0512,-1024,-1024,-4096,-4096 4-8192,-8192,-16384,-16384,-2048,-2048,-0512,-0512 2-0512,-0512,-1024,-1024,-6144,-6144,-4096,-4096 2-4096,-4096,-4096,-4096,-4096,-4096,-4096,-4096 -8192,-8192,-32768,-32768 Word # 1 Jumping Bear R0,0,0,0,0,0,504,504 &927,927,507,507,7807,7807,7999,7996 (4095,4095,2047,2047,1023,1016,511,496 $127,112,127,120,255,255,2044,2044 "16376,16376,16320,16320,0,0,0,0 0,0,0,0 Word # 2 ,0,0,0,0,0,0,16128,16128 4-3200,-3200,-16640,-16640,-0784,-0784,-1552,31216 2-0032,-0032,-0064,-0064,-0128,16256,-0256,7936 12-1024,7168,-1024,15360,-0512,-0512,32704,32704 116376,16376,2040,2040 0,0,0,0,0,0,0,0 Word # 1 standing bear ,0,0,0,0,0,0,0,0 "504,504,927,927,507,507,127,127 63,60,31,31,511,511,2047,2040 *4095,4080,8191,8176,8063,8048,7807,7800 "127,127,127,127,126,126,126,126 254,254,252,252 Word # 2 ,0,0,0,0,0,0,0,0 416128,16128,-3200,-3200,-16640,-16640,-1024,-1024 2-2048,30720,-4096,-4096,-0256,-0256,-0064,16320 0-0032,8160,-0016,8176,-0528,7664,-0784,15600 22-1024,-1024,-1024,-1024,-1024,-1024,-1024,-1024 -0512,-0512,32256,32256 Word #1 pole p0,31,0,17,0,31,0,17 0,31,0,17,0,31,0,17 0,31,0,17,0,31,0,17 0,31,0,17,0,31,0,17 0,31,0,17,0,31,0,17 0,31,0,17 Word # 2 ,0,0,0,0,0,0,0,0 0,0,0,0,0,0,0,0 0,0,0,0,0,0,0,0 0,0,0,0,0,0,0,0 0,0,0,0,0,0,0,0 0,0,0,0 Word # 1 missile bomb 29070,29070,22938,22938 .19890,19890,24582,26598,384,15996,384,7800 i(1056,7128,576,3504,576,3504,576,3504 ,"384,1632,0,2016,960,960,384,384 0,0,0,0,0,0,0,0 0,0,0,0,0,0,0,0 Word # 2 ,0,0,0,0,0,0,0,0 0,0,0,0,0,0,0,0 0,0,0,0,0,0,0,0 0,0,0,0,0,0,0,0 0,0,0,0,0,0,0,0 0,0,0,0  ,Word # 1 target 0,63 ,$31,480,112,911,455,1592,925,3170 E&816,3279,871,3224,816,3279,925,3170 455,1592,112,911,31,480,0,63 50,0,0,0,0,0,0,0 0,0,0,0,0,0,0,0,0,0 Word # 2 , 0,-8192 4-16384,15360,28672,-29184,7168,-7424,-12800,12672 626112,-26240,13824,-13952,26112,-26240,-12800,12672 07168,-7424,28672,-29184,-16384,15360,0,-8192 ,0,0,0,0,0,0,0,0 0,0,0,0,0,0,0,0,0,0  ,~4udg"jnh*h(olsrfpwrx|m