Назад

Охотник

Автор: kadze: Дата: 04.09.2011

izlude,203,135,4	script	Охотник	414,{
setarray .Forbidden[0],1001,1002,1004,1005,1007,1008,1009,1010,1011,1012,1014,1015,1016,1018,1019,1020,1023,1024,1025,1026,1028,1029,1030,1031,1032,1034,1035,1036,1037,1040,1041,1042,1044,1045,1047,1048,1049,1050,1051,1052,1053,1054,1055,1056,1057,1058,1060,1061,1063,1064,1066,1067,1068,1069,1070,1071,1072,1073,1074,1076,1077,1078,1079,1080,1081,1082,1088,1094,1095,1097,1098,1099,1100,1101,1102,1103,1104,1105,1106,1107,1109,1110,1111,1113,1114,1116,1117,1118,1119,1121,1122,1123,1124,1125,1126,1127,1128,1134,1135,1139,1140,1141,1144,1145,1148,1149,1151,1154,1155,1156,1158,1160,1161,1162,1163,1164,1165,1166,1167,1169,1170,1174,1175,1178,1192,1193,1194,1195,1199,1206,1207,1208,1213,1216,1242,1249,1253,1254,1257,1264,1265,1266,1267,1269,1271,1273,1277,1278,1282,1292,1310,1314,1315,1316,1317,1318,1319,1365,1366,1368,1369,1371,1372,1378,1383,1386,1390,1400,1402,1403,1406,1613,1614,1616,1627,1628,1634,1635,1636,1637,1638,1639,1653,1655,1656,1657,1670,1671,1672,1673,1676,1677,1678,1679,1682,1698,1699,1714,1716,1717,1769,1770,1771,1773,1775,1776,1782,1864,1865,1867,1880,1881,1882,1986,1987,1988,1995,1999,2013,2015,2016,2019,2070,2071,2074,2084,2085,2086,2092,
2136,2137,2154;
if(!#ubil)
{
set $namenpc$,"[Охотник]";
mes $namenpc$;
mes "Привет";
next;
mes $namenpc$;
mes "Желаешь убить несколько монстров?";
mes "Я вознагражу тебя";
switch(select("Да:Не особо"))
{
case 1:
mes $namenpc$;
mes "Секунду.Я дам тебе задание";
sleep2 2000;
set s,getarraysize(.Forbidden);
set .@k,rand(1,s);
set #monster,.Forbidden[.@k];
set $MonsterName$, strmobinfo(1,#monster);
set #kol,rand(100,500);
next;
mes $namenpc$;
mes "Убей " + #kol + " " + $MonsterName$;
set #ubil,1;
OnNPCKillEvent:
if ( killedrid == #monster )
{
set #z, #z + 1; // +1 моб
dispbottom "Убито "+#z+" монстров";
if(#z >= #kol)
{
set ubil,0;
set priz,rand(1,5);
set #ubil,0;
set #monster,0;
set #z,0;
set $MonsterName$,0;
if (priz==1||priz==3||priz==5)
{
set zeny,zeny+20000000;
dispbottom "[Охотник]: Молодец!Ты убил всех монстров!Держи награду 20кк зени!";
end;
}
else
{
if (priz==2)
{
getitem 7227,1;
dispbottom "[Охотник]: Молодец!Ты убил всех монстров!Держи TCG Card!";
end;
}
else
{
getitem 12103,1;
dispbottom "[Охотник]: Молодец!Ты убил всех монстров!Держи Bloody Branch!";
end;
}
}
end;
}
close;
end;
}
close;
end;
case 2:
mes $namenpc$;
mes "Жаль...Ты был бы полезен";
close;
end;
}
}
else
{
set namem$, strmobinfo(1,#monster);
mes $namenpc$;
mes "Приходи когда выполнишь свое задание";
switch(select("Показать задание:Уйти"))
{
case 1:
mes $namenpc$;
mes "Убей " + #kol + " " + namem$;
close;
end;
case 2:
close;
end;
}
close;
end;
}
}


такой незамысловатый нпц.выдает убить рандомного моба рандомное количество,но почему то иногда выдает мобов не из массива в чем ошибка? скрипты не особо умею писать х) но писал как не странно сам

Автор: kadze: Дата: 04.09.2011

спасибо тупанул х)