/*=========================================================
@go command
Original concept by jTynne
Revised by Mumbles
===========================================================
Description:
Alternative @go command. Allows for unlimited aliasing, as
well as level and group restrictions for each destination.
Additional options to add a delay, prevent use when dead,
and charge per use are available; default cost is defined
with '.cost', but this parameter can be set manually with
'go()'. These extra features are disabled by default.
Be mindful that the delay uses a temporary player variable,
'@go_delay'; if the player logs out, this variable will be
cleared. If you would like for a more secure delay, replace
all instances of '@go_delay' with 'go_delay'.
===========================================================
Compatibility:
Optimised for Hercules emulators.
===========================================================
Changelog:
v1.0 - First version. [jTynne]
v2.0 - Added additional parameters for locations. [jTynne]
v3.0 - Optimised for Hercules emulators. [Mumbles]
v3.0.1 - Introduced limitless aliasing. [Mumbles]
v3.0.2 - Added go() function. [Mumbles]
v3.1 - Added option to charge per use. [Mumbles]
v3.1.1 - Added option to limit use when dead. [Mumbles]
v3.1.2 - Added option to limit use to towns. [Mumbles]
v3.1.3 - Added changelog. [Mumbles]
=========================================================*/
- script at_go -1,{
/*-----------------------------------------------------
Configuration
-----------------------------------------------------*/
OnInit:
set .delay, 0; // Delay per use, in seconds (default: 0)
set .cost, 10000; // Default cost to use command if '.charge' is enabled
set .charge, 0; // Charge to use command? 0 = no, 1 = yes (default: 0)
set .deadlock, 0; // Prevent usage when dead? 0 = no, 1 = yes (default: 0)
set .town, 0; // Require 'mf_town'? 0 = no, 1 = yes (default: 0)
bindatcmd "go", strnpcinfo(3) +"::OnAtcommand", 0, 2;
end;
/*-----------------------------------------------------
Function: go()
-------------------------------------------------------
Description: Warps player and checks prerequisites.
-------------------------------------------------------
Usage:
go(<"map_name">, <x>, <y>, <level>, <group>, <cost>)
-----------------------------------------------------*/
function go {
if (.deadlock && !Hp) {
message strcharinfo(0), "You may not use @go when you are dead.";
} else if (.town && !getmapflag(strcharinfo(3), mf_town)) {
message strcharinfo(0), "You may only use @go in towns.";
} else if (.delay && @go_delay > gettimetick(2)) {
message strcharinfo(0), "You must wait "+ (@go_delay - gettimetick(2)) +" seconds before warping again.";
} else if (BaseLevel < getarg(3)) {
message strcharinfo(0), "You must be at least level "+ getarg(3) +" to warp to this map.";
} else if (strcharinfo(0) < getarg(4) || getmapflag(getarg(0), mf_nowarp)) {
message strcharinfo(0), "You are not authorised to warp to this map.";
} else if (.charge && Zeny < getarg(5)) {
message strcharinfo(0), "You must have at least "+ getarg(5) +" zeny to warp to this map.";
} else {
if (.delay) {
@go_delay = gettimetick(2) + .delay;
}
if (.charge) {
Zeny -= getarg(5);
}
warp getarg(0), getarg(1), getarg(2);
end;
}
message strcharinfo(0), "@go failed.";
end;
}
/*-----------------------------------------------------
Function: alias()
-------------------------------------------------------
Description: Determines if input matches alias.
-------------------------------------------------------
Usage: alias(<"number">, <"name1">{, <"name2">, <...>})
-----------------------------------------------------*/
function alias {
for (.@i = 0; .@i < getargcount(); .@i++) {
if (@input$ == getarg(.@i)) {
@input$ = "";
return true;
}
}
return false;
}
/*-----------------------------------------------------
Script
-----------------------------------------------------*/
OnAtcommand:
@input$ = .@atcmd_parameters$[0];
if (alias("0", "pro", "pront", "prontera")) {
go("prontera",156, 184, 0, 0, .cost);
} else if (alias("1", "moc", "mor", "morocc", "morroc")) {
go("morocc", 160, 100, 0, 0, .cost);
} else if (alias("2", "gef", "geffen")) {
go("geffen", 120, 70, 0, 0, .cost);
} else if (alias("3", "pay", "payo", "payon")) {
go("payon", 174, 98, 0, 0, .cost);
} else if (alias("4", "alb", "alberta")) {
go("alberta", 192, 147, 0, 0, .cost);
} else if (alias("5", "izl", "izlude")) {
go("izlude", 127, 109, 0, 0, .cost);
} else if (alias("6", "ald", "alde", "aldebaran")) {
go("aldebaran", 140, 114, 0, 0, .cost);
} else if (alias("7", "xmas", "lutie")) {
go("xmas", 148, 117, 0, 0, .cost);
} else if (alias("8", "com", "comodo")) {
go("comodo",189, 151, 0, 0, .cost);
} else if (alias("9", "juno", "yuno")) {
go("yuno", 157, 182, 0, 0, .cost);
} else if (alias("10", "ama", "amat", "amatsu")) {
go("amatsu", 115, 153, 0, 0, .cost);
} else if (alias("11", "gon", "gonr", "gonryun")) {
go("gonryun", 159, 116, 0, 0, .cost);
} else if (alias("12", "umb", "umbala", "umbrella")) {
go("umbala", 90, 154, 0, 0, .cost);
} else if (alias("13", "nif", "niflheim")) {
go("niflheim", 195, 175, 0, 0, .cost);
} else if (alias("14", "lou", "louyang")) {
go("louyang", 218, 99, 0, 0, .cost);
} else if (alias("15", "nov", "ng", "novice")) {
go("new_1-1", 53, 111, 0, 10, .cost);
} else if (alias("16", "jail", "prison")) {
go("sec_pri", 23, 61, 0, 10, .cost);
} else if (alias("17", "jaw", "jawaii")) {
go("jawaii", 221, 221, 0, 0, .cost);
} else if (alias("18", "ayo", "ayotaya", "ayothaya")) {
go("ayothaya", 151, 165, 0, 0, .cost);
} else if (alias("19", "ein", "einbroch")) {
go("einbroch", 64, 200, 0, 0, .cost);
} else if (alias("20", "lhz", "light", "lighthalzen")) {
go("lighthalzen", 158, 92, 0, 0, .cost);
} else if (alias("21", "einbe", "einbech")) {
go("einbech", 176, 125, 0, 0, .cost);
} else if (alias("22", "hug", "hugel")) {
go("hugel", 96, 145, 0, 0, .cost);
} else if (alias("23", "rach", "rachel")) {
go("rachel", 130, 110, 0, 0, .cost);
} else if (alias("24", "ve", "veins")) {
go("veins", 216, 123, 0, 0, .cost);
} else if (alias("25", "mosc", "mosk", "moscovia")) {
go("moscovia", 223, 184, 0, 0, .cost);
} else if (alias("26", "camp", "mid", "midgard")) {
go("mid_camp", 180, 240, 0, 0, .cost);
} else if (alias("27", "man", "manuk")) {
go("manuk", 282, 138, 0, 0, .cost);
} else if (alias("28", "spl", "splend", "splendide")) {
go("splendide", 197, 176, 0, 0, .cost);
} else if (alias("29", "br", "bra", "brasil", "brasilis")) {
go("brasilis", 182, 239, 0, 0, .cost);
} else if (alias("30", "el", "eldic", "dic", "dicastes")) {
go("dicastes01", 198, 187, 0, 0, .cost);
} else if (alias("31", "mora")) {
go("mora", 44, 151, 0, 0, .cost);
} else if (alias("32", "dew", "dewata")) {
go("dewata", 200, 180, 0, 0, .cost);
} else if (alias("33", "mal", "malang", "malangdo")) {
go("malangdo", 140, 114, 0, 0, .cost);
} else if (alias("34", "port", "malay", "malaya")) {
go("malaya", 242, 211, 0, 0, .cost);
} else if (alias("35", "ecl", "ecla", "eclag", "eclage")) {
go("eclage", 110, 39, 0, 0, .cost);
} else {
message strcharinfo(0), "Invalid location number, or name.";
message strcharinfo(0), "Params: <city name|number>";
message strcharinfo(0), "Warps you to a city.";
message strcharinfo(0), "0: Prontera 1: Morroc 2: Geffen 3: Payon 4: Alberta";
message strcharinfo(0), "5: Izlude 6: Al De Baran 7: Lutie 8: Comodo 9: Yuno";
message strcharinfo(0), "10: Amatsu 11: Gonryun 12: Umbala 13: Niflheim 14: Louyang";
message strcharinfo(0), "15: Novice Grounds 16: Prison 17: Jawaii 18: Ayothaya 19: Einbroch";
message strcharinfo(0), "20: Lighthalzen 21: Einbech 22: Hugel 23: Rachel 24: Veins";
message strcharinfo(0), "25: Moscovia 26: Midgard Camp 27: Manuk 28: Splendide 29: Brasilis";
message strcharinfo(0), "30: El Dicastes 31: Mora 32: Dewata 33: Malangdo 34: Malaya";
message strcharinfo(0), "35: Eclage";
message strcharinfo(0), "@go failed.";
}
end;
}