Here is an awesome script, not sure who originated it. It was handed down to me. I renamed and expanded it for my purposes.
Script 1, Mark.
If
HasHistory [mana] [player] [>=] [50]
Then
History [tp\x] [player] [delete]
History [tp\y] [player] [delete]
History [tp\z] [player] [delete]
Var
Var [y] = [pos:x]
Var [z] = [pos:x]
History [tp\x] [player]
History [tp\y] [player] [y]
History [tp\z] [player] [z]
Script [particle\teleswitch2]
History [mana] [-50]
Notify [A magical mark has been placed.] [local] [0,0,0]
Else
Notify [You don't have enough mana.] [local] [0,0,0]
End if
Script 2, Recall.
If
HasHistory [mana] [player] [>=] [50]
Then
Var
Var [y] = [history:tp\y]
Var [z] = [history:tp\z]
Script [particle\teleswitch2]
History [mana] [player] [-50]
Teleport [player] [x,y,z]
Notify [You return to your magical mark.] [local] [0,0,0]
Else
Notify [You need more mana.] [local] [0,0,0]
End If
That's it...
Edit; this script is screwed up by the forum text changing stuff. What ever it's called... IDK.