-
Posts
949 -
Joined
-
Last visited
-
Days Won
16
Content Type
Profiles
Forums
Downloads
Jobs Available
Server Database
Third-Party Services
Top Guides
Store
Crowdfunding
Everything posted by sandbox
-
autobonus "{ bonus2 bExpAddClass,Class_All,-50; }",1000,60000;
-
gold? or a darker shade since they were "past" staff, lets treat their contributions as "gold"
-
Unforgettable RO experience? Everything. This was the pinnacle of MMORPG in the PH, I started playing when I was in grade 5(12 years ago), and RO greatly affected my interest in computer. My first character was a n00b acolyte which had all the stats, even agi/luk xD Sure, the game has already been topped by other RPG games, but this game will forever be a part of not only my childhood, but my whole self as well. P.S.: TL was a successful troll
-
then what do you call me ._.
-
http://rathena.org/wiki/Main_Page
-
query_sql("UPDATE `global_reg_value` SET `value`='0' WHERE `str`='#Freebie'");
-
Check these tables out on your data folder. num2itemdesctable, num2itemdisplaynametable, num2itemresnametable.
-
You need to make an unidentified drop sprites for them. Like when a fabre drops a blade, you need to magnify it first..
-
Must be your files, try updating your main RO client
-
Try this, though i'm guessing there would be logical errors, as i've not tested it in-game. - script sample -1,{ OnPCLoginEvent: CheckAFK: sleep2 1800000; if(checkidle() > 1800) { @Tries = 3; Captcha: mes "Input the text below:"; @CapRand$ = .Captcha[rand(getarraysize(.Captcha$))]; mes @CapRand$; mes "You have 1 minute to answer, and "+@Tries+" left."; @Timer = gettimetick(2)+60; input @Captcha$; if(@CapRand$ != @Captcha$ || @Timer > gettimetick(2)) { mes "You have entered the wrong captcha, or failed to answer it within a minute"; @Tries--; if(@Tries < 1) { next; mes "You have exceeded the maximum tries, you will now be logged off."; atcommand "@kick "+strcharinfo(0); } next; goto Captcha; } mes "Thank you for cooperating, and sorry for the inconvenience."; close2; } goto CheckAFK; end; OnInit: setarray .Captcha$[0],"Test1","Test2","Test3"; end; }
-
Pretty much, you should try it
-
Yep, you could try updating your server instead
-
Upgrade Weapon Skill Announcement Request
sandbox replied to nasagnilac's question in Source Requests
Nvm, you were talking about the skill =/ -
I think this was already implemented at the latest version.
-
//======Name======================================== // Mining NPC //======Version===================================== // 1.0 //======Author(s)=================================== // Sandbox //======Comments==================================== // In loving memory of AstralRO //================================================== mellina,110,90,3 script Hermoining 726,{ mes "[^0000FF Hermoining ^000000]"; mes "Hiya! I'm the master of Mining, ^880000Hermoining^000000!"; menu "Whoa, teach me master!",-; next; mes "[^0000FF Hermoining ^000000]"; mes "Okay, You'll be needing a ^008800Pick Axe^000000 for mining. While inside the map, you'll be able to mine mithril ores which can be sold for zeny!"; next; mes "[^0000FF Hermoining ^000000]"; mes "So, do you want to proceed?"; menu "Yes master!",-,"Buy Pick Axe",Lpick; next; if(JobLevel < 50) goto Lnjob; mes "[^0000FF Hermoining ^000000]"; mes "Have fun!"; sc_end SC_ALL; warp "force_2-2",174,115; close; Lpick: callshop "PickShop"; close; Lnjob: next; mes "[^0000FF Hermoining ^000000]"; mes "Sorry, you need to be atleast job 50 or higher in order to enter."; close; } - shop PickShop -1,6010:10000 force_2-2,159,177,5 script Mine Exit 848,{ mes "[^888800 Minero ^000000]"; mes "Do you want to get out of here?"; menu "Yes please!",-; next; mes "[^888800 Minero ^000000]"; mes "See you soon!"; warp "mellina",118,86; close; } force_2-2,161,184,3 script Mithril Ore 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; //Comment if you dont want to put a limit on mining if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { //Comment if you dont want to put a limit on mining DEFAULT = 10,000x failed or success set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); //50% chance to obtain mithril ore set @purechance,rand(1,3); //33.33% chance to obtain an ADDITIONAL mithril, which sells higher set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; //Mining level 0 waits 4 seconds before mining sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; //Mining level 1 waits 3 seconds before mining sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { //Mining level 2 waits 2 seconds before mining misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; //Mining level 3 waits 1 second before mining sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: //Required experience before a player's mining level increases. dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } //================================================================== // I did not duplicate the NPCs since I encountered players who tried // To abuse this script by using WPE/macros that can get the NPC ID // That can bypass the delay between the mining process.. //================================================================== force_2-2,161,184,3 script Mithril Ore#1 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#2 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#3 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#4 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#5 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#6 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#7 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#8 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#9 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#10 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#11 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#12 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#13 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#14 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#15 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#16 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#17 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#18 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#19 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#20 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#21 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#22 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#23 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } end; Lfail: dispbottom "You got nothing from the ore."; end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } force_2-2,161,184,3 script Mithril Ore#24 1976,{ if(#minedelay+86400 > gettimetick(2)) goto Ldelay; if(@mining != 0) goto Lstillmine; if(.mining != 0) goto Lalreadymine; //mes "Do you want to mine this rock?"; //menu "Proceed",-; //next; if(countitem(6010) < 1) goto Lnopick; delitem 6010,1; set #MineCount,#MineCount+1; if(#MineCount == 10000) { set #minedelay,gettimetick(2); set #MineCount,0; } set @minechance,rand(1,2); set @purechance,rand(1,3); set .mining,1; set @mining,1; pcblockmove getcharid(3),1; if(MineLvl == 0) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 1) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } else if(MineLvl == 2) { misceffect 102; sleep2 1000; misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } if(MineLvl == 3) { misceffect 102; sleep2 1000; set .mining,0; set @mining,0; pcblockmove getcharid(3),0; if(@minechance == 2) { misceffect 154; set MineExp,MineExp+1; if(@purechance == 3) getitem 7757,1; else getitem 7233,1; goto Lsuccess; } else { misceffect 155; goto Lfail; } } Lsuccess: dispbottom "You've successfully mined the ore."; if(MineExp < 10000) dispbottom "You've gained 1 Mining Exp."; if(MineExp == 1000) { set MineLvl,1; dispbottom "Congratulations! Your Mining Mastery is now Level 1!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 1!",bc_all,0x00FFFF; } else if(MineExp == 5000) { set MineLvl,2; dispbottom "Congratulations! Your Mining Mastery is now Level 2!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 2!",bc_all,0x00FFFF; } else if(MineExp == 10000) { set MineLvl,3; dispbottom "Congratulations! Your Mining Mastery is now Level 3!"; announce strcharinfo(0)+"'s Mining Mastery reached Level 3!",bc_all,0x00FFFF; } sleep2 1000; npcwalkto rand(161,186),rand(119,184); end; Lfail: dispbottom "You got nothing from the ore."; sleep2 1000; npcwalkto rand(161,186),rand(119,184); end; Lnopick: mes "^FF0000*Hand Smash!!*^000000"; next; mes "Ouch! I'll be needing a ^008800Pickaxe^000000 for this.."; close; Lalreadymine: mes "Hey! Get your own spot!"; close; Lstillmine: mes "Ugh, i'm not done mining yet!"; close; Ldelay: mes "You can only mine 10,000 ores a day!"; close; } //force_2-2,161,184,3 script Mithril Ore#25 1976,{} //force_2-2,161,184,3 script Mithril Ore#26 1976,{} //force_2-2,161,184,3 script Mithril Ore#27 1976,{} //force_2-2,161,184,3 script Mithril Ore#28 1976,{} //force_2-2,161,184,3 script Mithril Ore#30 1976,{} //force_2-2,161,184,3 script Mithril Ore#31 1976,{} //force_2-2,161,184,3 script Mithril Ore#32 1976,{} //force_2-2,161,184,3 script Mithril Ore#33 1976,{} //force_2-2,161,184,3 script Mithril Ore#34 1976,{} //force_2-2,161,184,3 script Mithril Ore#35 1976,{} //force_2-2,161,184,3 script Mithril Ore#36 1976,{} //force_2-2,161,184,3 script Mithril Ore#37 1976,{} //force_2-2,161,184,3 script Mithril Ore#38 1976,{} //force_2-2,161,184,3 script Mithril Ore#39 1976,{} //force_2-2,161,184,3 script Mithril Ore#40 1976,{} Modified the script for you, let me know if you find any errors.. Though you still have to edit the coordinates one by one for they will be stacked on force_2-2 161 184 upon loading. Also, try to seek help on the support thread of that NPC next time, to get faster support.
-
A column in the table skill of the SQL that record jobs
sandbox replied to Kido's question in Database Requests
A character's Job Class ID is already stored in char table.. -
I see no errors, I even compiled it. That's weird =/
-
Have you configured it properly? What's your revision #?
-
Quests, Games: Custom Poring Race
sandbox replied to sandbox's topic in Game, Event, Quest Script Releases
Kindly read the instructions please -
Thanks!
-
in skill_db.txt... change the value of 3, after weapon. 1009,-9,6,1,0,0,0,1,1,no,0,0x1,0,weapon,3,0x0, HT_PHANTASMIC,Phantasmic Arrow
- 1 reply
-
- 1
-
-
How about playing and combining these with autobonus
-
LF Invasion Event ( NPC Invasion, NPC Reward )
sandbox replied to ZelosAvalon's question in Script Requests
You could take a look at mine.. http://rathena.org/board/topic/93385-yet-another-town-invasion-v21/ -
https://github.com/rathena/rathena/blob/master/src/map/status.c#L9096 change to: val2 = 50+10*val1; // Trigger rate