1 Sistema De Casa 4/10/2012, 23:55
Myke ~
Membro Honorário I
Coloque esse Código Na case ScriptedTile
Coloque no Lugar do "Dono da Casa" pelo nome do player entre as aspas.
Agora só ir no Editor de Mapas e colocar no lugar da Porta 8D.
Créditos ~
Raicon
Marmitex
Eu por Postar
- Código:
if getplayername(index) = "Nome do dono da casa" then
else
Dim Dir
Dim Dir2
if getplayerdir(index) = 1 then
Dir = getplayery(index) -1
Dir2 = getplayerx(index)
end if
if getplayerdir(index) = 0 then
Dir = getplayery(index) +1
Dir2 = getplayerx(index)
end if
if getplayerdir(index) = 2 then
Dir2 = getplayerx(index) +1
Dir = getplayery(index)
end if
if getplayerdir(index) = 3 then
Dir2 = getplayerx(index) -1
Dir = getplayery(index)
end if
call playerwarp(index, getplayermap(index), Dir2, Dir)
end if
Coloque no Lugar do "Dono da Casa" pelo nome do player entre as aspas.
Agora só ir no Editor de Mapas e colocar no lugar da Porta 8D.
Créditos ~
Raicon
Marmitex
Eu por Postar