Moderator: MacroQuest Developers


Code: Select all
#turbo
Sub Main
/click left 240 160
/delay 5
/call Type "Recipe"
/return
Sub Type(InStr)
/declare char local
/declare loopctr local
/for loopctr 1 to ${String[@InStr].Length}
/varset char ${String[@InStr].Mid[@loopctr,1]}
/if (${String[@char].Equal[ ]}) {
/keypress space [chat]
} else {
/keypress @char [chat]
}
/next loopctr
/return
Code: Select all
/keypress space [chat]
Code: Select all
/keypress space chat

Code: Select all
| Type out the input string. Only non-alphabetic character
| currently handled is space.
Sub Type(InStr)
/declare char local
/declare loopctr local
/for loopctr 1 to ${String[@InStr].Length}
/varset char ${String[@InStr].Mid[@loopctr,1]}
/if (!${String[@char].Length}) {
/keypress space chat
} else {
/keypress @char chat
}
/next loopctr
/return

Code: Select all
#turbo
Sub Main
/notify TradeskillWnd SearchTextEdit leftmouseup
/delay 5
/call Type "steel boning"
/delay 40
/notify TradeskillWnd SearchButton leftmouseup
/delay 20
/notify TradeskillWnd RecipeList leftmouseup
/return
| Type out the input string. Only non-alphabetic character
| currently handled is space.
Sub Type(InStr)
/declare char local
/declare loopctr local
/for loopctr 1 to ${String[@InStr].Length}
/varset char ${String[@InStr].Mid[@loopctr,1]}
/if (!${String[@char].Length}) {
/keypress space chat
} else {
/keypress @char chat
}
/next loopctr
/return
Code: Select all
/notify TradeskillWnd RecipeList newvalue 1
