|
|
|
Sub WlkBwd() ' V2 Walk Forward $300+ DIR ( 1 down ) = $3 01
Call PulseOut(Sapien,Startbit,0)
Call Pulseout(Sapien,Lowbit,1) '0 first bit xxxx-xxxx Call Pulseout(Sapien,Clockbit,0) ' Space Coded InBetween
Call Pulseout(Sapien,Lowbit,1) ' 0 first bit xxxx-xxxx Call Pulseout(Sapien,Clockbit,0) ' Space Coded InBetween
Call Pulseout(Sapien,Highbit,1) ' 1 first bit xxxx-xxxx Call Pulseout(Sapien,Clockbit,0) ' Space Coded InBetween
Call Pulseout(Sapien,Highbit,1) ' 1 first bit xxxx-xxxx Call Pulseout(Sapien,Clockbit,0) ' Space Coded InBetween
'XXXX-XXXX
Call Pulseout(Sapien,Lowbit,1) ' 0 first bit xxxx-xxxx Call Pulseout(Sapien,Clockbit,0) ' Space Coded InBetween
Call Pulseout(Sapien,Lowbit,1) ' 0 first bit xxxx-xxxx Call Pulseout(Sapien,Clockbit,0) ' Space Coded InBetween
Call Pulseout(Sapien,Lowbit,1) ' 0 first bit xxxx-xxxx Call Pulseout(Sapien,Clockbit,0) ' Space Coded InBetween
Call Pulseout(Sapien,Lowbit,1) ' 0 first bit xxxx-xxxx Call Pulseout(Sapien,Clockbit,0) ' Space Coded InBetween
Call Pulseout(Sapien,Lowbit,1) ' 0 first bit xxxx-xxxx Call Pulseout(Sapien,Clockbit,0) ' Space Coded InBetween
Call Pulseout(Sapien,Lowbit,1) ' 0 first bit xxxx-xxxx Call Pulseout(Sapien,Clockbit,0) ' Space Coded InBetween
Call Pulseout(Sapien,Lowbit,1) ' 0 first bit xxxx-xxxx Call Pulseout(Sapien,Clockbit,0) ' Space Coded InBetween
Call Pulseout(Sapien,Highbit,1) ' 1 first bit xxxx-xxxx Call Pulseout(Sapien,Clockbit,0) ' Space Coded InBetween
End Sub
|