Another roulette macro that needs help please dont delete :)

lambchops_nz · **Thanked:** 0 time(s) **Posted:** Fri Nov 09, 2012 4:55 am

Hi all,
Well my first account and posts were deleted by mistake so this time i will keep my post shorter and give information as needed.
Well as im very new to this and never programmed anything in my life i decided to give this a go and started writing a macro for a roulette strategy which is not the usual red black martingale which is what is mostly on here.
This one uses each of the line bets eg.(1-3) (4-6) etc but leaving out the last line result using betvoyagers no zero table.
I have got as far as getting the bets placed and now i just need help to read the results and hook it into placing the bets in the right place and also increasing if same line hit in the next spin.
I hope this explains a little i will add the code ive written so far and hope someone can help tidy it up and finish it cheers.

Code:

 begin
     Window.Set location("BetVoyager.com Online Casino", "yes", "0", "0")
     Macro.Pause("555")
 end
 begin
     Function.Execute("Initial spin")
 end
 begin loop()
     Function.Execute("Line Bets")
 end

function("Initial spin")
     begin
          Mouse.Click at coordinate("323", "479", "left")
     end
     begin
          Mouse.Click at coordinate("376", "234", "left")
     end
     begin
          Mouse.Click at coordinate("422", "255", "left")
          Mouse.Double click at coordinate("394", "345", "left")
          Mouse.Double click at coordinate("504", "401", "left")
          Mouse.Click at coordinate("661", "482", "left")
     end
     begin
          Macro.Pause("6000")
     end
function

function("Line Bets")
     begin
          Macro.Pause("500")
     end
     begin
          Mouse.Click at coordinate("365", "226", "left")
     end
     begin
          Macro.Pause("500")
     end
     begin
          Mouse.Click at coordinate("388", "237", "left")
     end
     begin
          Macro.Pause("500")
     end
     begin
          Mouse.Click at coordinate("412", "248", "left")
     end
     begin
          Macro.Pause("500")
     end
     begin
          Mouse.Click at coordinate("434", "258", "left")
     end
     begin
          Macro.Pause("500")
     end
     begin
          Mouse.Click at coordinate("458", "269", "left")
     end
     begin
          Macro.Pause("500")
     end
     begin
          Mouse.Click at coordinate("482", "280", "left")
     end
     begin
          Macro.Pause("500")
     end
     begin
          Mouse.Click at coordinate("508", "292", "left")
     end
     begin
          Macro.Pause("500")
     end
     begin
          Mouse.Click at coordinate("531", "303", "left")
     end
     begin
          Macro.Pause("500")
     end
     begin
          Mouse.Click at coordinate("558", "315", "left")
     end
     begin
          Macro.Pause("500")
     end
     begin
          Mouse.Click at coordinate("586", "328", "left")
     end
     begin
          Macro.Pause("500")
     end
     begin
          Mouse.Click at coordinate("616", "342", "left")
     end
     begin
          Macro.Pause("500")
     end
     begin
          Mouse.Click at coordinate("663", "481", "left")
     end
     begin
          Macro.Pause("6000")
     end
function

This is for the downloaded version of bet voyager.
oh and the first bet is just for a spin since you have to bet to be able to spin.
look forward to some help if more info needed please ask.
Cheers
Lambchops

winner · **Thanked:** 0 time(s) **Posted:** Sun Nov 11, 2012 11:15 pm

Hi there, can i ask how did you learn to do all that?Is there a book or somewhere i can go to do the same as you are doing? Also are you using the free trial or have you paid for you download version?

cheers

Winner

Gigus · **Thanked:** 0 time(s) **Posted:** Sun Nov 11, 2012 11:28 pm

Just to be clear - there is no difference between the paid and the free version of BE Macro.
The free trial will just expire after a month.

lambchops_nz · **Thanked:** 1 time(s) **Posted:** Mon Nov 12, 2012 12:55 am

Well i just used a few other macros to learn this much and i have never programmed anything in my life, which is why i posted here what i have managed so far hoping someone that knows more could help with the finishing touches although there has been no replys so i may never finish this.

sickslug · **Thanked:** 2 time(s) **Posted:** Mon Nov 12, 2012 1:56 am

lambchops, i don't play the game so i can't improve your macro that much, but i can help clean things up for you. the following should run almost exactly like what you posted (i removed a short pause following a long pause at the start of line bet function) but the code is easier to modify - you can speed the whole thing up just by changing the pause variables. also i took out unnecessary begins and ends

Code:

 begin
     Window.Set location("BetVoyager.com Online Casino", "yes", "0", "0")
     Variable.Set("short pause", "500")
     Variable.Set("long pause", "6000")
     Macro.Pause("{short pause}")
     Function.Execute("Initial spin")
     begin loop()
          Function.Execute("Line Bets")
     end
 end

function("Initial spin")
     begin
          Mouse.Click at coordinate("323", "479", "left")
          Mouse.Click at coordinate("376", "234", "left")
          Mouse.Click at coordinate("422", "255", "left")
          Mouse.Double click at coordinate("394", "345", "left")
          Mouse.Double click at coordinate("504", "401", "left")
          Mouse.Click at coordinate("661", "482", "left")
          Macro.Pause("{long pause}")
     end
function

function("Line Bets")
     begin
          Mouse.Click at coordinate("365", "226", "left")
          Macro.Pause("{short pause}")
          Mouse.Click at coordinate("388", "237", "left")
          Macro.Pause("{short pause}")
          Mouse.Click at coordinate("412", "248", "left")
          Macro.Pause("{short pause}")
          Mouse.Click at coordinate("434", "258", "left")
          Macro.Pause("{short pause}")
          Mouse.Click at coordinate("458", "269", "left")
          Macro.Pause("{short pause}")
          Mouse.Click at coordinate("482", "280", "left")
          Macro.Pause("{short pause}")
          Mouse.Click at coordinate("508", "292", "left")
          Macro.Pause("{short pause}")
          Mouse.Click at coordinate("531", "303", "left")
          Macro.Pause("{short pause}")
          Mouse.Click at coordinate("558", "315", "left")
          Macro.Pause("{short pause}")
          Mouse.Click at coordinate("586", "328", "left")
          Macro.Pause("{short pause}")
          Mouse.Click at coordinate("616", "342", "left")
          Macro.Pause("{short pause}")
          Mouse.Click at coordinate("663", "481", "left")
          Macro.Pause("{long pause}")
     end
function
 

if you want to detect something you will want either pixel detection, pixel pattern detection, image detection, or memory pointers - pixel detection is easiest. if you haven't watched Gigus' video you're missing out - that goes for you too, winner

lambchops_nz · **Thanked:** 0 time(s) **Posted:** Mon Nov 12, 2012 2:12 am

Thanks for the help.
This code isnt finished yet cause i got lost on the reading results and changing bets etc is there an easish way to do that cause at the moment this just repeats the same bets over and over which isnt much good.

sickslug · **Thanked:** 1 time(s) **Posted:** Mon Nov 12, 2012 2:19 am

if you want to detect something you will want either pixel detection, pixel pattern detection, image detection, or memory pointers - pixel detection is easiest. have you watched Gigus' video? the process would be the same for any program of this type

lambchops_nz · **Thanked:** 0 time(s) **Posted:** Mon Nov 12, 2012 2:25 am

Hi yeah i have watched that video thats what bought me here in the first place.
I will have another go at it but i think its still bit complicated for me yet.

Blue Eye Macro

Another roulette macro that needs help please dont delete :)