Hvad er det for et programmerings sprog?

{C: convert_to_value
  DUP
  48 58 WITHIN
  IF-TRUE /* IS 0 TO 9 */
    48 -
  ELSE-FALSE
    DUP
    65 71 WITHIN
    IF-TRUE /* IS A TO F */
      55 -
    ELSE-FALSE
      /* IS NOT 0 - F IE IS NOT HEX CHAR */
      PAGEBUF-ON
      CR P" **** ERROR **** "
      CR P" Err in HEX: " number @ N.
      CR P" Ret : " N.
      CR P" Break"
      CR
      PAGEBUF-OFF
      1 definition_error !
      UseStandardGETC
      0
    ENDIF
  ENDIF
;}