Starbase/Reference/AAS_Strafe.yolol
2024-05-09 14:05:30 -07:00

21 lines
600 B
Plaintext

r=1000 p=100 n=-p :CV=0 :CH=0 //r=AU/AD/AL/AR p=FcuInputRange
goto2+:AAS //Non-assigning wait loop
z/=:C a=:AL<r b=:AD<r :CH=p*a+n*(:AR<r-a) :CV=p*b+n*(:AU<r-b) goto4-:c
if(:AN+:c)<1then:CV=0 :CH=0 endgoto3*:AAS
goto1
//Designed to be used with AAS_Stop, MovementArrest, and ESTOP systems
//Turn the AAS on and then off to re-init line1 values
//Dependencies
//NavSuite LeverCenterCenterValue computer controls.
//AAS_Stop chip for :C output
//:AN Button from MovementArrest system
z/=:AAS a=:AL<r b=:AD<r :CH=p*a+n*(:AR<r-a) :CV=p*b+n*(:AU<r-b) goto3
r>(:AL+:AR+:AU+:AD)
//Original by Thaccus