Macro for a BD : DAOC Submissions

[tault_Greayangel]

Hi I want to get a premium member of your site. I worte a macro for a bd. My bd is lvl 50 and makes 1p in 10hours with this macro. also killed other players while macroing (I play on a pvp server).

you can download the programm here:
Register to unlock hidden link

install it and copy this:

// This line is necessary to select the proper window
SetActiveWindow Dark Age of Camelot, Copyright © 2001-03 Mythic Entertainment, Inc.

/////////////////////////////////////
Delay 5 sec
//////////////////// Constants \\\\\\\\\\\\\\\\\\\\\\\\\
Constants
temp = 0
temp2 = 0
temp3 = 0
attack = 7 // key for bubble
rel = 0 // key with release to city(for pvp serv) or release macro (for rvr serv)
sit = c // key to sit down
buff1 = 1 // key for buff 1
buff2 = 2 // key for buff 2
buff3 = 3 // key for buff 3
buff4 = 4 // key for buff 4
buff5 = 5 // key for buff 5
//DoT = 7 // key for DoT
DoT2 = 6 // key for LT
MKL = 9 // key for MKL
face = 8 // key for face macro
Fight = {INS} // key to go in combat mode
selectitem = {F7} // key to select next item
pickup = g //key to pick pick selected item up
rest1 = 20 // min time to sit(recover mana)
rest2 = 30 // max time to sit (reover mana)
end





///////////////////// Procedure///////////////////////

Procedure kill

compute temp2 = random(x) * (1-0.5) + 0.5 //this is to get a time from 0.5-1sec
delay $temp2 sec
Keys {F8}
compute temp2 = random(x) * (1-0.5) + 0.5
delay $temp2 sec
Keys $face
compute temp2 = random(x) * (1-0.5) + 0.5
delay $temp2 sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
delay $temp sec
Keys $Fight
compute temp2 = random(x) * (1-0.5) + 0.5
delay $temp2 sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
Delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
Delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
Delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
Delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
Delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
Delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
Delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
Delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
Delay $temp sec
Keys $DoT2
compute temp = random(x) * (4.2-4.1) + 4.1
Delay $temp sec
Keys $attack
compute temp = random(x) * (4.2-4.1) + 4.1
Delay $temp sec
Keys c //key to sit
compute temp = random(x) * ($rest2 - $rest1) + $rest1
delay $temp sec

End


Procedure Loot

compute temp2 = random(x) * (1-0.5) + 0.5
Delay $temp2 sec
Keys $selectitem
compute temp2 = random(x) * (1-0.5) + 0.5
Delay $temp2 sec
Keys $pickup
compute temp2 = random(x) * (1-0.5) + 0.5
Delay $temp2 sec
Keys $selectitem
compute temp2 = random(x) * (1-0.5) + 0.5
Delay $temp2 sec
Keys $pickup
compute temp2 = random(x) * (1-0.5) + 0.5
Delay $temp2 sec
Keys $selectitem
compute temp2 = random(x) * (1-0.5) + 0.5
Delay $temp2 sec
Keys $pickup
compute temp2 = random(x) * (1-0.5) + 0.5
Delay $temp2 sec
Keys c //key to sit
compute temp2 = random(x) * (1-0.5) + 0.5
Delay $temp2 sec
Keys $MKL
compute temp2 = random(x) * (1-0.5) + 0.5
Delay $temp2 sec


End


Procedure Buff

compute temp2 = random(x) * (1-0.5) + 0.5
delay $temp2 sec
compute temp2 = random(x) * (1-0.5) + 0.5
delay $temp2 sec
compute temp2 = random(x) * (1-0.5) + 0.5
delay $temp2 sec
compute temp2 = random(x) * (1-0.5) + 0.5
delay $temp2 sec
compute temp2 = random(x) * (1-0.5) + 0.5
delay $temp2 sec
compute temp2 = random(x) * (1-0.5) + 0.5
delay $temp2 sec
Keys $buff1
compute temp3 = random(x) * (4-3) + 3
delay $temp3 sec
Keys $buff2
compute temp3 = random(x) * (4-3) + 3
delay $temp3 sec
Keys $buff3
compute temp3 = random(x) * (4-3) + 3
delay $temp3 sec
Keys $buff4
compute temp3 = random(x) * (4-3) + 3
delay $temp3 sec
Keys $buff5
compute temp3 = random(x) * (4-3) + 3
delay $temp3 sec
Keys $MKL
compute temp3 = random(x) * (4-3) + 3
delay $temp3 sec
Keys $rel

End



///////////////////////////////////
///////////////////////////////////


while 1=1
call Buff
call kill
call Loot
call kill
call Loot
call kill
call Loot
call kill
call Loot
call kill
call Loot
call kill
call Loot
call kill
call Loot
end






// end of copy paste
I have the euro version of daoc. I hope the window is called the same in the us version. if not run daoc windowed and change the 2nd line to the name of your window.

[tault_Tault Community]

Where do you run this and on what con mobs? I have a level 47 bd i could use but dont know where i would attempt this.

Secondly and more importantly I can not copy the text on this site unless i type it word for word... he has select text turned off. Have any sugguestions?

[tault_Tault Community]

nvm i figured out a way to copy and paste

[tault_Greayangel]

a good spot are kulervos guardians near galplen. walk to the river where you swim to gna faste. then turn right and follow the coast. then you will see a bear and many flying creatures. cant remember what con the have for 47 but I think ora to red (the con yellow - ora with 50) if you have a bb with pom you can speed it up a bit by lowering the rest time.
btw. will this get me premium membership?

[Tault_admin]

cyrix needs to give his reply on it. If its a good working macro well he should give us a message in the people deserving premium area so then you can get one.

[tault_Tault Community]

Ohhh so its up to me to get him in eh!

Fine ill test it tonight and let you know I was wrong about level I guess I am only level 43... Ill try something in spin and see how it works. Ill let it run 10 hours and post the results if it works good.

Any tips you can think of to make sure I have a successful test of this script? 43 bd troll will be going to spin.

[tault_Greayangel]

hmm you wanna do it in spindel? then try the crabs. when u enter you walk a bit and then take the first way to your right. this splits . takthe right way then there should be kind of a hall and lots of crabs. use a 2 handed hammer commander and healing pets. you should let it run for half an hour and watch it. if your mana is ok then dont change anything if it is not ok rest longer. hope your sup because it is written for sup bd^^

[tault_Greayangel]

no edit ? and the 1p in 10 hours is for the kulervo spot. cant say how much it is in spindel because they drop different. so pls dont blame me if you dont get 1 p in the 10 hours =)

[tault_Tault Community]

How detecable is this?

[tault_Greayangel]

beacuse it uses always different times it isnt detectable by mythic. only way you can get detected is the no response on questions. or if you steal someone elses kills and dont say anything. get a quiet place with neutrals and you will be fine. and bind in the main city in a celler of any house. so no one will see you when u died (which only happens if your mana managment isnt good) and continue casting your spells. macroed a valk bd from 20-50 with this macro. also great to pl twinks over night^^

[tault_Tault Community]

My first run ran for about 2 hours down at the bridge in spin. I will have to test it again however because I was to far away from my loot, and something killed me and I would like to see how that happened. but 2 hours is very impressive and it showed no sign to me of failing. I know the reason I wasnt getting loot is because of where I chose to stand so I shall correct the isse.

Thus far... nice macro

[tault_Greayangel]

thx =) and if you get killed there are only 2 reaons.
1. you r kill procedure is too short. with the one in the macro you shoud have np to kill yellow to ora.
2. your mana regain is too small. so you should increase your rest time . just try to have 60-70% mana when mcl is ready so your full after using it.

so long
- Grey

[tault_Tault Community]

I think the macro works fine I think the main problem is finding good mobs to do it on. I did however run it nicely on blue and yellows for about 3 hours straight and made 200 gold. So I will give you positive feedback. I hope to find a better camp to really make it work for me now

Cyrix

[tault_Greayangel]

thx =) try uppland or yggra forest . there are some spots and there arent much players (on my server). if you need more time to kill a mob just say it^^.

[tault_Tault Community]

Well all three of my accounts just got suspended btw. So I would not sugguest this now to anyone sorry.