poring_w02,172,175,4 script Guild Warehouse 112,{ cutin "kafra_06",2; mes "[Guild Warehouse]"; mes "This is the guild warehouse coupler service."; next; menu "Access Guild Warehouse", GS_OPEN, "Set Guild Warehouse Password", GS_PASS, "Exit", GS_EXIT3; GS_OPEN: if(getd("$gspass"+getcharid(2)+"$")!=""){ mes "[Guild Warehouse]"; mes "Please input your guild's password."; input(.@gspass$); if(.@gspass$==getd("$gspass"+getcharid(2)+"$")){ mes "Welcome!"; } else { mes "I'm sorry but the password you entered is incorrect."; goto GS_EXIT4; } } set @flag,guildopenstorage; if(@flag == 1) goto GS_EXIT1; if(@flag == 2) goto GS_EXIT2; goto GS_EXIT4; GS_PASS: if(!getcharid(2)) { mes "[Guild Warehouse]"; mes "I'm sorry but you don't have a guild."; goto GS_EXIT4; } query_sql("SELECT `master` FROM `guild` WHERE `guild_id` = '"+ getcharid(2) +"';",.@b$); if(.@b$!=strcharinfo(0)){ mes "[Guild Warehouse]"; mes "I'm sorry but you're not the guild leader of "+strcharinfo(2)+"."; goto GS_EXIT4; } if(getd("$gspass"+getcharid(2)+"$")!=""){ mes "[Guild Warehouse]"; mes "Did you forget, your guild password is "+getd("$gspass"+getcharid(2)+"$")+". Do you still want to change it?"; if(select("Yes:No")-1) goto GS_EXIT4; } mes "[Guild Warehouse]"; mes "Please input your new guild storage password."; input(.@gspass1$); mes "[Guild Warehouse]"; mes "Again."; input(.@gspass2$); if(.@gspass1$==.@gspass2$){ setd "$gspass"+getcharid(2)+"$",.@gspass1$; } else { mes "[Guild Warehouse]"; mes "I'm sorry, but passwords entered didn't match. Please try again."; goto GS_PASS; } mes "[Guild Warehouse]"; mes getd("$gspass"+getcharid(2)+"$")+" has been set as your password."; goto GS_EXIT4; GS_EXIT1: mes "[Guild Warehouse]"; mes "The guild warehouse is being used right now."; mes "Please check back later."; goto GS_EXIT4; GS_EXIT2: mes "[Guild Warehouse]"; mes "You can't use this service if you're not in a guild!"; goto GS_EXIT4; GS_EXIT3: mes "[Guild Warehouser]"; mes "Come back whenever you want."; GS_EXIT4: cutin "kafra_06",255; close; }