/*
TO DO...
if human forces all in & i have lo idconf & a pair then go for it
if i'm last to call preflop & it's me & the human & i have somewhat decent cards then call
bluff manager, slow play manager, Aces! handler,...?
keep track of amount of human bluffing

pot odds! don't fold at the end if "MAYBE" (& late round & end position)
be afraid of lots of overcards & pairs on the board
they should try to bet out potential flushes, straights!
THEY NEED TO INITIATE BETS BASED ON THE BOARD...even if they have nothing
this might depend on position AM_FIRST_TO_BET, LAST_TO_BET (virtual button?)
position fundamentals!
also: stealing the pot
usually, you'd bluff only if no one else was all in...don't bluff if my .subtotal is substantial already
MILK IT!...you would go all in but you just bet somewhat cuz u think the other person has shit

big pot=>big bets
if one other current player, bets should make sense as % of that person's stack too

OTHER FACTORS
pair rule...consider all in w/ pair?
if pocket pair, tend to go all in more than if equivalent non pair?
number of people in hand, in game, & position
BETTINGPATTERNS...he keeps winnin'!, big bets
adjust confidence based on # people left in hand...bump up a few points if there are 4,3,2 people still left in it
exasperated, out of money
hang on: no unnecessary risks if only 2 people left in game
if everyone's going all in then maybe i shouldn't
*/

var P,HCONF,ID_CONF,CALL_LEVEL,BET_LEVEL,POT_LEVEL,BANKROLL,NUM_IN_HAND=0,NUM_IN_GAME=0,RANKA,RANKB,FOLD=0,CALL,SMALL,MED,BIG,ALLIN;

//PREFLOP
function get_preflop_bet(){
 setup();

if(HUMAN_WINS_AGAIN>2&&(HCONF>60||RANKA==RANKB||RANKA>13||RANKB>13)){
 var other_making_stand=0;
 for(var i=1;i<players.length;i++){if(players[i].bankroll<1&&players[i].status!="BUST")other_making_stand=1;break;}
 if(other_making_stand<1){//should really check to see if bet_level is big and anyone has called...that's taking a stand too...
  if(BET_LEVEL>70)return eval(whatdo("40:CALL,60:ALLIN"));
  else return eval(whatdo("15:MED,40:SMALL,45:CALL"));
 }
}

 if(HCONF>99){
  if(POT_LEVEL>75)return eval(whatdo("60:ALLIN,10:BIG,20:MED,5:SMALL,5:CALL"));
  if(NUM_IN_HAND<4)return eval(whatdo("2:BIG,15:MED,33:SMALL,50:CALL"));
  return eval(whatdo("2:ALLIN,8:BIG,40:MED,40:SMALL,10:CALL"));
 }
 if(HCONF>90){
  if(POT_LEVEL>50)return eval(whatdo("15:ALLIN,35:BIG,30:MED,15:SMALL,5:CALL"));
  if(NUM_IN_HAND>3)return eval(whatdo("5:ALLIN,15:BIG,35:MED,35:SMALL,10:CALL"));
  return eval(whatdo("2:ALLIN,6:BIG,15:MED,55:SMALL,22:CALL"));
 }
 if(HCONF>80){
  if(POT_LEVEL>50){
   if(ID_CONF=="LO")return eval(whatdo("100:ALLIN"));
   return eval(whatdo("100:CALL"));
  }
  return eval(whatdo("5:ALLIN,15:BIG,15:MED,30:SMALL,35:CALL"));
 }

 if(P.subtotal_bet>0&&CALL_LEVEL<40){if(HCONF>20||RANKA>10||RANKB>10)return eval(whatdo("5:SMALL,95:CALL"));}

 if(HCONF>70){
  if(POT_LEVEL>75){
   if(ID_CONF=="LO")return eval(whatdo("100:ALLIN"));
   return eval(whatdo("100:CALL"));
  }
  if(POT_LEVEL>50){
   if(ID_CONF=="LO")return eval(whatdo("50:ALLIN,50:BIG"));
   return eval(whatdo("100:CALL"));
  }
  if(NUM_IN_HAND>3)return eval(whatdo("5:ALLIN,15:BIG,30:MED,30:SMALL,20:CALL"));
  return eval(whatdo("2:ALLIN,7:BIG,35:MED,36:SMALL,20:CALL"));
 }
 if(HCONF>60){
  if(POT_LEVEL>75){
   if(ID_CONF=="LO")return eval(whatdo("100:ALLIN"));
   if(CALL_LEVEL<70)return CALL;
   if(ID_CONF=="HI")return eval(whatdo("25:CALL"));
   return eval(whatdo("34:CALL"));
  }
  if(POT_LEVEL>50){
   if(ID_CONF=="LO")return eval(whatdo("75:ALLIN,25:BIG"));
   if(CALL_LEVEL<70)return CALL;
   return eval(whatdo("65:CALL"));
  }
  if(NUM_IN_HAND>3)return eval(whatdo("3:ALLIN,17:BIG,30:MED,30:SMALL,20:CALL"));
  return eval(whatdo("1:ALLIN,2:BIG,7:MED,40:SMALL,50:CALL"));
 }
 if(HCONF>50){
  if(POT_LEVEL>75){
   if(CALL_LEVEL<40)return CALL;
   return FOLD;
  }
  if(POT_LEVEL>50){
   if(CALL_LEVEL<40)return CALL;
   return eval(whatdo("1:ALLIN,8:CALL"));
  }
  return eval(whatdo("1:ALLIN,1:BIG,5:MED,20:SMALL,73:CALL"));
 }
 if(HCONF>40){
  if(BET_LEVEL>40){
   if(CALL_LEVEL<40)return CALL;
   return FOLD;
  }
  if(BET_LEVEL>30){
   if(CALL_LEVEL<30)return CALL;
   if(ID_CONF=="LO")return eval(whatdo("24:CALL"));
   return eval(whatdo("37:CALL"));
  }
  return eval(whatdo("1:ALLIN,1:BIG,19:SMALL,79:CALL"));
 }
 if(HCONF>30){
  if(BET_LEVEL>40){
   if(CALL_LEVEL<30)return CALL;
   return FOLD;
  }
  if(BET_LEVEL>30){
   if(CALL_LEVEL<30)return evel(whatdo("15:SMALL,85:CALL"));
   if(ID_CONF=="LO")return eval(whatdo("1:CALL"));
   return eval(whatdo("20:CALL"));
  }
  return eval(whatdo("1:ALLIN,1:BIG,9:SMALL,89:CALL"));
 }
 if(HCONF>20){
  if(BET_LEVEL>30){
   if(CALL_LEVEL<30)return CALL;
   return FOLD;
  }
  if(BET_LEVEL>20){
   if(CALL_LEVEL<20)return CALL;
   if(ID_CONF=="LO")return eval(whatdo("1:CALL"));
   return eval(whatdo("20:CALL"));
  }
  return eval(whatdo("1:ALLIN,99:CALL"));
 }
 if(CALL_LEVEL>20)return FOLD;
 if(CALL_LEVEL>10){
  if(ID_CONF=="LO")return eval(whatdo("20:CALL"));
  return eval(whatdo("1:MED,40:CALL"));
 }
 if(CALL_LEVEL>5){
  if(ID_CONF=="LO")return eval(whatdo("1:BIG,15:CALL"));
  return eval(whatdo("35:CALL"));
 }
 if(ID_CONF=="LO")return eval(whatdo("1:ALLIN,79:CALL"));
 return CALL;
}
var hole_rankings=
"AA:100,KK:96,QQ:95,JJ:93,AKs:94,"+
"TT:86,AQs:85,AJs:84,KQs:84,AK:85,"+
"99:76,JTs:75,QJs:75,KJs:74,ATs:74,AQ:73,"+
"T9s:66,KQ:66,88:66,QTs:65,98s:64,J9s:65,AJ:65,KTs:65,"+ //THIS & ABOVE: EARLY POSITION
"77:56,87s:55,Q9s:55,T8s:54,KJ:55,QJ:54,JT:54,76s:53,97s:53,Axs:54,65s:53,"+ //THIS & ABOVE: LATE POSITION
"66:46,AT:46,55:45,86s:44,KT:45,QT:44,54s:45,K9s:45,J8s:44,75s:43,"+
"44:36,J9:35,64s:33,T9:34,53s:33,33:35,98:34,43s:34,22:34,Kxs:34,T7s:33,Q8s:33,"+ //THIS & ABOVE: BUTTON
"87:26,A9:26,Q9:25,76:25,42s:23,32s:23,96s:23,85s:22,J8:22,J7s:22,65:22,54:22,74s:21,K9:22,T8:21,";
function get_hole_ranking(){
 var player=players[current_bettor_index];
 var a=player.carda;
 var b=player.cardb;
 var n_rank_a=get_rank(a);
 var n_rank_b=get_rank(b);
 if(n_rank_b>n_rank_a){
  a=player.cardb;
  b=player.carda;
  n_rank_a=get_rank(a);
  n_rank_b=get_rank(b);
 }
 var r_rank_a=my_make_readable_rank(n_rank_a);
 var r_rank_b=my_make_readable_rank(n_rank_b);
 var suited="";
 if(get_suit(a)==get_suit(b))suited="s";
 var h="";
 if(n_rank_a==n_rank_b)h=""+r_rank_a+""+r_rank_b;
 else h=""+r_rank_a+""+r_rank_b+suited;
 var q=lookup_hole_ranking(h);
 if(!q){
  h=""+r_rank_a+"x"+suited;
  q=lookup_hole_ranking(h);
 }
 return q;
}
function my_make_readable_rank(r){
 var rank=make_readable_rank(r);
 if(rank==10)rank="T";
 return rank;
}
function lookup_hole_ranking(h){
 var i=hole_rankings.indexOf(h+":");
 if(i<0)return 0;
 var j=hole_rankings.indexOf(",",i);
 var r=hole_rankings.substring(i+h.length+1,j);
 return r-0;
}


//POSTFLOP
function get_postflop_bet(){
 setup();
 var ROUND=3;
 if(board[4])ROUND=5;
 else if(board[3])ROUND=4;

 if(P.subtotal_bet>0){ //so no check-raising!!!!!!!!
  if(HCONF>20||RANKA>10||RANKB>10){
   if((CALL_LEVEL<40&&ROUND<4)||(CALL_LEVEL<30&&ROUND<5))return CALL;
  }
 }

 var VERDICT="";
 var STRAIGHT_FLUSH=test_straight_flush(P);
 var FOUR_OF_A_KIND=test_four_of_a_kind(P);
 var FULL_HOUSE=test_full_house(P);
 var FLUSH=test_flush(P);
 var STRAIGHT=test_straight(P);
 var THREE_OF_A_KIND=test_three_of_a_kind(P);
 var TWO_PAIR=test_two_pair(P);
 var ONE_PAIR=test_one_pair(P);
 var HI_CARD=test_hi_card(P);
 var FLUSH_DRAW=0,STRAIGHT_DRAW=0;

 if(ROUND<5){
  if(get_xml("num_needed",FLUSH)==1){
   var suit=get_xml("suit",FLUSH);
   if(P.carda.substring(0,1)==suit||P.cardb.substring(0,1)==suit)FLUSH_DRAW=1;
  }
  if(get_xml("num_needed",STRAIGHT)==1){ // of course, it might be on the board...
   STRAIGHT_DRAW=1; //.....bottom ended & top ended straight draws? 1 point for each?!!....
  }
 }

 if(get_xml("num_needed",STRAIGHT_FLUSH)<1){
  if(get_xml("num_mine",STRAIGHT_FLUSH)>0)VERDICT="GREAT";
  else VERDICT="PLAY BOARD";
 }
 if(VERDICT==""&&get_xml("num_needed",FOUR_OF_A_KIND)<1){
  if(get_xml("num_mine",FOUR_OF_A_KIND)>0)VERDICT="GREAT";
  else{
   VERDICT="PLAY BOARD"; //SHOULD CHECK MY KICKER!!!!!!!................
  }
 }
 if(VERDICT==""&&get_xml("num_needed",FULL_HOUSE)<1){ //consider 2 or 3 on the board, (higher full house, 4 of a kind)
  if(get_xml("num_mine",FULL_HOUSE)>0)VERDICT="GREAT";
  else VERDICT="PLAY BOARD";
 }
 if(VERDICT==""&&get_xml("num_needed",FLUSH)<1){ //look for full house, etc.
  var num_mine=get_xml("num_mine",FLUSH);
  if(num_mine>1)VERDICT="GREAT";
  else if(num_mine>0){
   var rank=0;
   if(P.carda.substring(0,1)==get_xml("suit",FLUSH))rank=RANKA;
   else rank=RANKB;
   if(rank<11)VERDICT="GOOD"; //12???????
   else VERDICT="GREAT";
  }
  else VERDICT="MAYBE"; //could look @ board & decide if person was tryin' for flush...FACTOR: ANALYZE BETTING PATTERNS!...
 }
 if(VERDICT==""&&get_xml("num_needed",STRAIGHT)<1){ //look for flush, etc.
  if(get_xml("num_mine",STRAIGHT)>0)VERDICT="GREAT";
  else VERDICT="PLAY BOARD";
  if(exists_flush_potential()<3)VERDICT="MAYBE"; ////////////POTENTIALLY BAD!!!!!!unless i can get it...!!!!!!!!!!!!!!!!!!
 }
 if(VERDICT==""&&get_xml("num_needed",THREE_OF_A_KIND)<1){ //look for straight, etc.
  if(get_xml("num_mine",THREE_OF_A_KIND)>0)VERDICT="GREAT";
  else{
   var k1=get_xml("kicker_1",THREE_OF_A_KIND);
   var k2=get_xml("kicker_2",THREE_OF_A_KIND);
   if((k1==RANKA&&k2==RANKB)||(k1==RANKB&&k2==RANKA))VERDICT="GREAT";
   else if(k1==RANKA||k1==RANKB)VERDICT="GOOD";
   else if(k1>11&&k2>9)VERDICT="GOOD";
   else VERDICT="MAYBE"; //should really bet "POTENTIALLY BAD".............but can i get it?...............!!!!!!!!!!!!!
  }
  if(exists_flush_potential()<3)VERDICT="MAYBE"; ////////////POTENTIALLY BAD!!!!!!!!!unless i can get it...!!!!!!!!!!
  if(exists_straight_potential()<2)VERDICT="MAYBE"; ////////////"POTENTIALLY BAD!!!!!!!unless i can get it...!!!!!!!!!!!!
 }
 if(VERDICT==""&&get_xml("num_needed",TWO_PAIR)<1){
  var num_mine=get_xml("num_mine",TWO_PAIR);
  if(num_mine>1){
   if(RANKA==RANKB)VERDICT="GOOD";
   else VERDICT="GREAT";
  }else if(num_mine>0){
   if(ROUND<4)VERDICT="GREAT"; //hmmmmmmmm........
   else{
    var rank=get_xml("rank_1",TWO_PAIR);
    if(rank!=RANKA&&rank!=RANKB)var rank=get_xml("rank_2",TWO_PAIR);
    if(rank<10)VERDICT="MAYBE"; //11??????
    else VERDICT="GOOD";
   }
  }else{
   var kick=get_xml("kicker",TWO_PAIR);
   if(kick==RANKA||kick==RANKB||kick>10)VERDICT="PLAY BOARD";
   else VERDICT="MAYBE"; //"POTENTIALLY BAD"????????................................!!!!unless i can get it...!!!!
  }
  if(exists_flush_potential()<3)VERDICT="MAYBE"; /////////////"POTENTIALLY BAD!!!!!!!!unless i can get it...!!!!!!!!!!!!!!!!
  if(exists_straight_potential()<2)VERDICT="MAYBE"; ////////////"POTENTIALLY BAD!!!!!!unless i can get it...!!!!!!!!!!!!!
 }
 if(VERDICT==""&&get_xml("num_needed",ONE_PAIR)<1){
  if(get_xml("num_mine",ONE_PAIR)>0){
   var my_rank=get_xml("rank",ONE_PAIR);
   var num_overcards=0;
   for(var i=0;i<board.length;i++){
    if(board[i]&&get_rank(board[i])>my_rank)num_overcards++;
   }
   if(num_overcards<1){
    if(my_rank>11)VERDICT="GREAT";
    VERDICT="GOOD";
   }else if(num_overcards<2){
    if(my_rank>7)VERDICT="GOOD";
    VERDICT="MAYBE";
   }
   else VERDICT="MAYBE";
   if(exists_flush_potential()<3)VERDICT="MAYBE"; /////////////"POTENTIALLY BAD!!!!!!!!!unless i can get it...!!!!!!!!!!!!!!!
   if(exists_straight_potential()<2)VERDICT="MAYBE"; ////////////"POTENTIALLY BAD!!!!!!!unless i can get it...!!!!!!!!!!!!
  }

//add verdict "POTENTIALLY BAD" here, for example, for when the board looks dangerous?
//but what if i can get it!?!?!!!!!!!!!!!!!!!!!!!!!!!!!

 }

//special case if verdict is MAYBE AND i have a draw...tend not to fold
//special case where verdict is good & i have a draw...tend not to fold

if(HUMAN_WINS_AGAIN>2&&(VERDICT=="GREAT"||VERDICT=="GOOD"||VERDICT=="MAYBE"||RANKA==RANKB)){
 var other_making_stand=0;
 for(var i=1;i<players.length;i++){if(players[i].bankroll<1&&players[i].status!="BUST")other_making_stand=1;break;}
 if(other_making_stand<1){//should really check to see if bet_level is big and anyone has called...that's taking a stand too...
  if(BET_LEVEL>70)return eval(whatdo("40:CALL,60:ALLIN"));
  else return eval(whatdo("10:MED,40:SMALL,50:CALL"));
 }
}

 if(VERDICT=="GREAT"){
  if(ROUND<5)return eval(whatdo("5:ALLIN,5:BIG,25:MED,45:SMALL,20:CALL"));
  return eval(whatdo("30:ALLIN,40:BIG,30:MED"));
 }
 if(VERDICT=="GOOD"){
  if(ROUND<4){
   if(BET_LEVEL>79){
    if(CALL_LEVEL<70||FLUSH_DRAW)return CALL;
    return eval(whatdo("59:CALL"));
   }
   if(P.subtotal_bet>0)return eval(whatdo("1:ALLIN,2:BIG,5:MED,20:SMALL,72:CALL"));
   return eval(whatdo("3:ALLIN,40:BIG,42:MED,10:SMALL,5:CALL"));
  }
  if(BET_LEVEL<50){
   if(P.subtotal_bet>0)return eval(whatdo("1:BIG,3:MED,21:SMALL,75:CALL"));
   return eval(whatdo("10:BIG,20:MED,50:SMALL,20:CALL"));
  }
  if(BET_LEVEL<80){
   if(CALL_LEVEL<50)return CALL;
   return eval(whatdo("65:CALL")); //SOME THINGS DEPEND ON THE BOARD,POT ODDS,CONFIDENCE!!!!!!!!!!!!!!!!!!!!!!!!
  }
  if(CALL_LEVEL<70)return CALL;
  if(ROUND<5)return eval(whatdo("35:CALL"));
  return eval(whatdo("25:CALL"));
 }
 if(VERDICT=="MAYBE"){
  if(BET_LEVEL<50){
   if(CALL>0)return eval(whatdo("5:MED,15:SMALL,80:CALL"));
   return eval(whatdo("5:BIG,20:MED,50:SMALL,25:CALL"));
  }
  if(BET_LEVEL<70){
   if(ROUND<4&&FLUSH_DRAW)return CALL;
   if(CALL_LEVEL<40)return CALL;
   if(ID_CONF=="LO"){
    if(ROUND<4)return eval(whatdo("35:CALL"));
    if(ROUND<5)return eval(whatdo("65:CALL"));
    return eval(whatdo("89:CALL"));
   }
   if(ROUND<4)return eval(whatdo("61:CALL"));
   if(ROUND<5)return eval(whatdo("31:CALL"));
   return eval(whatdo("19:CALL"));
  }
  if(CALL_LEVEL<40)return CALL;
  if(ROUND<4){
   if(CALL_LEVEL<50)return CALL;
   return eval(whatdo("50:CALL"));
  }
  return eval(whatdo("11:CALL"));
 }
 if(FLUSH_DRAW){
  if(ROUND<4)return eval(whatdo("20:MED,40:SMALL,40:CALL"));
  if(ROUND<5){
   if(CALL<1)return eval(whatdo("10:MED,90:SMALL"));
   if(CALL_LEVEL<40)return CALL;
   return eval(whatdo("33:CALL")); //depends on how good my cards are!!!!!
  }else if(STRAIGH_DRAW){
   if(BET_LEVEL<50){
    if(ROUND<4)return eval(whatdo("20:MED,40:SMALL,40:CALL"));
    if(ROUND<5)return eval(whatdo("5:MED,40:SMALL,55:CALL"));
   }else{
    if(CALL_LEVEL<40)return CALL;
    if(ROUND<4)return eval(whatdo("29:CALL")); //depends on how good my cards are!!!!!!!!!
    if(ROUND<5)return eval(whatdo("9:CALL"));
   }
  }
  //otherwise, cleanup process handles it
 }
 if(VERDICT=="PLAY BOARD")return CALL;


//perhaps use the ranking to come up w/ a preliminary strategy & then modify that strategy:
//bluff
//slow play
//take a stand...human wins 4 in a row & human still playing & num players is 2 & i have good/maybe cards then call!
//play straight


 var hi_rank=RANKA,lo_rank=RANKB;
 if(RANKA<RANKB){hi_rank=RANKB;lo_rank=RANKA;}
 if(HCONF>80){
  if(CALL<1){
   if(ROUND<5)return eval(whatdo("10:MED,80:SMALL,10:CALL"));
   return eval(whatdo("20:MED,70:SMALL,10:CALL"));
  }
  if(CALL_LEVEL<50)return CALL;
  if(CALL_LEVEL<70&&ROUND<5)return CALL;
  if(CALL_LEVEL<80&&ROUND<4)return CALL;
  return FOLD;
 }
 if(HCONF>70){
  if(CALL<1){
   if(ROUND<5)return eval(whatdo("10:MED,75:SMALL,15:CALL"));
   return eval(whatdo("10:MED,80:SMALL,10:CALL"));
  }
  if(CALL_LEVEL<40)return CALL;
  if(CALL_LEVEL<50)return eval(whatdo("50:CALL"));
  return FOLD;
 }
 if(hi_rank>13||HCONF>50){
  if(CALL<1){
   if(ROUND<5)return eval(whatdo("5:MED,75:SMALL,20:CALL"));
   return eval(whatdo("5:MED,75:SMALL,20:CALL"));
  }
  if(CALL_LEVEL<30)return CALL;
  if(CALL_LEVEL<40&&ROUND<4)return CALL;
  return FOLD;
 }
 if(CALL<1){
  if(ROUND<5)return eval(whatdo("20:SMALL,80:CALL"));
  return eval(whatdo("5:MED,70:SMALL,25:CALL"));
 }
 if(CALL_LEVEL<20)return CALL;
 if(CALL_LEVEL<30)return eval(whatdo("10:SMALL,20:CALL"));
 return FOLD;
}

function exists_flush_potential(){return get_xml("num_needed",test_flush(new player()));}
function exists_straight_potential(){return get_xml("num_needed",test_straight(new player()));} //BUT inside draws!!!!!!!!!!!!!!!!!!!

//ETC.
function setup(){
 P=players[current_bettor_index];
 CALL=current_bet-P.subtotal_bet;
 RANKA=get_rank(P.carda);
 RANKB=get_rank(P.cardb);
 HCONF=get_hole_ranking();
 CALL_LEVEL=get_bet_level(CALL);
 BET_LEVEL=get_bet_level(current_bet); //feed function data we calc here so we don't gotta doubl do it!..
 POT_LEVEL=get_pot_level();
 BANKROLL=P.bankroll;
 var total_bankrolls=get_pot_size();
 for(var i=0;i<players.length;i++){
  total_bankrolls+=players[i].bankroll;
  if(players[i].status!="BUST"){
   NUM_IN_GAME++;
   if(players[i].status!="FOLD")NUM_IN_HAND++;
  }
 }
 ID_CONF="MID";
 var avg_bankroll=total_bankrolls/NUM_IN_GAME;
 if(BANKROLL<avg_bankroll/2)ID_CONF="LO";
 if(BANKROLL>avg_bankroll*1.5)ID_CONF="HI";
 SMALL=CALL+BIG_BLIND*2; //consider MINIMUM RAISE here & below!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 if(POT_LEVEL>40)SMALL+=5;
 if(NUM_IN_GAME>3){
  MED=CALL+BIG_BLIND*4;
  BIG=CALL+BIG_BLIND*10;
 }else{
  SMALL+=5;
  MED=round5(CALL+.1*BANKROLL); //consider minimum raise!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  BIG=round5(CALL+.2*BANKROLL); //consider minimum raise!
 }
 ALLIN=BANKROLL;
}
function whatdo(q,r){
 q+=",";
 if(!r)r=Math.random();
 var p=0;
 while(1){
  var a=q.indexOf(":");
  var b=q.indexOf(",",a);
  if(a<0||b<0)return "FOLD";
  var probability=(q.substring(0,a)-0)/100;
  var action=q.substring(a+1,b);
  q=q.substring(b+1);
  p+=probability;
  if(r<=p)return action;
 }
 return "FOLD";
}
function round5(n){
 if(n<5)return 5;
 var s=""+n;
 var i=s.indexOf(".");
 if(i>0)s=s.substring(0,i);
 n=s-0;
 while(n%5!=0)n++;
 return n;
}
function get_bet_level(b){
 var size=b/P.bankroll;
 if(size<=.015||b<=5)return 5;
 if(size<=.02||b<=10)return 10;
 if(size<=.03||b<=15)return 20;
 if(size<=.06||b<=30)return 30;
 if(size<=.12||b<=60)return 40;
 if(size<=.21||b<=100)return 50;
 if(size<=.35||b<=150)return 70;
 if(size<=.41||b<=200)return 80;
 return 100;
}
function get_pot_level(){
 var p=get_pot_size();
 var b=players[current_bettor_index].bankroll;
 if(p>.5*b)return 100;
 else if(p>.25*b)return 51;
 else return 1;
}