You must open scripts/tcl folder and copy one of file from this folder for exemple AI rename it(for exemple temp1) and paste to scripts/tcl folder.
Open file which you create(temp1) and delete all text in this file.
Next add this
Code:
namespace eval temp1 {
proc QueryQuest { obj player questid } {
Teleport $player 1 4674.88 -3638.37 965.264 //hyjal
}
}
if you want different location you can change and portal will teleport you there.
Next you must create new gameobject.
Open file gameobject and add something like that:
[gameobj 220030]
name=Portal to hyjal
questscript=temp1 <-----this is a name of script which you create earlier
type=2
sound1=76
level=10
flags=040
size=0.200000
model=4713
sound2=1