Jump to content

Takuyakii

Members
  • Posts

    212
  • Joined

  • Last visited

Everything posted by Takuyakii

  1. Hello, is it possible to edit this costumeitem script? into like this if i want to convert, requirement need is 1 TCG, mes" In order to convert i need tcg x 1. if i choose restore. mes "In order to restore i need 1m" // ------------------------------------------------------------------------------- // Script Name : Headgear to Costume converter >> Costume to Headgear converter // ------------------------------------------------------------------------------- // Description : // - Allows a user to convert the equipped headgear (on Top, Mid or Low) into a // costume item. It will remove any card and refine of the Item. // - Allows a user to restore the equipped costume headgear (on Top, Mid or Low) // into its original form. It will not return any card or refine of the item. // ------------------------------------------------------------------------------- - script Costume Clown -1,{ mes "[Clown]"; mes "Here you can convert your headgears into a Costume Headgear or restore to its Original form."; switch(select("I want to convert.:I want to restore.:No thanks.")) { case 1: next; mes "Please, select what to convert."; mes "Remember, cards and refine will be removed."; next; setarray .@Position$[1],"Top","Mid","Low"; setarray .@Position[1], 4, 5, 6; set .@Menu$,""; for( set .@i, 1; .@i < 5; set .@i, .@i + 1 ) { if( getequipisequiped(.@Position[.@i]) ) set .@Menu$, .@Menu$ + .@Position$[.@i] + "-" + "[" + getequipname(.@Position[.@i]) + "]"; set .@Menu$, .@Menu$ + ":"; } set .@Part, .@Position[ select(.@Menu$) ]; if( !getequipisequiped(.@Part) ) { mes "[Clown]"; mes "Your not wearing anything there..."; close; } mes "[Clown]"; mes "You want to Costume your " + getitemname(getequipid(.@Part)) + "?"; next; if( select("Yes, proceed:No, I am sorry.") == 2 ) { mes "[Clown]"; mes "Need some time to think about it, huh?"; mes "Alright, I can understand."; close; } costume .@Part; // Convert the Headgear mes "[Clown]"; mes "Done, enjoy your costume headgear."; close; case 2: next; mes "Please, select what to restore."; mes "Remember, I will only restore it back without refine and cards."; next; setarray .@Position$[1],"Top","Mid","Low"; setarray .@Position[1], 10, 11, 12; set .@Menu$,""; for( set .@i, 1; .@i < 5; set .@i, .@i + 1 ) { if( getequipisequiped(.@Position[.@i]) ) set .@Menu$, .@Menu$ + .@Position$[.@i] + "-" + "[" + getequipname(.@Position[.@i]) + "]"; set .@Menu$, .@Menu$ + ":"; } set .@Part, .@Position[ select(.@Menu$) ]; if( !getequipisequiped(.@Part) ) { mes "[Clown]"; mes "Your not wearing anything there..."; close; } mes "[Clown]"; mes "You want to restore your " + getitemname(getequipid(.@Part)) + "?"; next; if( select("Yes, proceed:No, I am sorry.") == 2 ) { mes "[Clown]"; mes "Need some time to think about it, huh?"; mes "Alright, I can understand."; close; } a = getequipid(.@Part); delitem a,1; getitem a,1; mes "[Clown]"; mes "Done, enjoy your restored headgear."; close; case 3: mes "[Clown]"; mes "Very well. Return at once if you seek my services."; close; } } // -------------------------------------------------------------------------- // Use duplicates to put your npc on different cities // -------------------------------------------------------------------------- prontera,155,181,4 duplicate(Costume Clown) Costume Maker#1 715
  2. Hi! i need help for this. after 24 hours the timer go count again negatively. See pic below. and no error on map. set .Hour,24; if(gettimetick(2) - #dailytimer < ( .Hour * 3600)) { mes .@npcname$; set .@last,#dailytimer - gettimetick(2); set .@hour, .@last % ( 24 * 3600 ) / 3600; set .@min, .@last % ( 24 * 3600 ) % 3600 / 60; set .@sec, .@last % ( 24 * 3600 ) % 3600 % 60; mes "You have to wait for your next delivery."; mes "Time CountDown : ^FF0000"+.@hour+":"+.@min+":"+.@sec+"^000000"; close; } mes .@npcname$; mes "Congrats!"; mes " "; mes "Here's your reward 1 Activity Point!(s)"; mes "Check your Chat-Log!"; ++#activity_points; dispbottom "You've gained one Activity Point! Your total is ["+#activity_points+"] Activity point(s)."; set #dailytimer,gettimetick(2) + ( .Hour * 3600 );
  3. just want to ask why its double Day 8 it's just typo or ?
  4. @Stolao Hi sir, can u help me , how to make this script like every 10 days only ? and how to put npc on this script ? i found this script that has npc, but the npc are not showing, but the script are working fine
  5. Oh it's already here on rathena, and its paid script, but yea this is kinda look a like.
  6. Good day ! is it possible to request this kind of script? Mechanics: The player must at least have at least 30 accumulated minutes for them to get a guaranteed 15 WoE Points. This only triggers when the player enters an active Siege Castle. After the first 30 minutes has been achieved, the player will now receive additional 1 WoE Point for every 2 minutes of playing time inside an active Siege Castle. The system will halt if the player is on idle state for fifteen (10) minutes. In case that the system will halt, the player must re-login to re-activate the system. The player must claim the accumulated WoE Points right after the WoE ends. When the player doesn't claim their WoE Points, they won't be able to claim it when the next WoE session starts. Thaanks!
  7. be specific, when did u get this error ? like opening the app? or repacking or editing . bla bla bla. more info so we can help
  8. how to recieve reward on this script ?
  9. i try this script and i'm getting an error like parse_simpleexpr: unmatched EDIT: FIX if(get_attendance_requirement()){
  10. One more thing is it possible to add like these? you have to stay here 1 hour example (prt_church) so you can claim your points or daily mass. well i think this will rewrap the code, but if its only possible, but if not , its ok,
  11. Thanks ! i will try this once i get home, also just want to ask how about if the server is restarted ? this script will stop or continue for the daily mass count?
  12. Thanks, My god ! im so doomed. been thinking about the tips and this basic, inicially script, now my head hurts. i just keeping reading some script right now, and still doesn't make sense on me, can't understand every single of bit. i try writing like this. prontera,229,310,4 Ignacio 909,{ if(already clicked today){ mes "good night,have a good mass."; close; } mes "good night, have a good mass."; set contDailly, contDailly+1; OnInit: set contDailly, 0; end; } // prontera,229,315,4 Reward 909,{ mes "You have Attended "+contDailly+" Nights."; mes " Here's your reward"; if (contDailly >=7) { contDailly = contDailly - 7; getitem 501,1; end; } if (countDailly >=5) { contDailly = contdailly - 5; getitem 501,1; end; } if (countDailly >=3) { contDailly = contdailly - 3; getitem 501,1; end; }
  13. Urrrg, almost 1 hour and i don't know where to and how to start -.-
  14. Good day ! is it possible to request this kind of script ? mechanics. 1. Talk to NPC Ingacio (229,310) in front of Prontera Church to attend the daily mass (registration i guess. 2. If you attend the daily mass for 7 nights straight 7pm-11pm only, Father Ingacio will give you a reward on the 7th Night (EX REWARD. Poring Coin) 3. If you attend the daily mass for only 5 days 7pm-11pm only, Father Ingacio will give you a reward on the 7th Night. with (TCG) 4. If you attend the daily mass for Only3 nights 7pm-11pm only, Father Ingacio will give you a reward on the 7th Night. with (APPLE JUICE) 5. no dual on the map. to avoid abuse , 6. When 11:01PM reach the npc will automatic hide. Thanks i know this is somany for a request. but yea i will appreciate it it! Thanks advance. more power rathena. Edit: did search and mostly found 1 script and not working anymore,
  15. Sorry for the late update, it seems work but, once trying to do quest again. it always give the prize with no quest. i mean after adding # on the variables, once i talk to npc, it will just give the prize without doing the quest. how can i make, 1 character Only, and repeat the quest everyday?
  16. Thanks ! it Works. one more thing how about this one ? // //=====// /==/ /==/ /==/ // // // /==/ /==/ /=/ /==/ // //=====// /==/ /=/ /==============/ /========/ /==//===/ /==/ /==/ // //=////// /==/ /==//=/ /==/ /==/==/==/==/==/ / / / /==/ /==/ /==/ // // == /==/ /==//=/ /==/ /==/ /==/ /==/ ======/ / /==/ /==/ /==/ // // == /==/ /==/ /=/ /==/ /==/ /==/ /==/ / /===/ / /==/ /==/ /==/ // // == /==/ /==/ /=/ /==/ /==/ /==/ /==/ / /===/ / /==/ /==/=====/==/ // // == /==/ /==/ /=/ /==/ /==/ /==/ /==/ /========/ /==/ /==///////==/ // ================ rAthena Script ================================================== // ============== Information ======================================================= // = iRO Daily Quest : Army Supply // = Made by : // = Rikimaru //===== Current Version: =============================================== //= 2.4 //===== Compatible With: =============================================== //= any rAthena SVN //===== Description: =================================================== //= The iRO Daily Quest : Army Supply //= Usefull for having fun in a Server with a Mini Quest //= Has a counter of 20 Hours until the Players can do the Quest agian. //===== Additional Comments: =========================================== //= 1.9 Fixed the Injured Recruit NPC [Rikimaru] //= 2.0 Added the NPC Display from Injured to Revived [Rikimaru] //= 2.1 Added the 2nd and 3rd Army Soldiers [Rikimaru] //= 2.2 Fixed a few Bugs in the NPC's [Rikimaru] //= 2.3 Added the 20 Hours Timer and fixed the Script Description [Rikimaru] //= 2.4 Fixed the 20 Hours Timer [Rikimaru] //====================================================================== //============== DO NOT REMOVE MY CREDITS AND CLAIM MY WORK AS YOURS === prontera,115,173,5 script [Quest] Army Officer 105,{ set .@npcname$,"^0000FF[ [Quest] Army Officer]^000000"; if(armyquest==1) { mes .@npcname$; mes "There are a few"; mes "Soldiers,waiting for"; mes "help in Morocc!"; next; mes .@npcname$; mes "From Baselevel 61-80 you"; mes "have to help the"; mes "Injured Recruit."; next; mes .@npcname$; mes "Bring them White Potions"; mes "or bring them Yggdrasil"; mes "Berries. Thank you for"; mes "your Help!"; close; } if(BaseLevel >= 150) { mes .@npcname$; mes "Hello "+strcharinfo(0)+",I'm"; mes "the Army Officer!"; next; mes .@npcname$; mes "There are a few"; mes "Soldiers,waiting for"; mes "help in Morocc!"; next; mes .@npcname$; mes "From Baselevel 150-255 you"; mes "have to help the"; mes "Injured Recruit."; next; mes .@npcname$; mes "Bring them White Potions"; mes "or bring them Yggdrasil"; mes "Berries. Thank you for"; mes "your Help!"; set armyquest,1; close; } mes .@npcname$; mes "Hello "+strcharinfo(0)+",get"; mes "a Higher Baselevel please."; mes "You have to be Baselevel"; mes "150 or Higher!"; close; } // ======================= End of 1st NPC ====================================== // ===================== other NPC's coming now ================================ morocc,172,68,5 script Injured Recruit 849,{ set .@npcname$,"^0000FF[ Injured Recruit ]^000000"; if(gettimetick(2) - helped1 < (60 * 60 * 20)) { mes .@npcname$; mes "Sorry but you have to wait"; mes "Until 20 Hours are over!"; close; } if(armyquest==1 && BaseLevel <= 255 && BaseLevel >= 150) { mes .@npcname$; mes "... Uggh ..."; mes "Help me ...."; mes "with some...."; mes "healing stuff. Please..."; next; switch(select("-Yggdrasil Berries:-White Potion:-Cancel")) { case 1: if(countitem(607) <1) goto l_noitem; delitem 607,1; next; mes .@npcname$; mes "Wooooow..."; setnpcdisplay("Injured Recruit","Revived Recruit",813); sleep2 5000; next; mes .@npcname$; mes "Thank you for the Help."; set BaseExp,+160000; set JobExp,+100000; getitem 501,20; set helped1,gettimetick(2); setnpcdisplay("Revived Recruit","Injured Recruit",849); close; case 2: if(countitem(504) <1) goto l_noitem; delitem 504,1; next; mes .@npcname$; mes "Wooooow..."; setnpcdisplay("Injured Recruit","Revived Recruit",813); sleep2 5000; next; mes .@npcname$; mes "Thank you for the Help."; set BaseExp,+80000; set JobExp,+50000; getitem 501,20; set helped1,gettimetick(2); setnpcdisplay("Revived Recruit","Injured Recruit",849); close; case 3: close; } l_noitem: mes .@npcname$; mes "You don't have the item...Get it fast please."; close; } mes .@npcname$; mes "... Uggh..."; close; } // =========================== End of 4th NPC Script ================================ // ====================== End of the whole Daily Quest ============================== // ================= Have fun with this Script. Yours Rikimaru ====================== AND THIS one ? // //=====// /==/ /==/ /==/ // // // /==/ /==/ /=/ /==/ // //=====// /==/ /=/ /==============/ /========/ /==//===/ /==/ /==/ // //=////// /==/ /==//=/ /==/ /==/==/==/==/==/ / / / /==/ /==/ /==/ // // == /==/ /==//=/ /==/ /==/ /==/ /==/ ======/ / /==/ /==/ /==/ // // == /==/ /==/ /=/ /==/ /==/ /==/ /==/ / /===/ / /==/ /==/ /==/ // // == /==/ /==/ /=/ /==/ /==/ /==/ /==/ / /===/ / /==/ /==/=====/==/ // // == /==/ /==/ /=/ /==/ /==/ /==/ /==/ /========/ /==/ /==///////==/ // ================ rAthena Script ================================================== // ============== Information ======================================================= // = iRO Daily Quest : Alberta Cargo // = Made by : // = Rikimaru //===== Current Version: =============================================== //= 1.1 //===== Compatible With: =============================================== //= any rAthena SVN //===== Description: =================================================== //= The iRO Daily Quest : Alberta Cargo //= Usefull for having fun in a Server with a Mini Quest //= Has a counter of 24 Hours until the Players can do the Quest agian. //===== Additional Comments: =========================================== //= 1.0 Finished Scripting the Quest [Rikimaru] //= 1.1 Fixed a little Bug [Rikimaru] //====================================================================== //============== DO NOT REMOVE MY CREDITS AND CLAIM MY WORK AS YOURS === prontera,119,173,6 script [Quest] Prontera Manager 855,{ set .@npcname$,"^0000FF[ [Quest] Port Manager ]^000000"; if(gettimetick(2) - #carfingor < (60 * 60 * 24)) { mes .@npcname$; mes "I'm sorry but you have to wait"; mes "24 Hours until you can do the Quest again!"; close; } if(qcargo1==1) { mes .@npcname$; mes "Congrats!"; getitem 501,20; set #carfingor,gettimetick(2); set BaseExp,+142; set #cquest,0; set #qcargo1,0; close; } mes .@npcname$; mes "Hello "+strcharinfo(0)+","; mes "do you want to accept the Job?"; next; switch(select("Yes,sure:No,sorry:Cancel")) { case 1: mes .@npcname$; mes "Awesome,find the Deadly Cargo [6]"; mes "and bring it to me,and you'll"; mes "get a reward."; next; mes .@npcname$; mes "The Deadly Cargo [6] is somewhere"; set #cquest,1; mes "here in Izlude!"; close; case 2: mes .@npcname$; mes "Okay goodbye!"; close; case 3: close; } mes .@npcname$; mes "........"; close; } // ========================= End of the first NPC ================================================= izlude,74,186,3 script Deadly Cargo [1] 1652,{ set .@npcname$,"^FF0000[ Jumping Swordsman ]^000000"; if(cquest==1) { mes .@npcname$; mes "Go back to the Port Manager!"; set #qcargo1,1; while( !checkcell( strnpcinfo(4),( .@x = rand( 1,300 ) ),( .@y = rand( 1,300 ) ),cell_chkpass ) ); movenpc strnpcinfo(0),.@x,.@y; end; } mes .@npcname$; mes "........"; end; } // =============================== End of all the NPC's ========================================= // ====================== Have fun with this Script. Yours ~ Rikimaru ===========================
  17. Good day just want to ask , if how to make this Script into 1 Character per Account. On this script they can quest it unlimited depend of their account character. So i want to be this like 1 Character Only per Account // //=====// /==/ /==/ /==/ // // // /==/ /==/ /=/ /==/ // //=====// /==/ /=/ /==============/ /========/ /==//===/ /==/ /==/ // //=////// /==/ /==//=/ /==/ /==/==/==/==/==/ / / / /==/ /==/ /==/ // // == /==/ /==//=/ /==/ /==/ /==/ /==/ ======/ / /==/ /==/ /==/ // // == /==/ /==/ /=/ /==/ /==/ /==/ /==/ / /===/ / /==/ /==/ /==/ // // == /==/ /==/ /=/ /==/ /==/ /==/ /==/ / /===/ / /==/ /==/=====/==/ // // == /==/ /==/ /=/ /==/ /==/ /==/ /==/ /========/ /==/ /==///////==/ // ================ rAthena Script ================================================== // ============== Information ======================================================= // = iRO Daily Quest : Alberta Cargo // = Made by : // = Rikimaru //===== Current Version: =============================================== //= 1.1 //===== Compatible With: =============================================== //= any rAthena SVN //===== Description: =================================================== //= The iRO Daily Quest : Alberta Cargo //= Usefull for having fun in a Server with a Mini Quest //= Has a counter of 24 Hours until the Players can do the Quest agian. //===== Additional Comments: =========================================== //= 1.0 Finished Scripting the Quest [Rikimaru] //= 1.1 Fixed a little Bug [Rikimaru] //====================================================================== //============== DO NOT REMOVE MY CREDITS AND CLAIM MY WORK AS YOURS === prontera,119,173,6 script [Quest] Prontera Manager 855,{ set .@npcname$,"^0000FF[ [Quest] Port Manager ]^000000"; if(gettimetick(2) - carfingor < (60 * 60 * 24)) { mes .@npcname$; mes "I'm sorry but you have to wait"; mes "24 Hours until you can do the Quest again!"; close; } if(qcargo1==1) { mes .@npcname$; mes "Congrats!"; getitem 501,20; set carfingor,gettimetick(2); set BaseExp,+142; set cquest,0; set qcargo1,0; close; } mes .@npcname$; mes "Hello "+strcharinfo(0)+","; mes "do you want to accept the Job?"; next; switch(select("Yes,sure:No,sorry:Cancel")) { case 1: mes .@npcname$; mes "Awesome,find the Deadly Cargo [6]"; mes "and bring it to me,and you'll"; mes "get a reward."; next; mes .@npcname$; mes "The Deadly Cargo [6] is somewhere"; set cquest,1; mes "here in Izlude!"; close; case 2: mes .@npcname$; mes "Okay goodbye!"; close; case 3: close; } mes .@npcname$; mes "........"; close; } // ========================= End of the first NPC ================================================= izlude,74,186,3 script Deadly Cargo [1] 1652,{ set .@npcname$,"^FF0000[ Jumping Swordsman ]^000000"; if(cquest==1) { mes .@npcname$; mes "Go back to the Port Manager!"; set qcargo1,1; while( !checkcell( strnpcinfo(4),( .@x = rand( 1,300 ) ),( .@y = rand( 1,300 ) ),cell_chkpass ) ); movenpc strnpcinfo(0),.@x,.@y; end; } mes .@npcname$; mes "........"; end; } } // =============================== End of all the NPC's ========================================= // ====================== Have fun with this Script. Yours ~ Rikimaru ===========================
  18. Hello, can i request for an script Mechanics: You need to register to npc first, then after registrating, you are now qualified to the quest, First 200 Player That Bring you Example item Apple With quantity of 300, will get reward example poring coin. And once you done, you cannot repeat the quest. 1 Char per account. Thank you.
  19. Hello, i having a problem about the getmapuser waitingroom. the problem is, everytime i entered on the map with getmapuser it will not count on, i have to use @reloadscript to update the user on waiting room. so my problem is how i can fix this so to be updated once entered and once exit And also im using the DotaPVP Script
  20. i try this and got no error while re compiling but when i'm trying to put the effect and use the Soul link skill on character id does not apply the bonuses
  21. Can you tell me how did you make it work?
  22. Hello, Does anyone know how to make this per account ? and not per character ? because i test this on my server and all my character can quest it, well im just wondering if someone can help me to make this script for Accountly only, thaanks Does anyone know how to make this for 1 char Only ? Btw im using the lost puppies Army
  23. Hello ! can i have an script for areamonster? which is on 06guild_r? well already this command but i'm getting error areamonster "06guild_r",94,135,100,100,"Poring",1002,10,strnpcinfo(3) +"::OnMyMobDead"; ERROR:unknown syntax in file.
×
×
  • Create New...