darking123

July 13, 2015

I've done that already. doesn't work

July 11, 2015

I do experience client not responding sometimes. I can't look or find a way how to fix it. can anyone give me a hint, not by looking for the map or npc or mob.

for example this is the error occurred when I went to prontera field. but when I re-login again. the error didn't pop up again. what do you think is the reason that my client crashed?

July 9, 2015

I've got a problem It started by thursday, It should Start by Friday.

-	script	FloatingRates	-1,{
OnInit:
OnClock0001:
	if(gettime(4)==4  || gettime(4)==5  || gettime(4)==6 ) {
setbattleflag("base_exp_rate"), 1400;
        setbattleflag("job_exp_rate"), 1400;
		atcommand "@reloadmobdb";
		end;
	}
	if(gettime(4) == 1) 
	{
		announce "Weekend Exp Event is finished",bc_all,0xFF6060;
		atcommand "@reloadbattleconf";
		atcommand "@reloadmobdb";
	}
	end;

OnMinute02:
	if(gettime(4)==4 || gettime(4)==5 || gettime(4)==6 )
	{
		announce "Weekend Exp Event(Base: 14x, Job: 14x) is active!!",bc_all,0xFF6060;
	}
	end;
}

July 7, 2015

updates here?

July 6, 2015

I got a problem. even though I'm not Idle the message still pop up"You were afk for 5 minutes therefore you have to wait 2 hours again without ideling for more than 5 minutes to get your prize."

//======Name========================================
// Daily Login Rewards
//======Version=====================================
// 1.1
// Author: Sandbox, Winterfox
//======Comments====================================
// Updated outdated Syntax-
// Made slight optimizations.
// Added a delay of 3 hours before the player is
// able to claim his reward and only if he has
// not been idle longer than 5 minutes in this
// time frame.
//==================================================

-	script	DailyLoginRewards	-1,{
	OnInit:
		//Set to your server name
		.Serv_Name$ = "Republic";

		 //Set to desired item prizes
		setarray( .D_Prize, 11501, 11502, 14533, 12210, 7539 );
		
		 //Amount of prize to be given
		setarray( .D_Amt, 400, 400, 4, 3, 2 );
	end;
	OnPCLoginEvent:
		if( gettimetick( 2 ) < #ClaimDelay ) {
			dispbottom( "Daily Login Activated. You allready got your daily login reward. " );
			end;
		}

		// Show notice about the Daily Login Rewards
		dispbottom( "Daily Login Activated. Please be Online for 2 hours without being idle for more than 5 minutes to receive daily login reward. " );

		// Start a timer after 1 minute to sum up idle time
		addtimer( 60000, strnpcinfo(3 ) + "::OnIdleCheck" );

		// Start a timer to clam the daily reward after 3 hours
		addtimer( 7200000, strnpcinfo(3) + "::OnStartClaim" );
	end;
	OnIdleCheck:
		// Add the current idle time to the idle time counter.
		#overallIdleTime += checkidle();

		// Set a new timer to recheck after 1 minute.
		addtimer( 60000,  strnpcinfo( 3 ) + "::OnIdleCheck" );
	end;
	OnStartClaim:
		// If the idle time was 5 minutes or more in the last 3 hours reset to check if the person is the next 3 hours less idle than 5 minutes.
		if( #overallIdleTime >= 300 ) {
			#overallIdleTime = 0;

			// Start a timer to clam the daily reward after 2 hours
			addtimer( 7200000, strnpcinfo(3) + "::OnStartClaim" );

			dispbottom( "You were afk for 5 minutes therefore you have to wait 2 hours again without ideling for more than 5 minutes to get your prize." );

			end;
		}

		deltimer( strnpcinfo(3 ) + "::OnIdleCheck" );

		// If the streak was broken reset the streak count.
		if( gettimetick( 2 ) > #StreakDelay )  #LogStreak = 0;

		// If the rewards reached their end, reset them.
		if( #RewardStreak > getarraysize( .D_Prize ) ) #RewardStreak = 0;

		if( #RewardStreak == 0 )
			dispbottom( "Welcome to " + .Serv_Name$ + "! You've received " + .D_Amt[ #RewardStreak ] + " " + getitemname( .D_Prize[ #RewardStreak ] )+" for logging in! Visit us daily to get more prize! When you've managed to play with us for 5 consecutive days, you will receive bonus prizes!" );
announce "Announcement: " + strcharinfo(0) + " have received the daily reward",0;
		if( #RewardStreak > 0 )
			dispbottom( "Welcome back to " + .Serv_Name$ + "! You've received " + .D_Amt[ #RewardStreak ] + " " + getitemname( .D_Prize[ #RewardStreak ] ) + " for logging in! Visit us daily to get more prize! When you've managed to play with us for 5 consecutive days, you will receive bonus prizes!" );

		getitem( .D_Prize[ #RewardStreak ], .D_Amt[ #RewardStreak ]);
		
		#RewardStreak += 1;
		#LogStreak += 1;
		#ClaimDelay = gettimetick( 2 ) + 86400;
		#StreakDelay = gettimetick( 2 ) + 172800;

		if( #LogStreak == 5 ) {
			for( .@i = 0; .@i < getarraysize( .D_Prize ); set .@i, .@i++ )
				getitem( .D_Prize[.@i], .D_Amt[.@i] );

			dispbottom( "Congratulations! You've received all the daily rewards for logging in 5 consecutive days!" );
announce "Announcement:" + strcharinfo(0) + " have received all the daily rewards for logging in 5 consecutive days!",0;

			#LogStreak = 0;
		}
	end;
	OnPCLogoutEvent:
		// Reset idle time on logout.
		#overallIdleTime = 0;
	end;
}

July 5, 2015

Why is it sometimes, the prize giver already appears while the players are still joining the zombie event, kindly help me fix it.

-	script	announce_nvz	-1,{

// beginning Time

OnClock0130:
OnClock0830:
OnClock1330:
OnClock1730:
OnClock1930:
OnClock2230:


announce "Zombie Vs. Novice event Will begin in 3 minutes Please Make A Level 1 Novice Inorder To Join The Event",0;
killmonsterall "quiz_01";
sleep 5000;
announce "At the south of Prontera(Main Town) has appeared npc ' Novice vs. Zombie '!",0;
enablenpc "Novice vs. Zombie";
sleep 55000;
announce "Event Zombie Vs. Novice will begin in 2 minutes Please Make A Level 1 Novice Inorder To Join The Event",0;
sleep 60000;
announce "Event Zombie Vs. Novice will begin in 1 minute Please Make A Level 1 Novice Inorder To Join The Event",0;
sleep 30000;
mapannounce "quiz_01","In 30 seconds the monster will be started!",0;
sleep 25000;
announce "Event Zombie Vs. Novice will begin through ~5~",0;
sleep 1000;
announce "Event Zombie Vs. Novice will begin through ~4~",0;
sleep 1000;
announce "Event Zombie Vs. Novice will begin through ~3~",0;
sleep 1000;
announce "Event Zombie Vs. Novice will begin through ~2~",0;
sleep 1000;
announce "Event Zombie Vs. Novice will begin through ~1~",0;
sleep 1000;
announce "Event 'Zombie Vs. Novice' has begun!!",0,0x00FF00;
monster "quiz_01",42,369,"Zombie",1036,1;
disablenpc "Novice vs. Zombie";
sleep 10000;
monster "quiz_01",42,369,"Zombie-2",1036,1;
sleep 10000;
monster "quiz_01",42,369,"Zombie-3",1036,1;
sleep 10000;
monster "quiz_01",42,369,"Zombie-4",1036,1;
initnpctimer;
end;

OnTimer5000: 
if ( getmapusers("quiz_01") == 0 )
{
killmonsterall "quiz_01";
announce "'Zombie Vs. Novice' has ended with Event, as all have died",0;
disablenpc "Prize";
stopnpctimer;
end;
}
else if ( getmapusers("quiz_01") > 1 )
{
mapannounce "quiz_01",getmapusers("quiz_01") +"the player still survive on Event.",0,0x00FF00;;
initnpctimer;
end;
}
initnpctimer;
end;

OnPCDieEvent:
getmapxy .@mapnvz$,.@xnvz,.@ynvz,0;
if ( .@mapnvz$ == "quiz_01") {
sleep2 1;
warp "prontera",154,95;
atcommand "@alive "+ strcharinfo(0);
dispbottom "you have lost...";
}
sleep2 1000;
if(getmapusers("quiz_01") == 1){
killmonsterall "quiz_01";
mapannounce "quiz_01","You have won, approach please to npc Prize.",0;
killmonsterall "quiz_01";
killmonsterall "quiz_01";
killmonsterall "quiz_01";
killmonsterall "quiz_01";
enablenpc "Prize";
killmonsterall "quiz_01";
stopnpctimer;
end;
}
if(getmapusers("quiz_01") == 0){
killmonsterall "quiz_01";
killmonsterall "quiz_01";
killmonsterall "quiz_01";
killmonsterall "quiz_01";
stopnpctimer;
end;
}
end;
}

quiz_01,42,369,3	script	Prize	72,{

if (sex == 1) {
announce "In ' Zombie Vs. Novice ' has won" + strcharinfo (0) + "! We congratulate him!",0;
} 
else {
announce "In ' Zombie Vs. Novice ' has won" + strcharinfo (0) + "! We congratulate her!",0; 
};
getitem 7539,2;
warp "prontera",154,95;
sleep2 250;
disablenpc "Prize";
end;
}

prontera,156,73,3	script	Novice vs. Zombie	1015,{
if (BaseLevel > 1) goto NO;
if (class == 0) goto event;
if (class > 0) goto NO;
event:
mes "[^0000FFZombie Vs. Novice^000000]";
mes "You wish to get on Event Zombie Vs. Novice?";
next;
switch(select("Yes","No")) {
case 1:
sc_end SC_ALL;
sc_start SC_DECREASEAGI,300000,10;
percentheal 100,100;
nude;
atcommand "@storeall";
warp "quiz_01",42,369;
end;
break;
case 2:
mes "[^0000FFZombie Vs. Novice^000000]";
mes "It is good, come, when want.";
close;
break;
NO:
mes "[^0000FFZombie Vs. Novice^000000]";
mes "You not novice 1 level";
close;
}
OnInit:
disablenpc "Novice vs. Zombie";
disablenpc "Prize";
disablenpc "Prize";
end;
}

July 4, 2015

also the exit button at the login windows doesn't work

July 4, 2015

as you can see some maps are paid to be able to be warped, I want to enable warp to lastmap, I want that it will check first if the map is paid, if it's paid then the user must pay first before he can be warped. using the lastmap warp

prontera,158,100,3	script	All in 1 Warper::Warper	859,{


mes "[Warp NPC]";
mes "Hi!, I can warp you to any Town, Field, or Dungeon you would like to go to.";
next;
mes "[Warp NPC]";
mes "Where would you like to be warped to?";
next;
menu	"Towns",town,"Fields",field,"Dungeons",dungeon;

town:
menu 	"Prontera (City Capital)",wprontera,
	//"Moscovia (Second Capital)",wmoscovia,
	"Alberta",walberta,
	//"Aldebaran",waldebaran,
	//"Amatsu",wamatsu,
	//"Ayothaya",wayot,
	//"Comodo",wcomodo,
	//"Einbech (Mining Village)",weinbech,
	//"Einbroch",weinbroch,
	"Geffen",wgeffen,
	//"Gonryun",wgonryun,
	//"Hugel",whugel,
	"Izlude",wizlude,
	//"Jawaii",wjawaii,
	//"Lighthalzen",wlighthalzen,
	//"Louyang",wlouyang,
	//"Lutie",wxmas,	
	"Morroc",wmorroc,
	//"Nameless Island",wnameless,
	//"Niflheim",wniflheim,
	"Payon",wpayon;
	//"Rachel",wafeltz,
	//"Thor Camp",wthorcamp,
	//"Veins",wveins,
	//"Yuno",wyuno,
	//"Umbala",wumbala;

field:
menu 	"Amatsu Fields",wamafild,
	"Ayothaya Fields",wayofild,
	"Comodo Fields",wcmdfild,
	"Einbroch Fields",weinfild,
	"Geffen Fields",wgeffild,
	"Gonryun Fields",wgonfild,
	"Hugel Fields",whufild,
	"Louyang Field",wloufild,
	"Lutie Field",wxmasfild,
	"Mjolnir Fields",wmjolnir,
	"Moscovia Fields",wmosc,
	"Niflheim Fields",wniffild,
	"Odin Temple",wodint,
	"Payon Forests",wpayfor,
	"Prontera Fields",wprtfild,
	"Rachel Fields",warunfild,
	"Sograt Deserts",wmocfild,
	"Umbala Fields",wumfild,
	"Veins Fields",wveinsfild,
	"Yuno Fields",wyunofild;

dungeon:
menu 	"Abbey, Cursed Monastery",wabbey,
	"Abyss Lakes",wabyss,
	"Amatsu Dungeon",ama,
	"Anthell",ant,
	"Ayothaya Dungeons",wayodun,
	"Beach Dungeon",beach,
	"Byalan Dungeon",byalan,
	"Clock Tower",CLOCKa,
	"Coal Mines",Coal,
	"Culverts",culvert,
	"Einbroch Dungeons",weindun,
	"Gefenia",gefenia,
	"Geffen Dungeon",geffen,
	"Glast Heim",glast,
	"Gonryun Dungeon",gon,
	"Hidden Dungeon",hidden,
	"Ice Dungeon",iced,
	"Juperos Dungeons",wjuper,
	"Kiel Dungeons",wkieldun,
	"Louyang Dungeons",wloudun,
	"Magma Dungeon",magma,
	"Moscovia Dungeon",wmosk,
	"Orc Dungeon",orc,
	"Payon Dungeon",payon,
	"Pyramids",pyramids,
	"Rachel Sanctuary",rachels,
	"Sphinx",sphinx,
	"Sunken Ship",sunken,
	"Thor Volcano",wthor,
	"Toy Factory",toy,
	"Turtle Dungeon",TURTLE,
	"Umbala Dungeons",wumdun;

gdungeon:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Baldur Guild Dungeon (Guild Dungeon 1)",dgldun1,
	"Luina Guild Dungeon (Guild Dungeon 2)",dgldun2,
	"Valkyrie Guild Dungeon (Guild Dungeon 3)",dgldun3,
	"Britoniah Guild Dungeon (Guild Dungeon 4)",dgldun4;

	lastmap:
	if(lastmap$=="") { mes "You have not warped anywhere yet!"; close; }
	warp lastmap$,lastx,lasty;
	end;



//-------------------------------
//          Fields
//-------------------------------

warunfild:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu 	"Rachel Field 1",drunfild1,
	"Rachel Field 2",drunfild2,
	"Rachel Field 3",drunfild3,
	"Rachel Field 4",drunfild4,
	"Rachel Field 5",drunfild5,
	"Rachel Field 6",drunfild6,
	"Rachel Field 7",drunfild7,
	"Rachel Field 8",drunfild8,
	"Rachel Field 9",drunfild9,
	"Rachel Field 10",drunfild10,
	"Rachel Field 11",drunfild11,
	"Rachel Field 12",drunfild12,
	"Rachel Field 13",drunfild13;

wgeffild:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu 	"Geffen Field 0",dgeffild00,
	"Geffen Field 1",dgeffild01,
	"Geffen Field 2",dgeffild02,
	"Geffen Field 3",dgeffild03,
	"Geffen Field 4",dgeffild04,
	"Geffen Field 5",dgeffild05,
	"Geffen Field 6",dgeffild06,
	"Geffen Field 7",dgeffild07,
	"Geffen Field 8",dgeffild08,
	"Geffen Field 9",dgeffild09,
	"Geffen Field 10",dgeffild10,
	"Geffen Field 11",dgeffild11,
	"Geffen Field 12",dgeffild12,
	"Geffen Field 13",dgeffild13,
	"Geffen Field 14",dgeffild14;

wmjolnir:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu 	"Mjolnir Field 1",dmjolnir1,
	"Mjolnir Field 2",dmjolnir2,
	"Mjolnir Field 3",dmjolnir3,
	"Mjolnir Field 4",dmjolnir4,
	"Mjolnir Field 5",dmjolnir5,
	"Mjolnir Field 6",dmjolnir6,
	"Mjolnir Field 7",dmjolnir7,
	"Mjolnir Field 8",dmjolnir8,
	"Mjolnir Field 9",dmjolnir9,
	"Mjolnir Field 10",dmjolnir10,
	"Mjolnir Field 11",dmjolnir11,
	"Mjolnir Field 12",dmjolnir12;

wmosc:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu 	"Moscovia Field 1",dmosc1,
	"Moscovia Field 2",dmosc2;
	

wmocfild:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu 	"Sograt Desert 1",dmocfild1,
	"Sograt Desert 2",dmocfild2,
	"Sograt Desert 3",dmocfild3,
	"Sograt Desert 4",dmocfild4,
	"Sograt Desert 5",dmocfild5,
	"Sograt Desert 6",dmocfild6,
	"Sograt Desert 7",dmocfild7,
	"Sograt Desert 8",dmocfild8,
	"Sograt Desert 9",dmocfild9,
	"Sograt Desert 10",dmocfild10,
	"Sograt Desert 11",dmocfild11,
	"Sograt Desert 12",dmocfild12,
	"Sograt Desert 13",dmocfild13,
	"Sograt Desert 14",dmocfild14,
	"Sograt Desert 15",dmocfild15,
	"Sograt Desert 16",dmocfild16,
	"Sograt Desert 17",dmocfild17,
	"Sograt Desert 18",dmocfild18,
	"Sograt Desert 19",dmocfild19;

wpayfor:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu 	"Payon Forest 1",dpayfild1,
	"Payon Forest 2",dpayfild2,
	"Payon Forest 3",dpayfild3,
	"Payon Forest 4",dpayfild4,
	"Payon Forest 5",dpayfild5,
	"Payon Forest 6",dpayfild6,
	"Payon Forest 7",dpayfild7,
	"Payon Forest 8",dpayfild8,
	"Payon Forest 9",dpayfild9,
	"Payon Forest 10",dpayfild10,
	"Payon Forest 11",dpayfild11;

wprtfild:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu 	"Prontera Field 1",dprtfild1,
	"Prontera Field 2",dprtfild2,
	"Prontera Field 3",dprtfild3,
	"Prontera Field 4",dprtfild4,
	"Prontera Field 5",dprtfild5,
	"Prontera Field 6",dprtfild6,
	"Prontera Field 7",dprtfild7,
	"Prontera Field 8",dprtfild8,
	"Prontera Field 9",dprtfild9,
	"Prontera Field 10",dprtfild10,
	"Prontera Field 11",dprtfild11;

wxmasfild:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu 	"Lutie Field 1",dxmasfild1;

wcmdfild:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu 	"Comodo Field 1",dcmdfild1,
	"Comodo Field 2",dcmdfild2,
	"Comodo Field 3",dcmdfild3,
	"Comodo Field 4",dcmdfild4,
	"Comodo Field 5",dcmdfild5,
	"Comodo Field 6",dcmdfild6,
	"Comodo Field 7",dcmdfild7,
	"Comodo Field 8",dcmdfild8,
	"Comodo Field 9",dcmdfild9;

wyunofild:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu 	"Yuno Field 1",dyunofild1,
	"Yuno Field 2",dyunofild2,
	"Yuno Field 3",dyunofild3,
	"Yuno Field 4",dyunofild4,
	"Yuno Field 5",dyunofild5,
	"Yuno Field 6",dyunofild6,
	"Yuno Field 7",dyunofild7,
	"Yuno Field 8",dyunofild8,
	"Yuno Field 9",dyunofild9,
	"Yuno Field 10",dyunofild10,
	"Yuno Field 11",dyunofild11,
	"Yuno Field 12",dyunofild12;

wamafild:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu 	"Amatsu Field 1",damafild1;

wgonfild:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu 	"Gonryun Field 1",dgonfild1;

wumfild:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu 	"Umbala Field 1",dumfild1,
	"Umbala Field 2",dumfild2,
	"Umbala Field 3",dumfild3,
	"Umbala Field 4",dumfild4;

wniffild:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu 	"Niflheim Field 1",dniffild1,
	"Niflheim Field 2",dniffild2;

wodint:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu 	"Odin Temple 1",wodtemp1,
	"Odin Temple 2",wodtemp2,
	"Odin Temple 3",wodtemp3;

wloufild:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu 	"Louyang Field 1",dloufild1;

wayofild:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu 	"Ayothaya Field 1",dayofild1,
	"Ayothaya Field 2",dayofild2;

weinfild:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu 	"Einbroch Field 1",deinfild1,
	"Einbroch Field 2",deinfild2,
	"Einbroch Field 3",deinfild3,
	"Einbroch Field 4",deinfild4,
	"Einbroch Field 5",deinfild5,
	"Einbroch Field 6",deinfild6,
	"Einbroch Field 7",deinfild7,
	"Einbroch Field 8",deinfild8,
	"Einbroch Field 9",deinfild9,
	"Einbroch Field 10",deinfild10;


whufild:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu 	"Hugel Field 1",dhufild1,
	"Hugel Field 2",dhufild2,
	"Hugel Field 3",dhufild3,
	"Hugel Field 4",dhufild4,
	"Hugel Field 5",dhufild5,
	"Hugel Field 6",dhufild6,
	"Hugel Field 7",dhufild7;

wveinsfild:
mes "[Warp NPC]";
mes "Please select a Field. You will be warped to the center of that map.";
next;
menu	"Veins Field 1",dvfild1,
	"Veins Field 2",dvfild2,
	"Veins Field 3",dvfild3,
	"Veins Field 4",dvfild4,
	"Veins Field 5",dvfild5,
	"Veins Field 6",dvfild6,
	"Veins Field 7",dvfild7;

//-------------------------------
//          Dungeons
//-------------------------------

wjuper:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",djuperos1,
	"Level 2",djuperos3,
	"Core",djuperos2;

wumdun:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Carpenter's Shop in the Tree",dumdun1,
	"Passage to a Foreign World",dumdun2,
	"Hvergermil's Fountain",dyggdrasil1;

wloudun:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"The Royal Tomb",dloudun1,
	"Inside the Royal Tomb",dloudun2,
	"Suei Long Gon",dloudun3;

wayodun:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Ancient Shrine Maze",dayodun1,
	"Inside Ancient Shrine",dayodun2;

weindun:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",deindun1,
	"Level 2",deindun2;


wabyss:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dabyss1,
	"Level 2",dabyss2,
	"Level 3",dabyss3;


wkieldun:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dkieldun1,
	"Level 2",dkieldun2;

ant:
	mes "[Warp NPC]";
	mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
	next;
menu 	"Level 1",danthell1,
	"Level 2",danthell2;

beach:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dbeach1,
	"Level 2",dbeach2,
	"Level 3",dbeach3;

byalan:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dbyalan1,
	"Level 2",dbyalan2,
	"Level 3",dbyalan3,
	"Level 4",dbyalan4,
	"Level 5",dbyalan5;
CLOCKa:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dclock1,
	"Level 2",dclock2,
	"Level 3",dclock3,
	"Level 4",dclock4,
	"Basement 1",dalde1,
	"Basement 2",dalde2,
	"Basement 3",dalde3,
	"Basement 4",dalde4;

Coal:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dcoal1,
	"Level 2",dcoal2,
	"Level 3",dcoal3;

culvert:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dculvert1,
	"Level 2",dculvert2,
	"Level 3",dculvert3,
	"Level 4",dculvert4;

geffen:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dgeffen1,
	"Level 2",dgeffen2,
	"Level 3",dgeffen3,
	"Level 4",dgeffen4;

glast:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Entrance",dglastent,
	"Castle 1",dglastcast1,
	"Castle 2",dglastcast2,
	"Chivalry 1",dglastchiv1,
	"Chivalry 2",dglastchiv2,
	"Churchyard",dglastyard,
	"Culvert 1",dglastcul1,
	"Culvert 2",dglastcul1,
	"Culvert 3",dglastcul3,
	"Culvert 4",dglastcul4,
	"St.Abbey",dglastchur,
	"Staircase Dungeon",dglaststep,
	"Underground Cave 1",dglastcave1,
	"Underground Cave 2",dglastcave2,
	"Underground Prison 1",dglastpris1,
	"Underground Prison 2",dglastpris2;

hidden:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dhidden1,
	"Level 2",dhidden2,
	"Level 3",dhidden3;

iced:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",diced1,
	"Level 2",diced2,
	"Level 3",diced3,
	"Level 4",diced4;

magma:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dmagma1,
	"Level 2",dmagma2;

wmosk:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dmosk1,
	"Level 2",dmosk2,
	"Level 3",dmosk3;

orc:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dorc1,
	"Level 2",dorc2;

payon:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dpayon1,
	"Level 2",dpayon2,
	"Level 3",dpayon3,
	"Level 4",dpayon4,
	"Level 5",dpayon5;

pyramids:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dpyramids1,
	"Level 2",dpyramids2,
	"Level 3",dpyramids3,
	"Level 4",dpyramids4,
	"Basement 1",dpyramidsb1,
	"Basement 2",dpyramidsb2;

sphinx:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dsphinx1,
	"Level 2",dsphinx2,
	"Level 3",dsphinx3,
	"Level 4",dsphinx4,
	"Level 5",dsphinx5;

sunken:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dsunken1,
	"Level 2",dsunken2;

toy:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dtoy1,
	"Level 2",dtoy2;

TURTLE:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Entrance",dturtleent,
	"Level 1",dturtle1,
	"Level 2",dturtle2,
	"Level 3",dturtle3;

ama:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dama1,
	"Level 2",dama2,
	"Level 3",dama3;

gon:
mes "[BWarp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dgon1,
	"Level 2",dgon2,
	"Level 3",dgon3;

gefenia:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dgefenia1,
	"Level 2",dgefenia2,
	"Level 3",dgefenia3,
	"Level 4",dgefenia4;

wthor:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dthor1,
	"Level 2",dthor2,
	"Level 3",dthor3;

rachels:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",drachel1,
	"Level 2",drachel2,
	"Level 3",drachel3,
	"Level 4",drachel4,		
	"Level 5",drachel5;

wabbey:
mes "[Warp NPC]";
mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
next;
menu 	"Level 1",dabbey1,
	"Level 2",dabbey2,
	"Level 3",dabbey3;



if(@menu == 2) {
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

	set lastmap$,"moc_fild22";
	set lastx,37;
	set lasty,195;
	warp "moc_fild22",37,195;
	end;
}

//-------------------------------
//          Town Warps
//-------------------------------

wafeltz: 
set lastmap$,"rachel"; 
set lastx,130; 
set lasty,111; 
warp "rachel.gat",130,111; 
end;
walberta:
set lastmap$,"alberta"; 
set lastx,106; 
set lasty,133; 
warp "alberta.gat",106,133; 
end;
waldebaran:
set lastmap$,"aldebaran"; 
set lastx,140; 
set lasty,115; 
warp "aldebaran.gat",140,115; 
end;
wamatsu:
set lastmap$,"amatsu"; 
set lastx,197; 
set lasty,89; 
warp "amatsu.gat",197,89; 
end;
wayot:
set lastmap$,"ayothaya"; 
set lastx,150; 
set lasty,113; 
warp "ayothaya.gat",150,113; 
end;
wcomodo:
set lastmap$,"comodo"; 
set lastx,205; 
set lasty,69; 
warp "comodo.gat",205,69; 
end;
weinbech:
set lastmap$,"einbech"; 
set lastx,190; 
set lasty,79; 
warp "einbech.gat",190,79; 
end;
weinbroch:
set lastmap$,"einbroch"; 
set lastx,178; 
set lasty,167; 
warp "einbroch.gat",178,167; 
end;
whugel:
set lastmap$,"hugel"; 
set lastx,94; 
set lasty,147; 
warp "hugel.gat",94,147; 
end;
wlighthalzen:
set lastmap$,"lighthalzen"; 
set lastx,159; 
set lasty,90; 
warp "lighthalzen.gat",159,90; 
end;
wgonryun:
set lastmap$,"gonryun"; 
set lastx,159; 
set lasty,117; 
warp "gonryun.gat",159,117; 
end;
wgeffen:
set lastmap$,"geffen"; 
set lastx,120; 
set lasty,64; 
warp "geffen.gat",120,64; 
end;
wizlude:
set lastmap$,"izlude"; 
set lastx,128; 
set lasty,87; 
warp "izlude.gat",128,87; 
end;
wxmas:
set lastmap$,"xmas"; 
set lastx,148; 
set lasty,131; 
warp "xmas.gat",148,131; 
end;
wjawaii:
set lastmap$,"jawaii"; 
set lastx,213; 
set lasty,230; 
warp "jawaii.gat",213,230; 
end;
wmorroc:
set lastmap$,"morocc"; 
set lastx,159; 
set lasty,91; 
warp "morocc.gat",159,91; 
end;
wnameless:
set lastmap$,"nameless_n"; 
set lastx,256; 
set lasty,215; 
warp "nameless_n.gat",256,215; 
end;
wniflheim:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"niflheim"; 
set lastx,85; 
set lasty,154; 
warp "niflheim.gat",85,154; 
end;
wpayon:
set lastmap$,"payon"; 
set lastx,156; 
set lasty,223; 
warp "payon.gat",156,223; 
end;
wprontera:
set lastmap$,"prontera"; 
set lastx,156; 
set lasty,183; 
warp "prontera.gat",156,183; 
end;
wyuno:
set lastmap$,"yuno"; 
set lastx,157; 
set lasty,165; 
warp "yuno.gat",157,165; 
end;
wumbala:
set lastmap$,"umbala"; 
set lastx,100; 
set lasty,159; 
warp "umbala.gat",100,159; 
end;
wlouyang:
set lastmap$,"louyang"; 
set lastx,218; 
set lasty,115; 
warp "louyang.gat",218,115; 
end;
wthorcamp:
set lastmap$,"thor_camp"; 
set lastx,254; 
set lasty,90; 
warp "thor_camp.gat",254,90; 
end;
wveins:
set lastmap$,"veins"; 
set lastx,215; 
set lasty,122; 
warp "veins.gat",215,122; 
end;
wmoscovia:
set lastmap$,"moscovia"; 
set lastx,223; 
set lasty,192; 
warp "moscovia.gat",223,192; 
end;

//-------------------------------
//        Dungeon Warps
//-------------------------------


dkieldun1:
set lastmap$,"kh_dun01"; 
set lastx,28; 
set lasty,226; 
warp "kh_dun01.gat",28,226; 
end;
dkieldun2:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"kh_dun02"; 
set lastx,41; 
set lasty,198; 
warp "kh_dun02.gat",41,198; 
end;
djuperos1:
set lastmap$,"juperos_01"; 
set lastx,53; 
set lasty,247; 
warp "juperos_01.gat",53,247; 
end;
djuperos3:
set lastmap$,"juperos_02"; 
set lastx,37; 
set lasty,63; 
warp "juperos_02.gat",37,63; 
end;
djuperos2:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"jupe_core"; 
set lastx,150; 
set lasty,285; 
warp "jupe_core.gat",150,285; 
end;
dumdun1:
set lastmap$,"um_dun01"; 
set lastx,42; 
set lasty,31; 
warp "um_dun01.gat",42,31; 
end;
dumdun2:
set lastmap$,"um_dun02"; 
set lastx,51; 
set lasty,25; 
warp "um_dun02.gat",51,25; 
end;
dloudun1:
set lastmap$,"lou_dun01"; 
set lastx,218; 
set lasty,196; 
warp "lou_dun01.gat",218,196; 
end;
dloudun2:
set lastmap$,"lou_dun02"; 
set lastx,282; 
set lasty,20; 
warp "lou_dun02.gat",282,20; 
end;
dloudun3:

mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;
set lastmap$,"lou_dun03"; 
set lastx,165; 
set lasty,38; 
warp "lou_dun03.gat",165,38; 
end;
dayodun1:
set lastmap$,"ayo_dun01"; 
set lastx,275; 
set lasty,19; 
warp "ayo_dun01.gat",275,19; 
end;
dayodun2:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"ayo_dun02"; 
set lastx,24; 
set lasty,26; 
warp "ayo_dun02.gat",24,26; 
end;
deindun1:
set lastmap$,"ein_dun01"; 
set lastx,22; 
set lasty,14; 
warp "ein_dun01.gat",22,14; 
end;
deindun2:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"ein_dun02"; 
set lastx,292; 
set lasty,290; 
warp "ein_dun02.gat",292,290; 
end;
dlhzdun1:
set lastmap$,"lhz_dun01"; 
set lastx,150; 
set lasty,228; 
warp "lhz_dun01.gat",150,228; 
end;
dlhzdun2:
set lastmap$,"lhz_dun02"; 
set lastx,150; 
set lasty,18; 
warp "lhz_dun02.gat",150,18; 
end;
dlhzdun3:
set lastmap$,"lhz_dun03"; 
set lastx,140; 
set lasty,133; 
warp "lhz_dun03.gat",140,133; 
end;
dabyss1:
set lastmap$,"abyss_01"; 
set lastx,192; 
set lasty,207; 
warp "abyss_01.gat",264,272; 
end;
dabyss2:
set lastmap$,"abyss_02"; 
set lastx,275; 
set lasty,270; 
warp "abyss_02.gat",275,270; 
end;
dabyss3:

mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;
set lastmap$,"abyss_03"; 
set lastx,116; 
set lasty,28; 
warp "abyss_03.gat",116,28; 
end;
dthat1:
set lastmap$,"tha_t01"; 
set lastx,150; 
set lasty,39; 
warp "tha_t01.gat",150,39; 
end;
dthat2:
set lastmap$,"tha_t02"; 
set lastx,150; 
set lasty,136; 
warp "tha_t02.gat",150,136; 
end;
dthat3:
set lastmap$,"tha_t03"; 
set lastx,220; 
set lasty,158; 
warp "tha_t03.gat",220,158; 
end;
dthat4:
set lastmap$,"tha_t04"; 
set lastx,59; 
set lasty,143; 
warp "tha_t04.gat",59,143; 
end;
dthat5:
set lastmap$,"tha_t05"; 
set lastx,62; 
set lasty,11; 
warp "tha_t05.gat",62,11; 
end;
dthat6:
set lastmap$,"tha_t06"; 
set lastx,89; 
set lasty,221; 
warp "tha_t06.gat",89,221; 
end;
dthat7:
set lastmap$,"tha_t07"; 
set lastx,35; 
set lasty,166; 
warp "tha_t07.gat",35,166; 
end;
dthat8:
set lastmap$,"tha_t08"; 
set lastx,93; 
set lasty,148; 
warp "tha_t08.gat",93,148; 
end;
dthat9:
set lastmap$,"tha_t09"; 
set lastx,29; 
set lasty,107; 
warp "tha_t09.gat",29,107; 
end;
dthat10:
set lastmap$,"tha_t10"; 
set lastx,159; 
set lasty,138; 
warp "tha_t10.gat",159,138; 
end;
dthat11:
set lastmap$,"tha_t11"; 
set lastx,19; 
set lasty,20; 
warp "tha_t11.gat",19,20; 
end;
dthat12:
set lastmap$,"tha_t12"; 
set lastx,130; 
set lasty,52; 
warp "tha_t12.gat",130,52; 
end;
danthell1:
set lastmap$,"anthell01"; 
set lastx,35; 
set lasty,262; 
warp "anthell01.gat",35,262; 
end;
danthell2:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"anthell02"; 
set lastx,168; 
set lasty,170; 
warp "anthell02.gat",168,170; 
end;
dbeach1:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"beach_dun"; 
set lastx,266; 
set lasty,67; 
warp "beach_dun.gat",266,67; 
end;
dbeach2:
set lastmap$,"beach_dun2"; 
set lastx,255; 
set lasty,244; 
warp "beach_dun2.gat",255,244; 
end;
dbeach3:
set lastmap$,"beach_dun3"; 
set lastx,23; 
set lasty,260; 
warp "beach_dun3.gat",23,260; 
end;
dbyalan1:
set lastmap$,"iz_dun00"; 
set lastx,168; 
set lasty,168; 
warp "iz_dun00.gat",168,168; 
end;
dbyalan2:
set lastmap$,"iz_dun01"; 
set lastx,253; 
set lasty,252; 
warp "iz_dun01.gat",253,252; 
end;
dbyalan3:
set lastmap$,"iz_dun02"; 
set lastx,236; 
set lasty,204; 
warp "iz_dun02.gat",236,204; 
end;
dbyalan4:
set lastmap$,"iz_dun03"; 
set lastx,32; 
set lasty,63; 
warp "iz_dun03.gat",32,63; 
end;
dbyalan5:
set lastmap$,"iz_dun04"; 
set lastx,26; 
set lasty,27; 
warp "iz_dun04.gat",26,27; 
end;
dalde1:
set lastmap$,"alde_dun01"; 
set lastx,297; 
set lasty,25; 
warp "alde_dun01.gat",297,25; 
end;
dalde2:
set lastmap$,"alde_dun02"; 
set lastx,127; 
set lasty,169; 
warp "alde_dun02.gat",127,169; 
end;
dalde3:
set lastmap$,"alde_dun03"; 
set lastx,277; 
set lasty,178; 
warp "alde_dun03.gat",277,178; 
end;
dalde4:
set lastmap$,"alde_dun04"; 
set lastx,268; 
set lasty,74; 
warp "alde_dun04.gat",268,74; 
end;
dclock1:
set lastmap$,"c_tower1"; 
set lastx,199; 
set lasty,159; 
warp "c_tower1.gat",199,159; 
end;
dclock2:
set lastmap$,"c_tower2"; 
set lastx,148; 
set lasty,283; 
warp "c_tower2.gat",148,283; 
end;
dclock3:
set lastmap$,"c_tower3"; 
set lastx,65; 
set lasty,147; 
warp "c_tower3.gat",65,147; 
end;
dclock4:
set lastmap$,"c_tower4"; 
set lastx,56; 
set lasty,155; 
warp "c_tower4.gat",56,155; 
end;
dcoal1:
set lastmap$,"mjo_dun01"; 
set lastx,52; 
set lasty,17; 
warp "mjo_dun01.gat",52,17; 
end;
dcoal2:
set lastmap$,"mjo_dun02"; 
set lastx,381; 
set lasty,343; 
warp "mjo_dun02.gat",381,343; 
end;
dcoal3:
set lastmap$,"mjo_dun03"; 
set lastx,302; 
set lasty,262; 
warp "mjo_dun03.gat",302,262; 
end;
dculvert1:
set lastmap$,"prt_sewb1"; 
set lastx,131; 
set lasty,247; 
warp "prt_sewb1.gat",131,247; 
end;
dculvert2:
set lastmap$,"prt_sewb2"; 
set lastx,19; 
set lasty,19; 
warp "prt_sewb2.gat",19,19; 
end;
dculvert3:
set lastmap$,"prt_sewb3"; 
set lastx,180; 
set lasty,169; 
warp "prt_sewb3.gat",180,169; 
end;
dculvert4:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"prt_sewb4"; 
set lastx,100; 
set lasty,92; 
warp "prt_sewb4.gat",100,92; 
end;
dgeffen1:
set lastmap$,"gef_dun00"; 
set lastx,104; 
set lasty,99; 
warp "gef_dun00.gat",104,99; 
end;
dgeffen2:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"gef_dun01"; 
set lastx,115; 
set lasty,236; 
warp "gef_dun01.gat",115,236; 
end;
dgeffen3:

mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;
set lastmap$,"gef_dun02"; 
set lastx,106; 
set lasty,132; 
warp "gef_dun02.gat",106,132; 
end;
dgeffen4:
set lastmap$,"gef_dun03"; 
set lastx,203; 
set lasty,200; 
warp "gef_dun03.gat",203,200; 
end;
dglastent:
set lastmap$,"glast_01"; 
set lastx,370; 
set lasty,304; 
warp "glast_01.gat",370,304; 
end;
dglastcast1:
set lastmap$,"gl_cas01"; 
set lastx,199; 
set lasty,29; 
warp "gl_cas01.gat",199,29; 
end;
dglastcast2:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;
set lastmap$,"gl_cas02"; 
set lastx,104; 
set lasty,25; 
warp "gl_cas02.gat",104,25; 
end;
dglastchiv1:
set lastmap$,"gl_knt01"; 
set lastx,150; 
set lasty,15; 
warp "gl_knt01.gat",150,15; 
end;
dglastchiv2:
set lastmap$,"gl_knt02"; 
set lastx,157; 
set lasty,287; 
warp "gl_knt02.gat",157,287; 
end;
dglastyard:

mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;
set lastmap$,"gl_chyard"; 
set lastx,147; 
set lasty,15; 
warp "gl_chyard.gat",147,15; 
end;
dglastcul1:
set lastmap$,"gl_sew01"; 
set lastx,258; 
set lasty,255; 
warp "gl_sew01.gat",258,255; 
end;
dglastcul2:
set lastmap$,"gl_sew02"; 
set lastx,108; 
set lasty,291; 
warp "gl_sew02.gat",108,291; 
end;
dglastcul3:
set lastmap$,"gl_sew03"; 
set lastx,171; 
set lasty,283; 
warp "gl_sew03.gat",171,283; 
end;
dglastcul4:
set lastmap$,"gl_sew04"; 
set lastx,68; 
set lasty,277; 
warp "gl_sew04.gat",68,277; 
end;
dglastchur:
set lastmap$,"gl_church"; 
set lastx,156; 
set lasty,7; 
warp "gl_church.gat",156,7; 
end;
dglaststep:
set lastmap$,"gl_step"; 
set lastx,12; 
set lasty,7; 
warp "gl_step.gat",12,7; 
end;
dglastcave1:
set lastmap$,"gl_dun01"; 
set lastx,133; 
set lasty,271; 
warp "gl_dun01.gat",133,271; 
end;
dglastcave2:
set lastmap$,"gl_dun02"; 
set lastx,224; 
set lasty,274; 
warp "gl_dun02.gat",224,274; 
end;
dglastpris1:
set lastmap$,"gl_prison"; 
set lastx,14; 
set lasty,70; 
warp "gl_prison.gat",14,70; 
end;
dglastpris2:
set lastmap$,"gl_prison1"; 
set lastx,150; 
set lasty,14; 
warp "gl_prison1.gat",150,14; 
end;
dhidden1:
set lastmap$,"prt_maze01"; 
set lastx,176; 
set lasty,7; 
warp "prt_maze01.gat",176,7; 
end;
dhidden2:
set lastmap$,"prt_maze02"; 
set lastx,94; 
set lasty,9; 
warp "prt_maze02.gat",93,20; 
end;
dhidden3:

mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;
set lastmap$,"prt_maze03"; 
set lastx,23; 
set lasty,8; 
warp "prt_maze03.gat",23,8; 
end;
diced1:
set lastmap$,"ice_dun01"; 
set lastx,157; 
set lasty,14; 
warp "ice_dun01.gat",157,14; 
end;
diced2:
set lastmap$,"ice_dun02"; 
set lastx,151; 
set lasty,155; 
warp "ice_dun02.gat",151,155; 
end;
diced3:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"ice_dun03"; 
set lastx,149; 
set lasty,22; 
warp "ice_dun03.gat",149,22; 
end;
diced4:
set lastmap$,"ice_dun04"; 
set lastx,33; 
set lasty,158; 
warp "ice_dun04.gat",33,158; 
end;
dmagma1:
set lastmap$,"mag_dun01"; 
set lastx,126; 
set lasty,68; 
warp "mag_dun01.gat",126,68; 
end;
dmagma2:
set lastmap$,"mag_dun02"; 
set lastx,47; 
set lasty,30; 
warp "mag_dun02.gat",47,30; 
end;
dmosk1:
set lastmap$,"mosk_dun01"; 
set lastx,189; 
set lasty,46; 
warp "mosk_dun01.gat",189,46; 
end;
dmosk2:
set lastmap$,"mosk_dun02"; 
set lastx,163; 
set lasty,33; 
warp "mosk_dun02.gat",163,33; 
end;
dmosk3:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"mosk_dun03"; 
set lastx,33; 
set lasty,136; 
warp "mosk_dun03.gat",33,136; 
end;
dorc1:
set lastmap$,"orcsdun01"; 
set lastx,32; 
set lasty,170; 
warp "orcsdun01.gat",32,170; 
end;
dorc2:
set lastmap$,"orcsdun02"; 
set lastx,21; 
set lasty,185; 
warp "orcsdun02.gat",21,185; 
end;
dpayon1:
set lastmap$,"pay_dun00"; 
set lastx,21; 
set lasty,183; 
warp "pay_dun00.gat",21,183; 
end;
dpayon2:
set lastmap$,"pay_dun01"; 
set lastx,19; 
set lasty,33; 
warp "pay_dun01.gat",19,33; 
end;
dpayon3:
set lastmap$,"pay_dun02"; 
set lastx,19; 
set lasty,63; 
warp "pay_dun02.gat",19,63; 
end;
dpayon4:
set lastmap$,"pay_dun03"; 
set lastx,155; 
set lasty,159; 
warp "pay_dun03.gat",155,159; 
end;
dpayon5:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"pay_dun04"; 
set lastx,201; 
set lasty,204; 
warp "pay_dun04.gat",201,204; 
end;
dpyramids1:
set lastmap$,"moc_pryd01"; 
set lastx,192; 
set lasty,9; 
warp "moc_pryd01.gat",192,9; 
end;
dpyramids2:
set lastmap$,"moc_pryd02"; 
set lastx,10; 
set lasty,192; 
warp "moc_pryd02.gat",10,192; 
end;
dpyramids3:
set lastmap$,"moc_pryd03"; 
set lastx,100; 
set lasty,92; 
warp "moc_pryd03.gat",100,92; 
end;
dpyramids4:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"moc_pryd04"; 
set lastx,181; 
set lasty,11; 
warp "moc_pryd04.gat",181,11; 
end;
dpyramidsb1:
set lastmap$,"moc_pryd05"; 
set lastx,94; 
set lasty,96; 
warp "moc_pryd05.gat",94,96; 
end;
dpyramidsb2:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;
set lastmap$,"moc_pryd06"; 
set lastx,192; 
set lasty,8; 
warp "moc_pryd06.gat",192,8; 
end;
dsphinx1:
set lastmap$,"in_sphinx1"; 
set lastx,288; 
set lasty,9; 
warp "in_sphinx1.gat",288,9; 
end;
dsphinx2:
set lastmap$,"in_sphinx2"; 
set lastx,149; 
set lasty,81; 
warp "in_sphinx2.gat",149,81; 
end;
dsphinx3:
set lastmap$,"in_sphinx3"; 
set lastx,210; 
set lasty,54; 
warp "in_sphinx3.gat",210,54; 
end;
dsphinx4:
set lastmap$,"in_sphinx4"; 
set lastx,10; 
set lasty,222; 
warp "in_sphinx4.gat",10,222; 
end;
dsphinx5:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"in_sphinx5"; 
set lastx,100; 
set lasty,99; 
warp "in_sphinx5.gat",100,99; 
end;
dsunken1:
set lastmap$,"treasure01"; 
set lastx,69; 
set lasty,24; 
warp "treasure01.gat",69,24; 
end;
dsunken2:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"treasure02"; 
set lastx,102; 
set lasty,27; 
warp "treasure02.gat",102,27; 
end;
dtoy1:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"xmas_dun01"; 
set lastx,205; 
set lasty,15; 
warp "xmas_dun01.gat",205,15; 
end;
dtoy2:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"xmas_dun02"; 
set lastx,129; 
set lasty,133; 
warp "xmas_dun02.gat",129,133; 
end;
dturtleent:
set lastmap$,"tur_dun01"; 
set lastx,154; 
set lasty,49; 
warp "tur_dun01.gat",154,49; 
end;
dturtle1:
set lastmap$,"tur_dun02"; 
set lastx,148; 
set lasty,261; 
warp "tur_dun02.gat",148,261; 
end;
dturtle2:
set lastmap$,"tur_dun03"; 
set lastx,132; 
set lasty,189; 
warp "tur_dun03.gat",132,189; 
end;
dturtle3:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"tur_dun04"; 
set lastx,100; 
set lasty,192; 
warp "tur_dun04.gat",100,192; 
end;
dama1:
set lastmap$,"ama_dun01"; 
set lastx,228; 
set lasty,11; 
warp "ama_dun01.gat",228,11; 
end;
dama2:
set lastmap$,"ama_dun02"; 
set lastx,34; 
set lasty,41; 
warp "ama_dun02.gat",34,41; 
end;
dama3:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"ama_dun03"; 
set lastx,119; 
set lasty,14; 
warp "ama_dun03.gat",119,14; 
end;
dgon1:
set lastmap$,"gon_dun01"; 
set lastx,153; 
set lasty,53; 
warp "gon_dun01.gat",153,53; 
end;
dgon2:
set lastmap$,"gon_dun02"; 
set lastx,28; 
set lasty,113; 
warp "gon_dun02.gat",28,113; 
end;
dgon3:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"gon_dun03"; 
set lastx,68; 
set lasty,16; 
warp "gon_dun03.gat",68,16; 
end;
dgefenia1:
set lastmap$,"gefenia01"; 
set lastx,40; 
set lasty,103; 
warp "gefenia01.gat",40,103; 
end;
dgefenia2:
set lastmap$,"gefenia02"; 
set lastx,203; 
set lasty,34; 
warp "gefenia02.gat",203,34; 
end;
dgefenia3:
set lastmap$,"gefenia03"; 
set lastx,266; 
set lasty,168; 
warp "gefenia03.gat",266,168; 
end;
dgefenia4:
set lastmap$,"gefenia04"; 
set lastx,130; 
set lasty,272; 
warp "gefenia04.gat",130,272; 
end;
dgldun1:
set lastmap$,"gld_dun01"; 
set lastx,119; 
set lasty,93; 
warp "gld_dun01.gat",119,93; 
end;
dgldun2:
set lastmap$,"gld_dun02"; 
set lastx,39; 
set lasty,161; 
warp "gld_dun02.gat",39,161; 
end;
dgldun3:
set lastmap$,"gld_dun03"; 
set lastx,50; 
set lasty,44; 
warp "gld_dun03.gat",50,44; 
end;
dgldun4:
set lastmap$,"gld_dun04"; 
set lastx,116; 
set lasty,45; 
warp "gld_dun04.gat",116,45; 
end;
casino:
set lastmap$,"cmd_in02"; 
set lastx,179; 
set lasty,129; 
warp "cmd_in02.gat",179,129; 
end;
dthor1:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"thor_v01"; 
set lastx,21; 
set lasty,228; 
warp "thor_v01.gat",21,228; 
end;
dthor2:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"thor_v02"; 
set lastx,75; 
set lasty,205; 
warp "thor_v02.gat",75,205; 
end;
dthor3:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"thor_v03"; 
set lastx,34; 
set lasty,272; 
warp "thor_v03.gat",34,272; 
end;
drachel1:
set lastmap$,"ra_san01"; 
set lastx,140; 
set lasty,11; 
warp "ra_san01.gat",140,11; 
end;
drachel2:
set lastmap$,"ra_san02"; 
set lastx,32; 
set lasty,21; 
warp "ra_san02.gat",32,21; 
end;
drachel3:
set lastmap$,"ra_san03"; 
set lastx,10; 
set lasty,149; 
warp "ra_san03.gat",10,149; 
end;
drachel4:
set lastmap$,"ra_san04"; 
set lastx,204; 
set lasty,218; 
warp "ra_san04.gat",204,218; 
end;
drachel5:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"ra_san05"; 
set lastx,150; 
set lasty,9; 
warp "ra_san05.gat",150,9; 
end;
dabbey1:
set lastmap$,"abbey01"; 
set lastx,51; 
set lasty,14; 
warp "abbey01.gat",51,14; 
end;
dabbey2:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"abbey02"; 
set lastx,150; 
set lasty,11; 
warp "abbey02.gat",150,11; 
end;
dabbey3:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"abbey03"; 
set lastx,120; 
set lasty,10; 
warp "abbey03.gat",120,10; 
end;

//-------------------------------
//         Field Warps
//-------------------------------

drunfild1:
set lastmap$,"ra_fild01"; 
set lastx,192; 
set lasty,162; 
warp "ra_fild01.gat",192,162; 
end;
drunfild2:

mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;
set lastmap$,"ra_fild02"; 
set lastx,235; 
set lasty,166; 
warp "ra_fild02.gat",235,166; 
end;
drunfild3:

mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;
set lastmap$,"ra_fild03"; 
set lastx,202; 
set lasty,206; 
warp "ra_fild03.gat",202,206; 
end;
drunfild4:

mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;
set lastmap$,"ra_fild04"; 
set lastx,202; 
set lasty,208; 
warp "ra_fild04.gat",202,208; 
end;
drunfild5:
set lastmap$,"ra_fild05"; 
set lastx,225; 
set lasty,202; 
warp "ra_fild05.gat",225,202; 
end;
drunfild6:
set lastmap$,"ra_fild06"; 
set lastx,202; 
set lasty,214; 
warp "ra_fild06.gat",202,214; 
end;
drunfild7:
set lastmap$,"ra_fild07"; 
set lastx,263; 
set lasty,196; 
warp "ra_fild07.gat",263,196; 
end;
drunfild8:
set lastmap$,"ra_fild08"; 
set lastx,217; 
set lasty,201; 
warp "ra_fild08.gat",217,201; 
end;
drunfild9:
set lastmap$,"ra_fild09"; 
set lastx,87; 
set lasty,121; 
warp "ra_fild09.gat",87,121; 
end;
drunfild10:
set lastmap$,"ra_fild10"; 
set lastx,277; 
set lasty,181; 
warp "ra_fild10.gat",277,181; 
end;
drunfild11:
set lastmap$,"ra_fild11"; 
set lastx,221; 
set lasty,185; 
warp "ra_fild11.gat",221,185; 
end;
drunfild12:
set lastmap$,"ra_fild12"; 
set lastx,175; 
set lasty,200; 
warp "ra_fild12.gat",175,200; 
end;
drunfild13:
set lastmap$,"ra_fild13"; 
set lastx,174; 
set lasty,197; 
warp "ra_fild13.gat",174,197; 
end;
dgeffild00:
set lastmap$,"gef_fild00"; 
set lastx,46; 
set lasty,199; 
warp "gef_fild00.gat",46,199; 
end;
dgeffild01:
set lastmap$,"gef_fild01"; 
set lastx,213; 
set lasty,204; 
warp "gef_fild01.gat",213,204; 
end;
dgeffild02:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"gef_fild02"; 
set lastx,195; 
set lasty,212; 
warp "gef_fild02.gat",195,212; 
end;
dgeffild03:
set lastmap$,"gef_fild03"; 
set lastx,257; 
set lasty,192; 
warp "gef_fild03.gat",257,192; 
end;
dgeffild04:
set lastmap$,"gef_fild04"; 
set lastx,188; 
set lasty,171; 
warp "gef_fild04.gat",188,171; 
end;
dgeffild05:
set lastmap$,"gef_fild05"; 
set lastx,166; 
set lasty,263; 
warp "gef_fild05.gat",166,263; 
end;
dgeffild06:
set lastmap$,"gef_fild06"; 
set lastx,248; 
set lasty,158; 
warp "gef_fild06.gat",248,158; 
end;
dgeffild07:
set lastmap$,"gef_fild07"; 
set lastx,195; 
set lasty,191; 
warp "gef_fild07.gat",195,191; 
end;
dgeffild08:
set lastmap$,"gef_fild08"; 
set lastx,186; 
set lasty,183; 
warp "gef_fild08.gat",186,183; 
end;
dgeffild09:
set lastmap$,"gef_fild09"; 
set lastx,221; 
set lasty,117; 
warp "gef_fild09.gat",221,117; 
end;
dgeffild10:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"gef_fild10"; 
set lastx,178; 
set lasty,218; 
warp "gef_fild10.gat",178,218; 
end;
dgeffild11:
set lastmap$,"gef_fild11"; 
set lastx,136; 
set lasty,328; 
warp "gef_fild11.gat",136,328; 
end;
dgeffild12:
set lastmap$,"gef_fild12"; 
set lastx,240; 
set lasty,181; 
warp "gef_fild12.gat",240,181; 
end;
dgeffild13:
set lastmap$,"gef_fild13"; 
set lastx,235; 
set lasty,235; 
warp "gef_fild13.gat",235,235; 
end;
dgeffild14:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"gef_fild14"; 
set lastx,211; 
set lasty,185; 
warp "gef_fild14.gat",211,185; 
end;
dmjolnir1:
set lastmap$,"mjolnir_01"; 
set lastx,204; 
set lasty,120; 
warp "mjolnir_01.gat",204,120; 
end;
dmjolnir2:
set lastmap$,"mjolnir_02"; 
set lastx,175; 
set lasty,193; 
warp "mjolnir_02.gat",175,193; 
end;
dmjolnir3:
set lastmap$,"mjolnir_03"; 
set lastx,208; 
set lasty,213; 
warp "mjolnir_03.gat",208,213; 
end;
dmjolnir4:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"mjolnir_04"; 
set lastx,179; 
set lasty,180; 
warp "mjolnir_04.gat",179,180; 
end;
dmjolnir5:
set lastmap$,"mjolnir_05"; 
set lastx,181; 
set lasty,240; 
warp "mjolnir_05.gat",181,240; 
end;
dmjolnir6:
set lastmap$,"mjolnir_06"; 
set lastx,195; 
set lasty,270; 
warp "mjolnir_06.gat",195,270; 
end;
dmjolnir7:
set lastmap$,"mjolnir_07"; 
set lastx,235; 
set lasty,202; 
warp "mjolnir_07.gat",235,202; 
end;
dmjolnir8:
set lastmap$,"mjolnir_08"; 
set lastx,188; 
set lasty,215; 
warp "mjolnir_08.gat",188,215; 
end;
dmjolnir9:
set lastmap$,"mjolnir_09"; 
set lastx,205; 
set lasty,144; 
warp "mjolnir_09.gat",205,144; 
end;
dmjolnir10:
set lastmap$,"mjolnir_10"; 
set lastx,245; 
set lasty,223; 
warp "mjolnir_10.gat",245,223; 
end;
dmjolnir11:
set lastmap$,"mjolnir_11"; 
set lastx,180; 
set lasty,206; 
warp "mjolnir_11.gat",180,206; 
end;
dmjolnir12:
set lastmap$,"mjolnir_12"; 
set lastx,196; 
set lasty,208; 
warp "mjolnir_12.gat",196,208; 
end;
dmosc1:
set lastmap$,"mosk_fild01"; 
set lastx,99; 
set lasty,105; 
warp "mosk_fild01.gat",99,105; 
end;
dmosc2:
set lastmap$,"mosk_fild02"; 
set lastx,204; 
set lasty,59; 
warp "mosk_fild02.gat",204,59; 
end;
dmocfild1:
set lastmap$,"moc_fild01"; 
set lastx,219; 
set lasty,205; 
warp "moc_fild01.gat",219,205; 
end;
dmocfild2:
set lastmap$,"moc_fild02"; 
set lastx,177; 
set lasty,206; 
warp "moc_fild02.gat",177,206; 
end;
dmocfild3:
set lastmap$,"moc_fild03"; 
set lastx,194; 
set lasty,182; 
warp "moc_fild03.gat",194,182; 
end;
dmocfild4:
set lastmap$,"moc_fild04"; 
set lastx,184; 
set lasty,217; 
warp "moc_fild04.gat",184,217; 
end;
dmocfild5:
set lastmap$,"moc_fild05"; 
set lastx,203; 
set lasty,213; 
warp "moc_fild05.gat",203,213; 
end;
dmocfild6:
set lastmap$,"moc_fild06"; 
set lastx,213; 
set lasty,208; 
warp "moc_fild06.gat",213,208; 
end;
dmocfild7:
set lastmap$,"moc_fild07"; 
set lastx,224; 
set lasty,170; 
warp "moc_fild07.gat",224,170; 
end;
dmocfild8:
set lastmap$,"moc_fild08"; 
set lastx,229; 
set lasty,177; 
warp "moc_fild08.gat",229,177; 
end;
dmocfild9:
set lastmap$,"moc_fild09"; 
set lastx,195; 
set lasty,198; 
warp "moc_fild09.gat",195,198; 
end;
dmocfild10:
set lastmap$,"moc_fild10"; 
set lastx,209; 
set lasty,168; 
warp "moc_fild10.gat",209,168; 
end;
dmocfild11:
set lastmap$,"moc_fild11"; 
set lastx,198; 
set lasty,216; 
warp "moc_fild11.gat",198,216; 
end;
dmocfild12:
set lastmap$,"moc_fild12"; 
set lastx,156; 
set lasty,187; 
warp "moc_fild12.gat",156,187; 
end;
dmocfild13:
set lastmap$,"moc_fild13"; 
set lastx,185; 
set lasty,263; 
warp "moc_fild13.gat",185,263; 
end;
dmocfild14:
set lastmap$,"moc_fild14"; 
set lastx,209; 
set lasty,219; 
warp "moc_fild14.gat",209,219; 
end;
dmocfild15:
set lastmap$,"moc_fild15"; 
set lastx,223; 
set lasty,188; 
warp "moc_fild15.gat",223,188; 
end;
dmocfild16:
set lastmap$,"moc_fild16"; 
set lastx,206; 
set lasty,228; 
warp "moc_fild16.gat",206,228; 
end;
dmocfild17:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"moc_fild17"; 
set lastx,208; 
set lasty,238; 
warp "moc_fild17.gat",208,238; 
end;
dmocfild18:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;
set lastmap$,"moc_fild18"; 
set lastx,209; 
set lasty,223; 
warp "moc_fild18.gat",209,223; 
end;
dmocfild19:
set lastmap$,"moc_fild19"; 
set lastx,85; 
set lasty,97; 
warp "moc_fild19.gat",85,97; 
end;
dpayfild1:
set lastmap$,"pay_fild01"; 
set lastx,158; 
set lasty,206; 
warp "pay_fild01.gat",158,206; 
end;
dpayfild2:
set lastmap$,"pay_fild02"; 
set lastx,151; 
set lasty,219; 
warp "pay_fild02.gat",151,219; 
end;
dpayfild3:
set lastmap$,"pay_fild03"; 
set lastx,205; 
set lasty,148; 
warp "pay_fild03.gat",205,148; 
end;
dpayfild4:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"pay_fild04"; 
set lastx,186; 
set lasty,247; 
warp "pay_fild04.gat",186,247; 
end;
dpayfild5:
set lastmap$,"pay_fild05"; 
set lastx,134; 
set lasty,204; 
warp "pay_fild05.gat",134,204; 
end;
dpayfild6:
set lastmap$,"pay_fild06"; 
set lastx,193; 
set lasty,235; 
warp "pay_fild06.gat",193,235; 
end;
dpayfild7:
set lastmap$,"pay_fild07"; 
set lastx,200; 
set lasty,177; 
warp "pay_fild07.gat",200,177; 
end;
dpayfild8:
set lastmap$,"pay_fild08"; 
set lastx,137; 
set lasty,189; 
warp "pay_fild08.gat",137,189; 
end;
dpayfild9:
set lastmap$,"pay_fild09"; 
set lastx,201; 
set lasty,224; 
warp "pay_fild09.gat",201,224; 
end;
dpayfild10:
set lastmap$,"pay_fild10"; 
set lastx,160; 
set lasty,205; 
warp "pay_fild10.gat",160,205; 
end;
dpayfild11:
set lastmap$,"pay_fild11"; 
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastx,194; 
set lasty,150; 
warp "pay_fild11.gat",194,150; 
end;
dprtfild0:
set lastmap$,"prt_fild00"; 
set lastx,184; 
set lasty,235; 
warp "prt_fild00.gat",184,235; 
end;
dprtfild1:
set lastmap$,"prt_fild01"; 
set lastx,190; 
set lasty,206; 
warp "prt_fild01.gat",190,206; 
end;
dprtfild2:
set lastmap$,"prt_fild02"; 
set lastx,240; 
set lasty,206; 
warp "prt_fild02.gat",240,206; 
end;
dprtfild3:
set lastmap$,"prt_fild03"; 
set lastx,190; 
set lasty,143; 
warp "prt_fild03.gat",190,143; 
end;
dprtfild4:
set lastmap$,"prt_fild04"; 
set lastx,307; 
set lasty,252; 
warp "prt_fild04.gat",307,252; 
end;
dprtfild5:
set lastmap$,"prt_fild05"; 
set lastx,239; 
set lasty,213; 
warp "prt_fild05.gat",239,213; 
end;
dprtfild6:
set lastmap$,"prt_fild06"; 
set lastx,185; 
set lasty,188; 
warp "prt_fild06.gat",185,188; 
end;
dprtfild7:
set lastmap$,"prt_fild07"; 
set lastx,193; 
set lasty,194; 
warp "prt_fild07.gat",193,194; 
end;
dprtfild8:
set lastmap$,"prt_fild08"; 
set lastx,187; 
set lasty,218; 
warp "prt_fild08.gat",187,218; 
end;
dprtfild9:
set lastmap$,"prt_fild09"; 
set lastx,210; 
set lasty,183; 
warp "prt_fild09.gat",210,183; 
end;
dprtfild10:
set lastmap$,"prt_fild10"; 
set lastx,195; 
set lasty,149; 
warp "prt_fild10.gat",195,149; 
end;
dprtfild11:
set lastmap$,"prt_fild11"; 
set lastx,198; 
set lasty,164; 
warp "prt_fild11.gat",198,164; 
end;
dxmasfild1:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"xmas_fild01"; 
set lastx,115; 
set lasty,145; 
warp "xmas_fild01.gat",115,145; 
end;
dcmdfild1:
set lastmap$,"cmd_fild01"; 
set lastx,180; 
set lasty,178; 
warp "cmd_fild01.gat",180,178; 
end;
dcmdfild2:
set lastmap$,"cmd_fild02"; 
set lastx,231; 
set lasty,160; 
warp "cmd_fild02.gat",231,160; 
end;
dcmdfild3:
set lastmap$,"cmd_fild03"; 
set lastx,191; 
set lasty,172; 
warp "cmd_fild03.gat",191,172; 
end;
dcmdfild4:
set lastmap$,"cmd_fild04"; 
set lastx,228; 
set lasty,194; 
warp "cmd_fild04.gat",228,194; 
end;
dcmdfild5:
set lastmap$,"cmd_fild05"; 
set lastx,224; 
set lasty,203; 
warp "cmd_fild05.gat",224,203; 
end;
dcmdfild6:
set lastmap$,"cmd_fild06"; 
set lastx,190; 
set lasty,223; 
warp "cmd_fild06.gat",190,223; 
end;
dcmdfild7:
set lastmap$,"cmd_fild07"; 
set lastx,234; 
set lasty,177; 
warp "cmd_fild07.gat",234,177; 
end;
dcmdfild8:
set lastmap$,"cmd_fild08"; 
set lastx,194; 
set lasty,175; 
warp "cmd_fild08.gat",194,175; 
end;
dcmdfild9:
set lastmap$,"cmd_fild09"; 
set lastx,172; 
set lasty,172; 
warp "cmd_fild09.gat",172,172; 
end;
dyunofild1:
set lastmap$,"yuno_fild01"; 
set lastx,189; 
set lasty,224; 
warp "yuno_fild01.gat",189,224; 
end;
dyunofild2:
set lastmap$,"yuno_fild02"; 
set lastx,192; 
set lasty,207; 
warp "yuno_fild02.gat",192,207; 
end;
dyunofild3:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"yuno_fild03"; 
set lastx,221; 
set lasty,157; 
warp "yuno_fild03.gat",221,157; 
end;
dyunofild4:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;
set lastmap$,"yuno_fild04"; 
set lastx,226; 
set lasty,199; 
warp "yuno_fild04.gat",226,199; 
end;
dyunofild5:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"yuno_fild05"; 
set lastx,223; 
set lasty,177; 
warp "yuno_fild05.gat",223,177; 
end;
dyunofild6:
set lastmap$,"yuno_fild06"; 
set lastx,187; 
set lasty,232; 
warp "yuno_fild06.gat",187,232; 
end;
dyunofild7:
set lastmap$,"yuno_fild07"; 
set lastx,231; 
set lasty,174; 
warp "yuno_fild07.gat",231,174; 
end;
dyunofild8:
set lastmap$,"yuno_fild08"; 
set lastx,196; 
set lasty,203; 
warp "yuno_fild08.gat",196,203; 
end;
dyunofild9:
set lastmap$,"yuno_fild09"; 
set lastx,183; 
set lasty,214; 
warp "yuno_fild09.gat",183,214; 
end;
dyunofild10:
set lastmap$,"yuno_fild10"; 
set lastx,200; 
set lasty,124; 
warp "yuno_fild10.gat",200,124; 
end;
dyunofild11:
set lastmap$,"yuno_fild11"; 
set lastx,195; 
set lasty,226; 
warp "yuno_fild11.gat",195,226; 
end;
dyunofild12:
set lastmap$,"yuno_fild12"; 
set lastx,210; 
set lasty,304; 
warp "yuno_fild12.gat",210,304; 
end;
damafild1:
set lastmap$,"ama_fild01"; 
set lastx,190; 
set lasty,197; 
warp "ama_fild01.gat",190,197; 
end;
dgonfild1:
set lastmap$,"gon_fild01"; 
set lastx,220; 
set lasty,227; 
warp "gon_fild01.gat",220,227; 
end;
dumfild1:
set lastmap$,"um_fild01"; 
set lastx,217; 
set lasty,206; 
warp "um_fild01.gat",217,206; 
end;
dumfild2:
set lastmap$,"um_fild02"; 
set lastx,223; 
set lasty,221; 
warp "um_fild02.gat",223,221; 
end;
dumfild3:
set lastmap$,"um_fild03"; 
set lastx,237; 
set lasty,215; 
warp "um_fild03.gat",237,215; 
end;
dumfild4:
set lastmap$,"um_fild04"; 
set lastx,202; 
set lasty,197; 
warp "um_fild04.gat",202,197; 
end;
dniffild1:
set lastmap$,"nif_fild01"; 
set lastx,215; 
set lasty,229; 
warp "nif_fild01.gat",215,229; 
end;
dniffild2:
set lastmap$,"nif_fild02"; 
set lastx,167; 
set lasty,234; 
warp "nif_fild02.gat",167,234; 
end;
dyggdrasil1:
set lastmap$,"yggdrasil01"; 
set lastx,204; 
set lasty,78; 
warp "yggdrasil01.gat",204,78; 
end;
dloufild1:
set lastmap$,"lou_fild01"; 
set lastx,229; 
set lasty,187; 
warp "lou_fild01.gat",229,187; 
end;
dayofild1:
set lastmap$,"ayo_fild01"; 
set lastx,173; 
set lasty,134; 
warp "ayo_fild01.gat",173,134; 
end;
dayofild2:
set lastmap$,"ayo_fild02"; 
set lastx,212; 
set lasty,150; 
warp "ayo_fild02.gat",212,150; 
end;
deinfild1:
set lastmap$,"ein_fild01"; 
set lastx,142; 
set lasty,225; 
warp "ein_fild01.gat",142,225; 
end;
deinfild2:
set lastmap$,"ein_fild02"; 
set lastx,182; 
set lasty,141; 
warp "ein_fild02.gat",182,141; 
end;
deinfild3:
set lastmap$,"ein_fild03"; 
set lastx,187; 
set lasty,228; 
warp "ein_fild03.gat",187,228; 
end;
deinfild4:
set lastmap$,"ein_fild04"; 
set lastx,185; 
set lasty,173; 
warp "ein_fild04.gat",185,173; 
end;
deinfild5:
set lastmap$,"ein_fild05"; 
set lastx,216; 
set lasty,173; 
warp "ein_fild05.gat",216,173; 
end;
deinfild6:
set lastmap$,"ein_fild06"; 
set lastx,195; 
set lasty,148; 
warp "ein_fild06.gat",195,148; 
end;
deinfild7:
set lastmap$,"ein_fild07"; 
set lastx,272; 
set lasty,220; 
warp "ein_fild07.gat",272,220; 
end;
deinfild8:
set lastmap$,"ein_fild08"; 
set lastx,173; 
set lasty,214; 
warp "ein_fild08.gat",173,214; 
end;
deinfild9:
set lastmap$,"ein_fild09"; 
set lastx,207; 
set lasty,174; 
warp "ein_fild09.gat",207,174; 
end;
deinfild10:
set lastmap$,"ein_fild10"; 
set lastx,196; 
set lasty,200; 
warp "ein_fild10.gat",196,200; 
end;
dlhzfild1:
set lastmap$,"lhz_fild01"; 
set lastx,240; 
set lasty,179; 
warp "lhz_fild01.gat",240,179; 
end;
dlhzfild2:
set lastmap$,"lhz_fild02"; 
set lastx,185; 
set lasty,235; 
warp "lhz_fild02.gat",185,235; 
end;
dlhzfild3:
set lastmap$,"lhz_fild03"; 
set lastx,240; 
set lasty,226; 
warp "lhz_fild03.gat",240,226; 
end;
dhufild1:
set lastmap$,"hu_fild01"; 
set lastx,268; 
set lasty,101; 
warp "hu_fild01.gat",268,101; 
end;
dhufild2:
set lastmap$,"hu_fild02"; 
set lastx,222; 
set lasty,193; 
warp "hu_fild02.gat",222,193; 
end;
dhufild3:
set lastmap$,"hu_fild03"; 
set lastx,232; 
set lasty,185; 
warp "hu_fild03.gat",232,185; 
end;
dhufild4:
set lastmap$,"hu_fild04"; 
set lastx,252; 
set lasty,189; 
warp "hu_fild04.gat",252,189; 
end;
dhufild5:
set lastmap$,"hu_fild05"; 
set lastx,196; 
set lasty,106; 
warp "hu_fild05.gat",196,106; 
end;
dhufild6:
set lastmap$,"hu_fild06"; 
set lastx,216; 
set lasty,220; 
warp "hu_fild06.gat",216,220; 
end;
dhufild7:
set lastmap$,"hu_fild07"; 
set lastx,227; 
set lasty,197; 
warp "hu_fild07.gat",227,197; 
end;
wodtemp1:
set lastmap$,"odin_tem01"; 
set lastx,298; 
set lasty,167; 
warp "odin_tem01.gat",298,167; 
end;
wodtemp2:
set lastmap$,"odin_tem02"; 
set lastx,224; 
set lasty,149; 
warp "odin_tem02.gat",224,149; 
end;
wodtemp3:
mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;

set lastmap$,"odin_tem03"; 
set lastx,266; 
set lasty,280; 
warp "odin_tem03.gat",266,280; 
end;
dvfild1:

mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;
set lastmap$,"ve_fild01"; 
set lastx,186; 
set lasty,175; 
warp "ve_fild01.gat",186,175; 
end;
dvfild2:

mes"It will cost 30,000 Zeny, do you want to continue?";
if( select("Yes:No") == 2 ) close;
if (Zeny < 10000){
		mes "Sorry you don't have enough Zeny.";
		end;
		}
 set zeny,zeny-30000;
set lastmap$,"ve_fild02"; 
set lastx,196; 
set lasty,370; 
warp "ve_fild02.gat",196,370; 
end;
dvfild3:
set lastmap$,"ve_fild03"; 
set lastx,222; 
set lasty,45; 
warp "ve_fild03.gat",222,45; 
end;
dvfild4:
set lastmap$,"ve_fild04"; 
set lastx,51; 
set lasty,250; 
warp "ve_fild04.gat",51,250; 
end;
dvfild5:
set lastmap$,"ve_fild05"; 
set lastx,202; 
set lasty,324; 
warp "ve_fild05.gat",202,324; 
end;
dvfild6:
set lastmap$,"ve_fild06"; 
set lastx,150; 
set lasty,223; 
warp "ve_fild06.gat",150,223; 
end;
dvfild7:
set lastmap$,"ve_fild07"; 
set lastx,149; 
set lasty,307; 
warp "ve_fild07.gat",149,307; 
end;
OnInit:
        waitingroom "[ Warper ]",0;
}


//---------------------
//Edit duplicates here!
//---------------------

rachel.gat,124,145,4	duplicate(Warper)	Warper#2-2	859
alberta,30,229,4	duplicate(Warper)	Warper#3-1	859
aldebaran,135,120,3	duplicate(Warper)	Warper#4-1	859
amatsu,190,86,1	duplicate(Warper)	Warper#5-1	859
ayothaya,147,123,6	duplicate(Warper)	Warper#6-1	859
comodo,198,148,4	duplicate(Warper)	Warper#37-1	859
einbech,196,83,4	duplicate(Warper)	Warper#8-1	859
einbroch,69,203,4	duplicate(Warper)	Warper#9-1	859
hugel,88,151,5	duplicate(Warper)	Warper#10-1	859
lighthalzen,165,94,6	duplicate(Warper)	Warper#11-1	859
geffen,116,59,0	duplicate(Warper)	Warper#12-1	859
izlude,122,94,3	duplicate(Warper)	Warper#13-1	859
xmas,149,136,4	duplicate(Warper)	Warper#14-1	859
morocc,159,97,4	duplicate(Warper)	Warper#15-1	859
payon,148,228,4	duplicate(Warper)	Warper#16-1	859
yuno,165,145,4	duplicate(Warper)	Warper#17-1	859
moc_fild04.gat,207,331,4	duplicate(Warper)	Warper#18-1	859
izlu2dun.gat,104,82,4	duplicate(Warper)	Warper#19-1	859
mjolnir_02.gat,85,363,4	duplicate(Warper)	Warper#20-1	859
prt_fild05.gat,273,215,4	duplicate(Warper)	Warper#21-1	859
glast_01.gat,370,308,4	duplicate(Warper)	Warper#22-1	859
yuno_fild03.gat,37,135,4	duplicate(Warper)	Warper#23-1	859
gef_fild10.gat,71,339,4	duplicate(Warper)	Warper#24-1	859
pay_arche.gat,39,135,4	duplicate(Warper)	Warper#25-1	859
moc_ruins.gat,64,166,4	duplicate(Warper)	Warper#26-1	859
moc_fild19.gat,106,97,4	duplicate(Warper)	Warper#27-1	859
alb2trea.gat,73,101,4	duplicate(Warper)	Warper#28-1	859
tur_dun01.gat,148,239,4	duplicate(Warper)	Warper#29-1	859
gonryun,162,122,4	duplicate(Warper)	Warper#30-1	859
louyang,221,120,4	duplicate(Warper)	Warper#31-1	859
umbala,95,159,4	duplicate(Warper)	Warper#32-1	859
moscovia,220,198,4	duplicate(Warper)	Warper#33-1	859
veins,217,127,4	duplicate(Warper)	Warper#34-1	859

July 3, 2015

why is it that every day +50% added to the exp mod. for example the original rate is 7x. then when friday comes, it will turn to 14x then when saturday comes it turned to 21x.

I want that when friday-sunday it will only turn to 14x

here is the script

-	script	FloatingRates	-1,{
OnInit:
OnClock0001:
	if(gettime(4)==4  || gettime(4)==5  || gettime(4)==6 ) {
		set .br,getbattleflag("base_exp_rate")*2;
		set .jr,getbattleflag("job_exp_rate")*2;
		setbattleflag("base_exp_rate"), .br;
		setbattleflag("job_exp_rate"), .jr;
		atcommand "@reloadmobdb";
		end;
	}
	if(gettime(4) == 0)
	{
		announce "Weekend Exp Event is finished",bc_all,0xFF6060;
		atcommand "@reloadbattleconf";
		atcommand "@reloadmobdb";
	}
	end;

OnMinute02:
	if(gettime(4)==4 || gettime(4)==5 || gettime(4)==6 )
	{
		announce "Weekend Exp Event(Base:"+.br/100+"x, Job:"+.jr/100+"x) is active!!",bc_all,0xFF6060;
	}
	end;
}

July 3, 2015

why is it that there is no character distribution when creating a character in client 2010-04-10?

July 1, 2015

How to remove the attribute effect when turned to costume. this is the diff I used

http://pastebin.com/T5Fqeyb1

the item effect is removed when turned to costume. but the attribute effect wasn't removed.

July 1, 2015

what to remove on the source code to prevent the player from sitting when @afk command is used

/*==========================================
* @afk
*------------------------------------------*/
ACMD_FUNC(afk) {
 
        nullpo_retr(-1, sd);
			
				if(sd->bl.m == map_mapname2mapid("payon")) {
				clif_displaymessage(fd, "@afk is not allowed on this map.");
				return 0;
				}
			
			if( pc_isdead(sd) ) {
				clif_displaymessage(fd, "Cannot @afk if you are dead.");
				return -1;
				}

                if( map[sd->bl.m].flag.autotrade == battle_config.autotrade_mapflag )
                {

                if(map[sd->bl.m].flag.pvp  || map[sd->bl.m].flag.gvg){
                clif_displaymessage(fd, "You may not use the @afk maps PVP or GVG.");
                return -1;}

                        sd->state.autotrade = 1;
                        sd->state.monster_ignore = 1;
			 			 pc_setsit(sd);
                      
                        
                        clif_specialeffect(&sd->bl, 234,AREA);                       
                        if( battle_config.afk_timeout )
                        {
                                int timeout = atoi(message);
                                status_change_start(NULL, &sd->bl, SC_AUTOTRADE, 10000,0,0,0,0, ((timeout > 0) ? min(timeout,battle_config.afk_timeout) : battle_config.afk_timeout)*60000,0);
                        }
                        clif_authfail_fd(fd, 15);
                } else
                        clif_displaymessage(fd, "@afk is not allowed on this map.");
        return 0;
}

June 30, 2015

My client works perfect. but after I patch my client for new custom items using thor patcher. then I try to login in game. It tell Failed to authenticate then failed to connect the server. what could be the problem? i'm using 20120410

June 28, 2015

what is the 2nd custom key you added?

June 23, 2015

parang ganyan yung starting dati ng waybackro ko. start kami sa episode 5. sa ngayon ok naman ang latest version ng rathena. ang kelangan mo lang talagang gawin dun is i edit yung mga monster respawn, item database. npc location. disabled ang renewal features. ang pinaka magiging problem mo lang sa old payon is yung mga location ng old npc mo. at pag sa client version naman. pwede mong gawin mo ung 2010 version client since classic server naman. or pwede din 2012-04-10 client mas stable para sa mga semi classic server.

sir brynner ask ko lng anong gnamit nyo na server side sa ragna nyo? pwede po ba ako humingi ng tulong?

salamat

Tanong ko lang. My website ba na andun lahat yung buong info per episode ng ragnarok? Nakikita kong mahirap gawin pag no idea ka kung ano meron example sa episode 5

meron naman po cguro sir glemor, prang mron na kc ako nkta na nndun lhat ng episode hnd ko lng sure kng datailed info sya

ang ginamit ko lang dati na server files is yung latest version ng rAmod nung year 2013. den inedit ko nalang yung features ng server. pati ung mga monster respawn at mga item drops nila. den nag disabled ng mga maps na hindi kasama sa episode 5. at mga item n hindi kasama s episode 5 tinanggal ko din.

pero ano yung basis mo na hindi talaga kasama sa episode 5 at kasama sa episode 5. ang hirap kasi pag aasa nalang sa kaalaman. maybe my website ka na guide? or?

June 22, 2015

Tanong ko lang. My website ba na andun lahat yung buong info per episode ng ragnarok? Nakikita kong mahirap gawin pag no idea ka kung ano meron example sa episode 5

June 22, 2015

Hey, Just managed to get it work!

I had some of the issues others had because the .diff was old.

After manually editing few lines, it worked for me.

These days you could just use/make the costume items in the item_db. Just like normal headgear except equipment's placement is different.

1024 = Costume Top Headgear

2048 = Costume Mid Headgear

4096 = Costume Low Headgear

But its nice functions for making just a quick costume change.

My commits at GitHub:

* https://github.com/Sehrentos/rathena/commit/92676a4f7440f0e87e221615612b0700aedeaa14

Here is my diff file:

rAthena commit hash: 1325e6889199aa3c4d89ade090398d225ab0147b

My commit hash: 92676a4f7440f0e87e221615612b0700aedeaa14

Date created: 29-30.4.2015

Link to diff: http://pastebin.com/T5Fqeyb1

How to apply a diff file in git?

1. Put the diff file in rathena root folder

2. Check what will be changed: git apply --check my_file_name.diff

3. Apply the changes in diff file: git apply my_file_name.diff

Remember to recompile when done.

I hope this helps

I managed to make this work, but how to remove the effect when turned to costume?

June 20, 2015

Thank you.

Got another question, Is it possible to use this ragnashield at the same time using also another gameguard? for example ragnashield+hashield or harmony?

June 20, 2015

Before the Gravity Error appeared. What are you trying to accomplish/ do?

June 20, 2015

Just a question, What if RagnaShield is currently Installed and implemented to a server, then the server owner want's to change it's gameguard. Can It change it without letting the players re download the whole lite or full client again?

June 20, 2015

I would like to ask what is the most Latest Stable/ Suggested Client Date. That everyone recommends? I can see that the pinned post regarding my question is already outdated.

December 24, 2014

how to remove the effect of costume item

December 20, 2014

_{the npc won't give the prize to the winner. but only announce the team winner}

_{how to fix}

//Author-Script		Goddameit	My forum : http://bit.ly/MDuQ9F	
//Author-Map		TrojanWorm
//Version		2012-10-31

//Don't re-release in anywhere and anyway

//////////////////////////////////////////////////////////////////////////

endless_war	mapflag	battleground	2
endless_war,218,86,0	script	#BattleGroundwarpA2	100,{
	end;
OnInit:
	waitingroom "Join Team A(Click)",2,"#BattleGroundwarpA2::OnJoin",1;
	end;
OnJoin:
	if(!$@bg_id_a)
		set $@bg_id_a,waitingroom2bg("endless_war",205,85,"","");
	else
		waitingroom2bg_single($@bg_id_a,"endless_war",205,85,"#BattleGroundwarpA2");
	warpwaitingpc "endless_war",205,85;
	end;
}
endless_war,40,86,0	script	#BattleGroundwarpB2	100,{
	end;
OnInit:
	waitingroom "Join Team B(Click)",2,"#BattleGroundwarpB2::OnJoin",1;
	end;
OnJoin:
	if(!$@bg_id_
		set $@bg_id_b,waitingroom2bg("endless_war",53,85,"","");
	else
	waitingroom2bg_single($@bg_id_b,"endless_war",53,85,"#BattleGroundwarpB2");
	warpwaitingpc "endless_war",53,85;
	end;
}
endless_war,165,86,0	script	#BattleGroundwarpA1	45,2,2,{
changelook 407,1;
	warp "endless_war",161,86;
	end;
}
endless_war,90,86,0	script	#BattleGroundwarpB1	45,2,2,{
			changelook 374,1;
	warp "endless_war",94,86;
	end;
}
prontera,150,180,4	script	Battle Ground	100,{
	if(.status==2)
	{
		mes "Game is running.";
		close;
	}
	if(.status==1)
	{
		
		if(.playernm>=128)
		{
			mes "Sorry, full";
			close;
		}
		select("Join");
		if(!.playerid[1])
		{
			//callsub OnEndd;
			initnpctimer;
		}
		set .playernm,.playernm+1;
		set .playerid[.playernm],getcharid(0);
		mes "Complete";
		mes "Please Prepare Yourself";
		mes "You Will be Warped Into the Battleground After a Few Minutes";
		close;
	}
	end;
OnClock0115:
OnClock0315:
OnClock0515:
OnClock0715:
OnClock0915:
OnClock1115:
OnClock1315:
OnClock1515:
OnClock1715:
OnClock1915:
OnClock2205:
OnClock2315:
	callsub OnActive;
	end;
OnActive:
	callsub OnEndd;
	set .status,1;
	Announce "[Battle Ground]:Someone active the game! Go to prontera,150,180 and join us!",0;
	end;
OnTimer60000:
	if(.playernm<=1)
	{
		Announce "[Battle Ground]:Sorry, player amount isn't enough",0;
		callsub OnEndd;
		end;
	}
	Announce "[Battle Ground]:Event is ready!",0;
	for(set .@i,1;.@i<=.playernm;set .@i,.@i+1)
	{
		if(.@i%2==0)
			warpchar "endless_war",218,86,.playerid[.@i];
		else
			warpchar "endless_war",40,86,.playerid[.@i];

			
	}
	callsub OnEnab2;
	end;
OnTimer90000:
	set .status,2;
	Announce "[Battle Ground]:Go!",0;
	bg_monster $@bg_id_a,"endless_war",128,120,"A",1907,"Battle Ground::OnAdestory";
	bg_monster $@bg_id_b,"endless_war",127,46,"B",1907,"Battle Ground::OnBdestory";
	callsub OnEnab1;
	end;
OnTimer100000:
	if(.point[1]>.point[2])
{
	for( set .@i,1; .playerid[.@i]; set .@i,.@i+1 )
	{
		if( attachrid(.playerid[.@i]) )
		{
			if( getcharid(4) == $@bg_id_a )
				getitem 7227,10;
		}
	}
	Announce "[Battle Ground]:Team A Win!",0;
}else if(.point[2]>.point[1])
	{
	for( set .@i,1; .playerid[.@i]; set .@i,.@i+1 )
	{
		if( attachrid(.playerid[.@i]) )
		{
			if( getcharid(4) == $@bg_id_b )
				getitem 7227,10;
		}
	}
		Announce "[Battle Ground]:Team B Win!",0;
	}else
	{
		Announce "[Battle Ground]:Draw!",0;
	}
	sleep2 3000;
	callsub OnEndd;	
	end;
OnBdestory:
	set .point[1],.point[1]+5;
	set .point[2],.point[2]-3;
	bg_updatescore "endless_war",.point[1],.point[2];
	detachrid;
	sleep2 10000;
	bg_monster $@bg_id_b,"endless_war",127,46,"B",1907,"Battle Ground::OnBdestory";
	end;
OnAdestory:
	set .point[2],.point[2]+5;
	set .point[1],.point[1]-3;
	bg_updatescore "endless_war",.point[1],.point[2];
	detachrid;
	sleep2 10000;
	bg_monster $@bg_id_a,"endless_war",128,120,"A",1907,"Battle Ground::OnAdestory";
	end;
OnEndd:
	set .status,0;
	bg_destroy $@bg_id_a;
	bg_destroy $@bg_id_b;
	set $@bg_id_a,0;
	set $@bg_id_b,0;
	setarray .point[1],0,0;
	killmonsterall "endless_war";
	bg_updatescore "endless_war",.point[1],.point[2];
	deletearray .playerid[0],128;
	mapwarp "endless_war","prontera",150,180;
	callsub OnDisa;
	return;
OnEnab1:
	enablenpc "#BattleGroundwarpA1";
	enablenpc "#BattleGroundwarpB1";
	return;
OnEnab2:
	enablenpc "#BattleGroundwarpA2";
	enablenpc "#BattleGroundwarpB2";
	return;
OnDisa:
	disablenpc "#BattleGroundwarpA1";
	disablenpc "#BattleGroundwarpB1";
	disablenpc "#BattleGroundwarpA2";
	disablenpc "#BattleGroundwarpB2";
	return;
OnInit:
	sleep2 10000;
	setwall "endless_war",218,87,1,1,0,"BattleGroundwarpA21";
	setwall "endless_war",219,87,1,1,0,"BattleGroundwarpA22";
	setwall "endless_war",219,86,1,1,0,"BattleGroundwarpA23";
	setwall "endless_war",219,85,1,1,0,"BattleGroundwarpA24";
	setwall "endless_war",218,85,1,1,0,"BattleGroundwarpA25";
	setwall "endless_war",217,85,1,1,0,"BattleGroundwarpA26";
	setwall "endless_war",217,86,1,1,0,"BattleGroundwarpA27";
	setwall "endless_war",217,87,1,1,0,"BattleGroundwarpA28";
	setwall "endless_war",40,87,1,1,0,"BattleGroundwarpB21";
	setwall "endless_war",41,87,1,1,0,"BattleGroundwarpB22";
	setwall "endless_war",41,86,1,1,0,"BattleGroundwarpB23";
	setwall "endless_war",41,85,1,1,0,"BattleGroundwarpB24";
	setwall "endless_war",40,85,1,1,0,"BattleGroundwarpB25";
	setwall "endless_war",39,85,1,1,0,"BattleGroundwarpB26";
	setwall "endless_war",39,86,1,1,0,"BattleGroundwarpB27";
	setwall "endless_war",39,87,1,1,0,"BattleGroundwarpB28";
	callsub OnEndd;
	end;
OnPCKillEvent:
	if(strcharinfo(3)=="endless_war" && $@bg_id_a && $@bg_id_
	{
		if(getcharid(4) == $@bg_id_a)
		{
			set .point[1],.point[1]+1;
		}else
			set .point[2],.point[2]+1;
		bg_updatescore "endless_war",.point[1],.point[2];
	}
	end;
}

December 19, 2014

anyone can help me?

December 12, 2014

"aye mod" is a pretty wide range of possibilities. I advise you to check the mod, or give us more info.

I added this mod

http://rathena.org/board/topic/70203-soul-linker-spirit-skill-modification/?p=153899

after that. LK can only use parrying skill if linked and level 1. how to make it level 10?

Sign In

Profiles

Forums

Downloads

Jobs Available

Server Database

Third-Party Services

Top Guides

Store

Posts posted by darking123