Topic: Seuntjie' Dice bot programmers mode discussion. - page 8. (Read 125420 times)

------------------------------------------------------------------------------
-- Script for sleeyeyed
-- by HCP
------------------------------------------------------------------------------
-- NOT TESTED THOROUGHLY, use at own risk.
------------------------------------------------------------------------------
basebet=10
nextbet=basebet
chance=33
previousResult1 = false
previousResult2 = false

function dobet()

  if win then
    nextbet=previousbet*.75
    if previousResult2 == true and previousResult1 == false and nextbet > 20 then
      -- WLW sequence with nextbet > 20, so reset to basebet
      nextbet = basebet
    end
  else
    nextbet=previousbet*1.15
  end

  if nextbet < 10 then
    nextbet = basebet
  end

  -- keep track of previous 2 results
  previousResult2 = previousResult1
  previousResult1 = win

end

basebet=10
nextbet=basebet
count2=0
count3=0
count4=0

function dobet()
  count=0

  chance=33
  count3=count3+1

  if count3>3 then
    count3=1;count2=0
  end

  if win then
    count=count+1
    nextbet=previousbet*.75
  else
    count2=count2+1
    nextbet=previousbet*1.15
 end

  if nextbet>20 then
    count=count+2
  end

  if count2==1 and count==3 then 
    count4=1
  end
  if count4==1 and win then
    nextbet=basebet
    count4=0
  end

  if nextbet<10 then
    nextbet=basebet
  end

end

nextbet=basebet
count2=0
count3=0
count4=0
function dobet()
count=0
basebet=10
chance=33
count3=count3+1
if count3>3 then
count3=1;count2=0
end
if win then
count=count+1
end
if !win then
count2=count2+1
end
if nextbet>20 then
count=count+2
end
if win then nextbet=previousbet*.75
end
if !win then nextbet=previousbet*1.15
end
if count2==1 and count==3
then count4=1
end
if count4==1 and win then
nextbet=basebet;count4=0
end
if nextbet<10 then
nextbet=basebet
end
end

myCounter = 0
maxCount = 1000

  myCounter = myCounter + 1
  if myCounter >= maxCount then
    resetseed()
    myCounter = 0
  end

-- script setup stuff goes here --
...
myCounter = 0
maxCount = 1000
...
function dobet()
...
  myCounter = myCounter + 1
  if myCounter >= maxCount then
    resetseed()
    myCounter = 0
  end
...
  --rest of your script goes here--
...
end