Jump to content

Jayz

Members
  • Posts

    407
  • Joined

  • Last visited

  • Days Won

    5

Everything posted by Jayz

  1. topic bump.. @TS this is may work on 3ceam?? i use 2010-12-28aragre but when invalid password auto close client
  2. SS Please
  3. ang sakit sa utak ahhaa sge pm kita d2 kpag ntapos ko..
  4. dpende sa client mo yan.. saan ba galing client mo?? ikaw ba nag Diff nyan?? kung ikaw nag diff ng client mo enable mo muna ung rea data folder 1st.. tapos gwa kang data folder at lagay mo lahat ng data files mo dun... ragre ba gamit mo?? or kung ano paman yan.. ganito gwin mo.. sclientinfo.xml at clientinfo.xml lgay mo yang dlwa
  5. sge bukas try ko gumawa ng sample.... tapos tgnan mo nlng nun....oras na kasi.. 22log nko
  6. ang ibig kong sbhn .. ung script mo naba yan kpag kinausap ng Admin need mo pa customize mga monster location etc.. dba kung anong monster i ssummon at kung saan... yan ung advantage nyan... i sset mo kht anung monster kpag i ffix mo sya.. 2lad ng snabi mo automatic.. ggwa ka ng Monster Script.. pero d 2lad nyan na mag rrandom monster sya.. kung ano lang ang monster sa gnawa mo un lang ang lalabas.. dpende nlng kpag nlgyan mo ng random array.. pero kung llgay kang random array.. limited parin sya.. kung ano lang ang monster nilgay mo un lang ang massummon... getz?
  7. kpg delete mo nyan mwwala n ng control ung mga array kung aalisin mo yan dpat meron kang llgan na mga monster at kung anong map etc kung ano ung nklgy dyan sa aalisin mo ppalitan mo sya kung baga i ffix mo sya sa rektang monster and prize nya
  8. ung auto start sya u mean na hnd na c onfiguire Aalisjn ung gm panel tapos i ffix ang mga monster and amoun ?
  9. Find this - dispbottom "You have Won 150 Mithril Coins"; set PORING,0; Add below: getitem @prize; getitem prize; not tested try mo yang dalawa.. if d nag work yan.. ttest ko..
  10. Hi.. what do u mean?? once nkakapatay ka ng Poring.. gus2 mo may makukuha kang M.Coin??
  11. once ung client mo parang ng cconnect sa KRO.. hnd KRO un.. means d nya ma read ang GRF/Data mo.. yup i rrun nya yan.. pero pag pasok mga Ching Chang Chong.. minsan pa nga meron pa lalabas dyan na Login 1 Login 2.. etc..
  12. ok thanks
  13. @Nochii not this..
  14. how to make input = goto? example map,123,123,5 script [Test Script] 105,{ mes "Hello what label you want to go??"; mes "label1 or label 2??"; next; input .label; goto .label; // if input the label is incorrect we have failed message like sorry your label is not correct.. label1: mes "this is label 1"; close; label2: mes "this is label 2"; close;
  15. Jayz

    help..

    http://rathena.org/board/topic/68336-hello-sql-problem/
  16. Hello i have sql codes here query_sql "insert into reward_log values ( null, 5013, '"+ escape_sql( strcharinfo(0) )+"', now() )"; how can i replace this 5013 on this code " + getitemname(@bought_nameid) + " thanks
  17. Jayz

    Hi to all

    oh that's work.. thank you emistry..
  18. Jayz

    Hi to all

    Thank you Schrwaizer.. but still Error.. [Error]: script_rid2sd: fatal error ! player not attach [Debug]: Function: mes (1 parameter): [Debug]: Data: string value="[Donation Item]" [Debug]: Source (NPC): NPC1 (invisible/not on a map)
  19. Jayz

    Hi to all

    The NPC ITEM REWARD - script NPC1 -1,{ OnWhatEverLabel: set @i,0; mes "[Reward Token]"; mes "Which item do you wish to obtain?"; mes "Select only one."; callshop "acces_shop",1; npcshopattach "acces_shop"; end; OnBuyItem: if(.BuildQuest) { for(set .e,0; !compare(getarg(.e+1),"Zeny"); set .e,.e+2) {} npcshopadditem "acces_shop",getarg(.e+2),getarg(.e)*compare(""+getarg(.e+1),"SZeny"); setarray .Shop[.i],getarg(.e+2); set .i,.i+1; goto Quest_Setup; } if(.Shop[@i]!=@bought_nameid) for(set @i,1; 1; set @i,@i+1) if(.Shop[@i]==@bought_nameid) { set .i,@i; callsub Quest_Setup; } for(set @i,1; !@e; set @i,@i+1) if(.Shop[@i]==@bought_nameid) { set @e,1; set .i,@i; callsub Quest_Setup; } mes "[Reward Token]"; mes "I require the following:"; for(set @i,0; !compare(getarg(@i+1),"Zeny"); set @i,@i+2) mes "^FF0000" + ((countitem(getarg(@i))>=getarg(@i+1))? "^00FF00":"") + "" + getarg(@i+1) + " " + getitemname(getarg(@i)) + " [" + countitem(getarg(@i)) + "/" + getarg(@i+1) + "]"; if(getarg(@i)) mes "^FF0000" + ((Zeny>=getarg(@i))? "^00FF00":"") + "" + getarg(@i) + " Zeny"; mes "^000000In exchange, I will give you:^0000FF"; for(set @i,@i+2; getarg(@i+1,0); set @i,@i+2) mes getarg(@i+1) + " " + getitemname(getarg(@i)); switch(select("Exchange:" + (((((getiteminfo(@bought_nameid,5) & 1) || (getiteminfo(@bought_nameid,5) & 256) || (getiteminfo(@bought_nameid,5) & 512)) && @equip==0))? "Preview Item":"") + ":No thanks")) { case 1: for(set @i,0; !compare(getarg(@i+1),"Zeny"); set @i,@i+2) if(countitem(getarg(@i)) < getarg(@i+1)) { next; mes "[Reward Token]"; mes "You have " + countitem(getarg(@i)) + " " + getitemname(getarg(@i)) + ", while I require " + getarg(@i+1) + "."; mes "Please obtain ^FF0000" + (getarg(@i+1)-countitem(getarg(@i))) + " more " + getitemname(getarg(@i)) + "^000000."; close; } if(Zeny < getarg(@i)) { next; mes "[Reward Token]"; mes "You do not have enough Zeny."; mes "Please obtain ^FF0000" + (getarg(@i)-Zeny) + " more Zeny^000000."; close; } for(set @i,0; !compare(getarg(@i+1),"Zeny"); set @i,@i+2) delitem getarg(@i),getarg(@i+1); set Zeny,Zeny-getarg(@i); for(set @i,@i+2; getarg(@i+1,0); set @i,@i+2) getitem getarg(@i),getarg(@i+1); if (compare(""+getarg(@i,0),"announce")) announce strcharinfo(0) + " has just obtained " + getitemname(@bought_nameid) + "!",bc_all; close; case 2: set @bottomview, getlook(3); set @topview, getlook(4); set @midview, getlook(5); addtimer 1000, strnpcinfo(3)+"::On_Leave"; set @equip,getiteminfo(@bought_nameid, 5); set @view, getiteminfo(@bought_nameid, 11); if(@equip != -1 && @view > 0) { if(@equip & 1) atcommand "@changelook 3 " + @view; if(@equip & 256) atcommand "@changelook 1 " + @view; if(@equip & 512) atcommand "@changelook 2 " + @view; } next; goto OnBuyItem; case 3: close; } On_Leave: atcommand "@changelook 1 " + @topview; atcommand "@changelook 2 " + @midview; atcommand "@changelook 3 " + @bottomview; set @equip,0; set @view,0; set @topview,0; set @midview,0; set @bottomview,0; end; OnInit: npcshopitem "acces_shop",0,0; set .BuildQuest,1; set .i,1; Quest_Setup: switch(.i) { default: set .BuildQuest,0; set .e,0; set .i,0; end; case 1: callsub OnBuyItem,30200,7,7,"SZeny",2630,1; case 2: callsub OnBuyItem,30200,22,22,"SZeny",30150,1; case 3: callsub OnBuyItem,30200,10,10,"SZeny",2679,1; case 4: callsub OnBuyItem,30200,10,10,"SZeny",2678,1; case 5: callsub OnBuyItem,30200,18,18,"SZeny",30350,1; case 6: callsub OnBuyItem,30200,18,18,"SZeny",30351,1; case 7: callsub OnBuyItem,30200,18,18,"SZeny",30352,1; case 8: callsub OnBuyItem,30200,18,18,"SZeny",30353,1; case 9: callsub OnBuyItem,30200,18,18,"SZeny",30354,1; case 10: callsub OnBuyItem,30200,18,18,"SZeny",30355,1; } - shop acces_shop -1,501:50 } ra_temsky,97,147,5 script Test NPC 757,{ mes "TestNPC?; next; switch(select("Accessories")){ Case 1: donpcevent "NPC1::OnWhatEverLabel"; break; } close; }
  20. Jayz

    Hi to all

    i dont know whats wrong sorry for my noobie question Error [Error]: script_rid2sd: fatal error ! player not attached! [Debug]: Function: set (2 parameters): [Debug]: Data: variable name='@i' index=0 [Debug]: Data: number value=0 [Debug]: Source (NPC): NPC1 (invisible/not on a map) [Error]: script:set: no player attached for player variable '@i'
  21. Jayz

    Hi to all

    Case 1: donpcevent "NPC1::OnWhatEverLabel"; break; Case 2: donpcevent "NPC2::OnWhatEverLabel"; break; yup i tried that but error [Warning]: NPC event parameter deprecated! Please use 'NPCNAME::OnEVENT' instead of 'NPC1:OnWhatEverLabel'. [Debug]: Source (NPC): Token Reward at ra_temsky (97,147)
  22. Jayz

    Hi to all

    Yah.. but Lunar;s Script is good.. but i want to update this but i dunno can you help me Euphy?
  23. Jayz

    Hi to all

    Not Working have a Error !! [Warning]: NPC event parameter deprecated! Please use 'NPCNAME::OnEVENT' instead of 'NPC1:OnWhatEverLabel'. [Debug]: Source (NPC): Token Reward at ra_temsky (97,147)
  24. Jayz

    Hi to all

    yah i tried to make simple npc to call for these 2 but OnBuyItem not found.. thank 2 ur script.. but i like lunar style sorry
  25. Jayz

    Hi to all

    How to merge this script to put Category This Script for Accessories Reward - shop acces_shop -1,501:50 prontera,147,173,5, script Reward Token 899,{ set @i,0; mes "[Reward Token]"; mes "Which item do you wish to obtain?"; mes "Select only one."; callshop "acces_shop",1; npcshopattach "acces_shop"; end; OnBuyItem: if(.BuildQuest) { for(set .e,0; !compare(getarg(.e+1),"Zeny"); set .e,.e+2) {} npcshopadditem "acces_shop",getarg(.e+2),getarg(.e)*compare(""+getarg(.e+1),"SZeny"); setarray .Shop[.i],getarg(.e+2); set .i,.i+1; goto Quest_Setup; } if(.Shop[@i]!=@bought_nameid) for(set @i,1; 1; set @i,@i+1) if(.Shop[@i]==@bought_nameid) { set .i,@i; callsub Quest_Setup; } for(set @i,1; !@e; set @i,@i+1) if(.Shop[@i]==@bought_nameid) { set @e,1; set .i,@i; callsub Quest_Setup; } mes "[Reward Token]"; mes "I require the following:"; for(set @i,0; !compare(getarg(@i+1),"Zeny"); set @i,@i+2) mes "^FF0000" + ((countitem(getarg(@i))>=getarg(@i+1))? "^00FF00":"") + "" + getarg(@i+1) + " " + getitemname(getarg(@i)) + " [" + countitem(getarg(@i)) + "/" + getarg(@i+1) + "]"; if(getarg(@i)) mes "^FF0000" + ((Zeny>=getarg(@i))? "^00FF00":"") + "" + getarg(@i) + " Zeny"; mes "^000000In exchange, I will give you:^0000FF"; for(set @i,@i+2; getarg(@i+1,0); set @i,@i+2) mes getarg(@i+1) + " " + getitemname(getarg(@i)); switch(select("Exchange:" + (((((getiteminfo(@bought_nameid,5) & 1) || (getiteminfo(@bought_nameid,5) & 256) || (getiteminfo(@bought_nameid,5) & 512)) && @equip==0))? "Preview Item":"") + ":No thanks")) { case 1: for(set @i,0; !compare(getarg(@i+1),"Zeny"); set @i,@i+2) if(countitem(getarg(@i)) < getarg(@i+1)) { next; mes "[Reward Token]"; mes "You have " + countitem(getarg(@i)) + " " + getitemname(getarg(@i)) + ", while I require " + getarg(@i+1) + "."; mes "Please obtain ^FF0000" + (getarg(@i+1)-countitem(getarg(@i))) + " more " + getitemname(getarg(@i)) + "^000000."; close; } if(Zeny < getarg(@i)) { next; mes "[Reward Token]"; mes "You do not have enough Zeny."; mes "Please obtain ^FF0000" + (getarg(@i)-Zeny) + " more Zeny^000000."; close; } for(set @i,0; !compare(getarg(@i+1),"Zeny"); set @i,@i+2) delitem getarg(@i),getarg(@i+1); set Zeny,Zeny-getarg(@i); for(set @i,@i+2; getarg(@i+1,0); set @i,@i+2) getitem getarg(@i),getarg(@i+1); if (compare(""+getarg(@i,0),"announce")) announce strcharinfo(0) + " has just obtained " + getitemname(@bought_nameid) + "!",bc_all; close; case 2: set @bottomview, getlook(3); set @topview, getlook(4); set @midview, getlook(5); addtimer 1000, strnpcinfo(3)+"::On_Leave"; set @equip,getiteminfo(@bought_nameid, 5); set @view, getiteminfo(@bought_nameid, 11); if(@equip != -1 && @view > 0) { if(@equip & 1) atcommand "@changelook 3 " + @view; if(@equip & 256) atcommand "@changelook 1 " + @view; if(@equip & 512) atcommand "@changelook 2 " + @view; } next; goto OnBuyItem; case 3: close; } On_Leave: atcommand "@changelook 1 " + @topview; atcommand "@changelook 2 " + @midview; atcommand "@changelook 3 " + @bottomview; set @equip,0; set @view,0; set @topview,0; set @midview,0; set @bottomview,0; end; OnInit: npcshopitem "acces_shop",0,0; set .BuildQuest,1; set .i,1; Quest_Setup: switch(.i) { default: set .BuildQuest,0; set .e,0; set .i,0; end; case 1: callsub OnBuyItem,30200,7,7,"SZeny",2630,1; case 2: callsub OnBuyItem,30200,22,22,"SZeny",30150,1; case 3: callsub OnBuyItem,30200,10,10,"SZeny",2679,1; case 4: callsub OnBuyItem,30200,10,10,"SZeny",2678,1; case 5: callsub OnBuyItem,30200,18,18,"SZeny",30350,1; case 6: callsub OnBuyItem,30200,18,18,"SZeny",30351,1; case 7: callsub OnBuyItem,30200,18,18,"SZeny",30352,1; case 8: callsub OnBuyItem,30200,18,18,"SZeny",30353,1; case 9: callsub OnBuyItem,30200,18,18,"SZeny",30354,1; case 10: callsub OnBuyItem,30200,18,18,"SZeny",30355,1; } } This Scrip for Cards Reward - shop cards_shop -1,501:50 prontera,147,173,5, script Reward Token 899,{ set @i,0; mes "[Reward Token]"; mes "Which item do you wish to obtain?"; mes "Select only one."; callshop "cards_shop",1; npcshopattach "cards_shop"; end; OnBuyItem: if(.BuildQuest) { for(set .e,0; !compare(getarg(.e+1),"Zeny"); set .e,.e+2) {} npcshopadditem "cards_shop",getarg(.e+2),getarg(.e)*compare(""+getarg(.e+1),"SZeny"); setarray .Shop[.i],getarg(.e+2); set .i,.i+1; goto Quest_Setup; } if(.Shop[@i]!=@bought_nameid) for(set @i,1; 1; set @i,@i+1) if(.Shop[@i]==@bought_nameid) { set .i,@i; callsub Quest_Setup; } for(set @i,1; !@e; set @i,@i+1) if(.Shop[@i]==@bought_nameid) { set @e,1; set .i,@i; callsub Quest_Setup; } mes "[Reward Token]"; mes "I require the following:"; for(set @i,0; !compare(getarg(@i+1),"Zeny"); set @i,@i+2) mes "^FF0000" + ((countitem(getarg(@i))>=getarg(@i+1))? "^00FF00":"") + "" + getarg(@i+1) + " " + getitemname(getarg(@i)) + " [" + countitem(getarg(@i)) + "/" + getarg(@i+1) + "]"; if(getarg(@i)) mes "^FF0000" + ((Zeny>=getarg(@i))? "^00FF00":"") + "" + getarg(@i) + " Zeny"; mes "^000000In exchange, I will give you:^0000FF"; for(set @i,@i+2; getarg(@i+1,0); set @i,@i+2) mes getarg(@i+1) + " " + getitemname(getarg(@i)); switch(select("Exchange:" + (((((getiteminfo(@bought_nameid,5) & 1) || (getiteminfo(@bought_nameid,5) & 256) || (getiteminfo(@bought_nameid,5) & 512)) && @equip==0))? "Preview Item":"") + ":No thanks")) { case 1: for(set @i,0; !compare(getarg(@i+1),"Zeny"); set @i,@i+2) if(countitem(getarg(@i)) < getarg(@i+1)) { next; mes "[Reward Token]"; mes "You have " + countitem(getarg(@i)) + " " + getitemname(getarg(@i)) + ", while I require " + getarg(@i+1) + "."; mes "Please obtain ^FF0000" + (getarg(@i+1)-countitem(getarg(@i))) + " more " + getitemname(getarg(@i)) + "^000000."; close; } if(Zeny < getarg(@i)) { next; mes "[Reward Token]"; mes "You do not have enough Zeny."; mes "Please obtain ^FF0000" + (getarg(@i)-Zeny) + " more Zeny^000000."; close; } for(set @i,0; !compare(getarg(@i+1),"Zeny"); set @i,@i+2) delitem getarg(@i),getarg(@i+1); set Zeny,Zeny-getarg(@i); for(set @i,@i+2; getarg(@i+1,0); set @i,@i+2) getitem getarg(@i),getarg(@i+1); if (compare(""+getarg(@i,0),"announce")) announce strcharinfo(0) + " has just obtained " + getitemname(@bought_nameid) + "!",bc_all; close; case 2: set @bottomview, getlook(3); set @topview, getlook(4); set @midview, getlook(5); addtimer 1000, strnpcinfo(3)+"::On_Leave"; set @equip,getiteminfo(@bought_nameid, 5); set @view, getiteminfo(@bought_nameid, 11); if(@equip != -1 && @view > 0) { if(@equip & 1) atcommand "@changelook 3 " + @view; if(@equip & 256) atcommand "@changelook 1 " + @view; if(@equip & 512) atcommand "@changelook 2 " + @view; } next; goto OnBuyItem; case 3: close; } On_Leave: atcommand "@changelook 1 " + @topview; atcommand "@changelook 2 " + @midview; atcommand "@changelook 3 " + @bottomview; set @equip,0; set @view,0; set @topview,0; set @midview,0; set @bottomview,0; end; OnInit: npcshopitem "cards_shop",0,0; set .BuildQuest,1; set .i,1; Quest_Setup: switch(.i) { default: set .BuildQuest,0; set .e,0; set .i,0; end; case 1: callsub OnBuyItem,30200,10,10,"SZeny",4359,1; case 2: callsub OnBuyItem,30200,5,5,"SZeny",4363,1; case 3: callsub OnBuyItem,30200,10,10,"SZeny",4365,1; case 4: callsub OnBuyItem,30200,10,10,"SZeny",4357,1; case 5: callsub OnBuyItem,30200,4,4,"SZeny",4367,1; case 6: callsub OnBuyItem,30200,20,20,"SZeny",4361,1; } } so how can i merge this npc to be like this [Sample Only Dialogue in game] [Reward Token] Which item do you wish to obtain; Select only one Accessories MVP Cards i want to make Accessories and MVP Cards category thats why im asking how to merge this Script i tried to use callfunc and callshop but not working This is the attach files Accessories NPC accessories.txt Cards NPC cards.txt
×
×
  • Create New...