sub NewChat(Data())
PlayerID = data(0)
Chatmessage = data(1)
If len(Chatmessage) > 0 then
'SendOnscreenMessage PlayerID, "fu", 5000
If lcase(Chatmessage) = "/taxi" then
SendOnscreenMessage PlayerID, "Usage: /taxils Los Santos ~n~ /taxisf San Fierro ~n~ /taxilv Las Venturas", 5000
If lcase(Chatmessage) = "/taxils" then
SendOnscreenMessage PlayerID, "Here we are, Los Santos", 5000
SetPlayerLocation PlayerID,2488.847168,-1662.657959,15.335947
If lcase(Chatmessage) = "/gaysf" then
SendOnscreenMessage PlayerID, "Here we are, San Fierro", 5000
SetPlayerLocation PlayerID,1982.051025,152.750656,30.00000
If lcase(Chatmessage) = "/taxilv" then
SendOnscreenMessage PlayerID, "Here we are, Las Venturas", 5000
SetPlayerLocation PlayerID,2084.678467,1680.260986,12.00000
end if
end if
end if
end if
end if
end sub