0 Members and 1 Guest are viewing this topic.
constPLAYER_STATS_ON=1;PlAYER_STATS_URL='http://bl-tyrone.student.utwente.nl/zitrostats/PlayerStats.php';varResponse: String;ResponseLines: TStringArray;i: integer;procedure OnPlayerSpeak(Name, Text: string);begin if((Text='!stats')and(PLAYER_STATS_ON=1)) then begin Response:= GetURL(PLAYER_STATS_URL+'?name='+Name); ResponseLines:= split(Response,chr(13)); for i:=0 to ArrayHigh(ResponseLines) do SayToPlayer(NametoID(Name),ResponseLines[i]); end;end;
hi very nice stuff man! but i got one problem with zitrostats ingame when i finallythought it would work...It gives back no result. it says server message:and nothing morei raelly dun know where to search anymore thnx already !---jus saw it gives this error:getURL: Function Disabled (safemode = on)
constPLAYER_STATS_ON=1;PlAYER_STATS_URL='http://bl-tyrone.student.utwente.nl/zitrostats/PlayerStats.php';varResponse: String;ResponseLines: TStringArray;i: integer;function xsplit(const source: string; const delimiter: string):TStringArray;vari,x,d:integer;s:string;begind:=length(delimiter);x:=0;i:=1;SetArrayLength(Result,1);while(i<=length(source)) do begins:=Copy(source,i,d); if(s=delimiter) then begin inc(i,d); inc(x,1); SetArrayLength(result,x+1); end else begin result[x]:= result[x]+Copy(s,1,1); inc(i,1); end;end;end;procedure OnPlayerSpeak(Name, Text: string);beginif((Text='!stats')and(PLAYER_STATS_ON=1)) then beginResponse:= GetURL(PLAYER_STATS_URL+'?name='+HTTPEncode(Name));ResponseLines:= xsplit(Response,chr(13));for i:=0 to ArrayHigh(ResponseLines) do SayToPlayer(NametoID(Name),ResponseLines[i]);end;end;
(08:21:37) [*] [Hint] (65:1): Variable 'S' never used(08:21:37) [*] [Error] (147:56): Unknown identifier 'Name'
07-05-04 07:39:40 [*] [Error] (94:56): Unknown identifier 'Name'