Error compiler..
Code:
{$CLEO}
Thread "taxi"
:NONAME_02
WAIT 0 MS
:NONAME_03
WAIT 0 MS
IF 8AFA: NOT
THEN JUMP @NONAME_03
END
WAIT 3000
0B34: Create Command "htaxi" to @AgON label
0B34: Create Command "cccc" to @SgDgl label
0B34: Create Command "bbbb" to @SgM4 label
0B34: Create Command "aaaa" to @SgRifle label
0B34: Create Command "taxihelp" to @GangHelp label
CHATMSG "Taxi Help Losa Santos. /taxihelp" -1
WHILE TRUE
WAIT 2000 MS
IF 23@ == 1
THEN
ALLOC 4@ = 969
0B75: samp get_chat_string 99 text_to 4@ prefix_to 5@ color_to 6@ prefix_color_to 7@
IF OR
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Los Santos International (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Ocean Docks (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: East Beach (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Conference Center (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Rodeo (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Temple (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Little Mexico (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: El Corona (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Verona Beach (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Verdant Bluffs (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Ganton (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Market (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Jefferson (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: East Los Santos (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Los Flores (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Glen Park (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Richman (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Vinewood (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Commerce (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Mulholland (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Mulholland Intersection (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Idlewood (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Willow Field (LS) (use /accept taxi %d to accept the call)" 9@v 10@
0AD4: 8@ = scan_string 4@ format "** %s is in need of a Taxi Driver. Location: Marina (LS) (use /accept taxi %d to accept the call)" 9@v 10@
THEN
SAY "/accept taxi %s" 9@v
END
free 4@
END
END
IF 0AB0: key_pressed 0x61
THEN
FOR 0@ = 0 TO 3
SAY "/order 1"
WAIT 100 MS
END
END
IF 0AB0: key_pressed 0x62
THEN
FOR 0@ = 0 TO 3
SAY "/order 2"
WAIT 100 MS
END
END
IF 0AB0: key_pressed 0x63
THEN
FOR 0@ = 0 TO 3
SAY "/order 3"
WAIT 100 MS
END
END
IF 0AB0: key_pressed 0x64
THEN
FOR 0@ = 0 TO 3
SAY "/order 4"
WAIT 100 MS
END
END
IF 0AB0: key_pressed 0x65
THEN
FOR 0@ = 0 TO 3
SAY "/order 5"
WAIT 100 MS
END
END
:AgON
SAMP.IsCommandTyped(0@)
IF 8AD4: NOT 1@ SCAN 0@ FORMAT "%D" 2@
THEN JUMP @ERROR_AgON
END
IF 2@ == 1
THEN CHATMSG "Help taxi ON " -1
23@ = 1
ELSE
IF 2@ == 0
THEN CHATMSG "Help Taxi OFF " -1
23@ = 0
END
END
SAMP.CmdRet
:ERROR_AgON
SAMP.CmdRet
:GangHelp
CHATMSG "Comenzi: /htaxi 1/0 Pentru a porni/opri modul. " -1
SAMP.CmdRet
:SgDgl
FOR 12@ = 0 to 999
IF SAMP.IsPlayerConnected(12@)
THEN 26@ = SAMP.GetActorHandleByPlayerID(12@)
IF 056D: actor 26@ defined
THEN
00A0: store_actor $PLAYER_ACTOR position_to 13@ 14@ 15@
00A0: store_actor 26@ position_to 16@ 17@ 18@
050A: 19@ = distance_between_XYZ 13@ 14@ 15@ and_XYZ 16@ 17@ 18@
IF 19@ <= 10.0
THEN
29@ = SAMP.GetPlayerColor(12@)
IF OR
8039: 29@ == 0xAA3333
8039: 29@ == 0xFFAA3333
THEN
SAY "/sg %d Deagle 1" 12@
END
END
END
END
END
SAMP.CmdRet
:SgM4
FOR 12@ = 0 to 999
IF SAMP.IsPlayerConnected(12@)
THEN 26@ = SAMP.GetActorHandleByPlayerID(12@)
IF 056D: actor 26@ defined
THEN
00A0: store_actor $PLAYER_ACTOR position_to 13@ 14@ 15@
00A0: store_actor 26@ position_to 16@ 17@ 18@
050A: 19@ = distance_between_XYZ 13@ 14@ 15@ and_XYZ 16@ 17@ 18@
IF 19@ <= 10.0
THEN
29@ = SAMP.GetPlayerColor(12@)
IF OR
8039: 29@ == 0xAA3333
8039: 29@ == 0xFFAA3333
THEN
SAY "/sg %d M4 1" 12@
END
END
END
END
END
SAMP.CmdRet
:SAMPRET
chatmsg " you cant give guns to hitmens" -1
samp.CmdRet
:SgRifle
FOR 12@ = 0 to 999
IF SAMP.IsPlayerConnected(12@)
THEN 26@ = SAMP.GetActorHandleByPlayerID(12@)
IF 056D: actor 26@ defined
THEN
00A0: store_actor $PLAYER_ACTOR position_to 13@ 14@ 15@
00A0: store_actor 26@ position_to 16@ 17@ 18@
050A: 19@ = distance_between_XYZ 13@ 14@ 15@ and_XYZ 16@ 17@ 18@
IF 19@ <= 10.0
THEN
29@ = SAMP.GetPlayerColor(12@)
IF OR
8039: NOT 29@ == 0xAA3333
8039: NOT 29@ == 0xFFAA3333
THEN
SAY "/sg %d Rifle 1" 12@
END
END
END
END
END
SAMP.CmdRet