item failed to be deleted and player not given the reward too.
here the scipt
Spoiler
prontera,164,219,4 script Collector 116,{
oninit:
set .itemrew,0;
set .itemrewq,0;
set .itemcoll,0;
set .itemquan,0;
if (getgmlevel()>60) goto admin;
if (.help == 1) goto reward;
mes "Welcome "+strcharinfo(0)+",";
mes "I'm Collector rune midgard item";
switch(select("What item do you collect:Ok, nice to meet you")) {
case 1:
next;
if (.itemcoll == 0) { mes "Sorry, I'm not collecting item for now."; end;}
mes "please collect "+getitemname(.itemcoll)+" for "+.itemquan +" pcs.";
mes "and i will reward you "+getitemname(.itemrew)+" for "+.itemrewq +" pcs.";
set .help,1;
end;
case 2:
next;
mes "Okay, see you later.";
end;
}
reward:
set .amounts, countitem(.itemcoll);
if ( .amounts!= .itemquan) {mes "the quantity item not enough.";}
mes "Thanks for your help";
mes "here my reward for you.";
delitem .itemcoll,.itemquan;
getitem .itemrew,itemrewq;
set help,0;
end;
admin:
mes "Welcome "+strcharinfo(0)+",";
mes "Please input what item for player to collect.";
next;
input .itemcoll;
set .itemcoll,.itemcoll;
next;
mes "Please input how many item to collect.";
next;
input .itemquan;
set .itemquan,.itemquan;
next;
mes "Please input what the reward item.";
input .itemrew;
set .itemrew,.itemrew;
next;
mes "Please input how many item reward.";
input .itemrewq;
set .itemrewq,.itemrewq;
next;
mes "Are you done?";
switch(select("Yes:No.")) {
case 1:
mes "Item to collect "+getitemname(.itemcoll)+" for "+.itemquan +" pcs.";
mes "Item reward "+getitemname(.itemrew)+" for "+.itemrewq +" pcs.";
end;
case 2:
mes "Okay, to re entry, please start form the begining.";
end;
}
}
and here the error
and is it posible to make this npc running for x period, like 1 day or 1 week
Question
hendra814
Need help, everytime player report to npc
item failed to be deleted and player not given the reward too.
here the scipt
prontera,164,219,4 script Collector 116,{ oninit: set .itemrew,0; set .itemrewq,0; set .itemcoll,0; set .itemquan,0; if (getgmlevel()>60) goto admin; if (.help == 1) goto reward; mes "Welcome "+strcharinfo(0)+","; mes "I'm Collector rune midgard item"; switch(select("What item do you collect:Ok, nice to meet you")) { case 1: next; if (.itemcoll == 0) { mes "Sorry, I'm not collecting item for now."; end;} mes "please collect "+getitemname(.itemcoll)+" for "+.itemquan +" pcs."; mes "and i will reward you "+getitemname(.itemrew)+" for "+.itemrewq +" pcs."; set .help,1; end; case 2: next; mes "Okay, see you later."; end; } reward: set .amounts, countitem(.itemcoll); if ( .amounts!= .itemquan) {mes "the quantity item not enough.";} mes "Thanks for your help"; mes "here my reward for you."; delitem .itemcoll,.itemquan; getitem .itemrew,itemrewq; set help,0; end; admin: mes "Welcome "+strcharinfo(0)+","; mes "Please input what item for player to collect."; next; input .itemcoll; set .itemcoll,.itemcoll; next; mes "Please input how many item to collect."; next; input .itemquan; set .itemquan,.itemquan; next; mes "Please input what the reward item."; input .itemrew; set .itemrew,.itemrew; next; mes "Please input how many item reward."; input .itemrewq; set .itemrewq,.itemrewq; next; mes "Are you done?"; switch(select("Yes:No.")) { case 1: mes "Item to collect "+getitemname(.itemcoll)+" for "+.itemquan +" pcs."; mes "Item reward "+getitemname(.itemrew)+" for "+.itemrewq +" pcs."; end; case 2: mes "Okay, to re entry, please start form the begining."; end; } }
and here the error
and is it posible to make this npc running for x period, like 1 day or 1 week
Thanks for any help
Edited by hendra814Link to comment
Share on other sites
12 answers to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.