chartype.monkey2 1.4 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667
  1. Namespace std.stringio
  2. #rem monkeydoc Checks if a character is whitespace.
  3. Returns true if `char` is 32 or less.
  4. @param chr The character to check.
  5. @return True if `char` is 32 or less.
  6. #end
  7. Function IsSpace:Bool( chr:Int )
  8. Return chr<=32
  9. End
  10. #rem monkeydoc checks if a character is a decimal digit.
  11. Returns true if `ch` is '0'-'9'.
  12. @param chr The character to check.
  13. @return True if `ch` is '0'-'9'.
  14. #end
  15. Function IsDigit:Bool( chr:Int )
  16. Return (chr>=48 And chr<58)
  17. End
  18. #rem monkeydoc Checks if a character is alphabetic.
  19. Returns true if `ch` is 'a'-'z' or 'A'-'Z'.
  20. @param chr The character to check.
  21. @return True if `ch` is 'a'-'z' or 'A'-'Z'.
  22. #end
  23. Function IsAlpha:Bool( chr:Int )
  24. Return (chr>=65 And chr<65+26) Or (chr>=97 And chr<97+26)
  25. End
  26. #rem monkeydoc Checks if a character is an identifier.
  27. Returns true if `ch` is '0'-'9', 'a'-'z', 'A'-'Z' or '_'.
  28. @param chr The character to check.
  29. @return True if `ch` is '0'-'9', 'a'-'z', 'A'-'Z' or '_'.
  30. #end
  31. Function IsIdent:Bool( chr:Int )
  32. Return (chr>=65 And chr<65+26) Or (chr>=97 And chr<97+26) Or (chr>=48 And chr<58) Or chr=95
  33. End
  34. #rem monkeydoc Checks if a character is a hexadecimal digit.
  35. Returns true if `ch` is '0'-'9', 'a'-'f', or 'A'-'F'.
  36. @param chr The character to check.
  37. @return True if `ch` is '0'-'9', 'a'-'f', or 'A'-'F'.
  38. #end
  39. Function IsHexDigit:Bool( chr:Int )
  40. Return (chr>=48 And chr<58) Or (chr>=65 And chr<71) Or (chr>=97 And chr<103)
  41. End