[Back to DESQVIEW SWAG index] [Back to Main SWAG index] [Original]

    {
          Simply pass a number (1-3) through it:
             1 -- Switches to next window
             2 -- Pops up the Alt menu
                  ^^^^^^^^^^^^^^^^^^^^ this is what you want
             3 -- Close the current window

          I don't know about Alt-H though.. I know that if you used ReadKey
          you'd have to read it twice -- once for the #0 (tells you that
          it is an extended code) -- again for the extended code (35=Alt-H).

          Hope this helps!  Good luck.
          -- Jeff.Guillaume@launchpad.unc.edu
    }

    Procedure DesqView(Func : Byte); ASSEMBLER;
    ASM
      mov   AH, $05
      cmp   Func, 1           { Switch to next window }
      je    @SwitchNext
      cmp   Func, 2           { Pop up Alt-menu }
      je    @PopDesqView
      cmp   Func, 3           { Close current window }
      je    @CloseWin

    @SwitchNext:
      mov   CX, $FB00
      jmp   @CallInt

    @PopDesqView:
      mov   CX, $FC00
      jmp   @CallInt

    @CloseWin:
      mov   CX, $FE00

    @CallInt:
      int   $16

    End; {* DesqView *}

[Back to DESQVIEW SWAG index] [Back to Main SWAG index] [Original]