ฟังก์ชันสำหรับทอยต่อเมื่อมีการกำหนด point แล้ว

roll_after_point <- function(point){
  new_roll <- 0
  # Roll until either a 7 or the point is rolled 
  while( ___ ){
    new_roll <- roll_dice(2)
    if(new_roll == 7){
      won <- FALSE      
    }
    # Check whether the new roll gives a win
    if(___ == ___){
      won <- TRUE
    }
  }
  return(won)
}