Megnevezés: Iram
Kategória:
Index: 0


Formula:ido_st := "";
@For(i:=1;i<=@Elements(SplitResult);i:=i+1;
ido_st := @If(@Word(SplitResult[i];"#";1)=@Word(@Input;"#";1);@Word(SplitResult[i];"#";11);ido_st)
);

kp := @Date(1900;1;1;0;0;0);
@If(ido_st="";@Return("");"");

ido :=@Date(@TextToNumber(@Middle(ido_st;6;4));@TextToNumber(@Left(ido_st;2)); @TextToNumber(@Middle(ido_st;3;2));@TextToNumber(@Middle(ido_st;11;2)); @TextToNumber(@Middle(ido_st
;14;2));@TextToNumber(@Middle(ido_st;17;2)));

millisecondtime := (ido - kp) * 1000;

sr := @Word(SplitResult;"#";1);
st := @Word(@Input;"#";2);
sd := @ToNumber(@Word(@Input;"#";3));
dd:= @ToNumber(@Word(@Input;"#";4));


speed := @If(st="0";@If(millisecondtime =0;0;sd / (millisecondtime / 3600000));st="1";@If(millisecondtime =0;0;(sd * KmInMile) / (millisecondtime / 3600000));st="2";@If(millisecondtime =0;0;sd / (millisecondtime / 60000));st="3";@If(millisecondtime =0;0;(sd * KmInMile) / (millisecondtime / 60000));st = "4";@If(sd = 0;0;millisecondtime / sd);st = "5";@If(sd = 0;0;millisecondtime / (sd * KmInMile));0);

speeddistance := @Text(speed;"F2");

perc := @Integer(@Modulo(speed; 3600000) / 60000);
mp := @Integer(@Modulo(@Modulo(speed; 3600000) ; 60000) / 1000);
speedtime := @Text(perc )+ ":"+ @Right("00" + @Text(mp );2);

@If(st = "0"; speeddistance + " km/h";st = "1"; speeddistance + " mph";st = "2"; speeddistance + " km/min";st = "3"; speeddistance + " miles/min";st="4";speedtime + " min/km";st="5";speedtime + " min/mile";"");
Oszlop név:
Oszlop típus: Nincs sorrendezés
Link típus: Nincs link