Want to learn how to add lastwarp

S

stevler

New member
Messages
33
Points
0
I have made the base of my warper, I'd like to know how I'd go about reworking it so I could add lastwarp to it.

Code: 
-	script	Warper NPC::warper		660,{	mes "[Genie]";	mes "Hello " + strcharinfo(0) + ", I am the Genie. Nice day isn't it?";	mes "";	menu "Prontera [" + getmapusers ("prontera") + "] ",-,	"Payon [" + getmapusers ("payon") + "] ",L_pay,	"Towns",L_town,	"Dungeons",L_dung;		 warp "prontera", 156, 178;		close;						L_pay:		warp "payon", 175, 98;		close;				L_town:	menu "Alberta",L_alb,		"Al De Baran",L_ald,		"Amatsu",L_ama,		"Ayothaya",L_ayo,		"Braslis",L_bra,		"Comodo",L_com,		"Einbroch",L_ein,		"Geffen",L_gef,		"Gonryun",L_gon,		"Hugel",L_hug,		"Izlude",L_izl,		"Jawaii",L_jaw,		"Lighthalzen",L_lhz,		"Louyang",L_lou,		"Lutie",L_lut,		"Morroc",L_mor,		"Moscovia",L_mos,		"Nifflheim",L_nif,		"Rachel",L_rac,		"Umbala",L_umb,		"Vein",L_vei,		"Yuno",L_yun;			L_alb:		warp "alberta", 116, 57;		close;	L_ald:		warp "aldebaran", 139, 118;		close;	L_ama:		warp "amatsu", 198, 121;		close;	L_ayo:		warp "ayothaya", 208, 189;		close;	L_bra:		warp "brasilis", 227, 291;		close;	L_com:		warp "comodo", 201, 137;		close;	L_ein:		warp "einbroch", 232, 189;		close;	L_gef:		warp "geffen", 120, 93;		close;	L_gon:		warp "gonryun", 160, 111;		close;	L_hug:		warp "hugel", 96, 156;		close;	L_izl:		warp "izlude", 130, 131;		close;	L_jaw:		warp "jawaii", 203, 289;		close;	L_lhz:		warp "lighthalzen", 158, 92;		close;	L_lou:		warp "louyang", 218, 100;		close;	L_lut:		warp "xmas", 148, 130;		close;	L_mor:		warp "morocc", 158, 89;		close;	L_mos:		warp "moscovia", 223, 184;		close;	L_nif:		warp "niflheim", 193, 185;		close;	L_rac:		warp "rachel", 119, 136;		close;	L_umb:		warp "umbala", 144, 154;		close;	L_vei:		warp "veins", 214, 124;		close;	L_yun:		warp "yuno", 158, 176;		close;								L_dung:		menu "Abyss Lake",L_aby,		"Amatsu Dungeon",L_amad,		"Anthell",L_ant,		"Ayothaya Dungon",L_ayod,		"Bylan Island",L_byl,		"Coal Mine",L_coa,		"Einbroch Mine",L_einm,		"Geffen Dungeon",L_gefd,		"Glast Heim",L_gh,		"Glast Heim Churchyard",L_ghc,		"Glast Heim Prison",L_ghp,		"Hidden Temple",L_hid,		"Ice Dungeon",L_ice,		"Juperos Ruins",L_jup,		"Kiel Robot Factory",L_kie,		"Magma Dungeon",L_mag,		"Nameless Island",L_nam,		"Orc Dungeon",L_orc,		"Payon Caves",L_payc,		"Prontera Culvert",L_proc,		"Pyramids",L_pyr,		"Rachel Sanctuary",L_racs,		"Sphinx",L_sph,		"Sunken Ship",L_sun,		"Thors Volcano",L_tho,		"Toy Factory",L_toy,		"Turtle Dungeon",L_tur,		"Umbala Dungeon",L_umbd;					L_aby:		warp "hu_fild05", 167, 300;		close;	L_amad:		warp "ama_in02", 122, 180;		close;	L_ant:		warp "anthell01", 37, 259;		close;	L_ayod:		warp "ayo_fild01", 126, 197;		close;	L_byl:		warp "iz_dun00", 168, 165;		close;	L_coa:		warp "mjolnir_02", 81, 355;		close;	L_einm:		warp "einbech", 138, 246;		close;	L_gefd:		warp "gef_tower", 152, 34;		close;	L_gh:		warp "glast_01", 199, 134;		close;	L_ghc:		warp "gl_chyard", 147, 149;		close;	L_ghp:		warp "gl_prison", 91, 180;		close;	L_hid:		warp "prt_fild01", 137, 366;		close;	L_ice:		warp "ra_fild01", 233, 326;		close;	L_jup:		warp "yuno_fild07", 213, 175;		close;	L_kie:		warp "yuno_fild08", 72, 178;		close;	L_mag:		warp "yuno_fild03", 39, 140;		close;	L_nam:		warp "ve_fild07", 129, 132;		close;	L_orc:		warp "gef_fild10", 69, 333;		close;	L_payc:		warp "pay_arche", 42, 131;		close;	L_proc:		warp "prt_fild05", 282, 224;		close;	L_pyr:		warp "moc_ruins", 66, 159;		close;	L_racs:		warp "ra_temin", 28, 310;		close;	L_sph:		warp "moc_fild19", 106, 99;		close;	L_sun:		warp "alb2trea", 84, 64;		close;	L_tho:		warp "ve_fild03", 168, 288;		close;	L_toy:		warp "xmas", 143, 302;		close;	L_tur:		warp "tur_dun01", 152, 49;		close;	L_umbd:		warp "um_dun01", 42, 32;		close;} //duplicatesprontera,154,191,5	duplicate(warper)	Warper NPC#1	660payon, 183,104,5	duplicate(warper)	Warper NPC#2	660alberta,120,60,3	duplicate(warper)	Warper NPC#3	660aldebaran,143,122,3	duplicate(warper)	Warper NPC#4	660amatsu,205,123,3	duplicate(warper)	Warper NPC#5	660ayothaya,213,190,3	duplicate(warper)	Warper NPC#6	660brasilis,231,294,3	duplicate(warper)	Warper NPC#7	660comodo,198,149,4	duplicate(warper)	Warper NPC#8	660einbroch,227,198,5	duplicate(warper)	Warper NPC#9	660geffen,118,62,8	duplicate(warper)	Warper#10 NPC	660gonryun,166,118,3	duplicate(warper)	Warper#11 NPC	660hugel,93,161,5	duplicate(warper)	Warper NPC#12	660izlude,125,125,4	duplicate(warper)	Warper NPC#13	660jawaii,207,292,3	duplicate(warper)	Warper NPC#14	660lighthalzen,154,100,5	duplicate(warper)	Warper NPC#15	660louyang,222,104,3	duplicate(warper)	Warper NPC#16	660xmas,142,136,5	duplicate(warper)	Warper NPC#17	660morocc,160,97,5	duplicate(warper)	Warper NPC#18	660umbala,139,163,5	duplicate(warper)	Warper NPC#19	660moscovia,225,191,5	duplicate(warper)	Warper NPC#20	660niflheim,187,190,5	duplicate(warper)	Warper NPC#21	660rachel,113,141,5	duplicate(warper)	Warper NPC#22	660veins,222,128,3	duplicate(warper)	Warper NPC#23	660yuno,144,186,5	duplicate(warper)	Warper NPC#24	660hu_fild05,162,301,5	duplicate(warper)	Warper NPC#25	660anthell01,33,253,8	duplicate(warper)	Warper NPC#26	660ayo_fild01,126,201,4	duplicate(warper)	Warper NPC#27	660iz_dun00,163,172,5	duplicate(warper)	Warper NPC#28	660mjolnir_02,86,360,3	duplicate(warper)	Warper NPC#29	660einbech,142,250,3	duplicate(warper)	Warper NPC#30	660gef_tower,156,33,4	duplicate(warper)	Warper NPC#31	660glast_01,196,136,5	duplicate(warper)	Warper NPC#32	660prt_fild01,134,369,5	duplicate(warper)	Warper NPC#33	660ra_fild01,230,331,5	duplicate(warper)	Warper NPC#34	660yuno_fild07,213,181,3	duplicate(warper)	Warper NPC#35	660yuno_fild08,76,182,3	duplicate(warper)	Warper NPC#36	660yuno_fild03,37,136,7	duplicate(warper)	Warper NPC#37	660ve_fild07,131,130,1	duplicate(warper)	Warper NPC#38	660gef_fild10,59,329,5	duplicate(warper)	Warper NPC#39	660pay_arche,41,136,5	duplicate(warper)	Warper NPC#40	660prt_fild05,280,225,5	duplicate(warper)	Warper NPC#41	660ra_temin,33,314,3	duplicate(warper)	Warper NPC#42	660moc_fild19,108,97,1	duplicate(warper)	Warper NPC#43	660alb2trea,94,68,4	duplicate(warper)	Warper NPC#44	660ve_fild03,164,238,5	duplicate(warper)	Warper NPC#45	660xmas,141,310,5	duplicate(warper)	Warper NPC#46	660tur_dun01,148,55,5	duplicate(warper)	Warper NPC#47	660um_dun01,36,34,5	duplicate(warper)	Warper NPC#48	660
 
Last edited by a moderator:
You should have only 1 "warp" call, i.e.

Instead of:

Code: 
	L_ein:		warp "einbroch", 232, 189;		close;	L_gef:		warp "geffen", 120, 93;		close;
Be like:
Code: 
	L_ein:		set .@mapname$,"einbroch";		set .@x,232;		set .@y,189;		callsub L_Warp;	L_gef:		warp "geffen", 120, 93;		set .@mapname$,"geffen";		set .@x,120;		set .@y,93;		callsub L_Warp;	L_Warp:		warp .@mapname$,.@x,.@y;		end;
That way you can easily record whatever you last warped them to, by simply changing the label into
Code: 
	L_Warp:		set LastWarperMap$,.@mapname$;		set LastWarperX,.@x;		set LastWarperY,.@y;		warp .@mapname$,.@x,.@y;		end;
 
Last edited by a moderator:
Thanks for the quick reply, this is what I did, and in the picture is the mapserver

- script Warper NPC::warper -1,{ mes "[^3366FFGenie^000000]"; mes "Hello ^0000FF" + strcharinfo(0) + "^000000, I am the ^3366FFGenie^000000. Nice day isn't it?"; mes "Where in the world of Midgard, or beyond would you like to go?"; menu "LastWarp",L_warp,"Prontera [" + getmapusers ("prontera") + "] ",-, "Payon [" + getmapusers ("payon") + "] ",L_pay, "Towns",L_town, "Dungeons",L_dung;  warp "prontera", 156, 178; close; L_pay: warp "payon", 175, 98; close; L_town: menu "Alberta",L_alb, "Al De Baran",L_ald, "Amatsu",L_ama, "Ayothaya",L_ayo, "Braslis",L_bra, "Comodo",L_com, "Einbroch",L_ein, "Geffen",L_gef, "Gonryun",L_gon, "Hugel",L_hug, "Izlude",L_izl, "Jawaii",L_jaw, "Lighthalzen",L_lhz, "Louyang",L_lou, "Lutie",L_lut, "Morroc",L_mor, "Moscovia",L_mos, "Nifflheim",L_nif, "Rachel",L_rac, "Umbala",L_umb, "Vein",L_vei, "Yuno",L_yun; L_alb: set .@mapname$,"alberta"; set .@x,116; set .@y,57; callsub L_Warp; L_ald: set .@mapname$,"aldebaran"; set .@x,139; set .@y,118; callsub L_Warp; L_ama: set .@mapname$,"amatsu"; set .@x,198; set .@y,121; callsub L_Warp; L_ayo: set .@mapname$,"ayothaya"; set .@x,208; set .@y,189; callsub L_Warp; L_bra: set .@mapname$,"brasilis"; set .@x,227; set .@y,291; callsub L_Warp; L_com: set .@mapname$,"comodo"; set .@x,201; set .@y,137; callsub L_Warp; L_ein: set .@mapname$,"einbroch"; set .@x,232; set .@y,189; callsub L_Warp; L_gef: set .@mapname$,"geffen"; set .@x,120; set .@y,93; callsub L_Warp; L_gon: set .@mapname$,"gonryun"; set .@x,160; set .@y,111; callsub L_Warp; L_hug: set .@mapname$,"hugel"; set .@x,96; set .@y,156; callsub L_Warp; L_izl: set .@mapname$,"izlude"; set .@x,130; set .@y,131; callsub L_Warp; L_jaw:  set .@mapname$,"jawaii"; set .@x,203; set .@y,289; callsub L_Warp; L_lhz: set .@mapname$,"lighthalzen"; set .@x,158; set .@y,92; callsub L_Warp; L_lou: set .@mapname$,"louyang"; set .@x,218; set .@y,100; callsub L_Warp; L_lut: set .@mapname$,"xmas"; set .@x,148; set .@y,130; callsub L_Warp; L_mor: set .@mapname$,"morocc"; set .@x,158; set .@y,89; callsub L_Warp; L_mos: set .@mapname$,"moscovia"; set .@x,223; set .@y,184; callsub L_Warp; L_nif: set .@mapname$,"niflheim"; set .@x,193; set .@y,185; callsub L_Warp; L_rac: set .@mapname$,"rachel"; set .@x,119; set .@y,136; callsub L_Warp; L_umb: set .@mapname$,"umbala"; set .@x,144; set .@y,154; callsub L_Warp; L_vei: set .@mapname$,"veins"; set .@x,214; set .@y,124; callsub L_Warp; L_yun: set .@mapname$,"yuno"; set .@x,158; set .@y,176; callsub L_Warp; L_dung: menu "Abyss Lake",L_aby, "Amatsu Dungeon",L_amad, "Anthell",L_ant, "Ayothaya Dungon",L_ayod, "Bylan Island",L_byl, "Coal Mine",L_coa, "Einbroch Mine",L_einm, "Geffen Dungeon",L_gefd, "Glast Heim",L_gh, "Glast Heim Churchyard",L_ghc, "Glast Heim Prison",L_ghp, "Hidden Temple",L_hid, "Ice Dungeon",L_ice, "Juperos Ruins",L_jup, "Kiel Robot Factory",L_kie, "Magma Dungeon",L_mag, "Nameless Island",L_nam, "Orc Dungeon",L_orc, "Payon Caves",L_payc, "Prontera Culvert",L_proc, "Pyramids",L_pyr, "Rachel Sanctuary",L_racs, "Sphinx",L_sph, "Sunken Ship",L_sun, "Thors Volcano",L_tho, "Toy Factory",L_toy, "Turtle Dungeon",L_tur, "Umbala Dungeon",L_umbd; L_aby: set .@mapname$,"hu_fild05"; set .@x,167; set .@y,300; callsub L_Warp; L_amad: set .@mapname$,"ama_in02"; set .@x,122; set .@y,180; callsub L_Warp; L_ant: set .@mapname$,"anthell01"; set .@x,37; set .@y,259; callsub L_Warp; L_ayod: set .@mapname$,"ayo_fild01"; set .@x,126; set .@y,197; callsub L_Warp; L_byl: set .@mapname$,"iz_dun00"; set .@x,168; set .@y,165; callsub L_Warp; L_coa: set .@mapname$,"mjolnir_02"; set .@x,81; set .@y,355; callsub L_Warp; L_einm: set .@mapname$,"einbech"; set .@x,138; set .@y,246; callsub L_Warp; L_gefd: set .@mapname$,"gef_tower"; set .@x,152; set .@y,34; callsub L_Warp; L_gh: set .@mapname$,"glast_01"; set .@x,199; set .@y,134; callsub L_Warp; L_ghc: set .@mapname$,"gl_chyard"; set .@x,147; set .@y,149; callsub L_Warp; L_ghp: set .@mapname$,"gl_prison"; set .@x,91; set .@y,180; callsub L_Warp; L_hid: set .@mapname$,"prt_fild01"; set .@x,137; set .@y,366; callsub L_Warp; L_ice: set .@mapname$,"ra_fild01"; set .@x,233; set .@y,326; callsub L_Warp; L_jup: set .@mapname$,"yuno_fild07"; set .@x,213; set .@y,175; callsub L_Warp; L_kie: set .@mapname$,"yuno_fild08"; set .@x,72; set .@y,178; callsub L_Warp; L_mag: set .@mapname$,"yuno_fild03"; set .@x,39; set .@y,140; callsub L_Warp; L_nam: set .@mapname$,"ve_fild07"; set .@x,129; set .@y,132; callsub L_Warp; L_orc: set .@mapname$,"gef_fild10"; set .@x,69; set .@y,333; callsub L_Warp; L_payc: set .@mapname$,"pay_arche"; set .@x,42; set .@y,131; callsub L_Warp; L_proc: set .@mapname$,"prt_fild05"; set .@x,282; set .@y,224; callsub L_Warp; L_pyr: set .@mapname$,"moc_ruins"; set .@x,66; set .@y,159; callsub L_Warp; L_racs: set .@mapname$,"ra_temin"; set .@x,28; set .@y,310; callsub L_Warp; L_sph: set .@mapname$,"moc_fild19"; set .@x,106; set .@y,99; callsub L_Warp; L_sun: set .@mapname$,"alb2trea"; set .@x,84; set .@y,64; callsub L_Warp; L_tho: set .@mapname$,"ve_fild03"; set .@x,168; set .@y,288; callsub L_Warp; L_toy: set .@mapname$,"xmas"; set .@x,143; set .@y,302; callsub L_Warp; L_tur: warp "tur_dun01", 152, 49; set .@mapname$,"tur_dun0"; set .@x,152; set .@y,49; callsub L_Warp; L_umbd: warp "um_dun01", 42, 32; set .@mapname$,"um_dun01"; set .@x,42; set .@y,32; callsub L_Warp; L_Warp: set LastWarperMap$,.@mapname$; set LastWarperX,.@x; set LastWarperY,.@y; warp .@mapname$,.@x,.@y; end;} //duplicatesprontera,153,193,5 duplicate(warper) Warper NPC#1 660payon, 183,104,5 duplicate(warper) Warper NPC#2 660alberta,120,60,3 duplicate(warper) Warper NPC#3 660aldebaran,143,122,3 duplicate(warper) Warper NPC#4 660amatsu,205,123,3 duplicate(warper) Warper NPC#5 660ayothaya,213,190,3 duplicate(warper) Warper NPC#6 660brasilis,231,294,3 duplicate(warper) Warper NPC#7 660comodo,198,149,4 duplicate(warper) Warper NPC#8 660einbroch,227,198,5 duplicate(warper) Warper NPC#9 660geffen,118,62,8 duplicate(warper) Warper#10 NPC 660gonryun,166,118,3 duplicate(warper) Warper#11 NPC 660hugel,93,161,5 duplicate(warper) Warper NPC#12 660izlude,125,125,4 duplicate(warper) Warper NPC#13 660jawaii,207,292,3 duplicate(warper) Warper NPC#14 660lighthalzen,154,100,5 duplicate(warper) Warper NPC#15 660louyang,222,104,3 duplicate(warper) Warper NPC#16 660xmas,142,136,5 duplicate(warper) Warper NPC#17 660morocc,160,97,5 duplicate(warper) Warper NPC#18 660umbala,139,163,5 duplicate(warper) Warper NPC#19 660moscovia,225,191,5 duplicate(warper) Warper NPC#20 660niflheim,187,190,5 duplicate(warper) Warper NPC#21 660rachel,113,141,5 duplicate(warper) Warper NPC#22 660veins,222,128,3 duplicate(warper) Warper NPC#23 660yuno,144,186,5 duplicate(warper) Warper NPC#24 660hu_fild05,162,301,5 duplicate(warper) Warper NPC#25 660anthell01,33,253,8 duplicate(warper) Warper NPC#26 660ayo_fild01,126,201,4 duplicate(warper) Warper NPC#27 660iz_dun00,163,172,5 duplicate(warper) Warper NPC#28 660mjolnir_02,86,360,3 duplicate(warper) Warper NPC#29 660einbech,142,250,3 duplicate(warper) Warper NPC#30 660gef_tower,156,33,4 duplicate(warper) Warper NPC#31 660glast_01,196,136,5 duplicate(warper) Warper NPC#32 660prt_fild01,134,369,5 duplicate(warper) Warper NPC#33 660ra_fild01,230,331,5 duplicate(warper) Warper NPC#34 660yuno_fild07,213,181,3 duplicate(warper) Warper NPC#35 660yuno_fild08,76,182,3 duplicate(warper) Warper NPC#36 660yuno_fild03,37,136,7 duplicate(warper) Warper NPC#37 660ve_fild07,131,130,1 duplicate(warper) Warper NPC#38 660gef_fild10,59,329,5 duplicate(warper) Warper NPC#39 660pay_arche,41,136,5 duplicate(warper) Warper NPC#40 660prt_fild05,280,225,5 duplicate(warper) Warper NPC#41 660ra_temin,33,314,3 duplicate(warper) Warper NPC#42 660moc_fild19,108,97,1 duplicate(warper) Warper NPC#43 660alb2trea,94,68,4 duplicate(warper) Warper NPC#44 660ve_fild03,164,238,5 duplicate(warper) Warper NPC#45 660xmas,141,310,5 duplicate(warper) Warper NPC#46 660tur_dun01,148,55,5 duplicate(warper) Warper NPC#47 660um_dun01,36,34,5 duplicate(warper) Warper NPC#48 660
Capture.PNG

 
Last edited by a moderator:
I did not remember .@ vars do not pass to subs, Thanks to Haru now I do
default_biggrin.png




I've tested this one:

Code: 
-	script	Warper NPC::warper	-1,{    mes "[^3366FFGenie^000000]";    mes "Hello ^0000FF" + strcharinfo(0) + "^000000, I am the ^3366FFGenie^000000. Nice day isn't it?";    mes "Where in the world of Midgard, or beyond would you like to go?";	next;    menu "LastWarp",L_LastWarp,"Prontera [" + getmapusers ("prontera") + "] ",-,"Payon [" + getmapusers ("payon") + "] ",L_pay,"Towns",L_town,"Dungeons",L_dung;         warp "prontera", 156, 178;        close;                        L_pay:        warp "payon", 175, 98;        close;                L_town:    menu "Alberta",L_alb,        "Al De Baran",L_ald,        "Amatsu",L_ama,        "Ayothaya",L_ayo,        "Braslis",L_bra,        "Comodo",L_com,        "Einbroch",L_ein,        "Geffen",L_gef,        "Gonryun",L_gon,        "Hugel",L_hug,        "Izlude",L_izl,        "Jawaii",L_jaw,        "Lighthalzen",L_lhz,        "Louyang",L_lou,        "Lutie",L_lut,        "Morroc",L_mor,        "Moscovia",L_mos,        "Nifflheim",L_nif,        "Rachel",L_rac,        "Umbala",L_umb,        "Vein",L_vei,        "Yuno",L_yun;            L_alb:            set @mapname$,"alberta";            set @x,116;            set @y,57;            callsub L_Warp;    L_ald:            set @mapname$,"aldebaran";            set @x,139;            set @y,118;            callsub L_Warp;    L_ama:            set @mapname$,"amatsu";            set @x,198;            set @y,121;            callsub L_Warp;    L_ayo:            set @mapname$,"ayothaya";            set @x,208;            set @y,189;            callsub L_Warp;    L_bra:        set @mapname$,"brasilis";        set @x,227;        set @y,291;        callsub L_Warp;    L_com:        set @mapname$,"comodo";        set @x,201;        set @y,137;        callsub L_Warp;    L_ein:        set @mapname$,"einbroch";        set @x,232;        set @y,189;        callsub L_Warp;    L_gef:            set @mapname$,"geffen";            set @x,120;            set @y,93;            callsub L_Warp;    L_gon:            set @mapname$,"gonryun";            set @x,160;            set @y,111;            callsub L_Warp;    L_hug:            set @mapname$,"hugel";            set @x,96;            set @y,156;            callsub L_Warp;    L_izl:            set @mapname$,"izlude";            set @x,130;            set @y,131;            callsub L_Warp;    L_jaw:             set @mapname$,"jawaii";            set @x,203;            set @y,289;            callsub L_Warp;    L_lhz:            set @mapname$,"lighthalzen";            set @x,158;            set @y,92;            callsub L_Warp;    L_lou:            set @mapname$,"louyang";            set @x,218;            set @y,100;            callsub L_Warp;    L_lut:            set @mapname$,"xmas";            set @x,148;            set @y,130;            callsub L_Warp;    L_mor:            set @mapname$,"morocc";            set @x,158;            set @y,89;            callsub L_Warp;    L_mos:            set @mapname$,"moscovia";            set @x,223;            set @y,184;            callsub L_Warp;    L_nif:            set @mapname$,"niflheim";            set @x,193;            set @y,185;            callsub L_Warp;    L_rac:            set @mapname$,"rachel";            set @x,119;            set @y,136;            callsub L_Warp;    L_umb:            set @mapname$,"umbala";            set @x,144;            set @y,154;            callsub L_Warp;    L_vei:            set @mapname$,"veins";            set @x,214;            set @y,124;            callsub L_Warp;    L_yun:                set @mapname$,"yuno";            set @x,158;            set @y,176;            callsub L_Warp;                        L_dung:        menu "Abyss Lake",L_aby,        "Amatsu Dungeon",L_amad,        "Anthell",L_ant,        "Ayothaya Dungon",L_ayod,        "Bylan Island",L_byl,        "Coal Mine",L_coa,        "Einbroch Mine",L_einm,        "Geffen Dungeon",L_gefd,        "Glast Heim",L_gh,        "Glast Heim Churchyard",L_ghc,        "Glast Heim Prison",L_ghp,        "Hidden Temple",L_hid,        "Ice Dungeon",L_ice,        "Juperos Ruins",L_jup,        "Kiel Robot Factory",L_kie,        "Magma Dungeon",L_mag,        "Nameless Island",L_nam,        "Orc Dungeon",L_orc,        "Payon Caves",L_payc,        "Prontera Culvert",L_proc,        "Pyramids",L_pyr,        "Rachel Sanctuary",L_racs,        "Sphinx",L_sph,        "Sunken Ship",L_sun,        "Thors Volcano",L_tho,        "Toy Factory",L_toy,        "Turtle Dungeon",L_tur,        "Umbala Dungeon",L_umbd;                    L_aby:            set @mapname$,"hu_fild05";            set @x,167;            set @y,300;            callsub L_Warp;    L_amad:            set @mapname$,"ama_in02";            set @x,122;            set @y,180;            callsub L_Warp;    L_ant:            set @mapname$,"anthell01";            set @x,37;            set @y,259;            callsub L_Warp;    L_ayod:            set @mapname$,"ayo_fild01";            set @x,126;            set @y,197;            callsub L_Warp;    L_byl:            set @mapname$,"iz_dun00";            set @x,168;            set @y,165;            callsub L_Warp;    L_coa:            set @mapname$,"mjolnir_02";            set @x,81;            set @y,355;            callsub L_Warp;    L_einm:            set @mapname$,"einbech";            set @x,138;            set @y,246;            callsub L_Warp;    L_gefd:            set @mapname$,"gef_tower";            set @x,152;            set @y,34;            callsub L_Warp;    L_gh:            set @mapname$,"glast_01";            set @x,199;            set @y,134;            callsub L_Warp;    L_ghc:            set @mapname$,"gl_chyard";            set @x,147;            set @y,149;            callsub L_Warp;    L_ghp:            set @mapname$,"gl_prison";            set @x,91;            set @y,180;            callsub L_Warp;    L_hid:            set @mapname$,"prt_fild01";            set @x,137;            set @y,366;            callsub L_Warp;    L_ice:            set @mapname$,"ra_fild01";            set @x,233;            set @y,326;            callsub L_Warp;    L_jup:            set @mapname$,"yuno_fild07";            set @x,213;            set @y,175;            callsub L_Warp;    L_kie:            set @mapname$,"yuno_fild08";            set @x,72;            set @y,178;            callsub L_Warp;    L_mag:            set @mapname$,"yuno_fild03";            set @x,39;            set @y,140;            callsub L_Warp;    L_nam:            set @mapname$,"ve_fild07";            set @x,129;            set @y,132;            callsub L_Warp;    L_orc:            set @mapname$,"gef_fild10";            set @x,69;            set @y,333;            callsub L_Warp;    L_payc:            set @mapname$,"pay_arche";            set @x,42;            set @y,131;            callsub L_Warp;    L_proc:            set @mapname$,"prt_fild05";            set @x,282;            set @y,224;            callsub L_Warp;    L_pyr:            set @mapname$,"moc_ruins";            set @x,66;            set @y,159;            callsub L_Warp;    L_racs:            set @mapname$,"ra_temin";            set @x,28;            set @y,310;            callsub L_Warp;    L_sph:            set @mapname$,"moc_fild19";            set @x,106;            set @y,99;            callsub L_Warp;    L_sun:            set @mapname$,"alb2trea";            set @x,84;            set @y,64;            callsub L_Warp;    L_tho:            set @mapname$,"ve_fild03";            set @x,168;            set @y,288;            callsub L_Warp;    L_toy:            set @mapname$,"xmas";            set @x,143;            set @y,302;            callsub L_Warp;    L_tur:        warp "tur_dun01", 152, 49;            set @mapname$,"tur_dun0";            set @x,152;            set @y,49;            callsub L_Warp;    L_umbd:        warp "um_dun01", 42, 32;            set @mapname$,"um_dun01";            set @x,42;            set @y,32;            callsub L_Warp;            L_Warp:		if( @mapname$ == "" && !@x && !@y )			mes "YAHOOO L_Warp vars are missing aka bypassed the set!";		        set LastWarperMap$,@mapname$;        set LastWarperX,@x;        set LastWarperY,@y;        warp @mapname$,@x,@y;        end;        L_LastWarp:		if( LastWarperMap$ == "" && !LastWarperX && !LastWarperY ) {			mes "YAHOOO L_LastWarp doesn't have a record of where you've been last to!!";			close;		}        warp LastWarperMap$,LastWarperX,LastWarperY;        end;}
 
Last edited by a moderator:
It does work, thank you very much Mr. Ind. I appreciate the help, one last thing I'd like to ask though. How would I go about making Last Warp show the name of the last name you were in? I thought that would work but nothing....

Code: 
    menu "Last Warp[LastWarperMap$,]",L_LastWarp,"Prontera [" + getmapusers ("prontera") + "] ",-,"Payon [" + getmapusers ("payon") + "] ",L_pay,"Towns",L_town,"Dungeons",L_dung;
 
change

Code: 
menu "Last Warp[LastWarperMap$,]"
into
Code: 
menu "Last Warp["+LastWarperMap$+"]"
however that wont display anything if the character viewing never warped before.
 
That's fine, it looks good to me. Exactly what I wanted, if I need any more help I'll be sure to ask. Have a good day.

 
You must log in or register to reply here.
Back
Top