02.02.2012, 04:13
Код HTML:
#include <a_samp> #include <core> #include <float> new glob0; new glob4; new glob8[200]; new glob328; new glob32C; new glob330; new glob334; new glob338; new Float:glob33C[4][3] = { { -1324.823, 503.9639, 18.2343 }, { -1398.9096, 498.1954, 3.039 }, { -1411.2723, 496.9978, 11.1953 }, { -1317.417, 499.8055, 11.2025 } }; new Float:glob37C[4][3] = { { 2317.2099, 2429.0681, 3.2734 }, { 2238.0781, 2425.6267, 3.4691 }, { 2264.8757, 2487.8444, 2.8317 }, { 2271.6425, 2467.0644, 3.1045 } }; new Float:glob3BC[4][3] = { { 2614.7084, 2805.7529, 10.8203 }, { 2615.7873, 2848.737, 10.8203 }, { 2540.3666, 2848.4936, 10.8203 }, { 2540.4768, 2804.548, 10.8203 } }; new Float:glob3FC[4][3] = { { 572.6552, -2474.0462, -28.2578 }, { 515.4938, -2473.3206, -28.7179 }, { 481.1713, -2554.8716, -28.6922 }, { 570.5781, -2558.9766, -28.7151 } }; new glob43C; new glob440; function8(arg0[], &arg1, arg2) { new var0 = strlen(arg0); new var1 = arg1; new var2[255]; while(arg1 < var0 && arg0[arg1] != arg2 && arg1 - var1 < 254) { var2[arg1 - var1] = arg0[arg1]; arg1++; } var2[arg1 - var1] = 0; if(arg1 < var0 && arg0[arg1] == arg2) { arg1++; } return var2; } main() { return 0; } public OnFilterScriptInit() { CreateObject(988, 2319.7619, 2449.6306, 3.2734, -1.0, 0.0, 91.0); CreateObject(988, 2319.9189, 2443.7446, 3.2734, 0.0, 360.0, 267.9621); CreateObject(988, 2293.923, 2499.8002, 3.2734, 0.0, 0.0, 91.4478); CreateObject(988, 2294.0024, 2494.3679, 3.2734, 0.0, 0.0, 104.8811); glob328 = 0; return 1; } public OnPlayerConnect(playerid) { glob8[playerid] = 0; SendClientMessage(playerid, 0xFFFF00AA, " На сервере стоит duel system by Torres,чтобы вызвать"); SendClientMessage(playerid, 0xFFFF00AA, " на дуэль пишите /joinduel"); return 0; } public OnPlayerCommandText(playerid, cmdtext) { new var0[256]; new var1[256]; new var2[256]; new var3 = 0; var1 = function8(cmdtext, var3, 32); new var4[24]; new var5[24]; new var6 = 0; if(!strcmp(var1, "/joinduel", true)) { GetPlayerName(playerid, var4, 24); var0 = function8(cmdtext, var3, 32); if(!strlen(var0)) { SendClientMessage(playerid, 0xAA3333AA, " ИСПОЛЬЗОВАТЬ: /joinduel [id] [id оружия][id 2 оружия][место боя (0-3)][ваша ставка]"); return 1; } var6 = strval(var0); var0 = function8(cmdtext, var3, 32); if(!strlen(var0)) { SendClientMessage(playerid, 0xAA3333AA, " ИСПОЛЬЗОВАТЬ: /joinduel [id] [id оружия][id 2 оружия][место боя (0-3)][ваша ставка]"); return 1; } glob0 = strval(var0); if(glob0 < 0 || glob0 > 42 || glob0 == 19 || glob0 == 20 || glob0 == 21 || glob0 == 39 || glob0 == 40) { SendClientMessage(playerid, 0xAA3333AA, " ОШИБКА: Неправильный ID оружия."); return 1; } var0 = function8(cmdtext, var3, 32); if(!strlen(var0)) { SendClientMessage(playerid, 0xAA3333AA, " ИСПОЛЬЗОВАТЬ: /joinduel [id] [id оружия][id 2 оружия][место боя (0-3)][ваша ставка]"); return 1; } glob4 = strval(var0); if(glob4 < 0 || glob4 > 42 || glob4 == 19 || glob4 == 20 || glob4 == 21) { SendClientMessage(playerid, 0xAA3333AA, " ОШИБКА: Неправильный ID оружия."); return 1; } var0 = function8(cmdtext, var3, 32); if(!strlen(var0)) { SendClientMessage(playerid, 0xAA3333AA, " ИСПОЛЬЗОВАТЬ: /joinduel [id] [id оружия][id 2 оружия][место боя (0-3)][ваша ставка]"); return 1; } glob338 = strval(var0); if(glob338 < 0 || glob338 > 4) { SendClientMessage(playerid, 0xAA3333AA, " ОШИБКА: Неправильный ID места боя[0-3]."); return 1; } var0 = function8(cmdtext, var3, 32); if(!strlen(var0)) { glob32C = 100000; } glob32C = strval(var0); if(glob32C < 0 || glob32C > 100000 || glob32C > GetPlayerMoney(playerid)) { SendClientMessage(playerid, 0xAA3333AA, "ОШИБКА: Макс ставка 100000$,ставка не может быть меньше 0."); SendClientMessage(playerid, 0xAA3333AA, " и ставка не может превышать количество ваших денег"); return 1; } if(IsPlayerConnected(var6)) { if(!glob328) { if(!glob8[playerid]) { GetPlayerName(playerid, var4, 24); new var7[20]; new var8[20]; GetWeaponName(glob0, var7, 20); GetWeaponName(glob4, var8, 20); GetPlayerName(var6, var5, 24); format(var2, 256, " Вы вызвали %s на дуэль.Ваша ставка $%d", var5, 812); SendClientMessage(playerid, 0xFFFF00AA, var2); format(var2, 256, " 1 Оружие \"%s\", 2 Оружие \"%s\"", var7, var8); SendClientMessage(playerid, 0xFFFF00AA, var2); format(var2, 256, " %s(%i) вызывает вас на дуэль.1 Оружие \"%s\".2 Оружие \"%s\".Его ставка $%d", var4, playerid, var7, var8, 812); SendClientMessage(var6, 0xFFFF00AA, var2); format(var2, 256, " если вы согласны пишите /accept, если нет /decline"); SendClientMessage(var6, 0xFFFF00AA, var2); glob8[playerid] = 1; glob8[var6] = 1; glob440 = SetTimer("Soglasie", 60000, false); } else { SendClientMessage(playerid, 0xFFFF00AA, " Вы не можете вызывать 2 челов одновременно,сначала дождитесь ответа 1"); } } else { SendClientMessage(playerid, 0xFFFF00AA, " Подождите окончания текущей дуэли"); } } else { format(var2, 256, "%d не активный ид игрока.", var6); SendClientMessage(playerid, 0xAA3333AA, var2); } return 1; } if(!strcmp(var1, "/accept", true)) { var0 = function8(cmdtext, var3, 32); if(!strlen(var0)) { SendClientMessage(playerid, 0xAA3333AA, " ИСПОЛЬЗОВАТЬ: /accept [playerid][ваша ставка]"); return 1; } var6 = strval(var0); var0 = function8(cmdtext, var3, 32); if(!strlen(var0)) { glob330 = 100000; } glob330 = strval(var0); if(glob330 < 0 || glob330 > 100000 || glob330 > GetPlayerMoney(playerid)) { SendClientMessage(playerid, 0xAA3333AA, "ОШИБКА: Макс ставка 100000$,ставка не может быть меньше 0."); SendClientMessage(playerid, 0xAA3333AA, " и ставка не может превышать количество ваших денег"); return 1; } GetPlayerName(var6, var5, 24); GetPlayerName(playerid, var4, 24); if(IsPlayerConnected(var6)) { if(glob8[playerid] == 1 && glob8[var6] == 1) { if(!glob328) { glob334 = glob330; format(var2, 256, "*Вы согласились с вызовом на дуэль от %s.Общая ставка $%d", var5, 820); SendClientMessage(playerid, 0xFFFF00AA, var2); format(var2, 256, "%s согласился с вашим вызовом.Общая ставка $%d", var4, 820); SendClientMessage(var6, 0xFFFF00AA, var2); format(var2, 256, " %s(%i) вызывал %s(%i) на дуэль.Чтобы увидеть бой пишите /slezhkaon [id]", var4, playerid, var5, var6); SendClientMessageToAll(0xFFFF00AA, var2); SetPlayerHealth(playerid, 100.0); SetPlayerHealth(var6, 100.0); SetPlayerArmour(playerid, 100.0); SetPlayerArmour(var6, 100.0); if(!glob338) { new var7 = random(4); new var8 = random(4); SetPlayerPos(playerid, glob3BC[var7][0], glob3BC[var7][1], glob3BC[var7][2]); SetPlayerPos(var6, glob3BC[var8][0], glob3BC[var8][1], glob3BC[var8][2]); } else if(glob338 == 1) { new var7 = random(4); new var8 = random(4); SetPlayerPos(playerid, glob33C[var7][0], glob33C[var7][1], glob33C[var7][2]); SetPlayerPos(var6, glob33C[var8][0], glob33C[var8][1], glob33C[var8][2]); } else if(glob338 == 2) { new var7 = random(4); new var8 = random(4); SetPlayerPos(playerid, glob37C[var7][0], glob37C[var7][1], glob37C[var7][2]); SetPlayerPos(var6, glob37C[var8][0], glob37C[var8][1], glob37C[var8][2]); } else if(glob338 == 3) { new var7 = random(4); new var8 = random(4); SetPlayerPos(playerid, glob3FC[var7][0], glob3FC[var7][1], glob3FC[var7][2]); SetPlayerPos(var6, glob3FC[var8][0], glob3FC[var8][1], glob3FC[var8][2]); } ResetPlayerWeapons(playerid); ResetPlayerWeapons(var6); GivePlayerWeapon(playerid, glob0, 500); GivePlayerWeapon(var6, glob0, 500); GivePlayerWeapon(playerid, glob4, 500); GivePlayerWeapon(var6, glob4, 500); GivePlayerMoney(playerid, -glob330); GivePlayerMoney(var6, -glob32C); glob328 = 1; TogglePlayerControllable(playerid, false); TogglePlayerControllable(var6, false); glob43C = SetTimer("Duel", 10000, false); KillTimer(glob440); } else { SendClientMessage(playerid, 0xAA3333AA, " Подождите пока закончится нынешняя дуэль"); } } else { format(var2, 256, " Вы не получали приглашение на дуэль от %s.", var5); SendClientMessage(playerid, 0xAA3333AA, var2); } } else { format(var2, 256, "%d не активный ид игрока.", var6); SendClientMessage(playerid, 0xAA3333AA, var2); } return 1; } if(!strcmp(var1, "/decline", true)) { var0 = function8(cmdtext, var3, 32); if(!strlen(var0)) { SendClientMessage(playerid, 0xAA3333AA, " ИСПОЛЬЗОВАТЬ: /decline [playerid]"); return 1; } var6 = strval(var0); GetPlayerName(var6, var5, 24); GetPlayerName(playerid, var4, 24); if(IsPlayerConnected(var6)) { if(glob8[playerid] == 1 && glob8[var6] == 1 && !glob328) { glob8[playerid] = 0; glob8[var6] = 0; format(var2, 256, "*Вы отказались от дуэли с %s", var5); SendClientMessage(playerid, 0xFFFF00AA, var2); format(var2, 256, "%s отказался от дуэли с вами", var4); SendClientMessage(var6, 0xFFFF00AA, var2); KillTimer(glob440); } else { format(var2, 256, "*%s вас не вызывал,либо дуэль уже началась", var5); SendClientMessage(playerid, 0xFFFF00AA, var2); } } else { format(var2, 256, "%d не активный ид игрока.", var6); SendClientMessage(playerid, 0xAA3333AA, var2); } return 1; } if(!strcmp(var1, "/kill", true)) { SetPlayerHealth(playerid, 0.0); for(new var7 = 0; var7 < 200; var7++) { if(glob8[playerid] == 1 && glob328 == 1) { glob328 = 0; glob8[var7] = 0; } } return 1; } if(!strcmp(var1, "/endduel", true)) { new var7 = 0; while(++var7 < 200) { if(glob328 == 1 && glob8[var7] == 1) { glob8[var7] = 0; glob328 = 0; SpawnPlayer(var7); SendClientMessage(playerid, 0xAA3333AA, " Дуэль закончена"); } } return 1; } if(!strcmp(var1, "/slezhkaon", true)) { GetPlayerName(playerid, var4, 24); var0 = function8(cmdtext, var3, 32); if(!strlen(var0)) { SendClientMessage(playerid, 0xAA3333AA, " ИСПОЛЬЗОВАТЬ: /slezhkaon [id]"); return 1; } var6 = strval(var0); if(IsPlayerConnected(var6)) { if(glob328 == 1 && glob8[var6] == 1) { if(!glob8[playerid]) { format(var2, 256, "* %s(%i) смотрит за дуэлью,со стороны %s", var4, playerid, var5); SendClientMessageToAll(0xFFFF00AA, var2); SendClientMessage(playerid, 0xFFFF00AA, " Чтобы выйти из режима наблюдения пишите /slezhkaoff"); TogglePlayerSpectating(playerid, true); PlayerSpectatePlayer(playerid, var6, 1); } else { SendClientMessage(playerid, 0xFFFF00AA, " Вы не можете смотреть за боем.Вы учасник поединка"); } } else { SendClientMessage(playerid, 0xFFFF00AA, " Этот игрок не на дуэли"); } } else { format(var2, 256, "%d не активный ид игрока.", var6); SendClientMessage(playerid, 0xAA3333AA, var2); } return 1; } if(!strcmp(var1, "/slezhkaoff", true)) { TogglePlayerSpectating(playerid, false); return 1; } if(!strcmp(var1, "/weaponid", true)) { SendClientMessage(playerid, 0xFFFF00AA, "==================ID оружия=================="); SendClientMessage(playerid, 0xFFFF00AA, " 0 - Кулаки | 1 - Кастет | 2 - Клюшка | 3 - Дубинка"); SendClientMessage(playerid, 0xFFFF00AA, " 4 - Нож | 5 - Бита | 6 - Лопата | 7 - Кий | 8 - Меч"); SendClientMessage(playerid, 0xFFFF00AA, " 9 - Бензопила | 10 - Фиолет.Имитатор | 11 - Мал.Белый Имитатор"); SendClientMessage(playerid, 0xFFFF00AA, " 12 - Бол.Белый Имитатор | 13 - Сереб.Имитатор | 14 - Цветы | 15 - Лом"); SendClientMessage(playerid, 0xFFFF00AA, " 16 - Граната | 17 - Дым.Граната | 18 - Молотов | 22 - 9мм "); SendClientMessage(playerid, 0xFFFF00AA, " 23 - 9мм с глушителем | 24 - Дезерт Игл | 25 - Винчестер | 26 - Савн"); SendClientMessage(playerid, 0xFFFF00AA, " 27 - Спас-12 | 28 - Узи | 29 - Мп5 | 30 - АК-47 | 31 - М4 | 32 - Тек9"); SendClientMessage(playerid, 0xFFFF00AA, " 33 - Винтовка | 34 - Снайперка | 35 - РПГ | 36 - РПГ с наводкой"); SendClientMessage(playerid, 0xFFFF00AA, " 37 - Огнемет | 38 - Миниган | 41 - балончик | 42 - огнетушитель"); return 1; } if(!strcmp(var1, "/locationid", true)) { SendClientMessage(playerid, 0xFFFF00AA, "==================ID мест для дуэли=================="); SendClientMessage(playerid, 0xFFFF00AA, " 0 - Склад в Лас Вентурасе"); SendClientMessage(playerid, 0xFFFF00AA, " 1 - Большой корабль в Сан Фиерро"); SendClientMessage(playerid, 0xFFFF00AA, " 2 - Подземная стоянка в Лас Вентурасе"); SendClientMessage(playerid, 0xFFFF00AA, " 3 - Дно океана"); SendClientMessage(playerid, 0xFFFF00AA, "====================================================="); return 1; } if(!strcmp(var1, "/duelhelp", true)) { SendClientMessage(playerid, 0xFFFF00AA, "=====================Подсказки======================="); SendClientMessage(playerid, 0xFFFF00AA, " /joinduel - вызвать на дуэль"); SendClientMessage(playerid, 0xFFFF00AA, " /accept - принять вызов "); SendClientMessage(playerid, 0xFFFF00AA, " /decline - отказаться от дуэли"); SendClientMessage(playerid, 0xFFFF00AA, " /slezhkaon - следить за игроком на дуэли"); SendClientMessage(playerid, 0xFFFF00AA, " /slezhkaoff - завершить слежку"); SendClientMessage(playerid, 0xFFFF00AA, " /weaponid - посмотреть ид оружия"); SendClientMessage(playerid, 0xFFFF00AA, " /locationid - посмотреть ид мест для дуэли"); SendClientMessage(playerid, 0xFFFF00AA, " /endduel - завершить дуэль"); SendClientMessage(playerid, 0xFFFF00AA, "====================================================="); return 1; } return 0; } public OnPlayerDeath(playerid, killerid, reason) { new var0[24]; new var1[24]; new var2[256]; GetPlayerName(killerid, var0, 24); GetPlayerName(playerid, var1, 24); for(new var3 = 0; var3 < 200; var3++) { if(glob8[killerid] == 1 && glob8[playerid] == 1 && glob328 == 1) { ResetPlayerWeapons(killerid); SpawnPlayer(killerid); glob8[killerid] = 0; glob8[playerid] = 0; glob328 = 0; format(var2, 256, "*Поздравляю!Ты победил в поединке с %s", var1); SendClientMessage(killerid, 0xFFFF00AA, var2); format(var2, 256, " Ты проиграл в поединке с %s", var0); SendClientMessage(playerid, 0xFFFF00AA, var2); GivePlayerMoney(killerid, glob334); format(var2, 256, " %s победил в поединке с %s", var0, var1); SendClientMessageToAll(0xFFFF00AA, var2); TogglePlayerSpectating(var3, false); } } return 0; } public Duel() { for(new var0 = 0; var0 < 200; var0++) { if(glob8[var0] == 1 && glob328 == 1) { GameTextForPlayer(var0, "Duel is start", 3000, 3); TogglePlayerControllable(var0, true); KillTimer(glob43C); } } return 1; } public Soglasie() { for(new var0 = 0; var0 < 200; var0++) { glob8[var0] = 0; } SendClientMessageToAll(0xFFFF00AA, " Дуэль не состоялась,т.к. игрок не успел"); SendClientMessageToAll(0xFFFF00AA, " подтвердить участие в дуэли"); return 1; }
Код HTML:
C:\Users\hillko\Desktop\164_227_182_NDS\NDS.pwn(10 1) : error 025: function heading differs from prototype C:\Users\hillko\Desktop\164_227_182_NDS\NDS.pwn(10 7) : error 035: argument type mismatch (argument 1) C:\Users\hillko\Desktop\164_227_182_NDS\NDS.pwn(11 4) : error 035: argument type mismatch (argument 1) C:\Users\hillko\Desktop\164_227_182_NDS\NDS.pwn(12 1) : error 035: argument type mismatch (argument 1) C:\Users\hillko\Desktop\164_227_182_NDS\NDS.pwn(13 3) : error 035: argument type mismatch (argument 1) C:\Users\hillko\Desktop\164_227_182_NDS\NDS.pwn(14 5) : error 035: argument type mismatch (argument 1) C:\Users\hillko\Desktop\164_227_182_NDS\NDS.pwn(15 7) : error 035: argument type mismatch (argument 1) C:\Users\hillko\Desktop\164_227_182_NDS\NDS.pwn(21 2) : error 035: argument type mismatch (argument 1) C:\Users\hillko\Desktop\164_227_182_NDS\NDS.pwn(21 9) : error 035: argument type mismatch (argument 1) C:\Users\hillko\Desktop\164_227_182_NDS\NDS.pwn(31 2) : error 035: argument type mismatch (argument 1) C:\Users\hillko\Desktop\164_227_182_NDS\NDS.pwn(37 7) : error 035: argument type mismatch (argument 1) C:\Users\hillko\Desktop\164_227_182_NDS\NDS.pwn(10 6) : warning 204: symbol is assigned a value that is never used: "var3" C:\Users\hillko\Desktop\164_227_182_NDS\NDS.pwn(48 : warning 235: public function lacks forward declaration (symbol "Duel") C:\Users\hillko\Desktop\164_227_182_NDS\NDS.pwn(50 2) : warning 235: public function lacks forward declaration (symbol "Soglasie") Pawn compiler 3.2.3664 Copyright © 1997-2006, ITB CompuPhase 11 Errors.
