Jump to content

kalabasa

Members
  • Posts

    478
  • Joined

  • Last visited

  • Days Won

    1

Everything posted by kalabasa

  1. i did try using browedit it does rename the map but it all goes blank
  2. what if its a custom map? sorry for not completing my whole question
  3. ahh..i see i thought i would need at least browedit thanks can you show me how to do it? this will affect when using the @warp command right?
  4. currently i downloaded browedit from github as im having problems cloning it i just wanted to rename a map can someone teach me?
  5. Follow Up i try both chris and zack translations. and i got the same error i follow the instruction though i did try to grab on some popular ragnarok and put their custom grf and did not show any error wandering what could be the problem here anyone can figure it out?
  6. Hi there, Good Day! i need a little help. i am using this script it works fine just the timer is not working as intended. if no one found the monster it will announce the coordinates but the monster isnt showing because it will start immediately instead of the next 15 seconds. //==========================================================// //========= Script by RyCHIRO =========// //========= http://reincarnation-network.com =========// //========= http://chiyan-ro.com =========// //==========================================================// - script jumpevent -1,{ OnWhisperGlobal: if ( getgmlevel() < 99 ) end; L_JumpAdmin: mes "[Manager]"; mes "^FF0000~Hi GM " + strcharinfo(0) + "!~^000000"; mes "^FF0000The Current Prize is:^000000"; mes "^FF00001. Random Prize:^000000 ^008000"+$jmp_item_amount1+" "+getitemname($jmp_item_id1)+"^000000"; mes "^FF00002. Random Prize:^000000 ^008000"+$jmp_item_amount2+" "+getitemname($jmp_item_id2)+"^000000"; mes "^FF00003. Random Prize:^000000 ^008000"+$jmp_item_amount3+" "+getitemname($jmp_item_id3)+"^000000"; switch(select("Start Jump Event?:Set Prize:Not today Fellas!")){ case 1: next; if( $@JumpStart == 1 ){ mes "[Manager]"; mes "I Can't Start The Event!!"; mes "The Event is still ON!!"; next; goto L_JumpAdmin; } next; mes "[Manager]"; mes "^FF0000~Sure thing!~^000000"; close2; goto L_StartJmp; case 2: next; mes "[Manager]"; mes "^FF0000~What should the prize for winning be? Please input the ID.~^000000"; menu "Set Prize 1",SP1,"Set Prize 2",SP2,"Set Prize 3",SP3,"Go Back to main",L_JumpAdmin; SP1: next; mes "[Manager]"; mes "^FF0000~What should the prize for winning be? Please input the ID.~^000000"; input $jmp_item_id1; next; mes "[Manager]"; mes "^FF0000~How many if this item should I give away?~^000000"; input $jmp_item_amount1; next; mes "[Manager]"; mes "^FF0000~So, the prize is^000000 ^008000"+ $jmp_item_amount1 +" "+ getitemname($jmp_item_id1) +"^000000? ^FF0000Great.~^000000"; next; goto L_JumpAdmin; SP2: next; mes "[Manager]"; mes "^FF0000~What should the prize for winning be? Please input the ID.~^000000"; input $jmp_item_id2; next; mes "[Manager]"; mes "^FF0000~How many if this item should I give away?~^000000"; input $jmp_item_amount2; next; mes "[Manager]"; mes "^FF0000~So, the prize is^000000 ^008000"+ $jmp_item_amount2 +" "+ getitemname($jmp_item_id2) +"^000000? ^FF0000Great.~^000000"; next; goto L_JumpAdmin; SP3: next; mes "[Manager]"; mes "^FF0000~What should the prize for winning be? Please input the ID.~^000000"; input $jmp_item_id3; next; mes "[Manager]"; mes "^FF0000~How many if this item should I give away?~^000000"; input $jmp_item_amount3; next; mes "[Manager]"; mes "^FF0000~So, the prize is^000000 ^008000"+ $jmp_item_amount3 +" "+ getitemname($jmp_item_id3) +"^000000? ^FF0000Great.~^000000"; next; goto L_JumpAdmin; Case 3: next; mes "[Manager]"; mes "Bye!!"; close; }// End Admin Manager... OnMinute25: L_StartJmp: announce "Jumper Event : will begin in 20 seconds",bc_blue; sleep2 5000; announce "Jumper Event : I'm Going to JUMP somewhere..!!",bc_blue; sleep2 5000; announce "Jumper Event : By the way I'm going to disguise into a random monster.!!",bc_blue; sleep2 10000; announce "Jumper Event : Last 10 seconds",bc_blue; sleep2 10000; set $@ran, rand(1,10); if ($@ran == 10) set $@jmpmap$,"hugel"; if ($@ran == 9) set $@jmpmap$,"yuno"; if ($@ran == 8) set $@jmpmap$,"comodo"; if ($@ran == 7) set $@jmpmap$,"xmas"; if ($@ran == 6) set $@jmpmap$,"aldebaran"; if ($@ran == 5) set $@jmpmap$,"izlude"; if ($@ran == 4) set $@jmpmap$,"payon"; if ($@ran == 3) set $@jmpmap$,"geffen"; if ($@ran == 2) set $@jmpmap$,"morocc"; if ($@ran == 1) set $@jmpmap$,"prontera"; announce "Jumper Event : Go Find me!! I'm here in "+$@jmpmap$+"!!!",bc_blue; set $@JmpRnd,10; goto OnStart; OnStart: if ($@JmpRnd == 0){ stopnpctimer; set $@JumpStart,0; sleep2 3000; announce "Jumper Event : is now OVER!!",bc_blue; sleep2 15000; movenpc "Jumper"+$@ran+"",1,1; //move the NPC setnpcdisplay "Jumper"+$@ran+"",1002; end; } if ($@JmpRnd == 10){ goto OnStart2; } stopnpctimer; sleep2 3000; announce "Jumper Event : Next Round will begin in 15 seconds...",bc_blue; sleep2 15000; setnpcdisplay "Jumper"+$@ran+"",1002; movenpc "Jumper"+$@ran+"",1,1; //move the NPC set $@ran, rand(1,10); if ($@ran == 10) set $@jmpmap$,"hugel"; if ($@ran == 9) set $@jmpmap$,"yuno"; if ($@ran == 8) set $@jmpmap$,"comodo"; if ($@ran == 7) set $@jmpmap$,"xmas"; if ($@ran == 6) set $@jmpmap$,"aldebaran"; if ($@ran == 5) set $@jmpmap$,"izlude"; if ($@ran == 4) set $@jmpmap$,"payon"; if ($@ran == 3) set $@jmpmap$,"geffen"; if ($@ran == 2) set $@jmpmap$,"morocc"; if ($@ran == 1) set $@jmpmap$,"prontera"; announce "Jumper Event : Go Find me!! I'm here in "+$@jmpmap$+"!!!",bc_blue; goto OnStart2; OnStart2: set $monster, rand(1001,1995); if($monster == 1003 || $monster == 1218 || $monster == 1006 || $monster == 1017 || $monster == 1021 || $monster == 1022 || $monster == 1027 || $monster == 1043 || $monster == 1006 || $monster == 1136 || $monster == 1137 || $monster == 1168 || $monster == 1171 || $monster == 1172 || $monster == 1173 || $monster == 1181 || $monster == 1210 || $monster == 1223 || $monster == 1284 || ($monster >= 1324 && $monster <= 1363) || $monster == 1006 || $monster == 1407 || $monster == 1411 || $monster == 1414 || $monster == 1496 || $monster == 1501 || $monster == 1900){ goto OnStart2; end; } while(1) { //Initiate an infinite loop set $@jx,rand(0,300); //Set a randon X coordinate set $@jy,rand(0,300); //Set a random Y coordinate if(checkcell(""+$@jmpmap$+"",$@jx,$@jy,cell_chkpass)) break; //If cell is walkable break out of the loop } initnpctimer; set $@JumpStart,1; movenpc "Jumper"+$@ran+"",$@jx,$@jy; //move the NPC setnpcdisplay "Jumper"+$@ran+"",$monster; set $@JmpRnd,$@JmpRnd-1; end; OnTimer60000: set $@JumpStart,0; announce "Jumper Event : WOW no One Found ME!! I'm here in "+$@jmpmap$+" "+$@jx+" "+$@jy+"!!",bc_blue; sleep2 3000; donpcevent "jumpevent::OnStart"; end; }//End Script - script Jumper -1,{ if( $@JumpStart == 0 ){ mes "[Jumper]"; mes "I'm sorry, Someone Found me.."; close; } set $@prize, rand(1,100); if ( $@prize <= 50 ){ set $@JumpStart,0; getitem $jmp_item_id1,$jmp_item_amount1; announce "Jumper Event : "+strcharinfo(0)+" is the WINNER!! I'm here in "+$@jmpmap$+" "+$@jx+" "+$@jy+"!!",bc_blue; donpcevent "jumpevent::OnStart"; mes "[Jumper]"; mes "WOW you found me!!"; mes "Take this as a REWARD!!"; mes "You got ^008000"+ $jmp_item_amount1 +" "+ getitemname($jmp_item_id1) +"^000000"; close; end; } set $@prize, rand(1,100); if ( $@prize <= 49 ){ set $@JumpStart,0; getitem $jmp_item_id2,$jmp_item_amount2; announce "Jumper Event : "+strcharinfo(0)+" is the WINNER!! I'm here in "+$@jmpmap$+" "+$@jx+" "+$@jy+"!!",bc_blue; donpcevent "jumpevent::OnStart"; mes "[Jumper]"; mes "WOW you found me!!"; mes "Take this as a REWARD!!"; mes "You got ^008000"+ $jmp_item_amount2 +" "+ getitemname($jmp_item_id2) +"^000000"; close; end; } set $@prize, rand(1,100); if ( $@prize <= 48 ){ set $@JumpStart,0; getitem $jmp_item_id3,$jmp_item_amount3; announce "Jumper Event : "+strcharinfo(0)+" is the WINNER!! I'm here in "+$@jmpmap$+" "+$@jx+" "+$@jy+"!!",bc_blue; donpcevent "jumpevent::OnStart"; mes "[Jumper]"; mes "WOW you found me!!"; mes "Take this as a REWARD!!"; mes "You got ^008000"+ $jmp_item_amount3 +" "+ getitemname($jmp_item_id3) +"^000000"; close; end; } }//End Script prontera,1,1,1 duplicate(Jumper) Jumper1 1002 morocc,1,1,1 duplicate(Jumper) Jumper2 1002 geffen,1,1,1 duplicate(Jumper) Jumper3 1002 payon,1,1,1 duplicate(Jumper) Jumper4 1002 izlude,1,1,1 duplicate(Jumper) Jumper5 1002 aldebaran,1,1,1 duplicate(Jumper) Jumper6 1002 xmas,1,1,1 duplicate(Jumper) Jumper7 1002 comodo,1,1,1 duplicate(Jumper) Jumper8 1002 yuno,1,1,1 duplicate(Jumper) Jumper9 1002 hugel,1,1,1 duplicate(Jumper) Jumper10 1002
  7. is it possible to cast more skills if so how?
  8. Error C2082 redefinition of formal parameter 'nd' map-server c:\users\user\documents\ra\rathena\src\map\clif.cpp 2153 Error C2065 'discount': undeclared identifier map-server c:\users\user\documents\ra\rathena\src\map\npc.cpp 3166 Error C2059 syntax error: '}' map-server c:\users\user\documents\ra\rathena\src\map\npc.cpp 3168 Error C2143 syntax error: missing ';' before '}' map-server c:\users\user\documents\ra\rathena\src\map\npc.cpp 3168 Error C2143 syntax error: missing ';' before '{' map-server c:\users\user\documents\ra\rathena\src\map\npc.cpp 3176 Error C2447 '{': missing function header (old-style formal list?) map-server c:\users\user\documents\ra\rathena\src\map\npc.cpp 3176 Error C2065 'npc_convertlabel_db': undeclared identifier map-server c:\users\user\documents\ra\rathena\src\map\npc.cpp 3338
  9. restoring costume to normal one's are only working and if you have two identical headgears it convert but not actually
  10. npc_event: event not found [trade_item_main::OnTalk]
  11. im trying to disable this event monster race im trying to do @unloadnpc and their npc names but not working
  12. i just copied the last edit atm working as intended maybe one last request? if you input higher than 100 the process will still continue can you add some checking if they input higher thatn 100 the process will not process thanks!
  13. set .@item[0],713,970,607; //Array with items IDs to use (only 1 of them). i getting error with this line how do i exactly configure it? set .@item[0],713; i set to this i can only set one requirements how to i set all of them? npc stuck when you input 200+ above it will still generate results but you wont get brewing exp Working fine i guess let me just test thoroughly
  14. sorry i just check this post atm i test itt out and give results thanks Okay i finally got it working phew. 1. If Entered no value it will still proceed and does not consume/delete requirements 2. When higher value entered sometimes the npc will stuck and dialog will not close 3. The success chance is not mixed for example if entered value is 100 all of them will fail vice versa 4. if brewing failed it will gained brewing exp +1 instead of 0 5. if possible i need 3 requirements not 1 ?
  15. Kindly update this one to the latest tons of errors ?
  16. Hello i download this map can some translate the file onto english one? to be able to generate the map properly
  17. i applied the patch it works but when i issued koe off the castle owner goes back to the previous owner instead of the new one got someone got a fix?
  18. i did reload and i have also the Body: thing
  19. Good Day! i am currently using this hourly reward script i am having problems with quest_db - Id: 61000 Title: Hourly Rewards Cooldown TimeLimit: +60m Targets: - Mob: Count: Id: Race: Size: Element: MinLevel: MaxLevel: Drops: - Mob: Item: Count: Rate: and here is my console error quest_add: quest 61000 not found in DB. Function: setquest (1 parameter): data number value=61000 any idea what i miss here? //===== EinherjarRO Scripts ================================== //= Hourly Rewards //===== By: ================================================== //= Stolao //===== Current Version: ===================================== //= 2.00 //===== Compatible With: ===================================== //= rAthena SVN //===== Description: ========================================= //= A reward system for players for every hour of play up to //= a limited number of hours a week, each character will have //= a unique //===== Todo ================================================= //= Suggestions? //===== Comments: ============================================ //= quest_db.txt //= 61000,180,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Hourly Rewards Cooldown" //===== Additional Comments: ================================= //= 2.00 Remake using Quest DB //===== Contact Info: ======================================== //= [Stolao] //= Email: [email protected] //============================================================ prontera,5,5,5 script Hourly 111,{ OnHourCmnd: switch(checkquest(61000,PLAYTIME)){ case 2: .@NextHour = #HReward + 1; explode(.@XT$,.Rewards$[.@NextHour],","); for(.@x = y = 0; .@x < .@Size; .@x++) .@TT[.@x] = atoi(.@XT$[.@x]); if(.Mode & 1 && (.@TT[4] > 0 || .@vip[4] > 0)){ .@Size = getarraysize(.@TT); for(.@x = 4; .@x <= .@Size - 1 ; .@x += 2){ .@itms[.@y] = .@TT[.@x]; .@qnts[.@y] = .@TT[.@x + 1]; .@y++; } if(checkweight2(.@itms,.@qnts)){ for(.@x = 0; .@x < .@y; .@x++){ if(.Mode & 32) getitembound .@itms[.@x], .@qnts[.@x], .Bound_Mode; else getitem .@itms[.@x], .@qnts[.@x]; } } else { message strcharinfo(0),"[Hourly Rewards]: You cannot carry the prizes, please use storage and reuse command."; end; } } if(.Mode & 2 && (.@TT[1])){ #Hourlypoint += .@TT[1]; message strcharinfo(0),"[Hourly Rewards]: Recieved "+ .@TT[1] +" "+.Points$; } if(.Mode & 4 && (.@TT[0])){ zeny += .@TT[0]; message strcharinfo(0),"[Hourly Rewards]: Recieved "+ .@TT[0] +"z"; } if(.Mode & 8 && (.@TT[3] || .@TT[4])) getexp .@TT[3], .@TT[4]; #HReward++; erasequest 61000; case -1: .@Size = getarraysize(.Rewards$); if(#HReward >= .@Size){ message strcharinfo(0),"[Hourly Rewards]: No more rewards remaining this week, ."; end; } setquest 61000; end; case 0: case 1: message strcharinfo(0),"[Hourly Rewards]: Rewards not ready again yet."; end; } OnHour00: if(gettime(DT_DAYOFWEEK) == SUNDAY){ query_sql("DELETE FROM `acc_reg_num` WHERE `key` = '#HReward'"); addrid(0); #HReward = 0; } end; OnInit: // Basic Settings // 1: Item | 2: Points | 4: Zeny | 8: Exp // 16: Item Rewards Bound // (a bit value, e.g. 3 = Items & Points from Multi) .Mode = 1|2|4|16; // Item Binding Mode // Bound_Account : Account Bound item // Bound_Guild : Guild Bound item // Bound_Party : Party Bound item // Bound_Char : Character Bound item .Bound_Mode = Bound_Account; // To disable the command '@loginreward' comment the next lines // * Needs extra commands for typos bindatcmd("hourly",strnpcinfo(3)+"::OnHourCmnd",0,99); bindatcmd("hourlyreward",strnpcinfo(3)+"::OnHourCmnd",0,99); // Point Name .Points$ = "Hourly Points"; // Hourly Prize items: // "<Zeny>,<Points>,<BaseExp>,<JobExp>,<itemID-1>,<amount-1>,<itemID-2>,<amount-2>...etc", // Hour 1 // "<Zeny>,<Points>,<BaseExp>,<JobExp>,<itemID-1>,<amount-1>,<itemID-2>,<amount-2>...etc" // Hour 2 // ...; // Total length of any days string must be 255 or shorter // This is total hours collected per week, max possible is 167 setarray .Rewards$[1], "1000,1", // Hour 1: 1000 Zeny + 1 #Hourlypoint "0,1,0,0,501,5", // Hour 2: 5 Red Potion "0,1,0,0,506,5", // Hour 3: 5 Green Potion "2000,1", // Hour 4: 2000 Zeny "2000,1", // Hour 5: 2000 Zeny "0,1,0,0,502,5", // Hour 6: 5 Orange Potion "0,1,0,0,12208,1", // Hour 7: 1 Battle Manual "2500,1", // Hour 8: 2500 Zeny "2500,1", // Hour 8: 2500 Zeny "2500,1", // Hour 9: 2500 Zeny "0,1,0,0,503,5", // Hour 10: 5 White Potion "2500,1", // Hour 11: 2500 Zeny "2500,1", // Hour 12: 2500 Zeny "2500", // Hour 13: 2500 Zeny "0,1,0,0,503,5,506,3", // Hour 14: 5 White Potion + 3 Green Potion "2500,1", // Hour 15: 2500 Zeny "2500,1", // Hour 16: 2500 Zeny "2500,1", // Hour 17: 2500 Zeny "0,1,0,0,503,5,506,3", // Hour 18: 5 White Potion + 3 Green Potion "2500,1", // Hour 19: 2500 Zeny "2500,1", // Hour 20: 2500 Zeny "0,1,0,0,604,3", // Hour 21: 1 Dead Branch "2500,1", // Hour 22: 2500 Zeny "0,1,0,0,503,5,506,3", // Hour 23: 5 White Potion + 3 Green Potion "2500,1"; // Hour 24: 2500 Zeny }
  20. Hi There i was playing one of your event scripts almost poring how to i exactly put the rewards here or activate OnInit: set .rewardMode, 0; setarray .reward[0], // ID des items (cadeaux) 12103, //BB 12109, // Poring Box 7145; // T-Shirt set .rewardAmt, 250; set .eventMap$, "poring_w01"; setarray $eventalpUsersAId[0],0; end; }
  21. Greetings! i got this script added some edit myself Bulk input was working but the output is only applied once for example input 100 Bulk and the process only do once instead of 100 either sucess or failed and also how to show to the npc to display what current brew level the player is and the current exp needed to unlock the next brewLvl and lastly how to change the brewchance i know where it located but i dont know how to read exactly the formula or what is coded right here. //======Name======================================== // Potion Brewer NPC //======Version===================================== // 1.0 //======Author(s)=================================== // Sandbox //======Comments==================================== // In loving memory of AstralRO //================================================== //Change coordinates prontera,144,180,3 script Brewho 46,{ mes "[^0000FF Brewho ^000000]"; mes "Hello, I can teach you how to brew! Teach you, teach you how to brew ^000088Astral Beer^000000"; //Change to what kind of potion do you want to brew menu "Teach me please!",-; next; mes "[^0000FF Brewho ^000000]"; mes "Okay, you'll be needing these.."; mes "^000088"; mes "Empty Bottle"; //Change to what requirements you want to use mes "Alcohol"; mes "Yggdrasil Berry^000000"; mes "Also, a talent fee of 100,000z!"; menu "I've got them master brewer!",-; next; input .@quantity; next; if(countitem(713) < .@quantity || countitem(970) < .@quantity || countitem(607) < .@quantity || Zeny < 100000) goto Lnenough; //Must match the requirements above. mes "[^0000FF Brewho ^000000]"; mes "Let's see the results!"; //Uncomment to enable casting effect progressbar "ffff00",1; delitem 713,.@quantity; delitem 970,.@quantity; delitem 607,.@quantity; set Zeny,Zeny-100000; if(BrewLvl == 0) { set @brewchance,rand(1,5); //10% chance to brew on Lvl 0 if(@brewchance == 3) { misceffect 305; set BrewExp,BrewExp+1; getnameditem 607,strcharinfo(0); //Change Item ID, Must match the potion to be made! goto Lsuccess; } else { misceffect 306; goto Lfail; } } else if(BrewLvl == 1) { set @brewchance,rand(1,4); //25% chance to brew on Lvl 1 if(@brewchance == 3) { misceffect 305; set BrewExp,BrewExp+1; getnameditem 607,strcharinfo(0); //Change Item ID, Must match the potion to be made! goto Lsuccess; } else { misceffect 306; goto Lfail; } } else if(BrewLvl == 2) { set @brewchance,rand(1,3); //33.33% chance to brew on Lvl 2 if(@brewchance == 3) { misceffect 305; set BrewExp,BrewExp+1; getnameditem 607,strcharinfo(0); //Change Item ID, Must match the potion to be made! goto Lsuccess; } else { misceffect 306; goto Lfail; } } else if(BrewLvl == 3) { set @brewchance,rand(1,2); //50% chance to brew on Lvl 3 if(@brewchance == 2) { misceffect 305; //if(BrewExp < 10000) set BrewExp,BrewExp+1; getnameditem 607,strcharinfo(0); //Change Item ID, Must match the potion to be made! goto Lsuccess; } else { misceffect 306; goto Lfail; } } Lsuccess: next; mes "[^0000FF Brewho ^000000]"; mes "Congratulations! You've succeeded!"; if(BrewExp < 10000) dispbottom "You've gained 1 Brewing Exp."; if(BrewExp == 1000) { set BrewLvl,1; dispbottom "Congratulations! Your Brewing Mastery is now Level 1!"; announce strcharinfo(0)+"'s Brewing Mastery reached Level 1!",bc_all,0x00FFFF; } else if(BrewExp == 5000) { set BrewLvl,2; dispbottom "Congratulations! Your Brewing Mastery is now Level 2!"; announce strcharinfo(0)+"'s Brewing Mastery reached Level 2!",bc_all,0x00FFFF; } else if(BrewExp == 10000) { set BrewLvl,3; dispbottom "Congratulations! Your Brewing Mastery is now Level 3!"; announce strcharinfo(0)+"'s Brewing Mastery reached Max Level!",bc_all,0x00FFFF; } close; Lfail: next; mes "[^0000FF Brewho ^000000]"; mes "Oh.. You've failed.. Brew with me again next time!"; close; Lnenough: mes "[^0000FF Brewho ^000000]"; mes "Are you trying to brew me out!?"; close; }
  22. can anyone update this one? aint working anymore thanks
  23. High Jump skill working as intended while flying side kick and shadow jump not working finding possible ways to insert the code
×
×
  • Create New...