Onairda

.

Thankyou sir

//===== rAthena Script ======================================= //= Private Branch & Branch Room //===== By: ================================================== //= AnnieRuru //===== Current Version: ===================================== //= 1.0 //===== Compatible With: ===================================== //= rAthena Project //===== Description: ========================================= //= Allows players to rent an Branch room for personal use, //= or for a party or guild. //===== Additional Comments: ================================= //= 1.0 First version, edited. [Euphy] //============================================================ prontera,86,43,5 script Private Branch Room 870,{ mes "[Private Branch Room]"; mes "Please select a private Branch room."; if ( getvariableofnpc( .rentcost, "Branch Summoner" ) ) mes "The cost to rent a room for "+ getvariableofnpc( .timeout, "Branch Summoner" ) +" minutes is "+ callfunc("F_InsertComma", getvariableofnpc( .rentcost, "Branch Summoner" ) ) +" zeny."; else mes "You can only use the room for only "+ getvariableofnpc( .timeout, "Branch Summoner" ) +" minutes."; mes " "; for ( .@i = 1; .@i <= 8; .@i++ ) if ( getvariableofnpc( .renttime[.@i], "Branch Summoner" ) ) mes "Room #"+ .@i +" = "+ .color$[ .type[.@i] ] + .whoinuse$[.@i] +"^000000"; next; .@room = select( "Branch Room 1 ["+ getmapusers("06guild_01") +"]", "Branch Room 2 ["+ getmapusers("06guild_02") +"]", "Branch Room 3 ["+ getmapusers("06guild_03") +"]", "Branch Room 4 ["+ getmapusers("06guild_04") +"]", "Branch Room 5 ["+ getmapusers("06guild_05") +"]", "Branch Room 6 ["+ getmapusers("06guild_06") +"]", "Branch Room 7 ["+ getmapusers("06guild_07") +"]", "Branch Room 8 ["+ getmapusers("06guild_08") +"]"); if ( getvariableofnpc( .renttime[.@room], "Branch Summoner" ) ) { if ( .inuseid[.@room] == getcharid( .type[.@room] ) ) { warp "06guild_0"+ .@room, 0,0; close; } else { mes "[Private MVP Room]"; mes "This room is reserved for "; mes .color$[ .type[.@room] ] + .whoinuse$[.@room] +"^000000."; mes "Please select another."; close; } } mes "[Private Branch Room]"; mes "Reserve this room for..."; next; set .@type, select( "For my party members", "For my guild members", "For personal account use" ); if ( !getcharid(.@type) ) { mes "[Private Branch Room]"; mes "You do not own a "+( ( .@type == 1 )? "Party" : "Guild" )+"."; close; } else if ( Zeny < getvariableofnpc( .rentcost, "Branch Summoner" ) ) { mes "You don't have enough zeny to rent a room."; close; } else if ( getvariableofnpc( .renttime[.@room], "Branch Summoner" ) ) { mes "[Private Branch Room]"; mes "I'm sorry, somebody else has already registered this room faster than you."; close; } for ( .@i = 1; .@i <= 8; .@i++ ) { if ( ( getvariableofnpc( .renttime[.@i], "Branch Summoner" ) ) && .@type == .type[.@i] && getcharid(.@type) == .inuseid[.@i] ) { mes "[Private Branch Room]"; mes "You already rented Room#"+ .@i +". Use that room instead."; close; } } set .type[.@room], .@type; set .inuseid[.@room], getcharid(.@type); set .whoinuse$[.@room], strcharinfo( ( .@type == 3 )? 0 : .@type ); Zeny -= getvariableofnpc( .rentcost, "Branch Summoner" ); warp "06guild_0"+ .@room, 0,0; killmonsterall "06guild_0"+ .@room; donpcevent "Branch Summoner#"+ .@room +"::OnEnterMap"; close; OnInit: .color$[1] = "^EE8800"; // party color .color$[2] = "^70CC11"; // guild color .color$[3] = "^0000FF"; // account color end; } - script Branch Summoner -1,{ mes "[Branch Summoner]"; mes "Time left: " + callfunc( "Time2Str", .renttime[ atoi( strnpcinfo(2) ) ] + .timeout * 60 ); mes "Hi, what can I do for you?"; next; switch ( select(.menu$) ) { case 1: mes "[Branch Summoner]"; if ( mobcount( "this", strnpcinfo(3)+"::OnMobDead" ) ) { mes "I cannot offer heal service when there are monsters around."; close; } sc_end SC_STONE; sc_end SC_SLOWDOWN; sc_end SC_FREEZE; sc_end SC_SLEEP; sc_end SC_CURSE; sc_end SC_SILENCE; sc_end SC_CONFUSION; sc_end SC_BLIND; sc_end SC_BLEEDING; sc_end SC_DECREASEAGI; sc_end SC_POISON; sc_end SC_HALLUCINATION; sc_end SC_STRIPWEAPON; sc_end SC_STRIPARMOR; sc_end SC_STRIPHELM; sc_end SC_STRIPSHIELD; sc_end SC_CHANGEUNDEAD; sc_end SC_ORCISH; sc_end SC_BERSERK; sc_end SC_SKE; sc_end SC_SWOO; sc_end SC_SKA; percentheal 100,100; specialeffect2 EF_HEAL; mes "You are completely healed."; close; case 2: if ( mobcount( "this", strnpcinfo(3)+"::OnMobDead" ) ) { mes "[Branch Summoner]"; mes "I cannot summon another Branch when there are monsters around."; close; } else if ( .Branchcost ) { mes "[Branch Summoner]"; mes "The cost to summon an Branch is "+ callfunc( "F_InsertComma", .Branchcost ) +" zeny."; next; set .@menu, select(.Branchid_menu$) -1; mes "[Branch Summoner]"; if ( Zeny < .Branchcost ) { mes "You don't have enough zeny to summon an Branch."; close; } } else { set .@menu, select(.Branchid_menu$) -1; mes "[Branch Summoner]"; } mes "Please get ready."; close2; if ( Zeny < .Branchcost ) end; Zeny -= .Branchcost; monster "this", 0, 0, "--ja--", .Branchid[.@menu], 1, strnpcinfo(3)+"::OnMobDead"; end; case 3: if ( mobcount( "this", strnpcinfo(3)+"::OnMobDead" ) ) { mes "[Branch Summoner]"; mes "I cannot summon another mini-boss when there are monsters around."; close; } else if ( .bosscost ) { mes "[Branch Summoner]"; mes "The cost to summon a mini-boss is "+ callfunc( "F_InsertComma", .bosscost ) +" zeny."; next; set .@menu, select(.bossid_menu$) -1; mes "[Branch Summoner]"; if ( Zeny < .bosscost ) { mes "You doesn't have enough zeny to summon a mini-boss."; close; } } else { set .@menu, select(.bossid_menu$) -1; mes "[Branch Summoner]"; } mes "Please get ready."; close2; if ( Zeny < .bosscost ) end; Zeny -= .bosscost; monster "this", 0, 0, "--ja--", .bossid[.@menu], 1, strnpcinfo(3)+"::OnMobDead"; end; case 4: if ( mobcount( "this", strnpcinfo(3)+"::OnMobDead" ) > 0 ) { mes "[Branch Summoner]"; mes "I cannot offer this service when there are monsters around."; close; } close2; callshop "Branch room#branch", 1; end; case 5: mes "[Branch Summoner]"; mes "Are you sure you want to leave this room?"; next; if ( select( "Yes:No") == 1 ) warp .respawnmap$, .respawnx, .respawny; close; case 6: mes "[Branch Summoner]"; if ( getmapusers( strcharinfo(3) ) > 1 ) { mes "There are still some players in this room. Make sure you are the last member in this room to use this option."; close; } mes "Are you sure you want to give up this room?"; if ( .rentcost ) mes "You will need to pay again to enter this room."; next; if ( select( "Yes", "No" ) == 2 ) close; awake strnpcinfo(0); end; } close; OnMobDead: end; OnEnterMap: .@id = atoi( strnpcinfo(2) ); .renttime[.@id] = gettimetick(2); sleep .timeout * 60000; mapwarp strnpcinfo(4), .respawnmap$, .respawnx, .respawny; .renttime[.@id] = 0; killmonsterall strnpcinfo(4); end; OnInit: if ( !getstrlen( strnpcinfo(2) ) ) { // Config --------------------------------------------------------------------------------------- // Room rental time, in minutes. // When time runs out, all players inside the room will be kicked out. // Do NOT set this to zero! set .timeout, 60; set .rentcost, 50000000; // Zeny cost for renting a room (0 = free) set .Branchcost, 100000; // Zeny cost to summon an Branch (0 = free) set .bosscost, 50000; // Zeny cost to summon a boss monster (0 = free) // Options setting inside Branch room set .@menu[1], 1; // Turn Heal option On/Off set .@menu[2], 1; // Turn Branch Summoning On/Off set .@menu[3], 1; // Turn Mini boss Summoning On/Off set .@menu[4], 0; // Sell items (branches) On/Off (see shop below, before the mapflags) // Respawn point when players leave the room set .respawnmap$, "prontera"; set .respawnx, 150; set .respawny, 174; setarray .Branchid[0], 1511,// Amon Ra 1647,// Assassin Cross Eremes 1785,// Atroce 1630,// Bacsojin 1039,// Baphomet 1874,// Beelzebub 1272,// Dark Lord 1719,// Datale 1046,// Doppelgangger 1389,// Dracula 1112,// Drake 1115,// Eddga 1418,// Evil Snake Lord 1871,// Fallen Bishop 1252,// Garm 1768,// Gloom Under Night 1086,// Golden Thief Bug 1885,// Gopinich 1649,// High Priest Magaleta 1651,// High Wizard Katrinn 1832,// Ifrit 1492,// Incantation Samurai 1734,// Kiel D-01 1251,// Knight of Windstorm 1779,// Ktullanux 1688,// Lady Tanee 1646,// Lord Knight Seyren 1373,// Lord of Death 1147,// Maya 1059,// Mistress 1150,// Moonlight Flower 1087,// Orc Hero 1190,// Orc Lord 1038,// Osiris 1157,// Pharaoh 1159,// Phreeoni 1623,// RSX 0806 1650,// Sniper Shecil 1583,// Tao Gunka 1708,// Thanatos 1312,// Turtle General 1751,// Valkyrie Randgris 1685,// Vesper 1648,// Whitesmith Harword 1917,// Wounded Morroc 1658;// Ygnizem setarray .bossid[0], 1096,// Angeling 1388,// Archangeling 1795,// Bloody Knight 1830,// Bow Guardian 1839,// Byorgue 1309,// Cat O' Nine Tail 1283,// Chimera 1302,// Dark Illusion 1198,// Dark Priest 1582,// Deviling 1091,// Dragon Fly 1093,// Eclipse 1205,// Executioner 1783,// Galion 1592,// Gangster 1120,// Ghostring 1259,// Gryphon 1720,// Hydro 1090,// Mastering 1289,// Maya Purple 1262,// Mutant Dragon 1203,// Mysteltainn 1870,// Necromancer 1295,// Owl Baron 1829,// Sword Guardian 1204,// Tirfing 1089,// Toad 1092,// Vagabond Wolf 1765;// Valkyrie // Config Ends ------------------------------------------------------------------------ if ( !.timeout ) set .timeout, 60; .menu$ = ( .@menu[1] ? "Heal" : "" ) +":" ; .menu$ = .menu$ + ( .@menu[2] ? "Summon Branch" : "" ) +":"; .menu$ = .menu$ + ( .@menu[3] ? "Summon Mini-boss" : "" ) +":"; .menu$ = .menu$ + ( .@menu[4] ? "Buy branches" : "" ) +":"; .menu$ = .menu$ + "Leave this room:Give up this room"; if ( .@menu[2] ) { .@size = getarraysize( .Branchid ); for ( .@i = 0; .@i < .@size; .@i++ ) .Branchid_menu$ = .Branchid_menu$ + getmonsterinfo( .Branchid[.@i], MOB_NAME ) +":"; } if ( .@menu[3] ) { .@size = getarraysize( .bossid ); for ( .@i = 0; .@i < .@size; .@i++ ) .bossid_menu$ = .bossid_menu$ + getmonsterinfo( .bossid[.@i], MOB_NAME ) +":"; } } else { mapannounce strnpcinfo(4), "An administrator has refreshed the server. Please re-register this room.", bc_map; mapwarp strnpcinfo(4), .respawnmap$, .respawnx, .respawny; } end; } - shop Branch room#branch -1,604:100000,12103:1000000 //06guild_01,49,49,4 duplicate(Branch Summoner) Branch Summoner#1 116 //06guild_02,49,49,4 duplicate(Branch Summoner) Branch Summoner#2 116 //06guild_03,49,49,4 duplicate(Branch Summoner) Branch Summoner#3 116 //06guild_04,49,49,4 duplicate(Branch Summoner) Branch Summoner#4 116 //06guild_05,49,49,4 duplicate(Branch Summoner) Branch Summoner#5 116 //06guild_06,49,49,4 duplicate(Branch Summoner) Branch Summoner#6 116 //06guild_07,49,49,4 duplicate(Branch Summoner) Branch Summoner#7 116 //06guild_08,49,49,4 duplicate(Branch Summoner) Branch Summoner#8 116 06guild_01 mapflag nowarpto 06guild_02 mapflag nowarpto 06guild_03 mapflag nowarpto 06guild_04 mapflag nowarpto 06guild_05 mapflag nowarpto 06guild_06 mapflag nowarpto 06guild_07 mapflag nowarpto 06guild_08 mapflag nowarpto 06guild_01 mapflag nomemo 06guild_02 mapflag nomemo 06guild_03 mapflag nomemo 06guild_04 mapflag nomemo 06guild_05 mapflag nomemo 06guild_06 mapflag nomemo 06guild_07 mapflag nomemo 06guild_08 mapflag nomemo 06guild_01 mapflag noteleport 06guild_02 mapflag noteleport 06guild_03 mapflag noteleport 06guild_04 mapflag noteleport 06guild_05 mapflag noteleport 06guild_06 mapflag noteleport 06guild_07 mapflag noteleport 06guild_08 mapflag noteleport 06guild_01 mapflag nosave SavePoint 06guild_02 mapflag nosave SavePoint 06guild_03 mapflag nosave SavePoint 06guild_04 mapflag nosave SavePoint 06guild_05 mapflag nosave SavePoint 06guild_06 mapflag nosave SavePoint 06guild_07 mapflag nosave SavePoint 06guild_08 mapflag nosave SavePoint 06guild_01 mapflag nopenalty 06guild_02 mapflag nopenalty 06guild_03 mapflag nopenalty 06guild_04 mapflag nopenalty 06guild_05 mapflag nopenalty 06guild_06 mapflag nopenalty 06guild_07 mapflag nopenalty 06guild_08 mapflag nopenalty Hi im using this Private MVP room but i am having an error when it comes in checking the room , if there is a player or party inside the Room #1 it should be you can't enter inside the Room#1 because there is a player but my problem is . if there's a player still anyone can enter in Room #1 i don't have any error codes i think the code in trapping is in this part but i tried everything still the same

hi . in my server i have 2 PvP Room No Gods Room and Donator Room No Gods PvP - i want to disable the mjolnir and sleipnir inside the map so i edit my item_noequip.txt 2831,2 // sleipnir 1530,2 // mjolnir my problem is , all PvP Room including my Donator room i can't equip my Gods Item

still not working sir why this happening , my rathena is clean , all clean , i already installed PCRE enable it and compile the server WHYYY :(((((((((((( hi sir what is your langtype ? and what exe version are you using ? iloveyou bro thankyou !

im sorry sir Akkarin . there's no error in script , i also installed the PCRE in my Centos i also followed this steps if you are using centos : yum install pcre-devel when compiling server : ./configure --with-pcre make server yes sir already did that . but still the same , there is no error i see in the script also in map-server so i can't identify it sir still not reading the Answer of any player sir please help sir please help me try it sir on latest git

help on disguise event , not working on latest rathena svn please help not reading the answer of the player please help

Bump . Disguise event is not running in Latest Rathena version

Hi everyone i just want to know what was the meaning of 6th argment in Iteminfo.lub everytime i open my exe this is always showing "Error found : 6th argment is must number:"

i mean Costume item in Costume Tab huh . Not Custom Item. is that possible sir?

hi is that possible to add Slot or just and Effect in Costume Item?

NICE NICE NICE NICE but my Old Account has been delete but its ok