@go bind script

[Evelynn]

Does anyone have jTynne's @go bind script? His webhost is down or not running anymore so I can't download the file.

Would be nice if you could share it!

 

 

Thanks.

[EL Dragon]

- script gobind -1,{

// Script-Based @go Alternative by jTynne

// Version: 2.0 - January 2013

// Feel free to edit this script or simply use it as a base.

// Please give credit if you re-release this script with your own modifications.

// Want to show your thanks via Paypal? Shoot me a buck or two : [email protected] - Thanks!

OnInit:

bindatcmd "go","gobind::OnAtcommand",0,10;

end;

OnAtcommand:

if(compare (.@atcmd_parameters$[0],"list")) { dispbottom "Usage: @go #";

dispbottom "0= Invek 1=Prontera 2=Morroc 3=Geffen 4=Payon";

dispbottom "5=Alberta 6=Izlude 7=Al De Baran 8=Lutie 9=Comodo";

dispbottom "10=Yuno 11=Amatsu 12=Gonryun 13=Umbala 14=Niflheim";

dispbottom "15=Louyang 16=Novice Grounds 17=Prison 18=Jawaii 19=Ayothaya";

dispbottom "20=Einbroch 21=Lighthalzen 22=Einbech 23=Hugel 24=Rachel";

dispbottom "25=Veins 26=Moscovia 27=Midgard Camp 28=Manuk 29=Splendide";

dispbottom "30=Bloodyprontera 31=El Dicastes 32=Mora 33=Dewata 34=Malangdo";

dispbottom "35=Port Malaya 36=Eclage";

end;

}

// map name,x,y,level requirement, group id minimum requirement

if(compare (.@atcmd_parameters$[0],"invek") || .@atcmd_parameters$[0] == "0") { callsub Process,"invek",146,166,0,0; }

if(compare (.@atcmd_parameters$[0],"prontera") || .@atcmd_parameters$[0] == "1") { callsub Process,"prontera",156,191,0,0; }

if(compare (.@atcmd_parameters$[0],"morocc") || .@atcmd_parameters$[0] == "2") { callsub Process,"morocc",156,93,0,0; }

if(compare (.@atcmd_parameters$[0],"geffen") || .@atcmd_parameters$[0] == "3") { callsub Process,"geffen",119,59,0,0; }

if(compare (.@atcmd_parameters$[0],"payon") || .@atcmd_parameters$[0] == "4") { callsub Process,"payon",177,101,0,0; }

if(compare (.@atcmd_parameters$[0],"alberta") || .@atcmd_parameters$[0] == "5") { callsub Process,"alberta",192,147,0,0; }

if(compare (.@atcmd_parameters$[0],"izlude") || .@atcmd_parameters$[0] == "6") { callsub Process,"izlude",128,114,0,0; }

if(compare (.@atcmd_parameters$[0],"aldebaran") || .@atcmd_parameters$[0] == "7") { callsub Process,"aldebaran",140,131,0,0; }

if(compare (.@atcmd_parameters$[0],"lutie") || .@atcmd_parameters$[0] == "8" ) { callsub Process,"xmas",147,134,0,0; }

if(compare (.@atcmd_parameters$[0],"comodo") || .@atcmd_parameters$[0] == "9" ) { callsub Process,"comodo",209,143,0,0; }

if(compare (.@atcmd_parameters$[0],"yuno") || .@atcmd_parameters$[0] == "10") { callsub Process,"yuno",157,51,0,0; }

if(compare (.@atcmd_parameters$[0],"amatsu") || .@atcmd_parameters$[0] == "11") { callsub Process,"amatsu",198,84,0,0; }

if(compare (.@atcmd_parameters$[0],"gonryun") || .@atcmd_parameters$[0] == "12") { callsub Process,"gonryun",160,120,0,0; }

if(compare (.@atcmd_parameters$[0],"umbala") || .@atcmd_parameters$[0] == "13") { callsub Process,"umbala",89,157,0,0; }

if(compare (.@atcmd_parameters$[0],"niflheim") || .@atcmd_parameters$[0] == "14") { callsub Process,"niflheim",21,153,0,0; }

if(compare (.@atcmd_parameters$[0],"louyang") || .@atcmd_parameters$[0] == "15") { callsub Process,"louyang",217,40,0,0; }

if(.@atcmd_parameters$[0] == "16") { callsub Process,"new_1-1",53,111,0,10; } // Novice Grounds : GM Group 10 or higher only.

if(.@atcmd_parameters$[0] == "17") { callsub Process,"sec_pri",23,61,0,10;} // Prison: GM Group 10 or higher only.

if(compare (.@atcmd_parameters$[0],"jawaii") || .@atcmd_parameters$[0] == "18") { callsub Process,"jawaii",249,127,0,0; }

if(compare (.@atcmd_parameters$[0],"ayothaya") || .@atcmd_parameters$[0] == "19") { callsub Process,"ayothaya",151,117,0,0; }

if(compare (.@atcmd_parameters$[0],"einbroch") || .@atcmd_parameters$[0] == "20") { callsub Process,"einbroch",64,200,0,0; }

if(compare (.@atcmd_parameters$[0],"lighthalzen") || .@atcmd_parameters$[0] == "21") { callsub Process,"lighthalzen",158,92,0,0; }

if(compare (.@atcmd_parameters$[0],"einbech") || .@atcmd_parameters$[0] == "22") { callsub Process,"einbech",70,95,0,0; }

if(compare (.@atcmd_parameters$[0],"hugel") || .@atcmd_parameters$[0] == "23") { callsub Process,"hugel",96,145,0,0; }

if(compare (.@atcmd_parameters$[0],"rachel") || .@atcmd_parameters$[0] == "24") { callsub Process,"rachel",130,110,0,0; }

if(compare (.@atcmd_parameters$[0],"veins") || .@atcmd_parameters$[0] == "25") { callsub Process,"veins",216,123,0,0; }

if(compare (.@atcmd_parameters$[0],"moscovia") || .@atcmd_parameters$[0] == "26") { callsub Process,"moscovia",223,184,0,0; }

if(compare (.@atcmd_parameters$[0],"midgard") || .@atcmd_parameters$[0] == "27") { callsub Process,"mid_camp",180,240,0,0; }

if(compare (.@atcmd_parameters$[0],"manuk") || .@atcmd_parameters$[0] == "28") { callsub Process,"manuk",282,138,0,0; }

if(compare (.@atcmd_parameters$[0],"splendide") || .@atcmd_parameters$[0] == "29") { callsub Process,"splendide",197,176,0,0; }

if(compare (.@atcmd_parameters$[0],"prontera2") || .@atcmd_parameters$[0] == "30") { callsub Process,"prontera2",155,192,0,0; }

if(compare (.@atcmd_parameters$[0],"el dicastes") || .@atcmd_parameters$[0] == "31") { callsub Process,"dicastes01",198,187,0,0; }

if(compare (.@atcmd_parameters$[0],"mora") || .@atcmd_parameters$[0] == "32") { callsub Process,"mora",44,151,0,0; }

if(compare (.@atcmd_parameters$[0],"dewata") || .@atcmd_parameters$[0] == "33") { callsub Process,"dewata",200,180,0,0; }

if(compare (.@atcmd_parameters$[0],"malangdo") || .@atcmd_parameters$[0] == "34") { callsub Process,"malangdo",140,114,0,0; }

if(compare (.@atcmd_parameters$[0],"malaya") || .@atcmd_parameters$[0] == "35") { callsub Process,"malaya",242,211,0,0; }

if(compare (.@atcmd_parameters$[0],"eclage") || .@atcmd_parameters$[0] == "36") { callsub Process,"eclage",110,39,0,0; }

// Custom @go locations below. Also edit them in or out of the master list found towards the top of this script file.

else {

dispbottom "[Server] : To use @go, enter a number 0 or greater. For a full list of available warps, type '@go list'.";

end;

}

end;

Process:

set .@group,getarg(4);

set .@lvl,getarg(3);

set .@mapname$,getarg(0);

set .@x,getarg(1);

set .@y,getarg(2);

if(.@lvl > 0) { if(BaseLevel < .@lvl) { dispbottom "[Server] : You need to be at least base level "+.@lvl+" or higher to teleport to this location."; end;} }

if(.@group > 0) { if(getgroupid() < .@group) { dispbottom "[Server] : This map cannot be accessed by your group/account level."; end;} }

warp .@mapname$,.@x,.@y;

end;

}

[Evelynn]

Thank you!