I think it is possible. You should learn how to code and give it a try.Possible to make macro useable by more than one master?
Buff Bitch for say 4 ppl?
I'll get ya started.
Code: Select all
Sub Main
/if n $strlen("$p0")<=0 {
/echo Usage: /macro generic <Master Name>
/endmacro
}
/varset MasterName1 $p0
/varset MasterName2 $p1
/varset MasterName3 $p2
/varset MasterName4 $p3
/varset MasterName5 $p4
/varset MasterName6 $p5
/varset IsHealer 0
/varset IsPally 0
/varset RangeMin 10
/varset RangeMax 12
/varset FastRange 15
/varset Combatstatus 0
/varset SitAfterCast 0
Code: Select all
Sub Main
/if n $strlen("$p0")<=0 {
/echo Usage: /macro generic <Master Name>
/endmacro
}
/varset MasterName $p0
/varset IsHealer 0
/varset IsPally 0
/varset RangeMin 10
/varset RangeMax 12
/varset FastRange 15
/varset Combatstatus 0
/varset SitAfterCast 0
Code: Select all
|botcore.inc
|Bot core module
|version 1.03
#chat tell
#define MasterName v50
#define CmdArrayNum v51
#define CmdArraySize v52
#define GroupMember v53
#define GroupMax v54
#define ChatInput1 v55
#define ChatInput2 v56
#define ChatInput3 v57
#define SitAfterCast v58
#define MyXLoc v59
#define MyYLoc v60
#define IsHealer v61
#define countdown v62
#define CmdList v63
#define RangeMin v70
#define RangeMax v71
#define FastRange v72
#define Combatstatus v73
#define Remem v75
#define MyClass v76
#define IsPally v77
#define Fail v94
#define DoAgain v95
#define StartCast v96
#define SpellSlot v97
#define SpellName v98
#define CastTime v99
#define CTimer t39
Code: Select all
|botcore.inc
|Bot core module
|version 1.03
#chat tell
#define MasterName1 v81
#define MasterName2 v82
#define MasterName3 v83
#define MasterName4 v84
#define MasterName5 v85
#define MasterName6 v86
#define CmdArrayNum v51
#define CmdArraySize v52
#define GroupMember v53
#define GroupMax v54
#define ChatInput1 v55
#define ChatInput2 v56
#define ChatInput3 v57
#define SitAfterCast v58
#define MyXLoc v59
#define MyYLoc v60
#define IsHealer v61
#define countdown v62
#define CmdList v63
#define RangeMin v70
#define RangeMax v71
#define FastRange v72
#define Combatstatus v73
#define Remem v75
#define MyClass v76
#define IsPally v77
#define Fail v94
#define DoAgain v95
#define StartCast v96
#define SpellSlot v97
#define SpellName v98
#define CastTime v99
#define CTimer t39
Code: Select all
Sub Event_Chat
/varset CmdArrayNum 0
/if "$MasterName"=="$p1" {
:ArrayTime
/if "$arg(1,"$p2")"=="$a(1,$CmdArrayNum)" {
/call Do-$a(1,$CmdArrayNum) $p2
/return
}
/varadd CmdArrayNum 1
/if n $CmdArrayNum>=$CmdArraySize /return
/goto :ArrayTime
} else {
/tell $MasterName $p1 told me: $p2
}
/return
Code: Select all
Sub Event_Chat
/varset CmdArrayNum 0
/if "$MasterName1"=="$p1" /goto :ArrayTime
/if "$MasterName2"=="$p1" /goto :ArrayTime
/if "$MasterName3"=="$p1" /goto :ArrayTime
/if "$MasterName4"=="$p1" /goto :ArrayTime
/if "$MasterName5"=="$p1" /goto :ArrayTime
/if "$MasterName6"=="$p1" /goto :ArrayTime
/tell $MasterName1 $p1 told me: $p2
/return
:ArrayTime
/if "$arg(1,"$p2")"=="$a(1,$CmdArrayNum)" {
/call Do-$a(1,$CmdArrayNum) $p2
/return
}
/varadd CmdArrayNum 1
/if n $CmdArrayNum>=$CmdArraySize /return
/goto :ArrayTime
}
I think this will work. Kinda off the cuff here. you will need to test it and clean it up some, but shouldnt be to bad.




