> EOL 0.01 # Convert end of line sequences : (@ :Close_All: " at line "+Þ,<128 <>17):exit(): 23A$=OS_GetEnv:in%=0:out%=0: os%>31:Win_TextIO [-cr|-lf|-crlf|-lfcr] []":exit(0) F^eol%=(cl("-crlf",0) 1) (cl("-lfcr",0) 2) (cl("-cr",0) 3) (cl("-lf",0) 4) P in$=cl("",0):out$=cl("",0) ZY in$="": "Input file: "in$:" output file: "out$: eol%=0: "Output EOL type: "eol% dJ eol%=0:eol%=10-3*(os%<6): os%>31:eol%=1: Default for this platform n: x3same%=out$="" out$=in$: same%:out$="!!tmp!!" ;in%=(in$): in%=0:"File '"in$"' not found":exit(214) Gout%=(out$): out%=0:"Can't save '"out$"'":#in%:in%=0:exit(192)  wr(out%,rd(in%)) eol%=1:#out%,13:#out%,10 eol%=2:#out%,10:#out%,13  eol%=3:#out%,13  eol%=4:#out%,10 #in% #out%:out%=0 #in%:in%=0 4 same%: "Delete "+in$: "Rename "+out$+" "+in$ exit(0) : : Win_TextIO "0ș "GetStdHandle",-10 @hfile%(1):*INPUT 13 ,1ș "GetStdHandle",-11 @hfile%(2):*OUTPUT 14 6&ș "SetConsoleMode",@hfile%(1),0: @: JClose_All T"in%=in%:in%:A%=in%:in%=0:#A% ^'out%=out%:out%:A%=out%:out%=0:#A% h r: |9ݤrd(i%):A%,B%,A$::A%=#i%:A%<>10A%<>13:A$=A$+A% GA%=10A%=13#i%:#i%:B%=#i%:A%=B%(B%<>13B%<>10):#i%=#i%-1 =A$ wr(o%,A$):A$="": !A%=1A$:#o%,A$,A%,1):: : cݤcl(l$,n%):l$="":A$=s(A$):A$=34:A%=A$+" "" ",""" ",2):l$=A$,2,A%-2):A$=s(A$,A%+1)):=l$ "":A%=A$,l$):A%:A$=s(A$,A%-1)+A$,A$," ",A%)+1))+" ":= n%=0:l$<>"":= %A%=" ",l$=32)+A$,l$):A%=0:="" 'A$=A$,A%-1)+s(A$,A$," ",A%)+1)) Cl$=32:l$=A$,A%):A$=A$,A%-1):=l$,1-(l$=34),l$+2*(l$=34)) PA$,A%,1)<>34:l$=A$,A%,A$+" "," ",A%)-A%):A$=A$,A%-1)+A$,A%+l$+1):=l$ Jl$=A$,A%+1,A$+""" ",""" ",A%+1)-A%-1):A$=A$,A%-1)+A$,A%+l$+3):=l$ /ݤs(A$):A$,1)=" ":A$=A$,2):A$,1)<>" " +A$,1)=" ":A$=A$,A$-1):A$,1)<>" " &=A$ 0: ::ݤOS_GetEnv:A$,A%,X%,Y%:X%=1:os%=((&FFF4)&FF00)256 Dd!=&D7C1C7C5:run$=ARGV$(0):ARGC:A%=1ARGC:A$=A$+ARGV$(A%)+" "::=A$,A$-1)!=&D7C1C7C5:="" NMos%>31:>&FFFFF:X%256:ș"GetModuleFileName",0,X%,255:run$=$$X%:=@cmd$ X\A%=(>&FFFF)&900:?(P-3):A%=((>&9FFF)A%)((&1400-)(A%=0))A%=((A%-&500)&200)&FFF biA$=$(-&E00+A%):A%=0:run$=A$:ș16A$,,A%:ș72,"",A%:A$=A$,1+A$+" "," ",1+A$," "))):A$=0:A$=run$ l*Y%=-10:A$=" "+A$:A$=A$,2):A$<>32 v5Y%:A$=34:A%=A$,"""",2)+1 Y%:A%=A$+" "," ") CY%:run$=A$,1-(A$=34),A%-1+2*(A$=34)):run$<>"":A$=A$,A%+1)  :=A$ &os(A$):A$=42:A$ A$<>"":A$  Fexit(A%):"FX1,"+(A%255):quit$=quit$:A$=quit$:quit$="":os(A$) >&FFFFF:Ș A% os%<6: *Quit  :