Jump to content
  • 0

Basic Warper required zeny

behemothcze

Asked by behemothcze,

 Share

Question

4 answers to this question

Recommended Posts

  • 0
hendra814 Ghostring

hendra814

Posted
Posted
8 minutes ago, behemothcze said:

thanks sir, will try it now . hmm 1 question is it posible posible to set a 2 payment?
town 1k
Dungeon 5k

here try it 

//===== eAthena Script =======================================
//= Warper Script
//===== By: ==================================================
//= Darkchild
//===== Current Version: =====================================
//= 2.1
//===== Compatible With: =====================================
//= Any eAthena Version;
//===== Description: =========================================
//= Generic warper...
//===== Additional Comments: =================================
//= 1.0 by Darkchild
//= 1.1 by jabs
//= 1.2 by Lupus (placement fixed in Amatsu)
//= 1.3 fixed Louyang label typo, added warp and WARPRA into
//= Nifleheim. Also sorted all names in alphabet order [Lupus]
//= 1.4 fixed morroc warp npc overlaying kafra [Aria]
//= 1.4a Added Ayothaya and Einbroch to list, and town Warpra's [Fredzilla]
//= 1.4b fixed Izlude warp npc overlaying BBS [Justin84]
//= 1.5 Added this NPC to more places [Lupus]
//= 1.6 Rewrote a lot. Changed the sprite, some locations. [Poki#3]
//= TODO Add an option for selecting the level of the dungeon. [Poki#3]
//= 1.7 Temporary? Added F_ClearGarbage to clear unused/outdated variables [Lupus]
//= 1.8 Removed Duplicates [Silent]
//= 1.9 Optimized for the greater good. [Kisuka]
//= 2.0 Fixed warp for AntHell and Yuno. [Kisuka]
//= 2.1 Moved AntHell warp agent to the new anthell entrance. [brianluau]
//============================================================
//============================================================
//= To allow selecting the Level of the Dungeon you want to
//= Warp to set the @lvlselect variable to 1 (Not implemented yet!)
//============================================================

-	script	Warp Agent#01::warpra	859,{
//	set @lvlselect,0;
	set .paymentT, 1000;
	set .paymentD, 5000;
	
	callfunc "F_ClearGarbage"; //Clear outdated, unused variables

	mes "[Warp Agent]";
	mes "Hello " + strcharinfo(0) + ",";
	mes "I can teleport you to any Town or Dungeon!";
	mes "But have small charge,"+.paymentT+" zeny for Town.";
	mes "and "+.paymentD+" for Dungeon.";
	mes "So, where do you want to go?";
	next;
	switch(select("To a Town:To a Dungeon")) {
		case 1:
			mes "[Warp Agent]";
			mes "Please select which town you would like to be teleported to.";
			next;
			switch(select("Alberta:Aldebaran:Amatsu:Ayothaya:Comodo:Einbroch:Einbech:Geffen:Gonryun:Hugel:Izlude:Lighthalzen:Louyang:Lutie:Morroc:Payon:Prontera:Umbala:Yuno")) {
				case 1:
					set zeny, zeny - .paymentT;
					warp "alberta",27,236;
					break;
				case 2:
					set zeny, zeny - .paymentT;
					warp "aldebaran",145,120;
					break;
				case 3:
					set zeny, zeny - .paymentT;
					warp "amatsu",197,86;
					break;
				case 4:
					set zeny, zeny - .paymentT;
					warp "ayothaya",149,118;
					break;
				case 5:
					set zeny, zeny - .paymentT;
					warp "comodo",188,161;
					break;
				case 6:
					set zeny, zeny - .paymentT;
					warp "einbroch",64,200;
					break;
				case 7:
					set zeny, zeny - .paymentT;
					warp "einbech",70,95;
					break;
				case 8:
					set zeny, zeny - .paymentT;
					warp "geffen",119,66;
					break;
				case 9:
					set zeny, zeny - .paymentT;
					warp "gonryun",150,130;
					break;
				case 10:
					set zeny, zeny - .paymentT;
					warp "hugel",96,145;
					break;
				case 11:
					set zeny, zeny - .paymentT;
					warp "izlude",128,111;
					break;
				case 12:
					set zeny, zeny - .paymentT;
					warp "lighthalzen",158,92;
					break;
				case 13:
					set zeny, zeny - .paymentT;
					warp "louyang",210,108;
					break;
				case 14:
					set zeny, zeny - .paymentT;
					warp "xmas",150,133;
					break;
				case 15:
					set zeny, zeny - .paymentT;
					warp "morocc",159,93;
					break;
				case 16:
					set zeny, zeny - .paymentT;
					warp "payon",152,75;
					break;
				case 17:
					set zeny, zeny - .paymentT;
					warp "prontera",156,187;
					break;
				case 18:
					set zeny, zeny - .paymentT;
					warp "umbala",130,130;
					break;
				case 19:
					set zeny, zeny - .paymentT;
					warp "yuno",160,168;
					break;
			}
			break;
		case 2:
			mes "[Warp Agent]";
			mes "Please select which dungeon you would like to be teleported to.";
			next;
			switch(select("Abyss Lake:Amatsu Dungeon:Anthell:Ayothaya Dungeon:Bibilan Dungeon:Coal Mine (Dead Pit):Culvert:Einbech Dungeon:Glast Heim:Gonryun Dungeon:Juperos:Lighthalzen Bio Lab:Magma Dungeon:Niflheim:Odin Temple:Orc Dungeon:Payon Dungeon:Pyramids:Sphinx:Sunken Ship:Thanatos Tower:Turtle Dungeon")) {
				case 1:
					set zeny, zeny - .paymentD;
					warp "hu_fild05",189,207;
					break;
				case 2:
					set zeny, zeny - .paymentD;
					warp "ama_dun01",229,12;
					break;
				case 3:
					set zeny, zeny - .paymentD;
					warp "moc_fild20",164,145;
					break;
				case 4:
					set zeny, zeny - .paymentD;
					warp "ayo_fild02",280,149;
					break;
				case 5:
					set zeny, zeny - .paymentD;
					warp "izlu2dun",106,88;
					break;
				case 6:
					set zeny, zeny - .paymentD;
					warp "mjolnir_02",81,359;
					break;
				case 7:
					set zeny, zeny - .paymentD;
					warp "prt_sewb1",126,248;
					break;
				case 8:
					set zeny, zeny - .paymentD;
					warp "einbech",135,249;
					break;
				case 9:
					set zeny, zeny - .paymentD;
					warp "glast_01",368,303;
					break;
				case 10:
					set zeny, zeny - .paymentD;
					warp "gonryun",160,195;
					break;
				case 11:
					set zeny, zeny - .paymentD;
					warp "yuno_fild07",218,176;
					break;
				case 12:
					set zeny, zeny - .paymentD;
					warp "lighthalzen",158,285;
					break;
				case 13:
					set zeny, zeny - .paymentD;
					warp "yuno_fild03",39,140;
					break;
				case 14:
					set zeny, zeny - .paymentD;
					warp "niflheim",35,161;
					break;
				case 15:
					set zeny, zeny - .paymentD;
					warp "odin_tem01",98,144;
					break;
				case 16:
					set zeny, zeny - .paymentD;
					warp "gef_fild10",70,332;
					break;
				case 17:
					set zeny, zeny - .paymentD;
					warp "pay_arche",43,132;
					break;
				case 18:
					set zeny, zeny - .paymentD;
					warp "moc_ruins",62,162;
					break;
				case 19:
					set zeny, zeny - .paymentD;
					warp "moc_fild19",107,100;
					break;
				case 20:
					set zeny, zeny - .paymentD;
					warp "alb2trea",75,98;
					break;
				case 21:
					set zeny, zeny - .paymentD;
					warp "tha_scene01",131,223;
					break;
				case 22:
					set zeny, zeny - .paymentD;
					warp "tur_dun01",149,238;
			}
			break;
	}
	end;
}

// --------- NPC Clones ------------
// ---------------------------------

// ----------- Towns -------------
alberta,31,240,4	duplicate(warpra)	Warp Agent#02	859
aldebaran,145,118,4	duplicate(warpra)	Warp Agent#03	859
amatsu,192,81,1	duplicate(warpra)	Warp Agent#04	859
ayothaya,144,117,6	duplicate(warpra)	Warp Agent#05	859
comodo,194,158,4	duplicate(warpra)	Warp Agent#06	859
einbroch,59,205,4	duplicate(warpra)	Warp Agent#07	859
einbroch,243,189,2	duplicate(warpra)	Warp Agent#08	859
einbech,135,249,4	duplicate(warpra)	Warp Agent#09	859
geffen,115,66,4	duplicate(warpra)	Warp Agent#10	859
gonryun,151,130,4	duplicate(warpra)	Warp Agent#11	859
izlude,133,117,4	duplicate(warpra)	Warp Agent#12	859
hugel,88,151,5	duplicate(warpra)	Warp Agent#13	859
lighthalzen,155,79,6	duplicate(warpra)	Warp Agent#14	859
louyang,210,106,4	duplicate(warpra)	Warp Agent#15	859
morocc,156,95,4	duplicate(warpra)	Warp Agent#16	859
prontera,161,192,4	duplicate(warpra)	Warp Agent#17	859
payon,182,110,4	duplicate(warpra)	Warp Agent#18	859
umbala,132,130,4	duplicate(warpra)	Warp Agent#19	859
xmas,150,136,4	duplicate(warpra)	Warp Agent#20	859
yuno,137,162,4	duplicate(warpra)	Warp Agent#21	859

// ------------ Dungeons ------------
ama_dun01,233,9,1	duplicate(warpra)	Warp Agent#22	859
moc_fild20,162,139,6	duplicate(warpra)	Warp Agent#23	859
ayo_fild02,279,154,4	duplicate(warpra)	Warp Agent#24	859
izlu2dun,104,82,4	duplicate(warpra)	Warp Agent#25	859
prt_sewb1,125,253,4	duplicate(warpra)	Warp Agent#26	859
mjolnir_02,85,363,4	duplicate(warpra)	Warp Agent#27	859
einbech,81,101,1	duplicate(warpra)	Warp Agent#28	859
glast_01,370,308,4	duplicate(warpra)	Warp Agent#29	859
yuno_fild03,37,135,4	duplicate(warpra)	Warp Agent#30	859
niflheim,32,161,4	duplicate(warpra)	Warp Agent#31	859
gef_fild10,71,339,4	duplicate(warpra)	Warp Agent#32	859
pay_arche,39,135,4	duplicate(warpra)	Warp Agent#33	859
moc_ruins,64,166,4	duplicate(warpra)	Warp Agent#34	859
moc_fild19,106,97,4	duplicate(warpra)	Warp Agent#35	859
alb2trea,73,101,4	duplicate(warpra)	Warp Agent#36	859
tur_dun01,148,239,4	duplicate(warpra)	Warp Agent#37	859
lhz_dun01,157,285,4	duplicate(warpra)	Warp Agent#38	859
hu_fild05,186,210,4	duplicate(warpra)	Warp Agent#39	859
yuno_fild07,221,179,4	duplicate(warpra)	Warp Agent#40	859
tha_scene01,139,194,1	duplicate(warpra)	Warp Agent#41	859
odin_tem01,96,149,4	duplicate(warpra)	Warp Agent#42	859

 

  • Like 1
  • 1
hendra814 Ghostring

hendra814

Posted
Posted
55 minutes ago, behemothcze said:

hello guys im using this kind of warper http://svn.code.sf.net/p/rathena/svn/!svn/bc/15000/trunk/npc/custom/warper.txt for my server.
Is it possible to put some zeny exchange for the warp .

not test but here 

//===== eAthena Script =======================================
//= Warper Script
//===== By: ==================================================
//= Darkchild
//===== Current Version: =====================================
//= 2.1
//===== Compatible With: =====================================
//= Any eAthena Version;
//===== Description: =========================================
//= Generic warper...
//===== Additional Comments: =================================
//= 1.0 by Darkchild
//= 1.1 by jabs
//= 1.2 by Lupus (placement fixed in Amatsu)
//= 1.3 fixed Louyang label typo, added warp and WARPRA into
//= Nifleheim. Also sorted all names in alphabet order [Lupus]
//= 1.4 fixed morroc warp npc overlaying kafra [Aria]
//= 1.4a Added Ayothaya and Einbroch to list, and town Warpra's [Fredzilla]
//= 1.4b fixed Izlude warp npc overlaying BBS [Justin84]
//= 1.5 Added this NPC to more places [Lupus]
//= 1.6 Rewrote a lot. Changed the sprite, some locations. [Poki#3]
//= TODO Add an option for selecting the level of the dungeon. [Poki#3]
//= 1.7 Temporary? Added F_ClearGarbage to clear unused/outdated variables [Lupus]
//= 1.8 Removed Duplicates [Silent]
//= 1.9 Optimized for the greater good. [Kisuka]
//= 2.0 Fixed warp for AntHell and Yuno. [Kisuka]
//= 2.1 Moved AntHell warp agent to the new anthell entrance. [brianluau]
//============================================================
//============================================================
//= To allow selecting the Level of the Dungeon you want to
//= Warp to set the @lvlselect variable to 1 (Not implemented yet!)
//============================================================

-	script	Warp Agent#01::warpra	859,{
//	set @lvlselect,0;
	set .payment, 1000;
	
	callfunc "F_ClearGarbage"; //Clear outdated, unused variables

	mes "[Warp Agent]";
	mes "Hello " + strcharinfo(0) + ",";
	mes "I can teleport you to any Town or Dungeon!";
	mes "But have small charge "+.payment+" zeny.";
	mes "So, where do you want to go?";
	next;
	switch(select("To a Town:To a Dungeon")) {
		case 1:
			mes "[Warp Agent]";
			mes "Please select which town you would like to be teleported to.";
			next;
			switch(select("Alberta:Aldebaran:Amatsu:Ayothaya:Comodo:Einbroch:Einbech:Geffen:Gonryun:Hugel:Izlude:Lighthalzen:Louyang:Lutie:Morroc:Payon:Prontera:Umbala:Yuno")) {
				case 1:
					set zeny, zeny - .payment;
					warp "alberta",27,236;
					break;
				case 2:
					set zeny, zeny - .payment;
					warp "aldebaran",145,120;
					break;
				case 3:
					set zeny, zeny - .payment;
					warp "amatsu",197,86;
					break;
				case 4:
					set zeny, zeny - .payment;
					warp "ayothaya",149,118;
					break;
				case 5:
					set zeny, zeny - .payment;
					warp "comodo",188,161;
					break;
				case 6:
					set zeny, zeny - .payment;
					warp "einbroch",64,200;
					break;
				case 7:
					set zeny, zeny - .payment;
					warp "einbech",70,95;
					break;
				case 8:
					set zeny, zeny - .payment;
					warp "geffen",119,66;
					break;
				case 9:
					set zeny, zeny - .payment;
					warp "gonryun",150,130;
					break;
				case 10:
					set zeny, zeny - .payment;
					warp "hugel",96,145;
					break;
				case 11:
					set zeny, zeny - .payment;
					warp "izlude",128,111;
					break;
				case 12:
					set zeny, zeny - .payment;
					warp "lighthalzen",158,92;
					break;
				case 13:
					set zeny, zeny - .payment;
					warp "louyang",210,108;
					break;
				case 14:
					set zeny, zeny - .payment;
					warp "xmas",150,133;
					break;
				case 15:
					set zeny, zeny - .payment;
					warp "morocc",159,93;
					break;
				case 16:
					set zeny, zeny - .payment;
					warp "payon",152,75;
					break;
				case 17:
					set zeny, zeny - .payment;
					warp "prontera",156,187;
					break;
				case 18:
					set zeny, zeny - .payment;
					warp "umbala",130,130;
					break;
				case 19:
					set zeny, zeny - .payment;
					warp "yuno",160,168;
					break;
			}
			break;
		case 2:
			mes "[Warp Agent]";
			mes "Please select which dungeon you would like to be teleported to.";
			next;
			switch(select("Abyss Lake:Amatsu Dungeon:Anthell:Ayothaya Dungeon:Bibilan Dungeon:Coal Mine (Dead Pit):Culvert:Einbech Dungeon:Glast Heim:Gonryun Dungeon:Juperos:Lighthalzen Bio Lab:Magma Dungeon:Niflheim:Odin Temple:Orc Dungeon:Payon Dungeon:Pyramids:Sphinx:Sunken Ship:Thanatos Tower:Turtle Dungeon")) {
				case 1:
					set zeny, zeny - .payment;
					warp "hu_fild05",189,207;
					break;
				case 2:
					set zeny, zeny - .payment;
					warp "ama_dun01",229,12;
					break;
				case 3:
					set zeny, zeny - .payment;
					warp "moc_fild20",164,145;
					break;
				case 4:
					set zeny, zeny - .payment;
					warp "ayo_fild02",280,149;
					break;
				case 5:
					set zeny, zeny - .payment;
					warp "izlu2dun",106,88;
					break;
				case 6:
					set zeny, zeny - .payment;
					warp "mjolnir_02",81,359;
					break;
				case 7:
					set zeny, zeny - .payment;
					warp "prt_sewb1",126,248;
					break;
				case 8:
					set zeny, zeny - .payment;
					warp "einbech",135,249;
					break;
				case 9:
					set zeny, zeny - .payment;
					warp "glast_01",368,303;
					break;
				case 10:
					set zeny, zeny - .payment;
					warp "gonryun",160,195;
					break;
				case 11:
					set zeny, zeny - .payment;
					warp "yuno_fild07",218,176;
					break;
				case 12:
					set zeny, zeny - .payment;
					warp "lighthalzen",158,285;
					break;
				case 13:
					set zeny, zeny - .payment;
					warp "yuno_fild03",39,140;
					break;
				case 14:
					set zeny, zeny - .payment;
					warp "niflheim",35,161;
					break;
				case 15:
					set zeny, zeny - .payment;
					warp "odin_tem01",98,144;
					break;
				case 16:
					set zeny, zeny - .payment;
					warp "gef_fild10",70,332;
					break;
				case 17:
					set zeny, zeny - .payment;
					warp "pay_arche",43,132;
					break;
				case 18:
					set zeny, zeny - .payment;
					warp "moc_ruins",62,162;
					break;
				case 19:
					set zeny, zeny - .payment;
					warp "moc_fild19",107,100;
					break;
				case 20:
					set zeny, zeny - .payment;
					warp "alb2trea",75,98;
					break;
				case 21:
					set zeny, zeny - .payment;
					warp "tha_scene01",131,223;
					break;
				case 22:
					set zeny, zeny - .payment;
					warp "tur_dun01",149,238;
			}
			break;
	}
	end;
}

// --------- NPC Clones ------------
// ---------------------------------

// ----------- Towns -------------
alberta,31,240,4	duplicate(warpra)	Warp Agent#02	859
aldebaran,145,118,4	duplicate(warpra)	Warp Agent#03	859
amatsu,192,81,1	duplicate(warpra)	Warp Agent#04	859
ayothaya,144,117,6	duplicate(warpra)	Warp Agent#05	859
comodo,194,158,4	duplicate(warpra)	Warp Agent#06	859
einbroch,59,205,4	duplicate(warpra)	Warp Agent#07	859
einbroch,243,189,2	duplicate(warpra)	Warp Agent#08	859
einbech,135,249,4	duplicate(warpra)	Warp Agent#09	859
geffen,115,66,4	duplicate(warpra)	Warp Agent#10	859
gonryun,151,130,4	duplicate(warpra)	Warp Agent#11	859
izlude,133,117,4	duplicate(warpra)	Warp Agent#12	859
hugel,88,151,5	duplicate(warpra)	Warp Agent#13	859
lighthalzen,155,79,6	duplicate(warpra)	Warp Agent#14	859
louyang,210,106,4	duplicate(warpra)	Warp Agent#15	859
morocc,156,95,4	duplicate(warpra)	Warp Agent#16	859
prontera,161,192,4	duplicate(warpra)	Warp Agent#17	859
payon,182,110,4	duplicate(warpra)	Warp Agent#18	859
umbala,132,130,4	duplicate(warpra)	Warp Agent#19	859
xmas,150,136,4	duplicate(warpra)	Warp Agent#20	859
yuno,137,162,4	duplicate(warpra)	Warp Agent#21	859

// ------------ Dungeons ------------
ama_dun01,233,9,1	duplicate(warpra)	Warp Agent#22	859
moc_fild20,162,139,6	duplicate(warpra)	Warp Agent#23	859
ayo_fild02,279,154,4	duplicate(warpra)	Warp Agent#24	859
izlu2dun,104,82,4	duplicate(warpra)	Warp Agent#25	859
prt_sewb1,125,253,4	duplicate(warpra)	Warp Agent#26	859
mjolnir_02,85,363,4	duplicate(warpra)	Warp Agent#27	859
einbech,81,101,1	duplicate(warpra)	Warp Agent#28	859
glast_01,370,308,4	duplicate(warpra)	Warp Agent#29	859
yuno_fild03,37,135,4	duplicate(warpra)	Warp Agent#30	859
niflheim,32,161,4	duplicate(warpra)	Warp Agent#31	859
gef_fild10,71,339,4	duplicate(warpra)	Warp Agent#32	859
pay_arche,39,135,4	duplicate(warpra)	Warp Agent#33	859
moc_ruins,64,166,4	duplicate(warpra)	Warp Agent#34	859
moc_fild19,106,97,4	duplicate(warpra)	Warp Agent#35	859
alb2trea,73,101,4	duplicate(warpra)	Warp Agent#36	859
tur_dun01,148,239,4	duplicate(warpra)	Warp Agent#37	859
lhz_dun01,157,285,4	duplicate(warpra)	Warp Agent#38	859
hu_fild05,186,210,4	duplicate(warpra)	Warp Agent#39	859
yuno_fild07,221,179,4	duplicate(warpra)	Warp Agent#40	859
tha_scene01,139,194,1	duplicate(warpra)	Warp Agent#41	859
odin_tem01,96,149,4	duplicate(warpra)	Warp Agent#42	859

 

  • 0
behemothcze Poring

behemothcze

Posted
  • Author
Posted
4 minutes ago, hendra814 said:

not test but here 


//===== eAthena Script =======================================
//= Warper Script
//===== By: ==================================================
//= Darkchild
//===== Current Version: =====================================
//= 2.1
//===== Compatible With: =====================================
//= Any eAthena Version;
//===== Description: =========================================
//= Generic warper...
//===== Additional Comments: =================================
//= 1.0 by Darkchild
//= 1.1 by jabs
//= 1.2 by Lupus (placement fixed in Amatsu)
//= 1.3 fixed Louyang label typo, added warp and WARPRA into
//= Nifleheim. Also sorted all names in alphabet order [Lupus]
//= 1.4 fixed morroc warp npc overlaying kafra [Aria]
//= 1.4a Added Ayothaya and Einbroch to list, and town Warpra's [Fredzilla]
//= 1.4b fixed Izlude warp npc overlaying BBS [Justin84]
//= 1.5 Added this NPC to more places [Lupus]
//= 1.6 Rewrote a lot. Changed the sprite, some locations. [Poki#3]
//= TODO Add an option for selecting the level of the dungeon. [Poki#3]
//= 1.7 Temporary? Added F_ClearGarbage to clear unused/outdated variables [Lupus]
//= 1.8 Removed Duplicates [Silent]
//= 1.9 Optimized for the greater good. [Kisuka]
//= 2.0 Fixed warp for AntHell and Yuno. [Kisuka]
//= 2.1 Moved AntHell warp agent to the new anthell entrance. [brianluau]
//============================================================
//============================================================
//= To allow selecting the Level of the Dungeon you want to
//= Warp to set the @lvlselect variable to 1 (Not implemented yet!)
//============================================================

-	script	Warp Agent#01::warpra	859,{
//	set @lvlselect,0;
	set .payment, 1000;
	
	callfunc "F_ClearGarbage"; //Clear outdated, unused variables

	mes "[Warp Agent]";
	mes "Hello " + strcharinfo(0) + ",";
	mes "I can teleport you to any Town or Dungeon!";
	mes "But have small charge "+.payment+" zeny.";
	mes "So, where do you want to go?";
	next;
	switch(select("To a Town:To a Dungeon")) {
		case 1:
			mes "[Warp Agent]";
			mes "Please select which town you would like to be teleported to.";
			next;
			switch(select("Alberta:Aldebaran:Amatsu:Ayothaya:Comodo:Einbroch:Einbech:Geffen:Gonryun:Hugel:Izlude:Lighthalzen:Louyang:Lutie:Morroc:Payon:Prontera:Umbala:Yuno")) {
				case 1:
					set zeny, zeny - .payment;
					warp "alberta",27,236;
					break;
				case 2:
					set zeny, zeny - .payment;
					warp "aldebaran",145,120;
					break;
				case 3:
					set zeny, zeny - .payment;
					warp "amatsu",197,86;
					break;
				case 4:
					set zeny, zeny - .payment;
					warp "ayothaya",149,118;
					break;
				case 5:
					set zeny, zeny - .payment;
					warp "comodo",188,161;
					break;
				case 6:
					set zeny, zeny - .payment;
					warp "einbroch",64,200;
					break;
				case 7:
					set zeny, zeny - .payment;
					warp "einbech",70,95;
					break;
				case 8:
					set zeny, zeny - .payment;
					warp "geffen",119,66;
					break;
				case 9:
					set zeny, zeny - .payment;
					warp "gonryun",150,130;
					break;
				case 10:
					set zeny, zeny - .payment;
					warp "hugel",96,145;
					break;
				case 11:
					set zeny, zeny - .payment;
					warp "izlude",128,111;
					break;
				case 12:
					set zeny, zeny - .payment;
					warp "lighthalzen",158,92;
					break;
				case 13:
					set zeny, zeny - .payment;
					warp "louyang",210,108;
					break;
				case 14:
					set zeny, zeny - .payment;
					warp "xmas",150,133;
					break;
				case 15:
					set zeny, zeny - .payment;
					warp "morocc",159,93;
					break;
				case 16:
					set zeny, zeny - .payment;
					warp "payon",152,75;
					break;
				case 17:
					set zeny, zeny - .payment;
					warp "prontera",156,187;
					break;
				case 18:
					set zeny, zeny - .payment;
					warp "umbala",130,130;
					break;
				case 19:
					set zeny, zeny - .payment;
					warp "yuno",160,168;
					break;
			}
			break;
		case 2:
			mes "[Warp Agent]";
			mes "Please select which dungeon you would like to be teleported to.";
			next;
			switch(select("Abyss Lake:Amatsu Dungeon:Anthell:Ayothaya Dungeon:Bibilan Dungeon:Coal Mine (Dead Pit):Culvert:Einbech Dungeon:Glast Heim:Gonryun Dungeon:Juperos:Lighthalzen Bio Lab:Magma Dungeon:Niflheim:Odin Temple:Orc Dungeon:Payon Dungeon:Pyramids:Sphinx:Sunken Ship:Thanatos Tower:Turtle Dungeon")) {
				case 1:
					set zeny, zeny - .payment;
					warp "hu_fild05",189,207;
					break;
				case 2:
					set zeny, zeny - .payment;
					warp "ama_dun01",229,12;
					break;
				case 3:
					set zeny, zeny - .payment;
					warp "moc_fild20",164,145;
					break;
				case 4:
					set zeny, zeny - .payment;
					warp "ayo_fild02",280,149;
					break;
				case 5:
					set zeny, zeny - .payment;
					warp "izlu2dun",106,88;
					break;
				case 6:
					set zeny, zeny - .payment;
					warp "mjolnir_02",81,359;
					break;
				case 7:
					set zeny, zeny - .payment;
					warp "prt_sewb1",126,248;
					break;
				case 8:
					set zeny, zeny - .payment;
					warp "einbech",135,249;
					break;
				case 9:
					set zeny, zeny - .payment;
					warp "glast_01",368,303;
					break;
				case 10:
					set zeny, zeny - .payment;
					warp "gonryun",160,195;
					break;
				case 11:
					set zeny, zeny - .payment;
					warp "yuno_fild07",218,176;
					break;
				case 12:
					set zeny, zeny - .payment;
					warp "lighthalzen",158,285;
					break;
				case 13:
					set zeny, zeny - .payment;
					warp "yuno_fild03",39,140;
					break;
				case 14:
					set zeny, zeny - .payment;
					warp "niflheim",35,161;
					break;
				case 15:
					set zeny, zeny - .payment;
					warp "odin_tem01",98,144;
					break;
				case 16:
					set zeny, zeny - .payment;
					warp "gef_fild10",70,332;
					break;
				case 17:
					set zeny, zeny - .payment;
					warp "pay_arche",43,132;
					break;
				case 18:
					set zeny, zeny - .payment;
					warp "moc_ruins",62,162;
					break;
				case 19:
					set zeny, zeny - .payment;
					warp "moc_fild19",107,100;
					break;
				case 20:
					set zeny, zeny - .payment;
					warp "alb2trea",75,98;
					break;
				case 21:
					set zeny, zeny - .payment;
					warp "tha_scene01",131,223;
					break;
				case 22:
					set zeny, zeny - .payment;
					warp "tur_dun01",149,238;
			}
			break;
	}
	end;
}

// --------- NPC Clones ------------
// ---------------------------------

// ----------- Towns -------------
alberta,31,240,4	duplicate(warpra)	Warp Agent#02	859
aldebaran,145,118,4	duplicate(warpra)	Warp Agent#03	859
amatsu,192,81,1	duplicate(warpra)	Warp Agent#04	859
ayothaya,144,117,6	duplicate(warpra)	Warp Agent#05	859
comodo,194,158,4	duplicate(warpra)	Warp Agent#06	859
einbroch,59,205,4	duplicate(warpra)	Warp Agent#07	859
einbroch,243,189,2	duplicate(warpra)	Warp Agent#08	859
einbech,135,249,4	duplicate(warpra)	Warp Agent#09	859
geffen,115,66,4	duplicate(warpra)	Warp Agent#10	859
gonryun,151,130,4	duplicate(warpra)	Warp Agent#11	859
izlude,133,117,4	duplicate(warpra)	Warp Agent#12	859
hugel,88,151,5	duplicate(warpra)	Warp Agent#13	859
lighthalzen,155,79,6	duplicate(warpra)	Warp Agent#14	859
louyang,210,106,4	duplicate(warpra)	Warp Agent#15	859
morocc,156,95,4	duplicate(warpra)	Warp Agent#16	859
prontera,161,192,4	duplicate(warpra)	Warp Agent#17	859
payon,182,110,4	duplicate(warpra)	Warp Agent#18	859
umbala,132,130,4	duplicate(warpra)	Warp Agent#19	859
xmas,150,136,4	duplicate(warpra)	Warp Agent#20	859
yuno,137,162,4	duplicate(warpra)	Warp Agent#21	859

// ------------ Dungeons ------------
ama_dun01,233,9,1	duplicate(warpra)	Warp Agent#22	859
moc_fild20,162,139,6	duplicate(warpra)	Warp Agent#23	859
ayo_fild02,279,154,4	duplicate(warpra)	Warp Agent#24	859
izlu2dun,104,82,4	duplicate(warpra)	Warp Agent#25	859
prt_sewb1,125,253,4	duplicate(warpra)	Warp Agent#26	859
mjolnir_02,85,363,4	duplicate(warpra)	Warp Agent#27	859
einbech,81,101,1	duplicate(warpra)	Warp Agent#28	859
glast_01,370,308,4	duplicate(warpra)	Warp Agent#29	859
yuno_fild03,37,135,4	duplicate(warpra)	Warp Agent#30	859
niflheim,32,161,4	duplicate(warpra)	Warp Agent#31	859
gef_fild10,71,339,4	duplicate(warpra)	Warp Agent#32	859
pay_arche,39,135,4	duplicate(warpra)	Warp Agent#33	859
moc_ruins,64,166,4	duplicate(warpra)	Warp Agent#34	859
moc_fild19,106,97,4	duplicate(warpra)	Warp Agent#35	859
alb2trea,73,101,4	duplicate(warpra)	Warp Agent#36	859
tur_dun01,148,239,4	duplicate(warpra)	Warp Agent#37	859
lhz_dun01,157,285,4	duplicate(warpra)	Warp Agent#38	859
hu_fild05,186,210,4	duplicate(warpra)	Warp Agent#39	859
yuno_fild07,221,179,4	duplicate(warpra)	Warp Agent#40	859
tha_scene01,139,194,1	duplicate(warpra)	Warp Agent#41	859
odin_tem01,96,149,4	duplicate(warpra)	Warp Agent#42	859

 

thanks sir, will try it now . hmm 1 question is it posible posible to set a 2 payment?
town 1k
Dungeon 5k

  • 0
behemothcze Poring

behemothcze

Posted
  • Author
Posted
8 minutes ago, hendra814 said:

here try it 


//===== eAthena Script =======================================
//= Warper Script
//===== By: ==================================================
//= Darkchild
//===== Current Version: =====================================
//= 2.1
//===== Compatible With: =====================================
//= Any eAthena Version;
//===== Description: =========================================
//= Generic warper...
//===== Additional Comments: =================================
//= 1.0 by Darkchild
//= 1.1 by jabs
//= 1.2 by Lupus (placement fixed in Amatsu)
//= 1.3 fixed Louyang label typo, added warp and WARPRA into
//= Nifleheim. Also sorted all names in alphabet order [Lupus]
//= 1.4 fixed morroc warp npc overlaying kafra [Aria]
//= 1.4a Added Ayothaya and Einbroch to list, and town Warpra's [Fredzilla]
//= 1.4b fixed Izlude warp npc overlaying BBS [Justin84]
//= 1.5 Added this NPC to more places [Lupus]
//= 1.6 Rewrote a lot. Changed the sprite, some locations. [Poki#3]
//= TODO Add an option for selecting the level of the dungeon. [Poki#3]
//= 1.7 Temporary? Added F_ClearGarbage to clear unused/outdated variables [Lupus]
//= 1.8 Removed Duplicates [Silent]
//= 1.9 Optimized for the greater good. [Kisuka]
//= 2.0 Fixed warp for AntHell and Yuno. [Kisuka]
//= 2.1 Moved AntHell warp agent to the new anthell entrance. [brianluau]
//============================================================
//============================================================
//= To allow selecting the Level of the Dungeon you want to
//= Warp to set the @lvlselect variable to 1 (Not implemented yet!)
//============================================================

-	script	Warp Agent#01::warpra	859,{
//	set @lvlselect,0;
	set .paymentT, 1000;
	set .paymentD, 5000;
	
	callfunc "F_ClearGarbage"; //Clear outdated, unused variables

	mes "[Warp Agent]";
	mes "Hello " + strcharinfo(0) + ",";
	mes "I can teleport you to any Town or Dungeon!";
	mes "But have small charge,"+.paymentT+" zeny for Town.";
	mes "and "+.paymentD+" for Dungeon.";
	mes "So, where do you want to go?";
	next;
	switch(select("To a Town:To a Dungeon")) {
		case 1:
			mes "[Warp Agent]";
			mes "Please select which town you would like to be teleported to.";
			next;
			switch(select("Alberta:Aldebaran:Amatsu:Ayothaya:Comodo:Einbroch:Einbech:Geffen:Gonryun:Hugel:Izlude:Lighthalzen:Louyang:Lutie:Morroc:Payon:Prontera:Umbala:Yuno")) {
				case 1:
					set zeny, zeny - .paymentT;
					warp "alberta",27,236;
					break;
				case 2:
					set zeny, zeny - .paymentT;
					warp "aldebaran",145,120;
					break;
				case 3:
					set zeny, zeny - .paymentT;
					warp "amatsu",197,86;
					break;
				case 4:
					set zeny, zeny - .paymentT;
					warp "ayothaya",149,118;
					break;
				case 5:
					set zeny, zeny - .paymentT;
					warp "comodo",188,161;
					break;
				case 6:
					set zeny, zeny - .paymentT;
					warp "einbroch",64,200;
					break;
				case 7:
					set zeny, zeny - .paymentT;
					warp "einbech",70,95;
					break;
				case 8:
					set zeny, zeny - .paymentT;
					warp "geffen",119,66;
					break;
				case 9:
					set zeny, zeny - .paymentT;
					warp "gonryun",150,130;
					break;
				case 10:
					set zeny, zeny - .paymentT;
					warp "hugel",96,145;
					break;
				case 11:
					set zeny, zeny - .paymentT;
					warp "izlude",128,111;
					break;
				case 12:
					set zeny, zeny - .paymentT;
					warp "lighthalzen",158,92;
					break;
				case 13:
					set zeny, zeny - .paymentT;
					warp "louyang",210,108;
					break;
				case 14:
					set zeny, zeny - .paymentT;
					warp "xmas",150,133;
					break;
				case 15:
					set zeny, zeny - .paymentT;
					warp "morocc",159,93;
					break;
				case 16:
					set zeny, zeny - .paymentT;
					warp "payon",152,75;
					break;
				case 17:
					set zeny, zeny - .paymentT;
					warp "prontera",156,187;
					break;
				case 18:
					set zeny, zeny - .paymentT;
					warp "umbala",130,130;
					break;
				case 19:
					set zeny, zeny - .paymentT;
					warp "yuno",160,168;
					break;
			}
			break;
		case 2:
			mes "[Warp Agent]";
			mes "Please select which dungeon you would like to be teleported to.";
			next;
			switch(select("Abyss Lake:Amatsu Dungeon:Anthell:Ayothaya Dungeon:Bibilan Dungeon:Coal Mine (Dead Pit):Culvert:Einbech Dungeon:Glast Heim:Gonryun Dungeon:Juperos:Lighthalzen Bio Lab:Magma Dungeon:Niflheim:Odin Temple:Orc Dungeon:Payon Dungeon:Pyramids:Sphinx:Sunken Ship:Thanatos Tower:Turtle Dungeon")) {
				case 1:
					set zeny, zeny - .paymentD;
					warp "hu_fild05",189,207;
					break;
				case 2:
					set zeny, zeny - .paymentD;
					warp "ama_dun01",229,12;
					break;
				case 3:
					set zeny, zeny - .paymentD;
					warp "moc_fild20",164,145;
					break;
				case 4:
					set zeny, zeny - .paymentD;
					warp "ayo_fild02",280,149;
					break;
				case 5:
					set zeny, zeny - .paymentD;
					warp "izlu2dun",106,88;
					break;
				case 6:
					set zeny, zeny - .paymentD;
					warp "mjolnir_02",81,359;
					break;
				case 7:
					set zeny, zeny - .paymentD;
					warp "prt_sewb1",126,248;
					break;
				case 8:
					set zeny, zeny - .paymentD;
					warp "einbech",135,249;
					break;
				case 9:
					set zeny, zeny - .paymentD;
					warp "glast_01",368,303;
					break;
				case 10:
					set zeny, zeny - .paymentD;
					warp "gonryun",160,195;
					break;
				case 11:
					set zeny, zeny - .paymentD;
					warp "yuno_fild07",218,176;
					break;
				case 12:
					set zeny, zeny - .paymentD;
					warp "lighthalzen",158,285;
					break;
				case 13:
					set zeny, zeny - .paymentD;
					warp "yuno_fild03",39,140;
					break;
				case 14:
					set zeny, zeny - .paymentD;
					warp "niflheim",35,161;
					break;
				case 15:
					set zeny, zeny - .paymentD;
					warp "odin_tem01",98,144;
					break;
				case 16:
					set zeny, zeny - .paymentD;
					warp "gef_fild10",70,332;
					break;
				case 17:
					set zeny, zeny - .paymentD;
					warp "pay_arche",43,132;
					break;
				case 18:
					set zeny, zeny - .paymentD;
					warp "moc_ruins",62,162;
					break;
				case 19:
					set zeny, zeny - .paymentD;
					warp "moc_fild19",107,100;
					break;
				case 20:
					set zeny, zeny - .paymentD;
					warp "alb2trea",75,98;
					break;
				case 21:
					set zeny, zeny - .paymentD;
					warp "tha_scene01",131,223;
					break;
				case 22:
					set zeny, zeny - .paymentD;
					warp "tur_dun01",149,238;
			}
			break;
	}
	end;
}

// --------- NPC Clones ------------
// ---------------------------------

// ----------- Towns -------------
alberta,31,240,4	duplicate(warpra)	Warp Agent#02	859
aldebaran,145,118,4	duplicate(warpra)	Warp Agent#03	859
amatsu,192,81,1	duplicate(warpra)	Warp Agent#04	859
ayothaya,144,117,6	duplicate(warpra)	Warp Agent#05	859
comodo,194,158,4	duplicate(warpra)	Warp Agent#06	859
einbroch,59,205,4	duplicate(warpra)	Warp Agent#07	859
einbroch,243,189,2	duplicate(warpra)	Warp Agent#08	859
einbech,135,249,4	duplicate(warpra)	Warp Agent#09	859
geffen,115,66,4	duplicate(warpra)	Warp Agent#10	859
gonryun,151,130,4	duplicate(warpra)	Warp Agent#11	859
izlude,133,117,4	duplicate(warpra)	Warp Agent#12	859
hugel,88,151,5	duplicate(warpra)	Warp Agent#13	859
lighthalzen,155,79,6	duplicate(warpra)	Warp Agent#14	859
louyang,210,106,4	duplicate(warpra)	Warp Agent#15	859
morocc,156,95,4	duplicate(warpra)	Warp Agent#16	859
prontera,161,192,4	duplicate(warpra)	Warp Agent#17	859
payon,182,110,4	duplicate(warpra)	Warp Agent#18	859
umbala,132,130,4	duplicate(warpra)	Warp Agent#19	859
xmas,150,136,4	duplicate(warpra)	Warp Agent#20	859
yuno,137,162,4	duplicate(warpra)	Warp Agent#21	859

// ------------ Dungeons ------------
ama_dun01,233,9,1	duplicate(warpra)	Warp Agent#22	859
moc_fild20,162,139,6	duplicate(warpra)	Warp Agent#23	859
ayo_fild02,279,154,4	duplicate(warpra)	Warp Agent#24	859
izlu2dun,104,82,4	duplicate(warpra)	Warp Agent#25	859
prt_sewb1,125,253,4	duplicate(warpra)	Warp Agent#26	859
mjolnir_02,85,363,4	duplicate(warpra)	Warp Agent#27	859
einbech,81,101,1	duplicate(warpra)	Warp Agent#28	859
glast_01,370,308,4	duplicate(warpra)	Warp Agent#29	859
yuno_fild03,37,135,4	duplicate(warpra)	Warp Agent#30	859
niflheim,32,161,4	duplicate(warpra)	Warp Agent#31	859
gef_fild10,71,339,4	duplicate(warpra)	Warp Agent#32	859
pay_arche,39,135,4	duplicate(warpra)	Warp Agent#33	859
moc_ruins,64,166,4	duplicate(warpra)	Warp Agent#34	859
moc_fild19,106,97,4	duplicate(warpra)	Warp Agent#35	859
alb2trea,73,101,4	duplicate(warpra)	Warp Agent#36	859
tur_dun01,148,239,4	duplicate(warpra)	Warp Agent#37	859
lhz_dun01,157,285,4	duplicate(warpra)	Warp Agent#38	859
hu_fild05,186,210,4	duplicate(warpra)	Warp Agent#39	859
yuno_fild07,221,179,4	duplicate(warpra)	Warp Agent#40	859
tha_scene01,139,194,1	duplicate(warpra)	Warp Agent#41	859
odin_tem01,96,149,4	duplicate(warpra)	Warp Agent#42	859

 

+1 thanks it really helpful i get it now how to set up a payment and  will put some change on its zeny hehe thanks mate 

Join the conversation

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

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

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

×   Your previous content has been restored.   Clear editor

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

×
 Share
Go to question listing

  • Recently Browsing   0 members

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