R/input.r

keyboard_handler <- function(ch)
{
  if (ch == 113)
  {
    return( NULL )
  }
  else if (ch == "")
  {
    cat(".")
  }
  else
  {
    cat(paste(": ", ch, "\n", sep=""))
  }
  
  return(0)
}
wrathematics/kbhit documentation built on May 4, 2019, 9:52 a.m.