> FuncSpeed ,L%=100 : Loop, increase for faster CPUs N%=-100: Negative int (N=-1E2 : Negative float 2P%=100 : Positive int <P=1E2 : Positive float FA1$="abcde" PA2$="abcdefghij" ZA3$="abcdefghijklmno" dA4$="abcdefghijklmnopqrst" n N$="" x:  Conversion "Cast float to int: "; 2A%=L%:T%=:B%=:A%=A%-1:A%=0:;-T%;"cs";4; "Cast int to float: "; 0A%=L%:T%=:B=B%+:A%=A%-1:A%=0:;-T%;"cs"  :  Functions "num = NEG +int: "; 4A%=L%:T%=:B%=-P%:A%=A%-1:A%=0:;-T%;"cs";4; "num = NEG -int: "; 0A%=L%:T%=:B%=-N%:A%=A%-1:A%=0:;-T%;"cs" "num = NEG +float: "; 2A%=L%:T%=:B=-P:A%=A%-1:A%=0:;-T%;"cs";4; "num = NEG -float: "; .A%=L%:T%=:B=-N:A%=A%-1:A%=0:;-T%;"cs" ": ,"num = ABS +int: "; 64A%=L%:T%=:B%=P%:A%=A%-1:A%=0:;-T%;"cs";4; @"num = ABS -int: "; J0A%=L%:T%=:B%=N%:A%=A%-1:A%=0:;-T%;"cs" T"num = ABS +float: "; ^2A%=L%:T%=:B=P:A%=A%-1:A%=0:;-T%;"cs";4; h"num = ABS -float: "; r.A%=L%:T%=:B=N:A%=A%-1:A%=0:;-T%;"cs" |: "num = INT +int: "; 4A%=L%:T%=:B%=P%:A%=A%-1:A%=0:;-T%;"cs";4; "num = INT -int: "; 0A%=L%:T%=:B%=N%:A%=A%-1:A%=0:;-T%;"cs" "num = INT +float: "; 3A%=L%:T%=:B%=P:A%=A%-1:A%=0:;-T%;"cs";4; "num = INT -float: "; /A%=L%:T%=:B%=N:A%=A%-1:A%=0:;-T%;"cs" : "int = NOT +int: "; 4A%=L%:T%=:B%=P%:A%=A%-1:A%=0:;-T%;"cs";4; "int = NOT -int: "; 0A%=L%:T%=:B%=N%:A%=A%-1:A%=0:;-T%;"cs" "int = NOT +float: "; 3A%=L%:T%=:B%=P:A%=A%-1:A%=0:;-T%;"cs";4; "int = NOT -float: "; &/A%=L%:T%=:B%=N:A%=A%-1:A%=0:;-T%;"cs" 0: :"num = SGN +int: "; D4A%=L%:T%=:B%=P%:A%=A%-1:A%=0:;-T%;"cs";4; N"num = SGN -int: "; X0A%=L%:T%=:B%=N%:A%=A%-1:A%=0:;-T%;"cs" b"num = SGN +float: "; l3A%=L%:T%=:B%=P:A%=A%-1:A%=0:;-T%;"cs";4; v"num = SGN -float: "; /A%=L%:T%=:B%=N:A%=A%-1:A%=0:;-T%;"cs" :  "num = VAL ""12345"": "; 9A%=L%:T%=:B%="12345":A%=A%-1:A%=0:;-T%;"cs";4;  "num = VAL ""-12345"" "; 6A%=L%:T%=:B%="-12345":A%=A%-1:A%=0:;-T%;"cs"  "num = EVAL ""PI"": "; 5A%=L%:T%=:B="PI":A%=A%-1:A%=0:;-T%;"cs";4;  "num = EVAL ""PI"": "; 1A%=L%:T%=:B="PI":A%=A%-1:A%=0:;-T%;"cs"  :  Fetch info "read PAGE: ";  2A%=L%:T%=:B%=:A%=A%-1:A%=0:;-T%;"cs";4; "scan for TOP: ";  /A%=L%:T%=:B%=P:A%=A%-1:A%=0:;-T%;"cs" *"read LOMEM: "; 42A%=L%:T%=:B%=:A%=A%-1:A%=0:;-T%;"cs";4; >"read HIMEM: "; H.A%=L%:T%=:B%=:A%=A%-1:A%=0:;-T%;"cs" R"read ERL: "; \2A%=L%:T%=:B%=:A%=A%-1:A%=0:;-T%;"cs";4; f"read ERR: "; p.A%=L%:T%=:B%=:A%=A%-1:A%=0:;-T%;"cs" z"read TRUE: "; 2A%=L%:T%=:B%=:A%=A%-1:A%=0:;-T%;"cs";4; "read FALSE: "; .A%=L%:T%=:B%=:A%=A%-1:A%=0:;-T%;"cs" "read COUNT: "; 2A%=L%:T%=:B%=:A%=A%-1:A%=0:;-T%;"cs";4; "read PI: "; -A%=L%:T%=:B=:A%=A%-1:A%=0:;-T%;"cs"  :  String functions "num = ASC string: "; 5A%=L%:T%=:B%=A1$:A%=A%-1:A%=0:;-T%;"cs";4; "string = CHR$ num: "; 0A%=L%:T%=:A$=P%:A%=A%-1:A%=0:;-T%;"cs" "num = LEN string5: "; 5A%=L%:T%=:B%=A1$:A%=A%-1:A%=0:;-T%;"cs";4; $"num = LEN string20: "; .1A%=L%:T%=:B%=A4$:A%=A%-1:A%=0:;-T%;"cs" 8"num = INSTR(s,m): "; B:A%=L%:T%=:B%=A4$,"k"):A%=A%-1:A%=0:;-T%;"cs";4; L"num = INSTR(s,m,o): "; V8A%=L%:T%=:B%=A4$,"k",6):A%=A%-1:A%=0:;-T%;"cs" `"str = STRING$(5x20): "; j8A%=L%:T%=:A$=5,A4$):A%=A%-1:A%=0:;-T%;"cs";4; t"str = STR$ num: "; ~0A%=L%:T%=:A$=P%:A%=A%-1:A%=0:;-T%;"cs" :  LEFT$  MID$  RIGHT$ :  Trig  ACS  ASN  ATN  COS  DEG  EXP  LN  LOG  RAD  SIN ( SQR 2 TAN <: F< I/O - time bound by API call, so timing not meaningful P OPENIN Z OPENUP d OPENOUT n BGET x PTR  EXT  EOF :  ADVAL  GET  INKEY  POUNT  POS  VPOS  GET$  INKEY$  TIME  TIME$ :  Func/Prov lookup  FN " PROC