0 Members and 2 Guests are viewing this topic.
Your script works and you got help already that you even replied to. Just create a folder in "ServerFolder/Scripts/" that you name "Accounts" and it should work.
procedure SaveAccount(Name,Pass: string; PrimWep,MaxPower,Kills,SecWep,SMaxPower,SKills:byte; StickedTo:string; Status,Warned:byte;ShowPower,ShortenText,OnHitFlash,OnShootFlash:boolean);begin WriteFile('Accounts\'+Name+AccEnd,Pass+' '+inttostr(PrimWep)+' '+inttostr(MaxPower)+' '+inttostr(Kills)+' '+inttostr(SecWep)+' '+inttostr(SMaxPower)+' '+inttostr(SKills)+' '+iif(StickedTo<>'',StickedTo,'0')+' '+inttostr(Status)+' '+inttostr(Warned)+' '+iif(ShowPower,'1','0')+' '+iif(ShortenText,'1','0')+' '+iif(OnHitFlash,'1','0')+' '+iif(OnShootFlash,'1','0')+' ');end;