Macro: KEYPROC

Module location: FMAC line 2458 (view source)

  #IFSAME !1 ON
    !A [] $82 |CI0 |VI33
  #ELSE
    #IFSAME !1 OFF
      !A [] $82 |CI9999 |VI33
    #ELSE
      #SET Y$ !a
      #IF (!0>1)
        // MOVEINT ADR(3) TO KEY LOC
        #SET Q$ (!1-100+40) // address in SYSINT
        #IFDEF !3
          !A [] $082 !3 |VI!q
        #ELSE
          !A [] $082 |CI0 |VI!q
          #FREF !3 !a
        #ENDIF
      #ELSE
        #SET Q$ (!1-100)
        #KEYPROC !q !Y
      #ENDIF
    #ENDIF
  #ENDIF