C     DEFINES VARIOUS CONSTANTS FOR THE KERMIT-HP1000 PROGRAM
      PARAMETER (ATSIGN=64)
      PARAMETER (BACKSLASH=92)
      PARAMETER (BACKSPACE=8)
      PARAMETER (BAD=-3)
      PARAMETER (BANG=33)
      PARAMETER (BAR=124)
      PARAMETER (BIGA=65)
      PARAMETER (BIGB=66)
      PARAMETER (BIGC=67)
      PARAMETER (BIGD=68)
      PARAMETER (BIGE=69)
      PARAMETER (BIGF=70)
      PARAMETER (BIGG=71)
      PARAMETER (BIGH=72)
      PARAMETER (BIGI=73)
      PARAMETER (BIGJ=74)
      PARAMETER (BIGK=75)
      PARAMETER (BIGL=76)
      PARAMETER (BIGM=77)
      PARAMETER (BIGN=78)
      PARAMETER (BIGO=79)
      PARAMETER (BIGP=80)
      PARAMETER (BIGQ=81)
      PARAMETER (BIGR=82)
      PARAMETER (BIGS=83)
      PARAMETER (BIGT=84)
      PARAMETER (BIGU=85)
      PARAMETER (BIGV=86)
      PARAMETER (BIGW=87)
      PARAMETER (BIGX=88)
      PARAMETER (BIGY=89)
      PARAMETER (BIGZ=90)
      PARAMETER (BLANK=32)
      PARAMETER (CARET=94)
      PARAMETER (COLON=58)
      PARAMETER (COMMA=44)
      PARAMETER (CR=13)
      PARAMETER (DEL=127)
      PARAMETER (DIG0=48)
      PARAMETER (DIG1=49)
      PARAMETER (DIG2=50)
      PARAMETER (DIG3=51)
      PARAMETER (DIG4=52)
      PARAMETER (DIG5=53)
      PARAMETER (DIG6=54)
      PARAMETER (DIG7=55)
      PARAMETER (DIG8=56)
      PARAMETER (DIG9=57)
      PARAMETER (DIGIT=2)
      PARAMETER (DOLLAR=36)
      PARAMETER (DQUOTE=34)
      PARAMETER (EOF=10003)
      PARAMETER (EOS=10002)
      PARAMETER (HUGE=30000)
      PARAMETER (LETA=97)
      PARAMETER (LETB=98)
      PARAMETER (LETC=99)
      PARAMETER (LETD=100)
      PARAMETER (LETE=101)
      PARAMETER (LETF=102)
      PARAMETER (LETG=103)
      PARAMETER (LETH=104)
      PARAMETER (LETI=105)
      PARAMETER (LETJ=106)
      PARAMETER (LETK=107)
      PARAMETER (LETL=108)
      PARAMETER (LETM=109)
      PARAMETER (LETN=110)
      PARAMETER (LETO=111)
      PARAMETER (LETP=112)
      PARAMETER (LETQ=113)
      PARAMETER (LETR=114)
      PARAMETER (LETS=115)
      PARAMETER (LETT=116)
      PARAMETER (LETU=117)
      PARAMETER (LETV=118)
      PARAMETER (LETW=119)
      PARAMETER (LETX=120)
      PARAMETER (LETY=121)
      PARAMETER (LETZ=122)
      PARAMETER (LF=10)
      PARAMETER (NO=0)
      PARAMETER (OK=-2)
      PARAMETER (PERCENT=37)
      PARAMETER (PERIOD=46)
      PARAMETER (PLUS=43)
      PARAMETER (QMARK=63)
      PARAMETER (SEMICOL=59)
      PARAMETER (SHARP=35)
      PARAMETER (SLASH=47)
      PARAMETER (SQUOTE=39)
      PARAMETER (STAR=42)
      PARAMETER (STDOUT=1)
      PARAMETER (TAB=9)
      PARAMETER (TILDE=126)
      PARAMETER (UNDERLINE=95)
      PARAMETER (YES=1)