Moderator: MacroQuest Developers
Code: Select all
#chat tell
Sub Event_Chat(MsgType,MsgFrom,MsgData)
/g @MsgFrom + ": " + @MsgData
/return
Code: Select all
/gsay @MsgFrom : "@MsgData"Code: Select all
/declare mystring local
/varset mystring "@MsgFrom"
/varcat mystring " : "
/varcat mystring "@MsgData"
/gsay "@mystring"
Code: Select all
Sub Main
/zapvars
/cleanup
/call DefineEvents
:Next
/call GotoNPC
/keypress c
/goto :Next
/return
Sub DefineEvents
#event RED "what would you like your tombstone to say"
#event YELLOW "would wipe the floor with you"
#event BLUE "formidable opponent"
#event GREEN "win this fight"
/return
Sub GotoNPC
|Place your code for selecting an NPC or mob and going to them here
/return
Sub Event_RED
/echo Oh shit I'm gonna die
|Place code to deal with a red mob here
/return
Sub Event_YELLOW
/echo This is gonna hurt
|Place code to deal with a yellow mob here
/return
Sub Event_BLUE
/echo Woot! I think I can kill it
|Place code to deal with a blue mob here
/return
Sub Event_GREEN
/echo Your kidding, you want me to kill that? Come on gimme a challenge
|Place greenie code here
/return
Code: Select all
/declare moblevel local
/varset moblevel $target(level)
/if n @moblevel>$calc($char(level)+1) {
/echo red mob
} else /if n @moblevel==$calc($char(level)+1) {
/echo yellow mob
} else /if n @moblevel==$char(level) {
/echo white mob
} else /if n @moblevel>=$calc($char(level)-10) {
/echo blue mob
} else /if n @moblevel>=$calc($char(level)-15) {
/echo light blue mob
} else {
/echo green mob
}