Context Navigation

arena_room.txt @ 1

Revision 1, 36.8 kB (checked in by jinshiro, 17 years ago)

Rev	Line
[1]	1	//===== eAthena Script ========================================
	2	//= Izlude Arena Room
	3	//===== By: ==================================================
	4	//= SinSloth
	5	//===== Current Version: =====================================
	6	//= 1.1
	7	//===== Compatible With: =====================================
	8	//= Any Athena Version
	9	//===== Description: =========================================
	10	//= Izlude Battle Arena Main Room
	11	//===== Additional Comments: =================================
	12	//= 1.0 First version.
	13	//= 1.1 Fixed a small reward typo (was giving potato.) [L0ne_W0lf]
	14	//============================================================
	15
	16	arena_room,94,93,5 script Vendigos 97,{
	17
	18	mes "[Vendigos]";
	19	mes "Welcome to the world of Arena, the battle against a time limit.";
	20	mes "My name is Vendigos, I am here to help you.";
	21	next;
	22	mes "[Vendigos]";
	23	mes "If you have any questions, feel free to ask me.";
	24	L_Menu:
	25	next;
	26	switch( select( "How to challenge","About Arena Points","My Current Arena Points","Cancel" ) )
	27	{
	28	case 1:
	29	mes "[Vendigos]";
	30	mes "There are two different kinds of arena mode such as ^3131FFPlayer Mode^000000 and ^3131FFParty Mode^000000.";
	31	next;
	32	mes "[Vendigos]";
	33	mes "^3131FFPlayer Mode^000000 consists of 4 different stages based on character level from 50~80.";
	34	mes "For a party with 5 members, they can participate in ^3131FFParty Mode^000000.";
	35	next;
	36	mes "[Vendigos]";
	37	mes "For ^3131FFeach Player Mode Stage^000000, characters who are 20 levels higher than the level requirement on each stage cannot enter. This is to prevent high level characters preoccupying a low level stage.";
	38	next;
	39	mes "[Vendigos]";
	40	mes "There are the NPCs for Player Mode Stages from 12 o'clock direction to the reversed clock direction.";
	41	mes "While you're waiting in a chat room, you will be automatically guided to an arena room by the waiting order.";
	42	break;
	43
	44	case 2:
	45	mes "[Vendigos]";
	46	mes "Let me explain about the ^3131FFArena Point^000000.";
	47	mes "It is a reward point for players who ^3131FFsuccessfully cleared a arena stage^000000, a player can possess the maximum 30,000 points.";
	48	next;
	49	mes "[Vendigos]";
	50	mes "Even if you did not clear a stage due to time-over or other errors, you will be given a very small amount of arena points.";
	51	next;
	52	mes "[Vendigos]";
	53	mes "Regarding the use of Arena Points,";
	54	mes "we are providing various services such as souvenir photograph services through an NPC named Givu.";
	55	break;
	56
	57	case 3:
	58	mes "[Vendigos]";
	59	mes "Let me check "+strcharinfo(0)+"'s current arena points.";
	60	next;
	61	mes "[Vendigos]";
	62	mes ""+strcharinfo(0)+" has total ^3131FF"+arena_point+"^000000 points.";
	63	next;
	64	mes "[Vendigos]";
	65	mes "If you wish to know how to use arena points, please refer to the 2nd menu ^3131FF'About Arena Points'^000000.";
	66	break;
	67
	68	case 4:
	69	mes "[Vendigos]";
	70	mes "Okay, please have a good time.";
	71	close;
	72	}
	73	next;
	74	mes "[Vendigos]";
	75	mes "Is there anything I can help you more?";
	76	goto L_Menu;
	77
	78	Onlinerec_50:
	79	mapannounce "arena_room",""+$arena_50topn$+" has renewed the top record in the Arena Time Force Battle level 50. Congratulations!",0;
	80	end;
	81
	82	Onlinerec_60:
	83	mapannounce "arena_room",""+$arena_60topn$+" has renewed the top record in the Arena Time Force Battle level 60. Congratulations!",0;
	84	end;
	85
	86	Onlinerec_70:
	87	mapannounce "arena_room",""+$arena_70topn$+" has renewed the top record in the Arena Time Force Battle level 70. Congratulations!",0;
	88	end;
	89	Onlinerec_80:
	90	mapannounce "arena_room",""+$arena_80topn$+" has renewed the top record in the Arena Time Force Battle level 80. Congratulations!",0;
	91	end;
	92
	93	Onlinerec_pt:
	94	mapannounce "arena_room","Party "+$arena_pttopn$+" has renewed the top record in the Arena Time Force Battle. Congratulations!",0;
	95	end;
	96
	97	//OnCommand: "linerec_vs"
	98	// var vs_winner = GetGlobalStr "040611_arn_vstopn"
	99	// broadcastinmap "Party "+vs_winner+" has renewed the top record in the Arena Time Force Battle. Congratulations!"
	100	// end;
	101
	102	}
	103
	104	arena_room,105,82,5 script Arena Record Staff 57,{
	105
	106	mes "[Owen Kheuv]";
	107	mes "Hello, my name is Own Kheuv";
	108	mes "in charge of every arena stage record of players.";
	109	next;
	110	mes "[Owen Kheuv]";
	111	mes "Would you like to check the top record players in each stage?";
	112	mes "If so, please choose a menu below.";
	113	next;
	114	switch( select( "lvl 50 Stage","lvl 60 Stage","lvl 70 Stage","lvl 80 Stage","Party Stage" ) )
	115	{
	116	case 1:
	117	mes "[Owen Kheuv]";
	118	mes "Currently the top player of the arena lvl 50 stage is ^3131FF "+$arena_50topn$+"^000000, the top record is ^3131FF"+$top_50min+"^000000 minutes ^3131FF"+$top_50sec+"^000000 seconds.";
	119	close;
	120
	121	case 2:
	122	mes "[Owen Kheuv]";
	123	mes "Currenly the top player of the arena lvl 60 stage is ^3131FF"+$arena_60topn$+"^000000, the top record is ^3131FF"+$top_60min+"^000000 minutes ^3131FF"+$top_60sec+"^000000 seconds.";
	124	close;
	125
	126	case 3:
	127	mes "[Owen Kheuv]";
	128	mes "Currenly the top player of the arena lvl 70 stage is ^3131FF"+$arena_70topn$+"^000000, the top record is ^3131FF"+$top_70min+"^000000 minutes ^3131FF"+$top_70sec+"^000000 seconds.";
	129	close;
	130
	131	case 4:
	132	mes "[Owen Kheuv]";
	133	mes "Currenly the top player of the arena lvl 80 stage is ^3131FF"+$arena_80topn$+"^000000, the top record is ^3131FF"+$top_80min+"^000000 minutes ^3131FF"+$top_80sec+"^000000 seconds.";
	134	close;
	135
	136	case 5:
	137	mes "[Owen Kheuv]";
	138	mes "Currenly the top party is ^3131FF"+$arena_pttopn$+"^000000, the top record is ^3131FF"+$top_ptmin+"^000000 minutes ^3131FF"+$top_ptsec+"^000000 seconds.";
	139	close;
	140	}
	141	}
	142
	143	arena_room,68,135,3 script Helper Pat 726,{
	144
	145	mes "[Pat]";
	146	mes "Welcome, welcome.";
	147	mes "I am a helper of the lvl 50 arena stage.";
	148	next;
	149	mes "[Pat]";
	150	mes "This ^3131FFlvl 50 arena stage^000000";
	151	mes "is accessable to characters from ^FF0000level 50^000000 to ^FF0000level 69^000000.";
	152	next;
	153	mes "[Pat]";
	154	mes "This level limitation is to prevent high level characters abusing low level arena stages. I hope you will understand.";
	155	mes "Also we accept an entrance fee, 1,000 zeny.";
	156	next;
	157	mes "[Pat]";
	158	mes "Let me introduce you about the play rules of arena.";
	159	next;
	160	mes "[Pat]";
	161	mes "^3131FFWait in a chat room for your turn coming.^000000";
	162	mes "When it's your turn, you will be automatically warped to an arena map.";
	163	next;
	164	mes "[Pat]";
	165	mes "As immediately as you enter, a timer to check your play time will be activated.";
	166	mes "Please follow what ^3131FFHeel and Toe^000000 guides you. ";
	167	next;
	168	mes "[Pat]";
	169	mes "You have a ^3131FF5 minutes^000000 battle time.";
	170	next;
	171	mes "[Pat]";
	172	mes "After you clear every room including a boss room, you will be warped again to an ^3131FFending waiting room^000000.";
	173	mes "You can only allow to stay in the waiting room for ^3131FF1 minute^000000, please hurry up to receive the arena points and leave.";
	174	next;
	175	mes "[Pat]";
	176	mes "If you stay over 1 minute inside the ending waiting room, you will be forced outside and will not receive any arena points. Please remember that.";
	177	next;
	178	mes "[Pat]";
	179	mes "I hope you will have a good time.";
	180	close;
	181	}
	182
	183	arena_room,41,93,5 script Helper Ben 750,{
	184
	185	mes "[Ben]";
	186	mes "Welcome, welcome.";
	187	mes "I am a helper of the lvl 60 arena stage.";
	188	next;
	189	mes "[Ben]";
	190	mes "This ^3131FFlvl 60 arena stage^000000";
	191	mes "is accessable to characters from ^FF0000level 60^000000 to ^FF0000level 79^000000.";
	192	next;
	193	mes "[Ben]";
	194	mes "This level limitation is to prevent high level characters abusing low level arena stages. I hope you will understand.";
	195	mes "Also we accept an entrance fee, 1,000 zeny.";
	196	next;
	197	mes "[Ben]";
	198	mes "Let me introduce you about the play rules of arena.";
	199	next;
	200	mes "[Ben]";
	201	mes "^3131FFWait in a chat room for your turn coming.^000000";
	202	mes "When it's your turn, you will be automatically warped to an arena map.";
	203	next;
	204	mes "[Ben]";
	205	mes "As immediately as you enter, a timer to check your play time will be activated.";
	206	mes "Please follow what ^3131FFMinilover^000000 guides you. ";
	207	next;
	208	mes "[Ben]";
	209	mes "You have a ^3131FF6 minutes^000000 battle time.";
	210	next;
	211	mes "[Ben]";
	212	mes "After you clear every room including a boss room, you will be warped again to an ^3131FFending waiting room^000000.";
	213	mes "You can only allow to stay in the waiting room for ^3131FF1 minute^000000, please hurry up to receive the arena points and leave.";
	214	next;
	215	mes "[Ben]";
	216	mes "If you stay over 1 minute inside the ending waiting room, you will be forced outside and will not receive any arena points. Please remember that.";
	217	next;
	218	mes "[Ben]";
	219	mes "I hope you will have a good time.";
	220	close;
	221	}
	222
	223	arena_room,53,49,5 script Helper Vicious 730,{
	224
	225	mes "[Vicious]";
	226	mes "Hey there.";
	227	mes "My name is Vicious, I am a helper of lvl 70 arena stage.";
	228	mes "(...I have no clue how the hell I put myself into this crappy work...mumble mumble...grumble grumble..)";
	229	next;
	230	mes "[Vicious]";
	231	mes "This ^3131FFlvl 70 arena stage^000000";
	232	mes "is accessable to characters from ^FF0000level 70^000000 to ^FF0000level 89^000000.";
	233	next;
	234	mes "[Vicious]";
	235	mes "This level limitation is to prevent high level characters abusing low level arena stages. I hope you will understand.";
	236	mes "Also we accept an entrance fee, 1,000 zeny.";
	237	next;
	238	mes "[Vicious]";
	239	mes "Let me introduce you about the play rules of arena.";
	240	next;
	241	mes "[Vicious]";
	242	mes "^3131FFWait in a chat room for your turn coming.^000000";
	243	mes "When it's your turn, you will be automatically warped to an arena map.";
	244	next;
	245	mes "[Vicious]";
	246	mes "As immediately as you enter, a timer to check your play time will be activated.";
	247	mes "Please follow what ^3131FFCadilac^000000 guides you. ";
	248	next;
	249	mes "[Vicious]";
	250	mes "You have a ^3131FF7 minutes^000000 battle time.";
	251	next;
	252	mes "[Vicious]";
	253	mes "After you clear every room including a boss room, you will be warped again to an ^3131FFending waiting room^000000.";
	254	mes "You can only allow to stay in the waiting room for ^3131FF1 minute^000000, please hurry up to receive the arena points and leave.";
	255	next;
	256	mes "[Vicious]";
	257	mes "If you stay over 1 minute inside the ending waiting room, you will be forced outside and will not receive any arena points. Remember that.";
	258	next;
	259	mes "[Vicious]";
	260	mes "Okay, take care now.";
	261	close;
	262	}
	263
	264	arena_room,147,49,3 script Helper Epin 727,{
	265
	266	mes "[Epin]";
	267	mes "Good day,";
	268	mes "I am a helper of lvl 80 arena stage and my name is Epin.";
	269	mes "I like reading and I am 19 years old...huh...? Don't you want to hear about me...?";
	270	next;
	271	emotion e_cry,0;
	272	mes "[Epin]";
	273	mes "Okay...";
	274	next;
	275	mes "[Epin]";
	276	mes "This ^3131FFlvl 80 arena stage^000000";
	277	mes "is accessable to characters from ^FF0000level 80^000000 to ^FF0000level 99^000000.";
	278	next;
	279	mes "[Epin]";
	280	mes "This level limitation is to prevent high level characters abusing low level arena stages. I hope you will understand.";
	281	mes "Also we accept an entrance fee, 1,000 zeny.";
	282	next;
	283	mes "[Epin]";
	284	mes "Let me introduce you about the play rules of arena.";
	285	next;
	286	mes "[Epin]";
	287	mes "^3131FFWait in a chat room for your turn coming.^000000";
	288	mes "When it's your turn, you will be automatically warped to an arena map.";
	289	next;
	290	mes "[Epin]";
	291	mes "As immediately as you enter, a timer to check your play time will be activated.";
	292	mes "Please follow what ^3131FFActus^000000 guides you. ";
	293	next;
	294	mes "[Epin]";
	295	mes "You have a ^3131FF8 minutes^000000 battle time.";
	296	next;
	297	mes "[Epin]";
	298	mes "After you clear every room including a boss room, you will be warped again to an ^3131FFending waiting room^000000.";
	299	mes "You can only allow to stay in the waiting room for ^3131FF1 minute^000000, please hurry up to receive the arena points and leave.";
	300	next;
	301	mes "[Epin]";
	302	mes "If you stay over 1 minute inside the ending waiting room, you will be forced outside and will not receive any arena points. Please remember that.";
	303	next;
	304	mes "[Epin]";
	305	mes "I hope you will have a good time.";
	306	close;
	307	}
	308
	309	arena_room,158,93,5 script Helper Lunic 828,{
	310
	311	mes "[Lunic]";
	312	mes "Welcome to party arena stage.";
	313	mes "I hope you will listen carefully to my introduction";
	314	mes "since this party arena stage is a little bit different from player mode stages.";
	315	next;
	316	mes "[Lunic]";
	317	mes "^3131FFParty Arena Stage^000000";
	318	mes "is accessible to players from ^FF0000level 10^000000 to ^FF0000level 99^000000.";
	319	next;
	320	mes "[Lunic]";
	321	mes "Also, arena will be not be started until all of 5 party members enter the room. We accept an entrance fee 1,000 zeny.";
	322	next;
	323	mes "[Lunic]";
	324	mes "Let me introduce you about the play rules of arena.";
	325	next;
	326	mes "[Lunic]";
	327	mes "^3131FFGroup a party with your friends and wait in a chat room^000000.";
	328	mes "You must form a party beforehand. If you didn't do, you could still play but you would have a lot of inconvenience.";
	329	next;
	330	mes "[Lunic]";
	331	mes "Also please remember 5 players automatically warped to the arena room will be in order of ^FF0000entering a chat room^000000 not in order of ^FF0000party^000000. Please remember that.";
	332	next;
	333	mes "[Lunic]";
	334	mes "And please form a party with ^3131FF5 players^000000 before you enter a chat room.";
	335	next;
	336	mes "[Lunic]";
	337	mes "When it becomes your turn, you will be warped into a small map where a warp and a help NPC are located.";
	338	mes "In case you enter with members of a different party, use the warp to escape the map. Then you will return to the waiting room.";
	339	next;
	340	mes "[Lunic]";
	341	mes "In case you enter with your party members, please proceed speaking with the help NPC in the small map.";
	342	mes "The help NPC is only accessible to talk ^FF0000 1 player ^000000at a time.";
	343	next;
	344	mes "[Lunic]";
	345	mes "The NPC will guide you and your party members to the actual arena room.";
	346	mes "However, if anyone in the party ^3131FFdoes not have enough money to pay the entrance fee, he will be warped outside^000000.";
	347	next;
	348	mes "[Lunic]";
	349	mes "Also be aware that you can only stay inside the map for ^FF0000 1 minute^000000.";
	350	next;
	351	mes "[Lunic]";
	352	mes "As immediately as you enter the arena map, a timer which calculates your battle time will be activated.";
	353	mes "Please follow what ^3131FFSlipslowrun^000000 guides you. ";
	354	next;
	355	mes "[Lunic]";
	356	mes "You will have ^3131FF10 minutes^000000 to clear the stage however it is not that easy to do. And you're advised to use the time wisely.";
	357	next;
	358	mes "[Lunic]";
	359	mes "After you clear every room including a boss room, you will be warped again to an ^3131FFending waiting room^000000.";
	360	mes "You can only allow to stay in the waiting room for ^3131FF1 minute^000000, please hurry up to receive the arena points and leave.";
	361	next;
	362	mes "[Lunic]";
	363	mes "If you stay over 1 minute inside the ending waiting room, you will be forced outside and will not receive any arena points. Please remember that.";
	364	next;
	365	mes "[Lunic]";
	366	mes "Besides, if a party make a new record on time to clear the map,";
	367	mes "^3131FFthe party master^000000 can record ^3131FFthe party name^000000.";
	368	next;
	369	mes "[Lunic]";
	370	mes "In this case, if a party has more than one master or none, it is impossible to write ^FF0000the top party record^000000.";
	371	mes "Therefore, it is strongly suggested to form one party before entering the arena map.";
	372	next;
	373	mes "[Lunic]";
	374	mes "Thank you for listening and";
	375	mes "I hope you will have a good time.";
	376	close;
	377	}
	378
	379	arena_room,158,82,1 script Helper Lonik 828,{
	380
	381	emotion e_no1,0;
	382	mes "[Lonik]";
	383	mes "Tah dah! Here I am!";
	384	next;
	385	mes "[Lonik]";
	386	mes "You are curious if there is anyone inside or not, aren't you?";
	387	next;
	388	mes "[Lonik]";
	389	mes "My answer is...";
	390	mes ".............";
	391	if(getmapusers("force_1-2"))
	392	{
	393	emotion e_oh,0;
	394	mes "Yes!";
	395	mes "There is someone inside.";
	396	next;
	397	mes "[Lonik]";
	398	mes "You'd better wait a little bit longer!";
	399	}
	400	else
	401	{
	402	emotion e_x,0;
	403	mes "No!";
	404	mes "Go for it, good luck!";
	405	}
	406	close;
	407	}
	408
	409	sec_in02,72,180,3 script Arena Manager#arena 802,{
	410
	411	input .@arena;
	412	if(!.@arena)
	413	{
	414	mes "[Arena Manager]";
	415	mes "Command has been canceled.";
	416	close;
	417	}
	418	else if(.@arena == 1357)
	419	{
	420	mes "[Arena Manager]";
	421	mes "Select an option.";
	422	next;
	423	switch( select( "Restart arena","Rearrange the Ranking Time" ) )
	424	{
	425	case 1:
	426	switch( select( "lvl 50","lvl 60","lvl 70","lvl 80","Party Mode" ) )
	427	{
	428	case 1:
	429	set .@arena,50;
	430	break;
	431	case 2:
	432	set .@arena,60;
	433	break;
	434	case 3:
	435	set .@arena,70;
	436	break;
	437	case 4:
	438	set .@arena,80;
	439	break;
	440	case 5:
	441	mes "[Arena Manager]";
	442	mes "== Caution ==";
	443	mes "You have chosen to restart party arena stage.";
	444	mes "Do you wish to proceed?";
	445	next;
	446	switch( select( "Yes","No" ) )
	447	{
	448	case 1:
	449	donpcevent "Ponox::Onstart";
	450	mes "[Arena Manager]";
	451	mes "The arena stage has been successfuly reactivated.";
	452	close;
	453
	454	case 2:
	455	mes "[Arena Manager]";
	456	mes "Command has been canceled.";
	457	close;
	458	}
	459	}
	460	mes "[Arena Manager]";
	461	mes "== Caution ==";
	462	mes "You have chosen to restart lvl "+.@arena+" arena stage.";
	463	mes "Do you wish to proceed?";
	464	next;
	465	switch( select( "Yes","No" ) )
	466	{
	467	case 1:
	468	donpcevent "lvl "+.@arena+"s Waiting Room::Onstart";
	469	mes "[Arena Manager]";
	470	mes "The arena stage has been successfuly reactivated.";
	471	close;
	472
	473	case 2:
	474	mes "[Arena Manager]";
	475	mes "Command has been canceled.";
	476	close;
	477	}
	478
	479	case 2:
	480	mes "[Arena Manager]";
	481	mes "== Caution ==";
	482	mes "^CE0000You have chosen to rearrange the ranking time. Make sure this is not a good decision unless if something serious was happened!^000000";
	483	next;
	484	mes "[Arena Manager]";
	485	mes "Are you sure you want to rearrange the ranking time?";
	486	next;
	487	switch( select( "No","Yes" ) )
	488	{
	489	case 1:
	490	mes "[Arena Manager]";
	491	mes "Phew~ :)";
	492	close;
	493
	494	case 2:
	495	switch( select( "lvl 50","lvl 60","lvl 70","lvl 80","Party Mode" ) )
	496	{
	497	case 1:
	498	mes "[Arena Manager]";
	499	mes "Please enter 0 to cancel.";
	500	mes "If not, please write within 400 letters.";
	501	next;
	502	input .@arenamin;
	503	set $top_50min,.@arenamin;
	504	input .@arenasec;
	505	set $top_50sec,.@arenasec;
	506	mes "[Arena Manager]";
	507	mes "Current lvl 50 ranker's play time has been rearranged to ^FF0000"+$top_50min+"^000000 minutes and ^FF0000"+$top_50sec+"^000000 seconds.";
	508	close;
	509	case 2:
	510	mes "[Arena Manager]";
	511	mes "Please enter 0 to cancel.";
	512	mes "If not, please write within 400 letters.";
	513	next;
	514	input .@arenamin;
	515	set $top_60min,.@arenamin;
	516	input .@arenasec;
	517	set $top_60sec,.@arenasec;
	518	mes "[Arena Manager]";
	519	mes "Current lvl 60 ranker's play time has been rearranged to ^FF0000"+$top_60min+"^000000 minutes and ^FF0000"+$top_60sec+"^000000 seconds.";
	520	close;
	521	case 3:
	522	mes "[Arena Manager]";
	523	mes "Please enter 0 to cancel.";
	524	mes "If not, please write within 400 letters.";
	525	next;
	526	input .@arenamin;
	527	set $top_70min,.@arenamin;
	528	input .@arenasec;
	529	set $top_70sec,.@arenasec;
	530	mes "[Arena Manager]";
	531	mes "Current lvl 70 ranker's play time has been rearranged to ^FF0000"+$top_70min+"^000000 minutes and ^FF0000"+$top_70sec+"^000000 seconds.";
	532	close;
	533	case 4:
	534	mes "[Arena Manager]";
	535	mes "Please enter 0 to cancel.";
	536	mes "If not, please write within 400 letters.";
	537	next;
	538	input .@arenamin;
	539	set $top_80min,.@arenamin;
	540	input .@arenasec;
	541	set $top_80sec,.@arenasec;
	542	mes "[Arena Manager]";
	543	mes "Current lvl 80 ranker's play time has been rearranged to ^FF0000"+$top_80min+"^000000 minutes and ^FF0000"+$top_80sec+"^000000 seconds.";
	544	close;
	545	case 5:
	546	mes "[Arena Manager]";
	547	mes "Please enter 0 to cancel.";
	548	mes "If not, please write within 400 letters.";
	549	next;
	550	input .@arenamin;
	551	set $top_ptmin,.@arenamin;
	552	input .@arenasec;
	553	set $top_ptsec,.@arenasec;
	554	mes "[Arena Manager]";
	555	mes "Current party ranker's play time has been rearranged to ^FF0000"+$top_ptmin+"^000000 minutes and ^FF0000"+$top_ptsec+"^000000 seconds.";
	556	close;
	557	}
	558	}
	559	}
	560	}
	561	mes "Password is incorrect.";
	562	close;
	563	}
	564
	565	sec_in02,79,171,3 script Reward Manager#arena 802,{
	566
	567	input .@arena;
	568	if(!.@arena)
	569	{
	570	mes "[Reward Manager]";
	571	mes "Command has been canceled.";
	572	close;
	573	}
	574	else if(.@arena == 1357)
	575	{
	576	mes "[Reward Manager]";
	577	mes "You have chosen to hide the teleporter NPC.";
	578	next;
	579	switch( select( "Cancel","Yes","Turn on" ) )
	580	{
	581	case 1:
	582	mes "[Reward Manager]";
	583	mes "You have canceled the command.";
	584	close;
	585
	586	case 2:
	587	mes "[Reward Manager]";
	588	mes "NPC has been hidden";
	589	disablenpc "Teleporter#arena";
	590	close;
	591
	592	case 3:
	593	mes "[Reward Manager]";
	594	mes "NPC has been enabled.";
	595	enablenpc "Teleporter#arena";
	596	close;
	597	}
	598	}
	599	mes "[Reward Manager]";
	600	mes "Password is incorrect.";
	601	close;
	602	}
	603
	604	arena_room,105,93,5 script Teleporter#arena 55,{
	605
	606	mes "[Teleporter]";
	607	mes "I can move you to the reward arena!";
	608	mes "Would you like to go there?";
	609	next;
	610	switch( select( "Yes.","No." ) )
	611	{
	612	case 1:
	613	mes "[Teleporter]";
	614	mes "Let me guide you.";
	615	close2;
	616	warp "prt_are_in",60,14;
	617	end;
	618
	619	case 2:
	620	mes "[Teleporter]";
	621	mes "No problem, feel free to come back any time.";
	622	close;
	623	}
	624	}
	625
	626	prt_are_in,98,14,3 script Givu#arena 728,{
	627
	628
	629	if(checkweight(526,5) != 1)
	630	{
	631	mes "- Wait a moment! -";
	632	mes "- Currently you're carrying -";
	633	mes "- too many items with you. -";
	634	mes "- Please enlighten your weight -";
	635	mes "- and try again. -";
	636	close;
	637	}
	638	mes "[Givu]";
	639	mes "Hello, there. Welcome to the world of Arena.";
	640	mes "My name is Givu, I am in charge of arena point exchange program.";
	641	next;
	642	mes "[Givu]";
	643	mes "You can exchange your arena points with various stuffs.";
	644	mes "Please choose a menu below.";
	645	next;
	646	switch( select( "Exchange with Consumable items","Exchange with EXP points","Take a Souvenir Picture","Check Current Arena Points" ) )
	647	{
	648	case 1:
	649	mes "[Givu]";
	650	mes "What consumable item do you wish to exchange?";
	651	next;
	652	switch( select( "Honey","Royal Jelly","Mastela Fruit","Condensed White Potion","Anodyne","Yggdrasil Seed","Yggdrasilberry","Old Blue Box","Old Purple Box","Old Card Album" ) )
	653	{
	654	case 1: callfunc "Func_Are_Rew",518,5,20;
	655	case 2: callfunc "Func_Are_Rew",526,5,30;
	656	case 3: callfunc "Func_Are_Rew",522,5,30;
	657	case 4: callfunc "Func_Are_Rew",547,8,30;
	658	case 5: callfunc "Func_Are_Rew",605,3,20;
	659	case 6: callfunc "Func_Are_Rew",608,1,20;
	660	case 7: callfunc "Func_Are_Rew",607,1,40;
	661	case 8: callfunc "Func_Are_Rew",603,1,100;
	662	case 9: callfunc "Func_Are_Rew",617,1,300;
	663	case 10: callfunc "Func_Are_Rew",616,1,1000;
	664	}
	665
	666	case 2:
	667	mes "[Givu]";
	668	mes "Would you like to exchange your arena points with experience points?";
	669	mes "It requires 40 arena points.";
	670	next;
	671	switch( select( "Cancel","Yes" ) )
	672	{
	673	case 1:
	674	mes "[Givu]";
	675	mes "You have canceled your request.";
	676	close;
	677
	678	case 2:
	679	if(arena_point < 40)
	680	{
	681	mes "[Givu]";
	682	mes "You do not have enough arena points.";
	683	mes "Please check the total amount of arena points you have.";
	684	close;
	685	}
	686	set arena_point,arena_point -40;
	687	if(BaseLevel < 70) getexp 3000,0;
	688	else if(BaseLevel < 80) getexp 9000,0;
	689	else if(BaseLevel < 90) getexp 10000,0;
	690	else if(BaseLevel < 100) getexp 30000,0;
	691	mes "[Givu]";
	692	mes "You have gained experience points. Thank you.";
	693	close;
	694	}
	695
	696	case 3:
	697	mes "[Givu]";
	698	mes "You have chosen a souvenir picture services.";
	699	next;
	700	switch( select( "About souvenir Picture Services","Take a picture" ) )
	701	{
	702	case 1:
	703	mes "[Givu]";
	704	mes "Do you see stairs at the right side of me?";
	705	next;
	706	mes "[Givu]";
	707	mes "At the stairs, you can take a screenshot with an NPC or a monster.";
	708	next;
	709	mes "[Givu]";
	710	mes "When you choose an NPC or a monster, it will show some emotion icons ^FF0000for 1 minute^000000.";
	711	next;
	712	mes "[Givu]";
	713	mes "Don't miss the chance to take a picture with your favorite NPC!";
	714	close;
	715
	716	case 2:
	717	if($arenapic)
	718	{
	719	mes "[Givu]";
	720	mes "A souvenir picture services is on progress. Please wait.";
	721	close;
	722	}
	723	mes "[Givu]";
	724	mes "Please choose an NPC at below.";
	725	mes "The NPC will appear for 1 minute and this service requires 10 arena points.";
	726	next;
	727	switch( select( "Baphomet","Dark Lord","Doppelganger","Eddga","Dracula","Samurai","Stormy Knight","Phreeoni","Girl","Valkyrie" ) )
	728	{
	729	case 1: set $@arenapic,1039; break;
	730	case 2: set $@arenapic,1272; break;
	731	case 3: set $@arenapic,1046; break;
	732	case 4: set $@arenapic,1115; break;
	733	case 5: set $@arenapic,1389; break;
	734	case 6: set $@arenapic,1492; break;
	735	case 7: set $@arenapic,1251; break;
	736	case 8: set $@arenapic,1159; break;
	737	case 9: set $@arenapic,6969; break;
	738	case 10: set $@arenapic,7777; break;
	739	}
	740	if(arena_point < 10)
	741	{
	742	mes "[Givu]";
	743	mes "You do not have enough arena points.";
	744	mes "Please check the total amount of arena points you have.";
	745	close;
	746	}
	747	mes "[Givu]";
	748	if($@arenapic == 6969) mes "Would you like to take a picture with pretty girls?";
	749	else if($@arenapic == 7777) mes "Would you like to take a picture with a Valkyrie?";
	750	else mes "Would you like to take a picture with a "+getmonsterinfo($@arenapic,0)+"?";
	751	next;
	752	switch( select( "Yes","No" ) )
	753	{
	754	case 1:
	755	set arena_point,arena_point -10;
	756	set $arenapic,1;
	757	enablenpc "#arena_"+$@arenapic+"";
	758	movenpc "#arena_"+$@arenapic+"",96,28;
	759	if($@arenapic == 6969)
	760	{
	761	enablenpc "#arena_ss_2";
	762	enablenpc "#arena_ss_3";
	763	enablenpc "#arena_ss_4";
	764	}
	765	donpcevent "npctime#arena::OnStart";
	766	mes "[Givu]";
	767	mes "Thank you.";
	768	close;
	769
	770	case 2:
	771	mes "[Givu]";
	772	mes "Would you like to consider a little longer?";
	773	close;
	774	}
	775	}
	776
	777	case 4:
	778	mes "[Givu]";
	779	mes "Let me check "+strcharinfo(0)+"'s current arena points.";
	780	next;
	781	mes "[Givu]";
	782	mes ""+strcharinfo(0)+" has total ^3131FF"+arena_point+"^000000 points.";
	783	close;
	784	}
	785
	786	OnInit:
	787	set $arenapic,0;
	788	end;
	789	}
	790
	791	prt_are_in,1,1,5 script #arena_1039 1039,{
	792	end;
	793
	794	OnInit:
	795	disablenpc "#arena_6969";
	796	disablenpc "#arena_ss_2";
	797	disablenpc "#arena_ss_3";
	798	disablenpc "#arena_ss_4";
	799	disablenpc "#arena_1272";
	800	disablenpc "#arena_1046";
	801	disablenpc "#arena_1115";
	802	disablenpc "#arena_1389";
	803	disablenpc "#arena_1492";
	804	disablenpc "#arena_1251";
	805	disablenpc "#arena_1159";
	806	disablenpc "#arena_7777";
	807	disablenpc "#arena_1039";
	808	end;
	809
	810	OnHeart:
	811	emotion e_lv,0;
	812	end;
	813	OnSci:
	814	emotion e_scissors,0;
	815	end;
	816	OnBest:
	817	emotion e_no1,0;
	818	end;
	819	OnOmg:
	820	emotion e_omg,0;
	821	end;
	822	OnKik:
	823	emotion e_gg,0;
	824	end;
	825	OnKis:
	826	emotion e_kis,0;
	827	end;
	828	}
	829
	830	prt_are_in,1,1,5 duplicate(#arena_1039) #arena_6969 714
	831	prt_are_in,94,26,5 duplicate(#arena_1039) #arena_ss_2 714
	832	prt_are_in,100,28,3 duplicate(#arena_1039) #arena_ss_3 714
	833	prt_are_in,102,26,3 duplicate(#arena_1039) #arena_ss_4 714
	834	prt_are_in,1,1,5 duplicate(#arena_1039) #arena_1272 1272
	835	prt_are_in,1,1,5 duplicate(#arena_1039) #arena_1046 1046
	836	prt_are_in,1,1,5 duplicate(#arena_1039) #arena_1115 1115
	837	prt_are_in,1,1,5 duplicate(#arena_1039) #arena_1389 1389
	838	prt_are_in,1,1,5 duplicate(#arena_1039) #arena_1492 1492
	839	prt_are_in,1,1,5 duplicate(#arena_1039) #arena_1251 1251
	840	prt_are_in,1,1,5 duplicate(#arena_1039) #arena_1159 1159
	841	prt_are_in,1,1,5 duplicate(#arena_1039) #arena_7777 811
	842
	843	prt_are_in,130,30,3 script npctime#arena 139,{
	844
	845	OnStop:
	846	stopnpctimer;
	847	end;
	848
	849	OnStart:
	850	initnpctimer;
	851	end;
	852
	853	OnTimer2000:
	854	mapannounce "prt_are_in","Givu : You should keep time with popping emotion icons~",1,0xFFCE00;
	855	end;
	856
	857	OnTimer5000:
	858	mapannounce "prt_are_in","Emoticon : /lv",1,0xFFCE00;
	859	end;
	860
	861	OnTimer7000:
	862	mapannounce "prt_are_in"," 3 ",1,0xFFCE00;
	863	end;
	864
	865	OnTimer8000:
	866	mapannounce "prt_are_in"," 2 ",1,0xFFCE00;
	867	end;
	868
	869	OnTimer9000:
	870	mapannounce "prt_are_in"," 1 ",1,0xFFCE00;
	871	end;
	872
	873	OnTimer10000:
	874	mapannounce "prt_are_in"," ",1,0xFFCE00;
	875	donpcevent "#arena_"+$@arenapic+"::OnHeart";
	876	if($@arenapic == 6969)
	877	{
	878	donpcevent "#arena_ss_2::OnHeart";
	879	donpcevent "#arena_ss_3::OnHeart";
	880	donpcevent "#arena_ss_4::OnHeart";
	881	}
	882	end;
	883
	884	OnTimer15000:
	885	mapannounce "prt_are_in","Emoticon : /gawi",1,0xFFCE00;
	886	end;
	887
	888	OnTimer17000:
	889	mapannounce "prt_are_in"," 3 ",1,0xFFCE00;
	890	end;
	891
	892	OnTimer18000:
	893	mapannounce "prt_are_in"," 2 ",1,0xFFCE00;
	894	end;
	895
	896	OnTimer19000:
	897	mapannounce "prt_are_in"," 1 ",1,0xFFCE00;
	898	end;
	899
	900	OnTimer20000:
	901	mapannounce "prt_are_in"," ",1,0xFFCE00;
	902	donpcevent "#arena_"+$@arenapic+"::OnSci";
	903	if($@arenapic == 6969)
	904	{
	905	donpcevent "#arena_ss_2::OnSci";
	906	donpcevent "#arena_ss_3::OnSci";
	907	donpcevent "#arena_ss_4::OnSci";
	908	}
	909	end;
	910
	911	OnTimer25000:
	912	mapannounce "prt_are_in","Emoticon : /no1",1,0xFFCE00;
	913	end;
	914
	915	OnTimer27000:
	916	mapannounce "prt_are_in"," 3 ",1,0xFFCE00;
	917	end;
	918
	919	OnTimer28000:
	920	mapannounce "prt_are_in"," 2 ",1,0xFFCE00;
	921	end;
	922
	923	OnTimer29000:
	924	mapannounce "prt_are_in"," 1 ",1,0xFFCE00;
	925	end;
	926
	927	OnTimer30000:
	928	mapannounce "prt_are_in"," ",1,0xFFCE00;
	929	donpcevent "#arena_"+$@arenapic+"::OnBest";
	930	if($@arenapic == 6969)
	931	{
	932	donpcevent "#arena_ss_2::OnBest";
	933	donpcevent "#arena_ss_3::OnBest";
	934	donpcevent "#arena_ss_4::OnBest";
	935	}
	936	end;
	937
	938	OnTimer35000:
	939	mapannounce "prt_are_in","Emoticon : /huk",1,0xFFCE00;
	940	end;
	941
	942	OnTimer37000:
	943	mapannounce "prt_are_in"," 3 ",1,0xFFCE00;
	944	end;
	945
	946	OnTimer38000:
	947	mapannounce "prt_are_in"," 2 ",1,0xFFCE00;
	948	end;
	949
	950	OnTimer39000:
	951	mapannounce "prt_are_in"," 1 ",1,0xFFCE00;
	952	end;
	953
	954	OnTimer40000:
	955	mapannounce "prt_are_in"," ",1,0xFFCE00;
	956	donpcevent "#arena_"+$@arenapic+"::OnOmg";
	957	if($@arenapic == 6969)
	958	{
	959	donpcevent "#arena_ss_2::OnOmg";
	960	donpcevent "#arena_ss_3::OnOmg";
	961	donpcevent "#arena_ss_4::OnOmg";
	962	}
	963	end;
	964
	965	OnTimer45000:
	966	mapannounce "prt_are_in","Emoticon : /gg",1,0xFFCE00;
	967	end;
	968
	969	OnTimer47000:
	970	mapannounce "prt_are_in"," 3 ",1,0xFFCE00;
	971	end;
	972
	973	OnTimer48000:
	974	mapannounce "prt_are_in"," 2 ",1,0xFFCE00;
	975	end;
	976
	977	OnTimer49000:
	978	mapannounce "prt_are_in"," 1 ",1,0xFFCE00;
	979	end;
	980
	981	OnTimer50000:
	982	mapannounce "prt_are_in"," ",1,0xFFCE00;
	983	donpcevent "#arena_"+$@arenapic+"::OnKik";
	984	if($@arenapic == 6969)
	985	{
	986	donpcevent "#arena_ss_2::OnKik";
	987	donpcevent "#arena_ss_3::OnKik";
	988	donpcevent "#arena_ss_4::OnKik";
	989	}
	990	end;
	991
	992	OnTimer55000:
	993	mapannounce "prt_are_in","Emoticon : /kis",1,0xFFCE00;
	994	end;
	995
	996	OnTimer57000:
	997	mapannounce "prt_are_in"," 3 ",1,0xFFCE00;
	998	end;
	999
	1000	OnTimer58000:
	1001	mapannounce "prt_are_in"," 2 ",1,0xFFCE00;
	1002	end;
	1003
	1004	OnTimer59000:
	1005	mapannounce "prt_are_in"," 1 ",1,0xFFCE00;
	1006	end;
	1007
	1008	OnTimer60000:
	1009	mapannounce "prt_are_in"," ",1,0xFFCE00;
	1010	donpcevent "#arena_"+$@arenapic+"::OnKis";
	1011	if($@arenapic == 6969)
	1012	{
	1013	donpcevent "#arena_ss_2::OnKis";
	1014	donpcevent "#arena_ss_3::OnKis";
	1015	donpcevent "#arena_ss_4::OnKis";
	1016	}
	1017	end;
	1018
	1019	OnTimer62000:
	1020	mapannounce "prt_are_in","Time is over. Thank you for using my services.",1,0xFFCE00;
	1021	movenpc "#arena_"+$@arenapic+"",1,1;
	1022	donpcevent "#arena_1039::OnInit";
	1023	set $arenapic,0;
	1024	stopnpctimer;
	1025	end;
	1026	}
	1027
	1028	sec_in02,72,171,3 script Picture Manager#arena 802,{
	1029
	1030	input .@arena;
	1031	if(!.@arena)
	1032	{
	1033	mes "[Picture Manager]";
	1034	mes "Command has been canceled.";
	1035	close;
	1036	}
	1037	else if(.@arena == 1357)
	1038	{
	1039	mes "[Picture Manager]";
	1040	mes "Would you like to reset Picture Reward variable to 0?";
	1041	next;
	1042	switch( select( "Cancel","Yes" ) )
	1043	{
	1044	case 1:
	1045	mes "[Picture Manager]";
	1046	mes "You have canceled your request.";
	1047	close;
	1048
	1049	case 2:
	1050	mes "[Picture Manager]";
	1051	mes "Picture rewarding reseted.";
	1052	set $arenapic,0;
	1053	close;
	1054	}
	1055	}
	1056	mes "[Picture Manager]";
	1057	mes "Password is incorrect.";
	1058	close;
	1059	}
	1060
	1061	sec_in02,76,176,5 script Live Broadcast#arena 802,{
	1062
	1063	mes "[Live Broadcast]";
	1064	mes "Currently there are "+getmapusers("force_1-1")+" people in lvl 50s map.";
	1065	mes "Currently there are "+getmapusers("force_2-1")+" people in lvl 60s map.";
	1066	mes "Currently there are "+getmapusers("force_3-1")+" people in lvl 70s map.";
	1067	mes "Currently there are "+getmapusers("force_4-1")+" people in lvl 80s map.";
	1068	mes "Currently there are "+getmapusers("force_1-2")+" people in party map.";
	1069	mes "Currently there are "+getmapusers("arena_room")+" people in the waiting room.";
	1070	close;
	1071	}
	1072
	1073	function script Func_Are_Rew {
	1074
	1075	mes "[Givu]";
	1076	mes "Would you like to exchange your arena points with "+getitemname(getarg(0))+"?";
	1077	mes "You can exchange ^3131FF"+getarg(2)+" arena points with "+getarg(1)+" "+getitemname(getarg(0))+"^000000.";
	1078	mes "If you wish to cancel, please enter 0. If you don't, please enter how many ^3131FFtimes^000000 of arena points you wish to spend.";
	1079	next;
	1080	input .@reward;
	1081	if(!.@reward)
	1082	{
	1083	mes "[Givu]";
	1084	mes "You have canceled your request.";
	1085	close;
	1086
	1087	}
	1088	else if(.@reward > 1500)
	1089	{
	1090	mes "[Givu]";
	1091	mes "You have exceeded the maximum capacity.";
	1092	close;
	1093	}
	1094	if(arena_point < .@reward * getarg(2))
	1095	{
	1096	mes "[Givu]";
	1097	mes "You do not have enough arena points.";
	1098	mes "Please check the total amount of arena points you have.";
	1099	close;
	1100	}
	1101	set arena_point,arena_point - (.@reward * getarg(2));
	1102	getitem getarg(0),.@reward * getarg(1);
	1103	mes "[Givu]";
	1104	mes "Thank you, please come again.";
	1105	close;
	1106	}
	1107
	1108	arena_room,63,126,0 script LevelCheck#50 139,5,5,{
	1109
	1110	OnTouch:
	1111	if(BaseLevel < 50 \|\| BaseLevel > 69)
	1112	{
	1113	mes "[Helper Pat]";
	1114	mes "I'm sorry but that place is";
	1115	mes "only available to people from";
	1116	mes "level ^FF000050^000000 to ^FF000069^000000. I'm afraid you";
	1117	mes "have to leave immediately.";
	1118	mes "Please proceed to your proper";
	1119	mes "arenas. Have fun !";
	1120	close2;
	1121	warp "arena_room",100,75;
	1122	}
	1123	else if(Zeny < 1000)
	1124	{
	1125	mes "[Helper Pat]";
	1126	mes "Oh! That's too bad!";
	1127	mes "You have the required level";
	1128	mes "to attempt this arena but";
	1129	mes "it costs 1000 zeny to enter.";
	1130	mes "Please come back when you'll";
	1131	mes "have them!";
	1132	close2;
	1133	warp "arena_room",100,75;
	1134	}
	1135	end;
	1136	}
	1137
	1138	arena_room,49,87,0 script LevelCheck#60 139,5,5,{
	1139
	1140	OnTouch:
	1141	if(BaseLevel < 60 \|\| BaseLevel > 79)
	1142	{
	1143	mes "[Helper Ben]";
	1144	mes "I'm sorry but that place is";
	1145	mes "only available to people from";
	1146	mes "level ^FF000060^000000 to ^FF000079^000000. I'm afraid you";
	1147	mes "have to leave immediately.";
	1148	mes "Please proceed to your proper";
	1149	mes "arenas. Have fun !";
	1150	close2;
	1151	warp "arena_room",100,75;
	1152	}
	1153	else if(Zeny < 1000)
	1154	{
	1155	mes "[Helper Ben]";
	1156	mes "Oh! That's too bad!";
	1157	mes "You have the required level";
	1158	mes "to attempt this arena but";
	1159	mes "it costs 1000 zeny to enter.";
	1160	mes "Please come back when you'll";
	1161	mes "have them!";
	1162	close2;
	1163	warp "arena_room",100,75;
	1164	}
	1165	end;
	1166	}
	1167
	1168	arena_room,63,53,0 script LevelCheck#70 139,5,5,{
	1169
	1170	OnTouch:
	1171	if(BaseLevel < 70 \|\| BaseLevel > 89)
	1172	{
	1173	mes "[Helper Vicious]";
	1174	mes "I'm sorry but that place is";
	1175	mes "only available to people from";
	1176	mes "level ^FF000070^000000 to ^FF000089^000000. I'm afraid you";
	1177	mes "have to leave immediately.";
	1178	mes "Please proceed to your proper";
	1179	mes "arenas. Have fun !";
	1180	close2;
	1181	warp "arena_room",100,75;
	1182	}
	1183	else if(Zeny < 1000)
	1184	{
	1185	mes "[Helper Vicious]";
	1186	mes "Oh! That's too bad!";
	1187	mes "You have the required level";
	1188	mes "to attempt this arena but";
	1189	mes "it costs 1000 zeny to enter.";
	1190	mes "Please come back when you'll";
	1191	mes "have them!";
	1192	close2;
	1193	warp "arena_room",100,75;
	1194	}
	1195	end;
	1196	}
	1197
	1198	arena_room,136,53,0 script LevelCheck#80 139,5,5,{
	1199
	1200	OnTouch:
	1201	if(BaseLevel < 80)
	1202	{
	1203	mes "[Helper Epin]";
	1204	mes "I'm sorry but that place is";
	1205	mes "only available to people from";
	1206	mes "level ^FF000080^000000 to ^FF000099^000000. I'm afraid you";
	1207	mes "have to leave immediately.";
	1208	mes "Please proceed to your proper";
	1209	mes "arenas. Have fun !";
	1210	close2;
	1211	warp "arena_room",100,75;
	1212	}
	1213	else if(Zeny < 1000)
	1214	{
	1215	mes "[Helper Epin]";
	1216	mes "Oh! That's too bad!";
	1217	mes "You have the required level";
	1218	mes "to attempt this arena but";
	1219	mes "it costs 1000 zeny to enter.";
	1220	mes "Please come back when you'll";
	1221	mes "have them!";
	1222	close2;
	1223	warp "arena_room",100,75;
	1224	}
	1225	end;
	1226
	1227	}

Note: See TracBrowser for help on using the browser.

Context Navigation

root/npc/other/arena/arena_room.txt @ 1

Download in other formats: