Sorry if when you read this you say "What a fuckin moron!" lol but i seriously just dont get how to make botgen do specific things I want it to do. Anyhelp would be appreciated, thanks.
Moderator: MacroQuest Developers
Ok lets say the master is Johndoe and the bot is Janedoe.KhaosWolf wrote:Im sorry but i just DONT get how to use this whole bot thing, I mean make it do what I want of course :? .
Sorry if when you read this you say "What a fuckin moron!" lol but i seriously just dont get how to make botgen do specific things I want it to do. Anyhelp would be appreciated, thanks.


Code: Select all
else /if "@Param1"=="yourself" {
/press F1
/if n $char(id)!=$target(id) /press F1
} else /if "@Param1"=="$char(name)" {
/press F1
/if n $char(id)!=$target(id) /press F1
}
Code: Select all
/target myself
Code: Select all
else /if "@Param1"=="yourself" /target myself
else /if "@Param1"=="$char(name)" /target myself
Code: Select all
/declare ParamString local
/declare ParamCount local
/varset ParamCount 2
/varset ParamString "@Param1"
:Do-xxxParamLoop
/if $defined(Param$int(@ParamCount))==TRUE {
/varcat ParamString " @Param$int(@ParamCount)"
/varadd ParamCount 1
/goto :Do-xxxParamLoop
}
/target @ParamString



Code: Select all
Ending macro: Couldn't find label :LootAllCycle2
botcore.inc@386 (LootAll): /goto :LootAllCycle2
botcore.inc@836 (Do-lootall): /call LootAll
botcore.inc@206 (Event_Chat): /call Do-@Commands(1,@tempvar) @Param2
Genbot.mac@64 (Main): :MainLoop
Cleared the following: Timers Vars Arrays
The current macro has ended.Code: Select all
sub LootAll
/declare counter local
:LootAllCycle
/if $combat==TRUE /return
/if "$target()"=="FALSE" {
/target corpse radius 100
}
/if $target(state)!=DEAD /return
/press down
/press down
/call Rangesub
/varset LootTooFar 0
/varset LootSlot 0
/lootn never
/loot
/varset counter 0
:CoreWaitLoot2
/delay 5
/doevents
/varadd counter 1
/if @BreakOut==1 /goto :donelooting2
/if n @counter>12 /goto :donelooting2
/if $corpse()!=TRUE /goto :CoreWaitLoot2
/msg @MasterName Looting %t.
:lootloop2
/if n @LootSlot==10 /goto :donelooting2
/if n @LootTooFar==1 /goto :donelooting2
/if $corpse(empty)==TRUE /goto :donelooting2
/click right corpse @LootSlot
/varset counter 0
:CursorLootWait2
/doevents
/if n @BreakOut==1 /goto :donelooting2
/delay 2
/varadd counter 1
/if n @counter>12 /goto :donelooting2
/if "$cursor()"!="TRUE" /goto :CursorLootWait2
/varadd LootSlot 1
/goto :lootloop2
:donelooting2
/lootn always
/varset LootSlot 0
/press esc
/press esc
/press esc
[color=darkred] /goto :LootAllCycle2 [/color]
/return Code: Select all
/goto :LootAllCycle Code: Select all
Sub Do-lootall
/varset CmdArrayNum 0
/if $defined(Param1)==FALSE {
/assist @MasterName
} else {
/declare ParamString local
/declare ParamCount local
/varset ParamCount 2
/varset ParamString "@Param1"
:Do-lootupParamLoop
/if $defined(Param$int(@ParamCount))==TRUE {
/varcat ParamString " @Param$int(@ParamCount)"
/varadd ParamCount 1
/goto :Do-lootupParamLoop
}
/target @ParamString
}
/delay 5
[color=darkred]/call LootAll[/color]
/return 
Code: Select all
Sub Do-setlompct
/if $defined(Param0)==FALSE /return
[color=red] /varset LomPct @Param0 [/color]
/call ChatOut 3 @MasterName "I'll let you know if I get below @LomPct percent mana"
/return
Code: Select all
/varset LomPct @Param1 Code: Select all
Sub CheckMana
/if @LomTimer>0 {
/if $char(mana,pct)<@LomPct {
/call ChatOut 5 @MasterName "@LomMsg"
/varset LomTimer 2m
Code: Select all
@LomTimer
Code: Select all
/declare AutoAnchor Local
/varset AutoAnchor $ini(@IniFile,"Core",AutoAnchor)
/if "@AutoAnchor"=="NOTFOUND" {
/ini "@IniFile" Core AutoAnchor 0
}else /if AutoAnchor==1 {
/varset IsAnchored 1
/varset AnchorX $char(y)
/varset AnchorY $char(x)
}
Code: Select all
/declare AutoPuller Local
/varset AutoPuller $ini(@IniFile,"Combat",AutoPuller)
/if "@AutoPuller"=="NOTFOUND" {
/ini "@IniFile" Combat AutoPuller 0
}else /if AutoPuller==1 {
/if @IsAnchored==1 {
/varset IsPuller 1
}
}
Code: Select all
Sub ResetWatchTargets
/declare counter local
/for counter 1 to @WatchTargetCount
/target PC @WatchTargets(@counter)
/delay 25
/if $target(name)==@WatchTargets(@counter) {
/varset WatchTargetIDs(@counter) $target(id)
}else {
/call ChatOut 5 [color=red]@MasterNamee[/color] I failed to target @WatchTargets(@counter).
}
/return