Jump to content

Enoch

Members
  • Posts

    80
  • Joined

  • Last visited

Everything posted by Enoch

  1. no error code but it doesnt work after they can talk to the npc even they reach max lvl, i mean they can make another character and max lvl and claim again
  2. may i request an quest npc with change location after 1 quest completed so on every 1 quest completed it will change main town thank you
  3. //===== rAthena Script ======================================= //= Find the gm event (hide and seek) //===== By: ================================================== //= Mastagoon //===== Description: ========================================= //= The npc (GM sprite) will teleport to a random location on //= the map, and will open a waiting room. The first player to //= join that waiting room will win the round. //===== Current Version: ===================================== //= 1.0 //= 1.0.1 Fixed a typo that prevented automatic event start (credit to AinsLord) //===== Featuers: ============================================ //= Can set the number of rounds, map, item&zeny rewards. //= the event can start manually or automatically. //= There is another version of this script compatiable with //= Stolao's event manager. You can DM me if you want that file. //============================================================ freya,209,214,5 script GM Pritong Kandule#findgm 871,{ if(.status < 2) { mes "["+.npcName+"]"; mes "When the event begins, i will teleport to a random location on this map."; mes "And you need to find me to win!"; close; } end; OnInit: //SETTINGS .rounds = 10; // for how many rounds should the event last? .map$ = "freya"; // the event where the gm will hide .itemReward = 1; setarray .rewards[0],6242,1; // [itemId, itemAmount, {....}] .zenyReward = 0; .zenyAmount = 1000; .debugMode = 0; .npcName$ = "GM Pritong Kandule"; .countdown = 3; // the time between event announcements and when the event actually starts. .automatic = 1; // automatic event or does it need a gm to run it manually? .runEvery = 1; // (ignore if manual) run the event ever X hours .offset = 1; // (ignore if manual) sometimes, you might have another event/announcement at the same time as the event announcement. you can set an offset (announce X minutes after event time.) // Do not edit the code below. if(.countdown < 0) .countdown = 1; if(.rounds < 1) .rounds = 1; if(.winnersPerRound < 1) .winnersPerRound = 1; for(.@i = 0; .@i < getarraysize(.rewards); .@i = .@i+2) { if(getitemname(.rewards[.@i]) == "null") { debugmes "[Find GM]: Invalid item id provided "+.rewards[.@i]+" removing item from the rewards list.."; deletearray .rewards[.@i],2; .@i -= 2; } } .status = 0; bindatcmd("eventstart", strnpcinfo(3)+"::OnEventAnnounce",60,99); strnpcinfo(3); end; OnMinute00: if(.status || !.automatic || gettime(DT_HOUR) % .runEvery != 0 || agitcheck() || agitcheck2() || agitcheck3()) end; sleep .offset * 1000 * 60; OnEventAnnounce: .status = 1; for(.@i = .countdown; .@i > 0; .@i--) { announce "[Find "+.npcName$+"] : The event will begin in "+callfunc("F_InsertPlural",.@i,"minute")+"!",bc_all|bc_blue; sleep .debugMode ? 5000 : 60000; } announce "[Find "+.npcName$+"] : The event has now begun!",bc_all|bc_blue; OnEventStart: sleep 2000; npctalk "I will now teleport to a random location"; sleep 2000; npctalk "You must find me to win the event!"; sleep 2000; npctalk "This event will last for "+callfunc("F_InsertPlural",.rounds,"round"); sleep 2000; npctalk "Goodluck!"; donpcevent strnpcinfo(3)+"::OnRoundStart"; .status = 2; .round = 1; end; OnRoundStart: initnpctimer; do { .@x = rand(0,450); .@y = rand(0,450); } while (!checkcell(.map$,.@x,.@y,cell_chkpass)); unitwarp getnpcid(0),.map$,.@x,.@y; debugmes "[Event]: npc is at: "+.@x+" & "+.@y; announce "[Find "+.npcName$+"] :"+.npcName$+" is hiding in a random place in "+.map$+", Find him now!",bc_all|bc_blue; delwaitingroom; waitingroom "Here!", 2, strnpcinfo(3)+"::OnRoundEnd",1; .status = 2; end; OnRoundEnd: if(.status != 2) end; .status = 1; //#TODO the winner should be already attached here no? getwaitingroomusers strnpcinfo(3); for(.@i = 0; .@i < getarraysize(.@waitingroom_users); .@i++) { if(.@waitingroom_users[.@i] > 0) { .@winner = .@waitingroom_users[.@i]; } } if(!attachrid(.@winner)) { .status = 2; end; } specialeffect2 EF_SPHERE; announce .npcName$+": I've been found by "+strcharinfo(0)+"!",bc_all|bc_blue; if(.itemReward) { for(.@i = 0; .@i < getarraysize(.rewards); .@i = .@i +2) { getitem .rewards[.@i],.rewards[.@i+1]; } } if(.zenyReward) { Zeny += .zenyAmount; dispbottom "You've gained "+.zenyAmount+" zeny for winning a round in the event."; } sleep 1000; if(.round >= .rounds) { donpcevent strnpcinfo(3)+"::OnEventEnd"; end; } .round++; donpcevent strnpcinfo(3)+"::OnRoundStart"; end; OnEventEnd: .status = 0; announce "[Find "+.npcName$+"]: The event is over! thank you for participating.",bc_all|bc_blue; unitwarp getnpcid(0),.map$,209,214; delwaitingroom; sleep 5000; end; OnTimer1800000: if(.status) { stopnpctimer; donpcevent strnpcinfo(3)+"::OnEventEnd"; } end; }
  4. not working btw sorry for that this is the full script with code box /////////////////////////////////////////////////////// // ___________ _____.__ // \__ ___/__.__.________/ ____\__| ____ ____ // | | < | |\_ __ \ __\| |/ \ / ___\ // | | \___ | | | \/| | | | | \/ /_/ > // |____| / ____| |__| |__| |__|___| /\___ / // \/ Scripts \//_____/ // //===================================================== // Name: Race to Max Level // // Description: // This NPC allows for Game Masters to set a reward to // be given to the first player of each 2nd class that // reaches maximum level (base and class). //===================================================== /////////////////////////////////////////////////////// freya,218,220,6 script Max Level 4_LGTSCIENCE,{ set .@gm_level, 99; // GM level required to set the reward set .@maxbase, 175; set .@maxjob, 60; set .@defaultreward, 39997; setarray .@rewardablejobs[0], Job_Rune_Knight_T, Job_Genetic_T, Job_Guillotine_Cross_T, Job_Minstrel_T, Job_Mechanic_T, Job_Royal_Guard_T, Job_Wanderer_T, Job_Ranger_T, Job_Sura_T, Job_Arch_Bishop_T, Job_Shadow_Chaser_T, Job_Sorcerer_T, Job_Warlock_T, Job_Kagerou, Job_Oboro; Begin: mes "[ ^FF7700Race to Max Level^000000 ]"; mes "Hello, " + ((getgmlevel() >= .@gm_level) ? "master! What do you want to do today?" : "are you here for your reward?"); next; switch(select(((getgmlevel() >= .@gm_level) ? "Set Reward:Restart Race" : ":") + ":YES Please!:What is the Reward?:Who was rewarded?:Cancel")) { case 1: goto SetReward; case 2: goto RestartRace; case 3: goto GetReward; case 4: goto ExplainRace; case 5: goto ShowRewarded; default: end; } SetReward: mes "[ ^FF7700Race to Max Level^000000 ]"; if ($reward == 0) set $reward, .@defaultreward; mes "The reward is " + getitemname($reward) + " (ID: " + $reward + ")."; mes "Do you want to change it?"; next; if (select("Yes:No") == 1) { mes "[ ^FF7700Race to Max Level^000000 ]"; mes "Please enter the new reward item ID."; input .@rewardid; next; mes "[ ^FF7700Race to Max Level^000000 ]"; mes "Set " + getitemname(.@rewardid) + " as the reward?"; if(select("Yes:No") == 1) { set $reward, .@rewardid; } } goto Begin; RestartRace: mes "[ ^FF7700Race to Max Level^000000 ]"; mes "Are you sure you want to restart the race?"; next; if (select("Yes:No") == 1) { for (.@i = 0; .@i < getarraysize(.@rewardablejobs); .@i++) { set $rewarded$[.@rewardablejobs[.@i]], ""; } announce "The Race to Max Level has begun! Claim a reward once you reach " + .@maxbase + " base and job " + .@maxjob + " !!", bc_all; } goto Begin; GetReward: mes "Let's see... " + strcharinfo(0) + ", huh?"; set .@competitioner, 0; for (.@i = 0; .@i < getarraysize(.@rewardablejobs); .@i++) { if (Class == .@rewardablejobs[.@i]) { set .@competitioner, 1; if (BaseLevel < .@maxbase || JobLevel < .@maxjob) { mes "I'm sorry, but you still need to level a bit more."; } else if ($rewarded$[Class] == strcharinfo(0)) { mes "You have already claimed your reward."; } else if ($rewarded$[Class] != "") { mes "Too late!"; mes "The reward for " + jobname(Class) + " was already claimed by " + $rewarded$[Class] + "."; } else goto GiveReward; } } if (.@competitioner == 0) mes "You need to change your job."; close; GiveReward: set $rewarded$[Class], strcharinfo(0); next; mes "[ ^FF7700Race to Max Level^000000 ]"; mes "Congratulations! You were the first " + jobname(Class) + " to reach " + .@maxbase + " base and " + .@maxjob + " class!"; getitem $reward, 1; announce strcharinfo(0) + " ~ " + jobname(Class) + " ~ Has Reached Max. Level and Received " + getitemname($reward) + "!", bc_all; close; ExplainRace: mes "[ ^FF7700Race to Max Level^000000 ]"; mes "Yes! When you reach the maximum level for your class, talk to me and you'll be rewarded with a special item."; next; goto Begin; ShowRewarded: mes "[ ^FF7700Race to Max Level^000000 ]"; for (.@i = 0; .@i < getarraysize(.@rewardablejobs); .@i++) { mes jobname(.@rewardablejobs[.@i]) + ": " + (($rewarded$[.@rewardablejobs[.@i]] != "") ? $rewarded$[.@rewardablejobs[.@i]] : "^ff0000Nobody^000000"); } next; goto Begin; OnInit: while (1) { showscript " Race to 175 Winners! "; sleep 1000; } end; }
  5. how to add unique gepard ip so that after he/she won the race to max level, he/she cannot join in a different character freya,218,220,6 script Max Level 4_LGTSCIENCE,{ set .@gm_level, 99; // GM level required to set the reward set .@maxbase, 175; set .@maxjob, 60; set .@defaultreward, 39997; setarray .@rewardablejobs[0], Job_Rune_Knight_T, Job_Genetic_T, Job_Guillotine_Cross_T, Job_Minstrel_T, Job_Mechanic_T, Job_Royal_Guard_T, Job_Wanderer_T, Job_Ranger_T, Job_Sura_T, Job_Arch_Bishop_T, Job_Shadow_Chaser_T, Job_Sorcerer_T, Job_Warlock_T, Job_Kagerou, Job_Oboro; Begin: mes "[ ^FF7700Race to Max Level^000000 ]"; mes "Hello, " + ((getgmlevel() >= .@gm_level) ? "master! What do you want to do today?" : "are you here for your reward?"); next; switch(select(((getgmlevel() >= .@gm_level) ? "Set Reward:Restart Race" : ":") + ":YES Please!:What is the Reward?:Who was rewarded?:Cancel")) { case 1: goto SetReward; case 2: goto RestartRace; case 3: goto GetReward; case 4: goto ExplainRace; case 5: goto ShowRewarded; default: end; } SetReward: mes "[ ^FF7700Race to Max Level^000000 ]"; if ($reward == 0) set $reward, .@defaultreward; mes "The reward is " + getitemname($reward) + " (ID: " + $reward + ")."; mes "Do you want to change it?"; next; if (select("Yes:No") == 1) { mes "[ ^FF7700Race to Max Level^000000 ]"; mes "Please enter the new reward item ID."; input .@rewardid; next; mes "[ ^FF7700Race to Max Level^000000 ]"; mes "Set " + getitemname(.@rewardid) + " as the reward?"; if(select("Yes:No") == 1) { set $reward, .@rewardid; } } goto Begin; RestartRace: mes "[ ^FF7700Race to Max Level^000000 ]"; mes "Are you sure you want to restart the race?"; next; if (select("Yes:No") == 1) { for (.@i = 0; .@i < getarraysize(.@rewardablejobs); .@i++) { set $rewarded$[.@rewardablejobs[.@i]], ""; } announce "The Race to Max Level has begun! Claim a reward once you reach " + .@maxbase + " base and job " + .@maxjob + " !!", bc_all; } goto Begin; GetReward: mes "Let's see... " + strcharinfo(0) + ", huh?"; set .@competitioner, 0; for (.@i = 0; .@i < getarraysize(.@rewardablejobs); .@i++) { if (Class == .@rewardablejobs[.@i]) { set .@competitioner, 1; if (BaseLevel < .@maxbase || JobLevel < .@maxjob) { mes "I'm sorry, but you still need to level a bit more."; } else if ($rewarded$[Class] == strcharinfo(0)) { mes "You have already claimed your reward."; } else if ($rewarded$[Class] != "") { mes "Too late!"; mes "The reward for " + jobname(Class) + " was already claimed by " + $rewarded$[Class] + "."; } else goto GiveReward; } } if (.@competitioner == 0) mes "You need to change your job."; close; GiveReward: set $rewarded$[Class], strcharinfo(0); next; mes "[ ^FF7700Race to Max Level^000000 ]"; mes "Congratulations! You were the first " + jobname(Class) + " to reach " + .@maxbase + " base and " + .@maxjob + " class!"; getitem $reward, 1; announce strcharinfo(0) + " ~ " + jobname(Class) + " ~ Has Reached Max. Level and Received " + getitemname($reward) + "!", bc_all; close; ExplainRace: mes "[ ^FF7700Race to Max Level^000000 ]"; mes "Yes! When you reach the maximum level for your class, talk to me and you'll be rewarded with a special item."; next; goto Begin; ShowRewarded: mes "[ ^FF7700Race to Max Level^000000 ]"; for (.@i = 0; .@i < getarraysize(.@rewardablejobs); .@i++) { mes jobname(.@rewardablejobs[.@i]) + ": " + (($rewarded$[.@rewardablejobs[.@i]] != "") ? $rewarded$[.@rewardablejobs[.@i]] : "^ff0000Nobody^000000"); } next; goto Begin; OnInit: while (1) { showscript " Race to 175 Winners! "; sleep 1000; } end; }
  6. setunitdata .statue[.@i +1], UNPC_CLASS, .@class[.@i]; then change the UNPC_CLASS into UNPC_DISPLAY I THINK IT WORKS BUT ANOTHER ERROR OCCURS AFTER I PUT UNPC_DISPLAY
  7. what happen if i will update my trunk? will my edited script will also deleted?
  8. i cannot because im using this trunk rathena/rathena at a16f0ebb077c0513f8044c69728b2fe045635177 (github.com) but i tried in my offline its plug in play
  9. this one Release/dota_sql_ladder_3.5r.txt at master · AnnieRuru/Release (github.com)
  10. requesting for dota pvp with statue for old client 2019 and down thank you
  11. what client support the quest window shop like when you open the item and ingre already there just drag
  12. hi everyone, im requesting for an npc quest script random jump in maintowns after completing one quest
  13. sino po merong working fake players d2? beke naman
  14. its working but after you enter the pvp you cant get back and then the script spam savepoint warp
  15. good day i would like to request a class job restrictions in woe and pvp im running a server with trans and 3rd job, trans job is not allowed to enter 3rd job pvp vice versa thank you
  16. good day i would like to request a pvp script one npc but 2 option 1 Trans pvp 3rd job cant enter, option 2 3rd job pvp trans cant enter thank you, same with woe castle if trans woe 3rd job cant enter and if 3rd job woe trans cant enter here is my pvp script how can i add that restrictions core,141,124,5 script PvP Warper::PvP Warper 4_M_FAIRYSOLDIER,{ mes "[ ^0065DFPVP Warper^000000 ]"; mes "Welcome To PvP Warper"; mes "I Can Help You Warp To PVP Room"; next; mes "[ ^0065DFPvP Warper^000000 ]"; mes "You Ready?"; switch(select("^6ED1E1Trans Martial Arts^000000 - ^FF0000["+getmapusers("dbz_tour")+"]^000000 Players.:^FF33CC3rd Job Arena^000000 - ^FF0000["+getmapusers("cell_game")+"]^000000 Players.:^BAB9B9Coliseum Guild Arena^000000 - ^FF0000["+getmapusers("coliseum")+"]^000000 Players.:^FF7F00PvP Champion^000000 - ^FF0000["+getmapusers("1@ge_st")+"^000000 Players.:No")) { case 1: announce "[ "+ strcharinfo(0) +" ] has joined Trans Martial Arts",0,0x6ED1E1; //announce and end switch( rand(1,6) ){ case 1: warp "dbz_tour", 85, 118; end; case 2: warp "dbz_tour", 109, 118; end; case 3: warp "dbz_tour", 108, 93; end; case 4: warp "dbz_tour", 86, 92; end; case 5: warp "dbz_tour", 96, 106; end; case 6: warp "dbz_tour", 98, 129; end; } case 2: announce "[ "+ strcharinfo(0) +" ] has joined 3rd Job Arena",0,0xFF33CC; //announce and end warp "cell_game",0,0; end; case 3: announce "[ "+ strcharinfo(0) +" ] has joined Coliseum Guild Arena",0,0xBAB9B9; //announce and end switch( rand(1,6) ){ case 1: warp "coliseum", 70, 103; end; case 2: warp "coliseum", 86, 86; end; case 3: warp "coliseum", 117, 96; end; case 4: warp "coliseum", 105, 72; end; case 5: warp "coliseum", 128, 77; end; case 6: warp "coliseum", 69, 75; end; } case 4: if(Class != .class) { mes "I'm sorry, but only "+jobname(.class)+"s are allowed to join this PvP Room."; close; } mes "Do you want to go to the PvP Room?"; if(select("- Yes:- No") - 1) close; close2; announce "[ "+ strcharinfo(0) +" ] has entered Champion 1 On 1 Arena!!",0,0x00BFFF; //announce and end warp "1@ge_st",0,0; end; OnInit: set .n$,"["+strnpcinfo(1)+"]"; // NPC Name set .class,4016; // Allowed Class end; case 5: close; }
  17. hi how about the total mvp cards in the sever example only 3 GTB card in the server so other player dont complain how many gtb card
  18. Good day guys i want to request a script where normal players can see the list of mvp and mini boss cards in the server by clicking it thank you.
  19. HI, I WANT TO ASK IF THERE'S A SCRIPT LIKE THIS INSTANT EQUIP PER JOB SAMPLE IM A CHAMPION, I CHOOSE CHAMPION IN THE LIST THEN IT WILL AUTO EQUIP TO ME THESE ITEMS [ POO POO HAT, SUNGLASSES, PIPE, SWORD MACE, BUCKER, SHOES WITH CARDS AND REFINE, I HOPE YOU CAN HELP ME THANK YOU VERY MUCH.
  20. HELLO GUYS I WANT TO ASK IF THERE'S A SCRIPT THAT CAN RENT A CART FOR ALL JOBS, BUT THE MAX WEIGHT FOR OTHERS JOB IS 2K MAX CART WEIGHT AND FOR MERCHANT CLASSS IS STILL 8K MAX WEIGHT. I HOPE THERE'S ONE THANK YOU VERY MUCH
  21. hello guys can i ask if there's an instant equips per job script here thank you
×
×
  • Create New...