Several people asked me for the store cad macro I am using. Lena originally wrote it, and Noivad kindly made a most useful extension. You know, the guy who is fixing space-time-continuum glitches on a daily basis. So you know the macro is pretty cool.
For those macro illiterates like me. Shift-click on a char fills up the f-key list, starting from f-5 - F-12. After defining those f-keys, given player can be healed by pressing said f-key. Changing the f-key is easy with the time-space-continuum fixer-guy's addition: Select a person, say with command-click, then command-f-key, and the f-key now heals that person. There are some other goodies in the macro, read it if you like
I am planning an extension to shift-f-key for those pesky hunts where there are more than 8 people who need healing, but never got around to it. Taking applications of other time-space-continuum-workers who would work on such a project.
For those macro illiterates like me. Shift-click on a char fills up the f-key list, starting from f-5 - F-12. After defining those f-keys, given player can be healed by pressing said f-key. Changing the f-key is easy with the time-space-continuum fixer-guy's addition: Select a person, say with command-click, then command-f-key, and the f-key now heals that person. There are some other goodies in the macro, read it if you like
I am planning an extension to shift-f-key for those pesky hunts where there are more than 8 people who need healing, but never got around to it. Taking applications of other time-space-continuum-workers who would work on such a project. Code: Select all
//store-cadding (Lena)
"cc" call simple_cad1
setglobal counter1 1
shift-click
{
$any_click
"/select " @clicksplayer \r
setglobal player @splayer
call button
}
simple_cad1
{
setglobal player @splayer
call button
}
tab call displays
displays
{
if cadtarget5 == "cadtarget5"
message "F5: No player selected."
else
"/select " cadtarget5 \r
message "F5: "cadtarget5
pause 1
end if
if cadtarget6 == "cadtarget6"
message "F6: No player selected."
else
"/select " cadtarget6 \r
message "F6: "cadtarget6
pause 1
end if
if cadtarget7 == "cadtarget7"
message "F7: No player selected."
else
"/select " cadtarget7 \r
message "F7: "cadtarget7
pause 1
end if
if cadtarget8 == "cadtarget8"
message "F8: No player selected."
else
"/select " cadtarget8 \r
message "F8: "cadtarget8
pause 1
end if
if cadtarget9 == "cadtarget9"
message "F9: No player selected."
else
"/select " cadtarget9 \r
message "F9: "cadtarget9
pause 1
end if
if cadtarget10 == "cadtarget10"
message "F10: No player selected."
else
"/select " cadtarget10 \r
message "F10: "cadtarget10
pause 1
end if
if cadtarget11 == "cadtarget11"
message "F11: No player selected."
else
"/select " cadtarget11 \r
message "F11: "cadtarget11
pause 1
end if
if cadtarget12 == "cadtarget12"
message "F12: No player selected."
else
"/select " cadtarget12 \r
message "F12: "cadtarget12
pause 1
end if
}
f5
{
if cadtarget5 == "cadtarget5"
message "*No player selected"
else
setglobal player cadtarget5
call button2
end if
}
f6
{
if cadtarget6 == "cadtarget6"
message "*No player selected"
else
setglobal player cadtarget6
call button2
end if
}
f7
{
if cadtarget7 == "cadtarget7"
message "*No player selected"
else
setglobal player cadtarget7
call button2
end if
}
f8
{
if cadtarget8 == "cadtarget8"
message "*No player selected"
else
setglobal player cadtarget8
call button2
end if
}
f9
{
if cadtarget9 == "cadtarget9"
message "*No player selected"
else
setglobal player cadtarget9
call button2
end if
}
f10
{
if cadtarget10 == "cadtarget10"
message "*No player selected"
else
setglobal player cadtarget10
call button2
end if
}
f11
{
if cadtarget11 == "cadtarget11"
message "*No player selected"
else
setglobal player cadtarget11
call button2
end if
}
f12
{
if cadtarget12 == "cadtarget12"
message "*No player selected"
else
setglobal player cadtarget12
call button2
end if
}
button2
{
set user @my.name
if player == ""
call selfheal
else if player == user
call selfheal
else
call cad2
end if
}
button
{
set user @my.name
if player == ""
call selfheal
else if player == user
call selfheal
else
call cad
end if
}
selfheal
{
if @my.right_item == "moonstone"
goto done
end if
"/equip moonstone" \r
label wait_for_moonstone
if @my.right_item == "moonstone"
goto done
else
pause 2
goto wait_for_moonstone
end if
label done
"/use 3" \r
}
cad
{
if @my.right_item == "asklepian staff"
goto done
end if
"/equip asklepian staff"\r
label wait_for_cad
if @my.right_item == "asklepian staff"
goto done
else
pause 2
goto wait_for_cad
end if
label done
"/use " player \r
message "*You are healing " player "."
call rotatename
}
cad2
{
if @my.right_item == "asklepian staff"
goto done
end if
"/equip asklepian staff"\r
label wait_for_cad
if @my.right_item == "asklepian staff"
goto done
else
pause 2
goto wait_for_cad
end if
label done
"/use " player \r
message "*You are healing " player "."
}
rotatename
{
if counter1 == 1
setglobal cadtarget5 ""
setglobal cadtarget6 "cadtarget6"
setglobal cadtarget7 "cadtarget7"
setglobal cadtarget8 "cadtarget8"
setglobal cadtarget9 "cadtarget9"
setglobal cadtarget10 "cadtarget10"
setglobal cadtarget11 "cadtarget11"
setglobal cadtarget12 "cadtarget12"
setglobal cadtarget5 @splayer
else if counter1 == 2
setglobal cadtarget6 @splayer
else if counter1 == 3
setglobal cadtarget7 @splayer
else if counter1 == 4
setglobal cadtarget8 @splayer
else if counter1 == 5
setglobal cadtarget9 @splayer
else if counter1 == 6
setglobal cadtarget10 @splayer
else if counter1 == 7
setglobal cadtarget11 @splayer
else if counter1 == 8
setglobal cadtarget12 @splayer
else
message "*Invalid counter1" counter1
end if
if counter1 == 8
setglobal counter1 1
else
setglobal counter1 + 1
end if
}
//Noivad's addition
command-F5 setglobal cadtarget5 @splayer
command-F6 setglobal cadtarget6 @splayer
command-F7 setglobal cadtarget7 @splayer
command-F8 setglobal cadtarget8 @splayer
command-F9 setglobal cadtarget9 @splayer
command-F10 setglobal cadtarget10 @splayer
command-F11 setglobal cadtarget11 @splayer
command-F12 setglobal cadtarget12 @splayer