fix folders

This commit is contained in:
Zan
2024-05-09 16:07:27 -07:00
parent cfa8289330
commit 829c151baf
1959 changed files with 0 additions and 0 deletions

View File

@@ -0,0 +1 @@
if:fcubackward==100then:cruise=10end goto1

View File

@@ -0,0 +1 @@
:GenRate=:MinEPS*:Min_EPS+(10000-:Battery)/80 goto1

View File

@@ -0,0 +1,4 @@
n="\n" a="h" b="m" c="s" k="km" e="\n\nDistance:\n"
s=t%60 m=(t-s)%3600/60 h=(t-m*60-s)/3600 d=:sp*t/1000
:FuelTime=n+h+a+m+b+(s-s%1)+c+e+d+k f=:Fuel :fcw=19
t=:Fuel/((f-:Fuel)/4) goto2

View File

@@ -0,0 +1 @@
:MinEPS=(:MinEPS+:mes)*(:MinEPS>=0)-:MinEPS>100 goto1

View File

@@ -0,0 +1,5 @@
n="\n" k=1000 u="km" t="Trip:"+n
if:odo_res>0then:odometer=n+"Reseting..." :odo_t=0end
s=:sp :odo_l+=s/k :odo_t+=s/k
if:Odometer==""thengoto1end :Odometer=n+:odo_l+u+n+n+t+:odo_t+u+n
goto1

View File

@@ -0,0 +1,4 @@
n="\n" a="h" b="m" c="s" k="km" e="\n\nDistance:\n" t=0
s=t%60 m=(t-s)%3600/60 h=(t-m*60-s)/3600 d=:sp*t/1000
:PropTime=n+h+a+m+b+(s-s%1)+c+e+d+k p=:Propellant :pcw=19
t=:Propellant/((p-:Propellant)/4) goto2

View File

@@ -0,0 +1 @@
:sense=(:sense+:sss)*(:sense>=0)-:sense>100 goto1

View File

@@ -0,0 +1,2 @@
if:sloth<1then:sense1=100 :sense2=-100 goto1end
:sense1=:sensitivity :sense2=-:sensitivity goto1

View File

@@ -0,0 +1,12 @@
n="\n" q="y" j="w" k="d" l="h" o="m"
u="s" g="Reseting..." a=60 b=a*a c=b*24 e=c*7 f=c*365 x=1000
if:t_res>0then:ts=0 z=n+n+g end :Timer=z
t=:ts s=t%a t-=s m=t%b/a t-=m*a h=t%c/b t-=h*b d=t%e/c t-=d*c w=t%f/e
t-=w*e y=t/f z=n ify>0thenz+=y+q end r=w%1 d+=r*7 ifd>6thenw++ d-=7end
ifw>0thenz+=w/x*x+j end v=d%1 ifv==0.999thend+=0.001end // rounding
ifd>0thenz+=d+k+n elsez+=n end z+=h+l+m+o+s+u+n+n :ts++ goto3
// Outputs:
// :Timer - Global for text panel
// Inputs:
// :ts - store timer in seconds, put in memory chip or device

View File

@@ -0,0 +1 @@
:fuel=:f1+:f2+:f3+:f4+:f5+:f6+:f7+:f8+:f9+:f10+:f11+:f12 goto1

View File

@@ -0,0 +1,2 @@
s=3 if:Ping<1thengoto1end i=0 :ponder=1 :idBlink=1
ifi<s*5theni+=1 goto2end :Ping=0 :idBlink=0 :ponder=0 goto1

View File

@@ -0,0 +1 @@
if:Turtle<100then:Turtle=:TurtleRate end goto1

View File

@@ -0,0 +1 @@
:TurtleRate=(:TurtleRate+:trs)*(:TurtleRate>=0)-:TurtleRate>100 goto1