PDA

Ir para Versão Original : Macro pra SL dar Spirit [Contribuição]

solavanque
24/01/2008, 13:38:07
automacro self {
pm "link"
call priv
}
macro priv {
pm Bedlam "halo"
stop
pm Bedlam "link"
stop
}
automacro link {
pm "link"
call linktime
}
macro linktime {
$id = @player ($.lastpm)
if ($id < 0) stop
$jobID = @eval ($::players{$::playersID[$id]}->{jobID})
if ($jobID = 7) goto knight
if ($jobID = 13) goto knight
if ($jobID = 4008) goto knight
if ($jobID = 4014) goto knight
if ($jobID = 12) goto assassin
if ($jobID = 4013) goto assassin
if ($jobID = 10) goto smith
if ($jobID = 4011) goto smith
if ($jobID = 14) goto paladin
if ($jobID = 21) goto paladin
if ($jobID = 4015) goto paladin
if ($jobID = 4022) goto paladin
if ($jobID = 4012) goto sniper
if ($jobID = 11) goto sniper
if ($jobID = 16) goto professor
if ($jobID = 4017) goto professor
if ($jobID = 8) goto priest
if ($jobID = 4009) goto priest
if ($jobID = 15) goto champion
if ($jobID = 4016) goto champion
if ($jobID = 4010) goto wizard
if ($jobID = 4018) goto stalker
if ($jobID = 18) goto creator
if ($jobID = 4019) goto creator
if ($jobID = 4020) goto clown
if ($jobID = 4021) goto clown
if ($jobID = 19) goto clown
if ($jobID = 20) goto clown
if ($jobID = 4047) goto star
if ($jobID = 4049) goto soul
if ($jobID = 23) goto snoob
stop

:star
do sp 448 "$.lastpm" 5
stop
release link
:soul
do sp 461 "$.lastpm" 5
stop
release link
:knight
do sp 452 "$.lastpm" 5
stop
release link
:priest
do sp 454 "$.lastpm" 5
stop
release link
:wizard
do sp 453 "$.lastpm" 5
stop
release link
:smith
do sp 458 "$.lastpm" 5
stop
release link
:sniper
do sp 460 "$.lastpm" 5
stop
release link
:assassin
do sp 457 "$.lastpm" 5
stop
release link
:paladin
do sp 450 "$.lastpm" 5
stop
release link
:champion
do sp 447 "$.lastpm" 5
stop
release link
:professor
do sp 449 "$.lastpm" 5
stop
release link
:creator
do sp 445 "$.lastpm" 5
stop
release link
:clown
do sp 455 "$.lastpm" 5
stop
release link
:stalker
do sp 456 "$.lastpm" 5
stop
release link
}
automacro ka {
pm "ka"
call ka
}

Essa parte aki, se seu SL estiver com Spirit de SL ele ainda pode bufar vc com isso!!!!
macro ka {
$id = @player ($.lastpm)
if ($id < 0) stop
do sp 462 "$.lastpm" 7
stop
do sp 463 "$.lastpm" 7
stop
do sp 464 "$.lastpm" 3
stop
do sp 465 "$.lastpm" 7
stop
release ka
}



É so mandar PM com a palavra link!!!!

^^
Edit
Onde tiver o smile mude pra : p (sem espaço)
wea!
05/02/2008, 1:37:17
::p
wea!
05/02/2008, 1:37:40
tira esse smile de : p que isso complica -.-" heauehuas
lerdo pra xuxu
06/03/2008, 13:02:31
Manow uma pergunta

se eu mudar ond tem Link

pra colocar tipo uma senha..

Funfa né?
Debardo
13/03/2008, 4:27:24
Parabens solavanque ótima contribuição.

Sem mais!!!
capetadocao
11/04/2008, 16:49:24
Estou tendo problemas na linha $jobID = @eval ($::players{$::playersID[$id]}->{jobID})
Como que é sem a carinha ? Por acaso no lugar de players eu coloco o nick do meu char ?

:p ( este smile é : (dois pontos) e p (p minúsculo) ) heahehea
Guthyerrez
21/04/2008, 23:11:39
nao entendi tbm --'
solavanque
02/05/2008, 18:32:36
são os smiles do forum!!!
Onde tiver a carinha é :p / dois pontos e p minusculo
Leaf
29/05/2008, 18:50:02
automacro self {
pm "link"
call priv
}
macro priv {
pm Bedlam "halo"
stop
pm Bedlam "link"
stop
}
automacro link {
pm "link"
call linktime
}
macro linktime {
$id = @player ($.lastpm)
if ($id < 0) stop
$jobID = @eval ($::players{$::playersID[$id]}->{jobID})
if ($jobID = 7) goto knight
if ($jobID = 13) goto knight
if ($jobID = 4008) goto knight
if ($jobID = 4014) goto knight
if ($jobID = 12) goto assassin
if ($jobID = 4013) goto assassin
if ($jobID = 10) goto smith
if ($jobID = 4011) goto smith
if ($jobID = 14) goto paladin
if ($jobID = 21) goto paladin
if ($jobID = 4015) goto paladin
if ($jobID = 4022) goto paladin
if ($jobID = 4012) goto sniper
if ($jobID = 11) goto sniper
if ($jobID = 16) goto professor
if ($jobID = 4017) goto professor
if ($jobID = 8) goto priest
if ($jobID = 4009) goto priest
if ($jobID = 15) goto champion
if ($jobID = 4016) goto champion
if ($jobID = 4010) goto wizard
if ($jobID = 4018) goto stalker
if ($jobID = 18) goto creator
if ($jobID = 4019) goto creator
if ($jobID = 4020) goto clown
if ($jobID = 4021) goto clown
if ($jobID = 19) goto clown
if ($jobID = 20) goto clown
if ($jobID = 4047) goto star
if ($jobID = 4049) goto soul
if ($jobID = 23) goto snoob
stop

:star
do sp 448 "$.lastpm" 5
stop
release link
:soul
do sp 461 "$.lastpm" 5
stop
release link
:knight
do sp 452 "$.lastpm" 5
stop
release link
:priest
do sp 454 "$.lastpm" 5
stop
release link
:wizard
do sp 453 "$.lastpm" 5
stop
release link
:smith
do sp 458 "$.lastpm" 5
stop
release link
:sniper
do sp 460 "$.lastpm" 5
stop
release link
:assassin
do sp 457 "$.lastpm" 5
stop
release link
:paladin
do sp 450 "$.lastpm" 5
stop
release link
:champion
do sp 447 "$.lastpm" 5
stop
release link
:professor
do sp 449 "$.lastpm" 5
stop
release link
:creator
do sp 445 "$.lastpm" 5
stop
release link
:clown
do sp 455 "$.lastpm" 5
stop
release link
:stalker
do sp 456 "$.lastpm" 5
stop
release link
}
automacro ka {
pm "ka"
call ka
}

Essa parte aki, se seu SL estiver com Spirit de SL ele ainda pode bufar vc com isso!!!!
macro ka {
$id = @player ($.lastpm)
if ($id < 0) stop
do sp 462 "$.lastpm" 7
stop
do sp 463 "$.lastpm" 7
stop
do sp 464 "$.lastpm" 3
stop
do sp 465 "$.lastpm" 7
stop
release ka
}

Testem agora sem smiles^^.
Bom_Bot
07/06/2008, 13:13:57
Estive testando essa macro, porem quando o char tem um caracter especial (:,/,?,,...) no nome o comando $jobID = @eval ($::players{$::playersID[$id]}->{jobID}) da erro.
Tirei o comando @eval pra testar e descobrir que não estava capturando o ID.

-----------------------------------
Por exemplo, com o nome "EUnoob ?".

$id = @player ($.lastpm)
if ($id < 0) stop
#$jobID = @eval ($::players{$::playersID[$id]}->{jobID})
log -------------------------
log Char = $.lastpm | ID = $id
log -------------------------

resultado:
[macro log] -------------------------
[macro log] Char = EUnoob/ /? | ID = -1
[macro log] -------------------------
__________________________________________________
---------------------------------------------------------

Se eu colocar aspas fica assim:

-----------------------------------
$id = @player ("$.lastpm")
if ($id < 0) stop
#$jobID = @eval ($::players{$::playersID[$id]}->{jobID})
log -------------------------
log Char = "$.lastpm" | ID = $id
log -------------------------

resultado:
[macro log] -------------------------
[macro log] Char = "EUnoob ?" | ID = -1
[macro log] -------------------------
__________________________________________________
---------------------------------------------------------

Alguem conseguiu solucionar isso?

Minha macro está salva em formato UTF-8.







__________________________________________________ ____________________
------------ Edit ---------------------------------------------------------------
Atualizei a versão do openkore e macros e funfou.
O problema vai ser atualizar os plugins.
/sos