Jump to content

lionellex

Members
  • Posts

    60
  • Joined

  • Last visited

Everything posted by lionellex

  1. Ops my mistake, what I'm trying to say is, A NPC that converts Gold Coins to Cash Points. EDIT: prt_in,47,101,2 script Cash Exchanger 721,{ mes .NPC$; mes "Can exchange your " +getitemname(.ID)+ " for Cash Points. Want to exchange?"; next; if (select("Yes:No") - 1) close; mes .NPC$; mes "Okay how many " +getitemname(.ID)+ " will you exchange?"; next; input .@amount; if (.@amount == 0) { mes .NPC$; mes "Cannot trade 0 amount"; close; } mes .NPC$; mes "So you want to exchange " +.@amount+ "x " +getitemname(.ID); next; if (select("Yes:No") - 1) close; mes .NPC$; mes "Let me check if you have that amount of requirements"; next; if (countitem(.ID) < .@amount) { mes .NPC$; mes "Seems like you put an invalid amount"; close; } mes .NPC$; mes "Ohh that's nice here you go!"; delitem .ID,.@amount; set #CASHPOINTS,#CASHPOINTS+10; dispbottom "You now have " +#CASHPOINTS+ " Cash Points"; next; mes .NPC$; mes "Success trading"; close; OnInit: set .NPC$,"[ " +strnpcinfo(1)+ " ]"; // NPC Name set .ID,7517; // Requirement end; } Okay I found this script from THIS thread. I kinda change a little here and there. Everything works fine, except 1 issue. whenever I give this NPC more than 1 piece of GOLD COIN, it will still give me only 10 Cash Points. How do I set it to give more than just 10 Cash Point when I give this NPC more than 1 piece of GOLD COIN.
  2. Hi, I wonder if its possible to change #CASHPOINTS to Gold Coins (7517) ? Or is there any NPC that converts the Gold Coins to #CASHPOINTS ? EDIT: My mistake, what I'm trying to say is, A NPC that converts Gold Coins to Cash Points.
  3. Sir, not sure if you've made it work but in case you haven't. just take the end; out below AddHunting("Tax",1,5,501,5,100000,20000,20000,1002,10,); and also the , in the end.
  4. Okay, so I tried something here. http://pastebin.com/2HfgKsbf I basically, combine some floating script that I found in rathena, and also looked at the WOE script in server. Can you give me some advice, where I can improve it to match my needs?
  5. Do not bump unless providing additional information. sorry, edited 1st post. thanks.
  6. Hey guys, I kinda like this script that @sandbox did for a request. - script TownInvasion -1,{ OnMinute00: if(gettime(3) % 2 == 1 && !agitcheck() && !agitcheck2()) { for(.@i = 0; .@i < 4; .@i++) { //Spawn on 4 towns do { .@index = rand(.num_towns); } while (.@temp_check[.@index]); .@temp_check[.@index] = 1; announce .Town$[.@index]+" Guard: Help us! Our town is being invaded!",bc_blue|bc_all; for(.@ix = 0; .@ix < 5; .@ix++) { //MvP spawner monster .Town$[.@index],0,0,"--ja--",.MvP[rand(getarraysize(.MvP))],1,strnpcinfo(1)+"::OnInvadeDeath"; } for(.@iy = 0; .@iy < 100; .@iy++) { //Mob spawner monster .Town$[.@index],0,0,"--ja--",-1,1,strnpcinfo(1)+"::OnMobsDeath"; } } } end; OnInvadeDeath: .@RandMvP = rand(getarraysize(.Prize)); getitem .Prize[.@RandMvP],.PAmt[.@RandMvP]; goto CheckWipe; end; OnMobsDeath: .@RandMob = rand(getarraysize(.Prize2)); getitem .Prize2[.@RandMob],.PAmt2[.@RandMob]; goto CheckWipe; end; CheckWipe: if(mobcount(strcharinfo(3),"OnInvadeDeath") < 1 && mobcount(strcharinfo(3),"OnMobsDeath") < 1) Saved++; if(Saved >= 4) { announce "Thank you! All the cities have been saved!",bc_blue|bc_all; Saved = 0; } end; OnInit: //Towns to Invade setarray .Town$[0],"prontera","izlude","geffen","payon","alberta","aldebaran","yuno","lighthalzen","einbroch","einbech","comodo","umbala","amatsu","gonryun","ayothaya","louyang","hugel","rachel","veins"; set .num_towns, getarraysize(.Town$); //MvPs to summon setarray .MvP[0],1583,1832,1312; //Prize to give MVP setarray .Prize[0],7227,607,608,501,502,503,504,505,506,507,508,509,510,511,512; setarray .PAmt[0],1,1,1,1,1,1,1,1,1,1,1,1,1,1,1; //Prize to give Mobs setarray .Prize2[0],7227,607,608,501,502,503,504,505,506,507,508,509,510,511,512; setarray .PAmt2[0],1,1,1,1,1,1,1,1,1,1,1,1,1,1,1; end; } Location - Prontera ONLY MOB - Porings ONLY Prize - 7227 4pc Event starts every 4 hours.
  7. Hi, currently I'm using this floating rate script from Lupus. //===== rAthena Script ======================================= //= Floating Server Rates //===== By: ================================================== //= Lupus //===== Current Version: ===================================== //= 1.0 //===== Compatible With: ===================================== //= rAthena Project //===== Description: ========================================= //= It's a simply example of setbattleflag //= This script will change your server rates from 1x to 1.5x every 6 hours //= Note: It doesn't affect Card granted drops, MVP & Treasure Chests drops ^_- //= It also doesn't affect CARD drops, because they are just 0.01% //===== Additional Comments: ================================= //= You can make incredible scripts with 'setbattleflag'! //============================================================ - script FloatingRates -1,{ OnInit: //add any other HOURS OnHour00: OnHour06: OnHour12: OnHour18: //------------------- set $@brate,rand(210,450); set $@jrate,rand(210,450); set $@drate,rand(110,200); //Base exp setbattleflag("base_exp_rate",$@brate); //Job exp setbattleflag("job_exp_rate",$@jrate); //Drops setbattleflag("item_rate_common",$@drate); setbattleflag("item_rate_heal",$@drate); setbattleflag("item_rate_use",$@drate); setbattleflag("item_rate_equip",$@drate); //we don't change card drops rate, because these values won't change them anyway atcommand "@reloadmobdb"; announce "Current Earthfall rates are: "+($@brate-200)+"x "+($@jrate-200)+"x "+($@drate-100)+"x",bc_all,0xFF6060; end; } Love it and works really well, but I'm wondering... Can someone help me config this script a little? For example: Tuesday & Friday - x2 exp. 4pm - 11pm Saturday & Friday - x3 exp. 10am - 11pm Please & thank you.
  8. Guy, I need some solution here. I created 10 loading screens and they all worked, but this particular loading screen keep on appearing, how do I remove this completely?
  9. hmm, never mind. it seems to be fixed. I guess it's my keyboard's issue. restarting my pc made it work again. thanks btw.
  10. Hi, i'm having a problem. At first everything was working fine until this morning I realized that ALT+1 to ALT+0 doesn't work. In ALT+M everything is saved as it should be. ALT+E, ALT+Q, ALT+S and so on WORKS. So I thought it must be something wrong with my RO file. I deleted the whole RO file, extracted everything (CLEAN data and so on) again and still this issue stayed. Anyone can help?
  11. Thanks sir, but I'm not sure if this is correct. set $@brate,rand(200,350); set $@jrate,rand(200,350); set $@drate,rand(100,150); ^ But the announcement is 151/136/23 [Nvm, SOLVED it.] But, can I set it on Tuesday, Friday, Saturday & Sunday only? Lasts whole day for this 4 days.
  12. Guys, I would like to ask how do I edit this floating rates script from Stolao ? //===== EinherjarRO Scripts ================================== //= Floating Rates //===== By: ================================================== //= Stolao //===== Current Version: ===================================== //= 1.07 //===== Compatible With: ===================================== //= rAthena SVN //===== Description: ========================================= //= Floating Rates //===== Uses: ================================================ //= Exp and Item Rates Change Dynaimcally based on Online //= Player count and a configurable variables //===== Comments: ============================================ //= [Stolao] //= Optimize] //= In Game Menu / @Command? //===== Additional Comments: ================================= //= 1.00 Origional Make //= 1.01 Removed Unessisary Line //= 1.02 Added Config //= 1.03 Made auto collect base rates //= 1.04 Fixed a bug where would keep increasing every hour //= 1.05 Made Multipliers into an array //= 1.06 Fixed typos //= 1.07 Fixed Set -> setarray //===== Contact Ifo: ========================================= //= [Stolao] //= Email: [email protected] //============================================================ - script floating_rate -1,{ OnMinute30: set .@i, getusers(1); set .@r, rand(.Random[0],.Random[1]); setbattleflag( "base_exp_rate", .R[0] + (.@r + .@i) * .ExpMulti[0]); setbattleflag( "job_exp_rate", .R[1] + (.@r + .@i) * .ExpMulti[1]); setbattleflag( "item_rate_common", .R[2] + (.@r + .@i) * .ItemMulti[0]); setbattleflag( "item_rate_heal", .R[3] + (.@r + .@i) * .ItemMulti[1]); setbattleflag( "item_rate_use", .R[4] + (.@r + .@i) * .ItemMulti[2]); setbattleflag( "item_rate_equip", .R[5] + (.@r + .@i) * .ItemMulti[3]); atcommand "@reloadmobdb"; Announce "[Server]: Rates are now "+getbattleflag("base_exp_rate")/100+""+((getbattleflag("base_exp_rate")%100)?"."+getbattleflag("base_exp_rate")%100:"")+"/"+getbattleflag("job_exp_rate")/100+""+((getbattleflag("job_exp_rate")%100)?"."+getbattleflag("job_exp_rate")%100:"")+"/"+getbattleflag("item_rate_common")/100+""+((getbattleflag("item_rate_common")%100)?"."+getbattleflag("item_rate_common")%100:"")+" !",8; end; OnInit: // Multiplier Per Player and .Random // Each point is .01x Increase in exp rates // [0] = Base Exp // [1] = Job Exp // eg: rand = 75 , getuser = 100, Multi = 3 // rates will be increase by 5.25x setarray .ExpMulti ,3,3; // Multiplier Per Player and .Random // Each point is .01x Increase in exp rates // [0] = Common Items // [1] = Healing Items // [2] = Useable Items // [3] = Equipment Items // eg: rand = 75 , getuser = 100, Multi = 1 // rates will be increase by 1.75x setarray .ItemMulti,1,1,1,1; // The Random Variable Min and Max // [0] = Min // [1] = Max setarray .Random,0,100; end; OnInterIfInitOnce: // Dont Touch // Used to collect the base rates setarray .R, getbattleflag("base_exp_rate"), getbattleflag("job_exp_rate"), getbattleflag("item_rate_common"), getbattleflag("item_rate_heal"), getbattleflag("item_rate_use"), getbattleflag("item_rate_equip"); end; } My server's default rates are 2/2/1, I want this script to run every 4 hours in a day, but in that 4 hours only 2 hours of floating rates.
  13. Hi, i would like to request for a script that is something like THIS ? And hopefully it is easy to config myself. Please & thank you!
  14. Thanks, got them right. Thank you again. Hi, sorry to bother again. Know any idea how can I change the "Requirement" colour? Cos it's quite hard to look at it since the default skin background is white. maybe I want to change it RED?
  15. Thanks, but i'm a noob when it comes to scripts. where do I edit ? Add(1,5022,1,0,0,7086,1,969,10,999,40,1003,50,984,2); Add(1,5032,1,0,0,1059,250,2221,1,2227,1,7063,600); Add(1,5027,1,0,0,2252,1,1036,400,7001,50,4052,1); Add(1,5045,1,0,0,2252,1,1054,450,943,1200); Add(2,1224,1,0,0,7297,30,969,10,999,50,714,10); Add(2,1225,1,0,0,7292,30,969,10,999,50,714,10); Add(3,531,1,3,0,512,1,713,1); Add(3,532,1,3,0,513,1,713,1); Add(3,533,1,3,0,514,1,713,1); Add(3,534,1,3,0,515,1,713,1); ^ These?
  16. Hi, i would like to have a NPC that accept TCG Cards (7227) for some choices. For example 5 TCG - 2 Bubble Gum (12210) 5 TCG - 2 Job Battle Manual (14592) 5 TCG - 3 Battle Manual (12208) 5 TCG - 2 100% Battle Manual (14533) Please & thank you!
  17. Thanks guys, I'm a merely a beginner so I think its best to ask everyone else first. Thanks
  18. Hi guys, I got this Poring Catcher from HERE. I would like it to active every 3h everyday. Which part of the script I need to edit? OnClock1200: OnClock1100: OnClock1300: OnClock2300: ^ This? //=========== PORING CATCHER MADE ==============\\ //=== BY: SHOGS-GFX and RAGNAROK DEVELOPERS ====\\ //= Please Report if you encounter some errors =\\ //===== https://www.facebook.com/ShogsGfx ======\\ //==============================================\\ //==FUNCTIONS===================================\\ /* GM Can start the event manualy GM Can also stop the event manualy HOW: just PM this npc (npc:pcatch) The Next Guide Will Be Given by the Manager */ //======= PLEASE DO NOT REMOVE CREDITS =========\\ //==============================================\\ //== MORE UPDATES TO COME FOR BETTER FUNCTION ==\\ //===== https://www.facebook.com/ShogsGfx ======\\ //==============================================\\ //====LEVEL OF GM CAN CONTROL THE EVENT=========\\ - script GMCONTROL -1,{ OnInit: set $gmcontrol,60; end; } //---------------END OF SETUP-------------------\\ //================ON WHISPER=========================\\ - script pcatch -1,{ //====LEVEL OF GM CAN CONTROL THE EVENT=========\\ //OnInit: //set $gmcontrol,60; //end; //---------------END OF SETUP-------------------\\ OnWhisperGlobal: if(getgmlevel() >= $gmcontrol) { mes "^3399FF[Poring Catcher]^000000"; mes "Hello GameMaster!"; mes "What do you want to do?"; switch(select("Start Event:Stop Event:Nothing")) { case 1: { next; mes "^3399FF[Poring Catcher]^000000"; mes "Please confirm by typing START."; input .@confirm$; if (.@confirm$ == "START") { donpcevent "Announcer2::OnGMStart"; close; } mes "Confirmation failed"; close; break; } case 2: { next; mes "^3399FF[Poring Catcher]^000000"; mes "Please confirm by typing STOP."; input .@confirm$; if (.@confirm$ == "STOP") { donpcevent "Announcer2::OnGMStop"; close; } mes "Confirmation failed"; close; break; } case 3: { next; mes "^3399FF[Poring Catcher]^000000"; mes "Good bye"; close; } } } } //====================ANNOUNCER======================\\ - script Announcer2 -1,{ OnGMStart: killmonster "poring_w01.gat","All"; announce "(Poring Manager) : A GM started a Poring Catcher Event now.",0; sleep 3000; announce "(Poring Manager) : If you want to join, come at the middle of Prontera, enter the warp portal.",0; enablenpc "PoringCatcher"; sleep 2000; announce "(Poring Manager) : Prize: will be TCG Cards",0; sleep 2000; announce "(Poring Manager) : The portal is going to close in one minute.",0; sleep 60000; announce "(Poring Manager) : The portal has been closed.",0; disablenpc "PoringCatcher"; if(getmapusers("poring_w01") == 0) { disablenpc "Poring Banker"; announce "Event Poring Catcher didn't start because there's no players.",0; end; } donpcevent "Poring Banker::OnEnable"; end; OnGMStop: killmonster "poring_w01.gat","All"; announce "A Gamemaster has stopped the Poring Catcher Event",0; mapwarp "poring_w01.gat","prontera.gat",155,173; disablenpc "Poring Banker"; disablenpc "PoringCatcher"; end; OnClock1200: OnClock1100: OnClock1300: OnClock2300: killmonster "poring_w01.gat","All"; announce "(Poring Manager) : Poring Catcher Event will start at the moment.",0; sleep 3000; announce "(Poring Manager) : If you want to join, come at the middle of Prontera, enter the warp portal.",0; enablenpc "PoringCatcher"; sleep 2000; announce "(Poring Manager) : Prize: will be TCG Cards",0; sleep 2000; announce "(Poring Manager) : The portal is going to close in one minute.",0; sleep 60000; announce "(Poring Manager) : The portal has been closed.",0; disablenpc "PoringCatcher"; if(getmapusers("poring_w01") == 0) { disablenpc "Poring Banker"; announce "Event Poring Catcher didn't start because no players found in map.",0; end; } donpcevent "Poring Banker::OnEnable"; end; OnInit: disablenpc "Poring Banker"; disablenpc "PoringCatcher"; } //---------All Job Registration---------------------------------------- prontera,155,173,0 warp PoringCatcher 2,2,poring_w01,105,128 //--------------------------------------------------------------------- //--------------------------------------------------------------------- - script Poring Banker -1,{ OnEnable: mapannounce "poring_w01","Poring Manager: The Poring Catcher Event will start shortly",0; sleep2 10000; mapannounce "poring_w01","Poring Manager: I will be summoning 100 porings with different names kill the real poring",0; sleep2 10000; mapannounce "poring_w01","Poring Manager: What are we waiting for?..Let's Catch some Porings!!...",0; sleep2 10000; goto L_Start; end; L_Start: if(getmapusers("poring_w01") == 0) goto L_None; if(getmapusers("poring_w01") >= 1) { mapannounce "poring_w01","Poring Manager: Get ready at the count of 5 we will start!....",0; sleep2 6000; mapannounce "poring_w01","Poring Manager: 5",0; sleep2 5000; mapannounce "poring_w01","Poring Manager: 4",0; sleep2 4000; mapannounce "poring_w01","Poring Manager: 3",0; sleep2 3000; mapannounce "poring_w01","Poring Manager: 2",0; sleep2 2000; mapannounce "poring_w01","Poring Manager: 1",0; donpcevent "Poringsummoner::OnSummon"; end; } L_None: disablenpc "Poring Banker"; killmonster "poring_w01.gat","All"; end; } //==================SUMMONER OF PORINGS ======================\\ - script Poringsummoner -1,{ OnSummon: if(getmapusers("poring_w01") == 0) goto L_2None; monster "poring_w01.gat",0,0,"Poring",1002,1,"poringwin::OnMobKilled"; monster "poring_w01.gat",0,0,"Pouring",1002,10,"poringlose::OnMobKilled"; monster "poring_w01.gat",0,0,"Proing",1002,10,"poringlose::OnMobKilled"; monster "poring_w01.gat",0,0,"Poirng",1002,10,"poringlose::OnMobKilled"; monster "poring_w01.gat",0,0,"Poing",1002,10,"poringlose::OnMobKilled"; monster "poring_w01.gat",0,0,"I'm not a Poring",1002,5,"poringlose::OnMobKilled"; monster "poring_w01.gat",0,0,"Gnirop",1002,1,"poringlose::OnMobKilled"; monster "poring_w01.gat",0,0,"Poring",1113,1,"poringlose::OnMobKilled"; monster "poring_w01.gat",0,0,"Poring",1062,1,"poringlose::OnMobKilled"; monster "poring_w01.gat",0,0,"Por|ng",1002,10,"poringlose::OnMobKilled"; monster "poring_w01.gat",0,0,"Por1ng",1002,10,"poringlose::OnMobKilled"; monster "poring_w01.gat",0,0,"Porong",1002,10,"poringlose::OnMobKilled"; monster "poring_w01.gat",0,0,"P0ring",1002,10,"poringlose::OnMobKilled"; monster "poring_w01.gat",0,0,"P@ring",1002,10,"poringlose::OnMobKilled"; monster "poring_w01.gat",0,0,"Porng",1002,1,"poringlose::OnMobKilled";end; L_2None: disablenpc "Poring Banker"; killmonster "poring_w01.gat","All"; end; } //==================REAL PORING FOR WIN======================\\ - script poringwin -1,{ OnMobKilled: killmonster "poring_w01.gat","All"; atcommand "@doommap"; getitem 7227,3; announce "Poring Banker: We have a winner! well done " + strcharinfo(0) + ".",0; warp "SavePoint",0,0; end; } //==================DUMY PORINGS FOR LOSERS======================\\ - script poringlose -1,{ OnMobKilled: dispbottom "Your out of the game, You did not catch the right Poring !"; percentheal 00,00; warp "SavePoint",0,0; end; } //==================Mapflags========================\\ poring_w01 mapflag nowarp poring_w01 mapflag nowarpto poring_w01 mapflag noteleport poring_w01 mapflag nosave poring_w01 mapflag nomemo poring_w01 mapflag nobranch poring_w01 mapflag noloot poring_w01 mapflag noskill poring_w01 mapflag nopenalty
  19. Its enabled by default and assuming you don't increase the // Number of mins after logging before collecting prize .Rest = 0; it will be instant Hi sir, 2 more questions. Let's say I want to let the players get their rewards during 10am - 12pm and loosing them after 24h - 30h. // Minimum minutes between collecting daily reward // Day: 10*60 - 12*60 // Week: 10080 .MinWait = 1320; // Minutes before losing the consecutive reward // Day: 24*60 - 30*60 // Week: 20160 .MaxWait = 3000; Did I set them right?
  20. Sir, may I ask a few things? // To disable the command '@loginreward' comment the next lines // * Needs extra commands for typos bindatcmd("relog" ,"LOGIN::OnLoginCmnd",0,99); ^ How do I add this command? And how do I set it to instant get login rewards once logged in? But ofc after claiming the rewards, players still need to wait another 24hours to get the next rewards.
  21. sorry sir, i just want to make sure. thanks !
×
×
  • Create New...