Jump to content
  • 0

Can i Requst a Gold Room?


Question

4 answers to this question

Recommended Posts

Posted


prontera,145,158,1 script Gold Room 4_m_yuri,{

if (Life == 1) goto L_Life;

mes "[Gold Room]";

mes "Hey, Hey! You wonder why I am so Rich?!";

mes "Well, that because I found this place called the Gold Room";

mes "OMG! There's 10 Gold Room!";

mes "The 1x is free";

mes "But all the other Gold Room you have to pay Gold.";

mes "2x is 2000 Gold, 3x is 3000 Gold and Soon On...";

mes "Why you have to pay? Well it drops MORE Times the GOLD!";

mes "Oh! There's a Lifetime Pass! You need 30k Gold...";

mes "So, which Gold Room would you like to go too?";

menu "1x",1,"2x",2,"3x",3,"4x",4,"5x",5,"6x",6,"7x",7,"8x",8,"9x",9,"10x",10,"Lifetime Pass",lt,"Bye",bye;

lt:

mes "[Gold Room]";

mes "You need 30k Gold to have a Lifetime pass.";

mes "Lifetime Pass let's you go to ALL the Gold Room for Free!";

mes "Do you have 30k Gold?";

menu "Yes!",yup,"Nope",bye;

yup:

if (countitem(969)==30000) ) goto yup_;

mes "[Gold Room]";

mes "You don't have it!";

next;

close;

yup_:

delitem 969,30000;

set Life,1;

mes "[Gold Room]";

mes "You have a Life Time Pass!";

next;

close;

1:

mes "[Gold Room]";

mes "Have Fun!";

next;

warp "pvp_y_1-1",0,0;

end;

2:

if (countitem(969)>=2000) ) goto 2_;

mes "[Gold Room]";

mes "Ha! You don't have enough!";

next;

close;

2_:

mes "[Gold Room]";

mes "Have Fun!";

delitem 969,2000;

next;

warp "pvp_y_2-1",0,0;

end;

3:

if (countitem(969)>=3000) ) goto 3_;

mes "[Gold Room]";

mes "Ha! You don't have enough!",;

next;

close;

3_:

mes "[Gold Room]";

mes "Have Fun!";

delitem 969,3000;

next;

warp "pvp_y_3-1",0,0;

end;

4:

if (countitem(969)>=4000) ) goto 4_;

mes "[Gold Room]";

mes "Ha! You don't have enough!";

next;

close;

4_:

mes "[Gold Room]";

mes "Have Fun!";

delitem 969,4000;

next;

warp "pvp_y_4-1",0,0;

end;

5:

if (countitem(969)>=5000) ) goto 5_;

mes "[Gold Room]";

mes "Ha! You don't have enough!";

next;

close;

5_:

mes "[Gold Room]";

mes "Have Fun!";

delitem 969,5000;

next;

warp "pvp_y_5-1",0,0;

end;

6:

if (countitem(969)>=6000) ) goto 6_;

mes "[Gold Room]";

mes "Ha! You don't have enough!";

next;

close;

6_:

mes "[Gold Room]";

mes "Have Fun!";

delitem 969,6000;

next;

warp "pvp_y_6-1",0,0;

end;

7:

if (countitem(969)>=7000) ) goto 7_;

mes "[Gold Room]";

mes "Ha! You don't have enough!";

next;

close;

7_:

mes "[Gold Room]";

mes "Have Fun!";

delitem 969,7000;

next;

warp "pvp_y_7-1",0,0;

end;

8:

if (countitem(969)>=8000) ) goto 8_;

mes "[Gold Room]";

mes "Ha! You don't have enough!";

next;

close;

8_:

mes "[Gold Room]";

mes "Have Fun!";

delitem 969,8000;

next;

warp "pvp_y_8-1",0,0;

end;

9:

if (countitem(969)>=9000) ) goto 9_;

mes "[Gold Room]";

mes "Ha! You don't have enough!";

next;

close;

9_:

mes "[Gold Room]";

mes "Have Fun!";

delitem 969,9000;

next;

warp "pvp_y_1-5",0,0;

end;

10:

if (countitem(969)>=10000) ) goto 10_;

mes "[Gold Room]";

mes "Ha! You don't have enough!";

next;

close;

10_:

mes "[Gold Room]";

mes "Have Fun!";

delitem 969,10000;

next;

warp "pvp_y_2-5",0,0;

end;

bye:

mes "[Gold Room]";

mes "Bye";

close;

L_Life:

mes "[Gold Room]";

mes "You have a Life Time Pass";

mes "Which Room would you like to go in?";

menu "1x",1__,"2x",2__,"3x",3__,"4x",4__,"5x",5__,"6x",6__,"7x",7__,"8x",8__,"9x",9__,"10x",10__,"Bye",bye;

1__:

mes "[Gold Room]";

mes "Have Fun!";

next;

warp "pvp_y_1-1",0,0;

end;

2__:

mes "[Gold Room]";

mes "Have Fun!";

next;

warp "pvp_y_2-1",0,0;

end;

3__:

mes "[Gold Room]";

mes "Have Fun!";

next;

warp "pvp_y_3-1",0,0;

end;

4__:

mes "[Gold Room]";

mes "Have Fun!";

next;

warp "pvp_y_4-1",0,0;

end;

5__:

mes "[Gold Room]";

mes "Have Fun!";

next;

warp "pvp_y_5-1",0,0;

end;

6__:

mes "[Gold Room]";

mes "Have Fun!";

next;

warp "pvp_y_6-1",0,0;

end;

7__:

mes "[Gold Room]";

mes "Have Fun!";

next;

warp "pvp_y_7-1",0,0;

end;

8__:

mes "[Gold Room]";

mes "Have Fun!";

next;

warp "pvp_y_8-1",0,0;

end;

9__:

mes "[Gold Room]";

mes "Have Fun!";

next;

warp "pvp_y_1-5",0,0;

end;

10__:

mes "[Gold Room]";

mes "Have Fun!";

next;

warp "pvp_y_2-5",0,0;

end;

}

- script I AM cool? -1,{

OnInit:

monster "pvp_y_1-1",0,0,"Gold",1614,2500,"1::OnMobKilled";

monster "pvp_y_2-1",0,0,"Gold",1614,2500,"2::OnMobKilled";

monster "pvp_y_3-1",0,0,"Gold",1614,2500,"3::OnMobKilled";

monster "pvp_y_4-1",0,0,"Gold",1614,2500,"4::OnMobKilled";

monster "pvp_y_5-1",0,0,"Gold",1614,2500,"5::OnMobKilled";

monster "pvp_y_6-1",0,0,"Gold",1614,2500,"6::OnMobKilled";

monster "pvp_y_7-1",0,0,"Gold",1614,2500,"7::OnMobKilled";

monster "pvp_y_8-1",0,0,"Gold",1614,2500,"8::OnMobKilled";

monster "pvp_y_1-5",0,0,"Gold",1614,2500,"9::OnMobKilled";

monster "pvp_y_2-5",0,0,"Gold",1614,2500,"10::OnMobKilled";

end;

}

- script 1 -1,{

OnMobKilled:

getitem 969,1;

monster "pvp_y_1-1",0,0,"Gold",1847,1,"1::OnMobKilled";

}

- script 2 -1,{

OnMobKilled:

getitem 969,2;

monster "pvp_y_2-1",0,0,"Gold",1614,1,"2::OnMobKilled";

}

- script 3 -1,{

OnMobKilled:

getitem 969,3;

monster "pvp_y_3-1",0,0,"Gold",1614,1,"3::OnMobKilled";

}

- script 4 -1,{

OnMobKilled:

getitem 969,4;

monster "pvp_y_4-1",0,0,"Gold",1614,1,"4::OnMobKilled";

}

- script 5 -1,{

OnMobKilled:

getitem 969,5;

monster "pvp_y_5-1",0,0,"Gold",1614,1,"5::OnMobKilled";

}

- script 6 -1,{

OnMobKilled:

getitem 969,6;

monster "pvp_y_6-1",0,0,"Gold",1614,1,"6::OnMobKilled";

}

- script 7 -1,{

OnMobKilled:

getitem 969,9;

monster "pvp_y_7-1",0,0,"Gold",1614,1,"7::OnMobKilled";

}

- script 8 -1,{

OnMobKilled:

getitem 969,8;

monster "pvp_y_8-1",0,0,"Gold",1614,1,"8::OnMobKilled";

}

- script 9 -1,{

OnMobKilled:

getitem 969,9;

monster "pvp_y_1-5",0,0,"Gold",1614,1,"9::OnMobKilled";

}

- script 10 -1,{

OnMobKilled:

getitem 969,10;

monster "pvp_y_2-5",0,0,"Gold",1614,1,"10::OnMobKilled";

}

Posted
prontera,145,158,1	script	Gold Room	4_m_yuri,{
	if (Life == 1) goto L_Life;
	mes "[Gold Room]";
	mes "Hey, Hey! You wonder why I am so Rich?!";
	mes "Well, that because I found this place called the Gold Room";
	mes "OMG! There's 10 Gold Room!";
	mes "The 1x is free";
	mes "But all the other Gold Room you have to pay Gold.";
	mes "2x is 2000 Gold, 3x is 3000 Gold and Soon On...";
	mes "Why you have to pay? Well it drops MORE Times the GOLD!";
	mes "Oh! There's a Lifetime Pass! You need 30k Gold...";
	mes "So, which Gold Room would you like to go too?";
	menu "1x",1,"2x",2,"3x",3,"4x",4,"5x",5,"6x",6,"7x",7,"8x",8,"9x",9,"10x",10,"Lifetime Pass",lt,"Bye",bye;
		lt:
		mes "[Gold Room]";
		mes "You need 30k Gold to have a Lifetime pass.";
		mes "Lifetime Pass let's you go to ALL the Gold Room for Free!";
		mes "Do you have 30k Gold?";
		menu "Yes!",yup,"Nope",bye;
			yup:
			if (countitem(969)==30000) ) goto yup_;
			mes "[Gold Room]";
			mes "You don't have it!";
			next;
			close;
				yup_:
				delitem 969,30000;
				set Life,1;
				mes "[Gold Room]";
				mes "You have a Life Time Pass!";
				next;
				close;
		1:
		mes "[Gold Room]";
		mes "Have Fun!";
		next;
		warp "pvp_y_1-1",0,0;
		end;
		2:
		if (countitem(969)>=2000) ) goto 2_;
		mes "[Gold Room]";
		mes "Ha! You don't have enough!";
		next;
		close;
			2_:
			mes "[Gold Room]";
			mes "Have Fun!";
			delitem 969,2000;
			next;
			warp "pvp_y_2-1",0,0;
			end;
		3:
		if (countitem(969)>=3000) ) goto 3_;
		mes "[Gold Room]";
		mes "Ha! You don't have enough!",;
		next;
		close;
			3_:
			mes "[Gold Room]";
			mes "Have Fun!";
			delitem 969,3000;
			next;
			warp "pvp_y_3-1",0,0;
			end;
		4:
		if (countitem(969)>=4000) ) goto 4_;
		mes "[Gold Room]";
		mes "Ha! You don't have enough!";
		next;
		close;
			4_:
			mes "[Gold Room]";
			mes "Have Fun!";
			delitem 969,4000;
			next;
			warp "pvp_y_4-1",0,0;
			end;
		5:
		if (countitem(969)>=5000) ) goto 5_;
		mes "[Gold Room]";
		mes "Ha! You don't have enough!";
		next;
		close;
			5_:
			mes "[Gold Room]";
			mes "Have Fun!";
			delitem 969,5000;
			next;
			warp "pvp_y_5-1",0,0;
			end;
		6:
		if (countitem(969)>=6000) ) goto 6_;
		mes "[Gold Room]";
		mes "Ha! You don't have enough!";
		next;
		close;
			6_:
			mes "[Gold Room]";
			mes "Have Fun!";
			delitem 969,6000;
			next;
			warp "pvp_y_6-1",0,0;
			end;
		7:
		if (countitem(969)>=7000) ) goto 7_;
		mes "[Gold Room]";
		mes "Ha! You don't have enough!";
		next;
		close;
			7_:
			mes "[Gold Room]";
			mes "Have Fun!";
			delitem 969,7000;
			next;
			warp "pvp_y_7-1",0,0;
			end;
		8:
		if (countitem(969)>=8000) ) goto 8_;
		mes "[Gold Room]";
		mes "Ha! You don't have enough!";
		next;
		close;
			8_:
			mes "[Gold Room]";
			mes "Have Fun!";
			delitem 969,8000;
			next;
			warp "pvp_y_8-1",0,0;
			end;
		9:
		if (countitem(969)>=9000) ) goto 9_;
		mes "[Gold Room]";
		mes "Ha! You don't have enough!";
		next;
		close;
			9_:
			mes "[Gold Room]";
			mes "Have Fun!";
			delitem 969,9000;
			next;
			warp "pvp_y_1-5",0,0;
			end;
		10:
		if (countitem(969)>=10000) ) goto 10_;
		mes "[Gold Room]";
		mes "Ha! You don't have enough!";
		next;
		close;
			10_:
			mes "[Gold Room]";
			mes "Have Fun!";
			delitem 969,10000;
			next;
			warp "pvp_y_2-5",0,0;
			end;



bye:
mes "[Gold Room]"; 
mes "Bye";
close;


	L_Life:
	mes "[Gold Room]";
	mes "You have a Life Time Pass";
	mes "Which Room would you like to go in?";
	menu "1x",1__,"2x",2__,"3x",3__,"4x",4__,"5x",5__,"6x",6__,"7x",7__,"8x",8__,"9x",9__,"10x",10__,"Bye",bye;
		1__:
		mes "[Gold Room]";
		mes "Have Fun!";
		next;
		warp "pvp_y_1-1",0,0;
		end;
			2__:
			mes "[Gold Room]";
			mes "Have Fun!";
			next;
			warp "pvp_y_2-1",0,0;
			end;
			3__:
			mes "[Gold Room]";
			mes "Have Fun!";
			next;
			warp "pvp_y_3-1",0,0;
			end;
			4__:
			mes "[Gold Room]";
			mes "Have Fun!";
			next;
			warp "pvp_y_4-1",0,0;
			end;
			5__:
			mes "[Gold Room]";
			mes "Have Fun!";
			next;
			warp "pvp_y_5-1",0,0;
			end;
			6__:
			mes "[Gold Room]";
			mes "Have Fun!";
			next;
			warp "pvp_y_6-1",0,0;
			end;
			7__:
			mes "[Gold Room]";
			mes "Have Fun!";
			next;
			warp "pvp_y_7-1",0,0;
			end;
			8__:
			mes "[Gold Room]";
			mes "Have Fun!";
			next;
			warp "pvp_y_8-1",0,0;
			end;
			9__:
			mes "[Gold Room]";
			mes "Have Fun!";
			next;
			warp "pvp_y_1-5",0,0;
			end;
			10__:
			mes "[Gold Room]";
			mes "Have Fun!";
			next;
			warp "pvp_y_2-5",0,0;
			end;
}

-	script	I AM cool?	-1,{
OnInit:
monster "pvp_y_1-1",0,0,"Gold",1614,2500,"1::OnMobKilled";
monster "pvp_y_2-1",0,0,"Gold",1614,2500,"2::OnMobKilled";
monster "pvp_y_3-1",0,0,"Gold",1614,2500,"3::OnMobKilled";
monster "pvp_y_4-1",0,0,"Gold",1614,2500,"4::OnMobKilled";
monster "pvp_y_5-1",0,0,"Gold",1614,2500,"5::OnMobKilled";
monster "pvp_y_6-1",0,0,"Gold",1614,2500,"6::OnMobKilled";
monster "pvp_y_7-1",0,0,"Gold",1614,2500,"7::OnMobKilled";
monster "pvp_y_8-1",0,0,"Gold",1614,2500,"8::OnMobKilled";
monster "pvp_y_1-5",0,0,"Gold",1614,2500,"9::OnMobKilled";
monster "pvp_y_2-5",0,0,"Gold",1614,2500,"10::OnMobKilled";
end;

}

-	script	1	-1,{
	OnMobKilled:
	getitem 969,1;
	monster "pvp_y_1-1",0,0,"Gold",1847,1,"1::OnMobKilled";
}


-	script	2	-1,{
	OnMobKilled:
	getitem 969,2;
	monster "pvp_y_2-1",0,0,"Gold",1614,1,"2::OnMobKilled";
}


-	script	3	-1,{
	OnMobKilled:
	getitem 969,3;
	monster "pvp_y_3-1",0,0,"Gold",1614,1,"3::OnMobKilled";
}


-	script	4	-1,{
	OnMobKilled:
	getitem 969,4;
	monster "pvp_y_4-1",0,0,"Gold",1614,1,"4::OnMobKilled";
}

-	script	5	-1,{
	OnMobKilled:
	getitem 969,5;
	monster "pvp_y_5-1",0,0,"Gold",1614,1,"5::OnMobKilled";
}

-	script	6	-1,{
	OnMobKilled:
	getitem 969,6;
	monster "pvp_y_6-1",0,0,"Gold",1614,1,"6::OnMobKilled";
}

-	script	7	-1,{
	OnMobKilled:
	getitem 969,9;
	monster "pvp_y_7-1",0,0,"Gold",1614,1,"7::OnMobKilled";
}

-	script	8	-1,{
	OnMobKilled:
	getitem 969,8;
	monster "pvp_y_8-1",0,0,"Gold",1614,1,"8::OnMobKilled";
}

-	script	9	-1,{
	OnMobKilled:
	getitem 969,9;
	monster "pvp_y_1-5",0,0,"Gold",1614,1,"9::OnMobKilled";
}

-	script	10	-1,{
	OnMobKilled:
	getitem 969,10;
	monster "pvp_y_2-5",0,0,"Gold",1614,1,"10::OnMobKilled";
}

error at line 21 =(

Posted (edited)

Hate it when I run into codes like these they're so repetitive. I haven't tested it but, instead just did a quick proof read. Made more changes.

http://pastebin.com/raw.php?i=1G8dUWVd

If you're running rAthena you can Replace:

set .@map$, callfunc "str_charat", strcharinfo(3), 6;
With:
set .@map$, substr(strcharinfo(3), 6, 6);
And Delete:
/// callfunc "str_charat", "<string>" , <pos> ;
function	script	str_charat	{

	sleep2 1;

	setarray .@char$[ 0 ],
		" ", "0", "1", "2", "3", "4", "5", "6", "7", "8", "9",
		"e", "i", "a", "s", "r", "n", "t", "o", "u", "l", "c",
		"p", "m", "d", "v", "h", "g", "f", "b", "y", "q", "k",
		"z", "x", "j", "w", "_", "-", ".", ",";

	set .@charsize, getarraysize(.@char$);
	set .@tmp$, "|~key~|";
	set .@str$, .@tmp$ + getarg(0) ;
	set .@len, getstrlen(getarg(0));
	set .@pos, getarg(1);

	if ( .@pos >= .@len ) return "";

	while( .@len>.@s ) {
		set .@i,0;
		while( .@i<.@charsize ) {
			if ( ! ( set(.@l,.@l+1) % 650) )
				sleep2 1;
			if ( compare( .@str$ , .@tmp$ + .@char$[.@i] ) ) {
				set .@tmp$, .@tmp$ + .@char$[.@i];
				if ( .@s == .@pos ){ return .@char$[.@i] ; end; }
				else break;
			}
			set .@i, .@i+1;
		}
		if ( .@i == .@charsize ) return 0;
		else set .@s, .@s+1;
	}
	end;
}
Edited by Skorm

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...