Advertisement
Guest User

Hard Flips vp10

a guest
Oct 27th, 2016
139
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. '====================
  2. '   -NEW     HARD
  3. '       FLIPS
  4. '====================
  5. 'just switches EOStorque when hit
  6. const HardFlips = 1 'move me!
  7. dim defaultEOS, hardEOS
  8. defaultEOS = LeftFlipper.eostorque
  9. hardEOS = 2200 / LeftFlipper.strength   'eos equivalent to 2200 strength
  10. if HardFlips = 0 then TriggerLF.enabled = 0 : TriggerRF.enabled = 0 end if
  11.  
  12. Sub TriggerLF_Hit()
  13.     dim finalspeed
  14.     finalspeed = SQR(activeball.velx * activeball.velx + activeball.vely * activeball.vely)
  15.     If finalspeed > 3 then
  16.         LeftFlipper.eostorque = hardEOS
  17.     End if
  18. end sub
  19.  
  20. Sub TriggerRF_Hit()
  21.     dim finalspeed
  22.     finalspeed = SQR(activeball.velx * activeball.velx + activeball.vely * activeball.vely)
  23.     If finalspeed > 3 then
  24.         RightFlipper.eostorque = hardEOS
  25.     End if
  26. end sub
  27.  
  28. 'Put this anywhere there's rotatetostart
  29. LeftFlipper.EOStorque = defaultEOS
  30. 'and for right flipper...
  31. RightFlipper.EOStorque = defaultEOS
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement