JustHateMe
-
Постов
139 -
Зарегистрирован
-
Посещение
-
Победитель дней
6
Сообщения, опубликованные JustHateMe
-
-
Если не против, так покрасивее вроде
Да, спасибо.. так удобнее
Возьму на вооружение =) -
У меня стоит 15085, вроде нареканий нету.
-
Спасибо
-
1
-
1
-
-
Присоединяюсь, интересно узнать цену и время исполнения.
-
1
-
-
Собственно, чего-то "оригинального" в нем особо нет.. Обычный шапочник.. только через select =) Собственно учусь только -)
prontera,164,165,3 script Шапка нннада? 430,{
mes "[Non player charter]";
mes "Приветствую тебя " + (Sex?"^FF0000 Mr. ^FF0000":"^FF0000 Mrs.^FF0000") + " "+ strcharinfo(0);
next;
mes "[Non player charter]";
mes "Я, могу преобразить тебя. Дать тебе эксплюзивную шапочку!";
mes "Но только в обмен на что-то.. желаешь попробовать?";
next;
if(select("Да! Крути меня полностью:Нет")==2){ mes "[Non player charter]"; mes "Хорошо.. Ты всегда можешь найти меня здесь.."; close ;}
mes "[Non player charter]";
mes "Оkay, смотри мой список шапочек";
specialeffect2 435 +strcharinfo(0);
next;
if(select("Смотреть список:Я передумал")==2){ mes "[Non player charter]"; mes "Хорошо.. Ты всегда можешь найти меня здесь.."; close; }
switch(select("Bunny Top Hat:Chicken Hat [1]:Chick Hat:Deviling Hat [1]:Fish Head Hat:Fish In Mouth:Flower Crown:Laurel Wreath [1]:Hibiscus:Hyuke's Black Cat Ears:Hunter's Cap [1]:Koneko Hat:Wild Rose Hat [1]:Lif Doll Hat [1]:Little Angel Doll:Purple Cowboy Hat [1]")){
case 1:
mes "Для получения Bunny Top Hat тебе нужно принисти следующие вещи:";
mes "^000088Magician Hat [id 5045] Х1^000000.^000088 Bunny Band [id 2214] Х1 ^000000.^000088 Scarlet Dyestuffs [id 975] Х5 ^000000";
mes "Ты все принес?";
if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; }
if(countitem(5045) < 1 || countitem(2214) < 1 || countitem(975) < 5){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;}
delitem 5045,1;
delitem 2214,1;
delitem 975,5;
next;
mes "[Non player charter]";
mes "Поздравляю! Вот твоя шапочка.";
getitem 5378,1;
close;
case 2:
mes "Для получения Chicken Hat [1] тебе нужно принисти следующие вещи:";
mes " ^000088Shell [id 935] Х200 ^000000 ^000088 Feather of Birds [id916 ] Х100 ^000000 ^000088 Feather [id 949 ] Х50 ^000000 ^000088 White Dyestuffs [id 982 ] Х1 ^000000";
mes "Ты все принес?";
if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; }
if(countitem(935) < 200 || countitem(916) < 100 || countitem(949) < 50 || countitem(982) < 1){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;}
delitem 935,200;
delitem 916,100;
delitem 949,50;
delitem 982,1;
next;
mes "[Non player charter]";
mes "Поздравляю! Вот твоя шапочка.";
getitem 5431,1;
close;
case 3:
mes "Для получения Chick Hat тебе нужно принисти следующие вещи:";
mes "^000088 Chicken Hat [1] [id 5431] Х1 ^000000.^000088 Lemon Dyestuffs [id 976] Х5 ^000000";
mes "Ты все принес?";
if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; }
if(countitem(5431) < 1 || countitem(976) < 5){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;}
delitem 5431,1;
delitem 976,5;
next;
mes "[Non player charter]";
mes "Поздравляю! Вот твоя шапочка.";
getitem 5283,1;
close;
case 4:
mes "Для получения Deviling Hat [1] тебе нужно принисти следующие вещи:";
mes "^000088Little Evil Wing [id 1039] Х200 ^000000 ^000088 Hand of God [id 1009] Х5 ^000000 ^000088 Cap [1] [id 2227] Х1 ^000000 ^000088 Evil Wing [id 2255] Х1 ^000000 ^000088 Black Dyestuffs [id 983] Х3 ^000000";
mes "Ты все принес?";
if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; }
if(countitem(1039) < 200 || countitem(1009) < 5 || countitem(2227) < 1 || countitem(2255) < 1 || countitem(983) < 3){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;}
delitem 1039,200;
delitem 1009,5;
delitem 2227,1;
delitem 2255,1;
delitem 983,3;
next;
mes "[Non player charter]";
mes "Поздравляю! Вот твоя шапочка.";
getitem 5254,1;
close;
case 5:
mes "Для получения Fish Head Hat тебе нужно принисти следующие вещи:";
mes "^000088Fin [id 951] Х150^000000 ^000088Aquamarine [id 720] Х50^000000 ^000088Fish Tail [id 1023] Х100^000088Rotten Fish [id 624] Х20^000000";
mes "Ты все принес?";
if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; }
if(countitem(951) < 150 || countitem(720) < 50 || countitem(1023) < 100 || countitem(624) < 20){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;}
delitem 951,150;
delitem 720,50;
delitem 1023,100;
delitem 624,20;
next;
mes "[Non player charter]";
mes "Поздравляю! Вот твоя шапочка.";
getitem 5380,1;
close;
case 6:
mes "Для получения Fish In Mouth тебе нужно принисти следующие вещи:";
mes "^000088Gill [id 956] Х100^000000^000088Sticky Mucus [id 938] Х150^000000 ^000088Fish Tail [id 1023] Х100^000000^000088Cobaltblue Dyestuff [id 978] х1^000000";
mes "Ты все принес?";
if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; }
if(countitem(956) < 100 || countitem(938) < 150 || countitem(1023) < 100 || countitem(978) < 1){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;}
delitem 956,100;
delitem 938,150;
delitem 1023,100;
delitem 978,1;
next;
mes "[Non player charter]";
mes "Поздравляю! Вот твоя шапочка.";
getitem 5403,1;
close;
case 7:
mes "Для получения Flower Crown тебе нужно принисти следующие вещи:";
mes "^000088Tough Vines [id 7197] Х200^000000 ^000088Pointed Scale [id 906] Х100^000000 ^000088Illusion Flower [id 710] Х20^000000";
mes "Ты все принес?";
if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; }
if(countitem(7197) < 200 || countitem(906) < 100 || countitem(710) < 20){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;}
delitem 7197,200;
delitem 906,100;
delitem 710,20;
next;
mes "[Non player charter]";
mes "Поздравляю! Вот твоя шапочка.";
getitem 5303,1;
close;
case 8:
mes "Для получения Laurel Wreath [1] тебе нужно принисти следующие вещи:";
mes "^000088Tough Vines [id 7197]Х200^000000 ^000088Shoot [id 711] Х100^000000 ^000088Witherless Rose [id 748] Х20^000000";
mes "Ты все принес?";
if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; }
if(countitem(7197) < 200 || countitem(711) < 100 || countitem(748) < 20){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;}
delitem 7197,200;
delitem 711,100;
delitem 748,20;
next;
mes "[Non player charter]";
mes "Поздравляю! Вот твоя шапочка.";
getitem 5185,1;
close;
case 9:
mes "Для получения Hibiscus тебе нужно принисти следующие вещи:";
mes "^000088Four Leaf Clover [id 706] Х30^000000 ^000088Singing Flower [id 629] Х30^000000 ^000088Flower [id 712] Х100^000000 ^000088Scarlet Dyestuffs [id 975] Х3^000000 ^000088Lemon Dyestuffs [id 976] Х1^000000";
mes "Ты все принес?";
if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; }
if(countitem(706) < 30 || countitem(629) < 30 || countitem(712) < 100 || countitem(975) < 3 || countitem(976) < 1){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;}
delitem 706,30;
delitem 629,30;
delitem 712,100;
delitem 975,3;
delitem 976,1;
next;
mes "[Non player charter]";
mes "Поздравляю! Вот твоя шапочка.";
getitem 5139,1;
close;
case 10:
mes "Для получения Hyuke's Black Cat Ears тебе нужно принисти следующие вещи:";
mes "^000088Black Cat Ears [id 5057] Х1^000000 ^000088TCG [id 7227] Х10^000000 ^000088Black Dyestuffs [id 983] Х1^000000";
mes "Ты все принес?";
if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; }
if(countitem(5057) < 1 || countitem(7227) < 10 || countitem(983) < 1){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;}
delitem 5057,1;
delitem 7227,10;
delitem 983,1;
next;
mes "[Non player charter]";
mes "Поздравляю! Вот твоя шапочка.";
getitem 5360,1;
close;
case 11:
mes "Для получения Hunter's Cap [1] тебе нужно принисти следующие вещи:";
mes "^000088Magni's Cap [id 5122] Х1^000000 ^000088Darkgreen Dyestuff [id 979] Х10^000000 ^000088Soft Silk [id 7166] Х200^000000";
mes "Ты все принес?";
if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; }
if(countitem(5122) < 1 || countitem(979) < 10 || countitem(7166) < 200){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;}
delitem 5122,1;
delitem 979,10;
delitem 7166,200;
next;
mes "[Non player charter]";
mes "Поздравляю! Вот твоя шапочка.";
getitem 5383,1;
close;
case 12:
mes "Для получения Koneko Hat тебе нужно принисти следующие вещи:";
mes "^000088Drooping Cat [id 5058] x1^000000 ^000088White Dyestuffs [id 982] Х5^000000 ^000088Feather [id 949] Х150^000000 ^000088Soft Feather [id 7063] Х80^000000";
mes "Ты все принес?";
if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; }
if(countitem(5058) < 1 || countitem(982) < 5 || countitem(949) < 150 || countitem(7063) < 80){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;}
delitem 5058,1;
delitem 982,5;
delitem 949,150;
delitem 7063,80;
next;
mes "[Non player charter]";
mes "Поздравляю! Вот твоя шапочка.";
getitem 5372,1;
close;
}
}-
5
-
1
-
-
+ Помогите ему ссылкой и я заодно скачаю) очень надо
-
А вообще отпишитесь, использует кто это? Нужно это на мид серваках?)
-
Спасибо за цп =)
-
1
-
-
Вот тут много чего найдешь
-
Если еще не нашел или не написал вот держи)
prontera,153,193,6 script Job Master 609,{
mes "^ff0000[Job Master]^000000";
if(Upper == 1 && Class >= Job_Lord_Knight) goto L_noReq;
if(SkillPoint != 0){
mes "Извини, используй все свои неизученые скилл поинты.";
mes "И приходи опять!";
close;
}
if(JobLevel < 10) goto L_LvError;
switch(Class){
case Job_Novice_High:
case Job_Baby:
case Job_Novice:
skill 142,1,0;
skill 143,1,0;
mes "Приветствую, пожалуйста выбери проффесию которую хочешь получить";
if(lastJob != 0 && Class == Job_Novice_High){
switch(lastJob){
case Job_Knight:
case Job_Crusader:
set @target_job, Job_Swordman_High;
break;
case Job_Monk:
case Job_Priest:
set @target_job, Job_Acolyte_High;
break;
case Job_Alchemist:
case Job_Blacksmith:
set @target_job, Job_Merchant_High;
break;
case Job_Rogue:
case Job_Assassin:
set @target_job, Job_Thief_High;
break;
case Job_Wizard:
case Job_Sage:
set @target_job, Job_Mage_High;
break;
case Job_Hunter:
case Job_Bard:
case Job_Dancer:
set @target_job, Job_Archer_High;
break;
}
} else {
switch(select("Мечник","Маг","Арчер","Аколит","Торговец","Воришка",
"Супер новис","Тэйквон","Ганслинкер","Ниндзя")){
case 7:
if(Class == Job_Novice_High) goto L_noReq;
if($@JC_SupNovM > BaseLevel) goto L_BvError;
if(Upper == 2)
set @target_job, Job_Super_Baby;
else
set @target_job, Job_SuperNovice;
break;
case 8:
if(Class == Job_Novice_High) goto L_noReq;
if(Upper == 2) goto L_noReq;
set @target_job, Job_Taekwon;
break;
case 9:
case 10:
if(Class == Job_Novice_High || Upper == 2) goto L_noReq;
set @target_job, @menu + 15;
break;
default:
set @target_job, @menu;
if(Class == Job_Novice_High) set @target_job, @target_job + 4001;
break;
}
}
mes "Ты точно решил получить проффесию " + JobName(@target_job) + "?";
if(select("Нет.","Да.") == 2){
callfunc "Job_Change", @target_job;
if(@target_job == Job_Gunslinger || @target_job == Job_Ninja || @target_job == Job_Taekwon) {
callfunc "F_ClearJobVar";
} else {
if($@JC_Plat) goto L_GivePlat;
}
}
close;
break;
default:
if(JobLevel < $@JC_MinimumJB) goto L_LvError;
deletearray @job_opt, getarraysize(@job_opt);
if(Class < Job_Knight || Class == Job_Taekwon || (Class > Job_Baby && Class < Job_Baby_Knight) || (Class > Job_Novice_High && Class < Job_Lord_Knight)){
if(lastJob != 0){
set @target_job, lastJob + 4001;
} else {
switch(Class){
case Job_Swordman_High:
case Job_Baby_Swordman:
case Job_Swordman:
set @job_opt[0], Job_Knight;
set @job_opt[1], Job_Crusader;
break;
case Job_Mage_High:
case Job_Baby_Mage:
case Job_Mage:
set @job_opt[0], Job_Wizard;
set @job_opt[1], Job_Sage;
break;
case Job_Archer_High:
case Job_Baby_Archer:
case Job_Archer:
set @job_opt[0], Job_Hunter;
if(Sex == 0)
set @job_opt[1], Job_Dancer;
else
set @job_opt[1], Job_Bard;
break;
case Job_Acolyte_High:
case Job_Baby_Acolyte:
case Job_Acolyte:
set @job_opt[0], Job_Priest;
set @job_opt[1], Job_Monk;
break;
case Job_Merchant_High:
case Job_Baby_Merchant:
case Job_Merchant:
set @job_opt[0], Job_Blacksmith;
set @job_opt[1], Job_Alchemist;
break;
case Job_Thief_High:
case Job_Baby_Thief:
case Job_Thief:
set @job_opt[0], Job_Assassin;
set @job_opt[1], Job_Rogue;
break;
default:
set @job_opt[0], Job_Star_Gladiator;
set @job_opt[1], Job_Soul_Linker;
break;
}
mes "Приветствую, пожалуйста выбери проффесию которую хочешь получить";
set @target_job, @job_opt[select(JobName(@job_opt[0]), JobName(@job_opt[1]))-1];
if(Class > Job_Novice_High && Class < Job_Lord_Knight) set @target_job, @target_job + 4001;
}
mes "Ты точно решил получить проффесию " + JobName(@target_job) + "?";
if(select("Нет","Да")==2){
callfunc "Job_Change", @target_job;
if(@target_job == Job_Star_Gladiator || @target_job == Job_Soul_Linker) {
callfunc "F_ClearJobVar";
} else {
if($@JC_Plat) goto L_GivePlat;
}
}
close;
}
if(checkfalcon() || checkcart() || checkriding()) goto L_remove;
if((Class >=Job_Knight) && (Class <=Job_Crusader2)){
mes "Do you want to reborn?";
if(select("Yes","No")==1){
if(BaseLevel < 99 || JobLevel < 50) goto L_cantCh;
set lastJob, Class;
if(Class == Job_Knight2){
set lastJob, Job_Knight;
} else {
if(Class == Job_Crusader2){
set lastJob, Job_Crusader;
}
}
jobchange Job_Novice_High;
resetlvl(1);
skill 142,1,0;
skill 143,1,0;
}
close;
}
}
mes "Ооой... Смотрика что-то пошло не так. Сообщи об этой ошибке администрации сервера!";
close;
L_GivePlat:
if (BaseClass==Job_SuperNovice) goto L_sSuperN;
if (BaseClass==Job_Swordman) goto L_sSword;
if (BaseClass==Job_Mage) goto L_sMage;
if (BaseClass==Job_Archer) goto L_sArcher;
if (BaseClass==Job_Acolyte) goto L_sAcolyte;
if (BaseClass==Job_Merchant) goto L_sMerchant;
if (BaseClass==Job_Thief) goto L_sThief;
close;
L_sSuperN:
skill 142,1,0;
close;
L_sSword:
skill 142,1,0;
skill 144,1,0;
skill 145,1,0;
skill 146,1,0;
close;
L_sMage:
skill 142,1,0;
skill 157,1,0;
close;
L_sArcher:
skill 142,1,0;
skill 147,1,0;
skill 148,1,0;
close;
L_sAcolyte:
skill 142,1,0;
skill 156,1,0;
close;
L_sMerchant:
skill 142,1,0;
skill 153,1,0;
skill 154,1,0;
skill 155,1,0;
close;
L_sThief:
skill 142,1,0;
skill 149,1,0;
skill 150,1,0;
skill 151,1,0;
skill 152,1,0;
close;
L_cantCh:
mes "Прости, ты уже достиг своего максимума! тебе некуда больше рости";
mes "Иди мочи всех х)";
close;
L_LvError:
mes "Мне очень жаль, у тебя недостаточно Job-уровней для смены профессии. Качайся.";
mes "И приходи снова!";
close;
L_BvError:
mes "Мне очень жаль, у тебя не достаточно базовых уровней для смены профессии. Качайся.";
mes "И приходи снова!";
close;
L_noReq:
mes "I'm sorry, you do not meet the requirements to change";
mes "И приходи снова!";
close;
L_remove:
mes "Пожалуйста сдай своего фалькона, пеку или тележку.";
mes "И приходи снова!";
close;
OnInit:
// Variable Setup
set $@JC_MinimumJB, 40; //Minimum job level for changing between 2nd and advance Class (Default : 40)
set $@JC_Plat, 1; //Give Platinum skills on Jobchange (Default : 1-yes)
set $@JC_SupNovM, 45; //Base Level to change into Super Novice (Default : 45)
end;
}Возможно в конце один диалог немного кривоват.. А в целом работает нормально =)
-
+ Пополняйте списки
Нужно знать таких гадов в лицо)-
2
-
-
Админ забил на сервак, в последнее время спохватился.. но онлайн падает..
-
3
-
-
Пробовал - как видишь 3 нипися и 3 эррора получил -)
-
2
-
-
Вообщем помогите кто может -)Error в трен ниписях =\
[22:19:35][Error]: npc_parsesrcfile: Unknown syntax in file 'npc/!my_npc/pvp1.tx
t', line '1'. Stopping...
* w1=prontera.gat,147,174,7 script └Ёхэр:
* w2=:arena 954,{
* w3=
* w4=♣prontera.gat,147,174,7 script └Ёхэр: :arena 954,{
[22:19:35][Error]: npc_parsesrcfile: Unable to parse, probably a missing or extr
a TAB in file 'npc/!my_npc/healer.txt', line '1'. Skipping line...
* w1=prontera,149,189,6
* w2= script
* w3=─юъЄюЁ
* w4= 834,10,10,{
[22:19:35][Error]: npc_parsesrcfile: Unknown syntax in file 'npc/!my_npc/healer.
txt', line '3'. Stopping...
* w1=OnTouch:
* w2=
* w3=
* w4=
OnTouch:
[22:19:35][Error]: npc_parsesrcfile: Unknown syntax in file 'npc/!my_npc/new.txt
', line '7'. Stopping...
* w1=- script time -1,{
* w2=
* w3=
* w4=
- script time -1,{Где "new.txt" скрипт(день/ночь) (с этого форума). Где "healer.txt" хиллер с данной темы. Где "pvp1.txt" PvP NPC с этого форума.
Буду благодарен за поддержку -)
-
2
-
-
[22:16:00][Error]: npc_parsesrcfile: Unknown syntax in file 'npc/!my_npc/new.txt
', line '7'. Stopping...
* w1=- script time -1,{
* w2=
* w3=
* w4=
- script time -1,{
Вот такую штуку выдает
-
1
-
-
"Какую ошибку выдает? "
npc_parsesrcfile: Unable to parse, probably a missing or extra TAB in file 'npc/!my_npc/healer.txt', line '1'. Skipping line...
[Error]: npc_parsesrcfile: Unknown syntax in file 'npc/!my_npc/healer.txt , line '3'. Stopping...вот такая дребедень =\
-
2
-
-
Если кто может предложить еще хиллера он еще актуален(представленные выше скрипты не работают) =\
-
1
-
2
-
-
Вот вам Хилер с эффектами,а так же распознаёт вещи и чинит сломаные.
prontera,149,189,6 script Доктор 834,10,10,{
OnTouch:
while(getbrokenid(1))
repair(1);
percentheal 100,100;
specialeffect2 42;
sc_start SC_BLESSING,300000,10;
specialeffect2 37;
sc_start SC_INCREASEAGI,300000,10;
sc_start SC_MAGNIFICAT,300000,5;
sc_start SC_ANGELUS,300000,10;
emotion 21;
getinventorylist;
for(set .@i,0; .@i<@inventorylist_count; set .@i,.@i+1){
if(@inventorylist_identify[.@i]==1) continue;
delitem2 @inventorylist_id[.@i],1,0,0,0,0,0,0,0;
getitem @inventorylist_id[.@i],1;
}
}Спасибо но он почему-то не работает. Ошибка есть в скрипте -)
Всем тоже большое спасибо -)
-
1
-
2
-
-
Доброго времени суток. Буду очень благодарен тому доброму человеку который может поделиться НПЦ которые указаны в шапке темы-)
З.Ы Варпер и Хиллер. Варпер который варпает в дагеоны(уровни дагеонов) и Хиллер который при лечении дает сразу бафф.
Заранее спасибо
-
1
-
2
-
Возьму на вооружение =)
Первая работа)
в Скрипты
Опубликовано
Обновил первый пост, поправил недочеты..