// Moubootaur Legends Script
// Author: Jesusalva
// Location Config
- script loc_config 32767,{
end;
OnInit:
// TODO: Migglemire, Westport... As this is only used for ship right now, meh
setarray $@LOCMASTER_TP, TP_ARTIS, TP_TULIM, TP_HURNS, TP_CANDOR, TP_ARGAES;
setarray $@LOCMASTER_LOC$, "Artis", "Tulim" , "Hurns" , "Candor" , "Argaes" ;
setarray $@LOCMASTER_MAP$, "001-1", "020-1" , "008-1" , "012-1" , "008-1-1";
setarray $@LOCMASTER_X, 203, 209, 326, 63, 33;
setarray $@LOCMASTER_Y, 85, 143, 104, 133, 63;
end;
OnInterIfInit:
// Create ship instances
/* La Marine's Ship */
// Tulim Instance
.TULIM_INSTID = instance_create("marine@TulimInst", 0, IOT_NONE);
instance_attachmap("marine", .TULIM_INSTID, 0, "marine@Tulim");
instance_set_timeout(0, 0, .TULIM_INSTID);
instance_init(.TULIM_INSTID);
// Hurns Instance
.HURNS_INSTID = instance_create("marine@HurnsInst", 0, IOT_NONE);
instance_attachmap("marine", .HURNS_INSTID, 0, "marine@Hurns");
instance_set_timeout(0, 0, .HURNS_INSTID);
instance_init(.HURNS_INSTID);
// Candor Instance
.CANDOR_INSTID = instance_create("marine@CandorInst", 0, IOT_NONE);
instance_attachmap("marine", .CANDOR_INSTID, 0, "marine@Candor");
instance_set_timeout(0, 0, .CANDOR_INSTID);
instance_init(.CANDOR_INSTID);
// Artis Instance (Frigate Gema IV)
.ARTIS_INSTID = instance_create("marine@ArtisInst", 0, IOT_NONE);
instance_attachmap("marine", .ARTIS_INSTID, 0, "marine@Artis");
instance_set_timeout(0, 0, .ARTIS_INSTID);
instance_init(.ARTIS_INSTID);
/* Other instances */
.GALI_INSTID = instance_create("008-1-1@galimatia", 0, IOT_NONE);
instance_attachmap("008-1-1", .GALI_INSTID, 0, "gali@matia");
instance_set_timeout(0, 0, .GALI_INSTID);
instance_init(.GALI_INSTID);
end;
}
// Warps you to last visited town
function script ReturnLastTown {
PC_DEST$ = "";
@timer_navio_running = 0;
.@i=array_find($@LOCMASTER_LOC$, LOCATION$);
warp $@LOCMASTER_MAP$[.@i], $@LOCMASTER_X[.@i], $@LOCMASTER_Y[.@i];
return;
}
// Upon entering a town, save it to LOCATION$
// EnterTown( LocName{, warp=False} )
function script EnterTown {
// Fill variable
.@v$=getarg(0);
// Validade variable
if (array_find($@LOCMASTER_LOC$, .@v$) < 0) {
consolemes(CONSOLEMES_ERROR, "Invalid location passed to EnterTown: "+.@v$);
if (getarg(1, false))
ReturnLastTown();
return;
}
// Save location
LOCATION$=.@v$;
// If "warp" is true
if (getarg(1, false))
ReturnLastTown();
return;
}