Previous: UCSDPrimitives
Up: New units for DOS
Previous Page: UCSDPrimitives
Next Page: Multimedia capabilities

DlgGlbls

In the monoprogram form, there is global information that must be shared between Ports and the global menu level in the Attract routine. These include at least the JumpLoc target to which Port's ChainTo must jump (see MarkJump, section ), and the name of the next module to execute, if the current module supplies one. The Dialogue Globals unit DlgGlbls provides this global information scope.

Apart from initialising the 2 exported strings to be empty, this unit performs no actions.

unit DlgGlbls;
{ Simple unit to supply bare essential globals to be shared among
  dialogue units and programs.  Particularly intended to let
  Ports "long-jump" to external locations using the MarkJump unit.

  This is part of arrangements to let each dialogue run as a single
  program -- each activity within it must be able to break out at
  any point, either to go back to the menu, or to move to a different
  activity.

  A. Milne  12 July 1990.
}

  interface

    uses MarkJump;

    var dgNextModName: string[80];  { Name of next module to be run, for
                                    menu's information.  Usually supplied
                                    by Ports.  Empty string can be taken
                                    as requesting menu itself. }
        dgParamSaveBuffer: string;
        dgTargetMark: ARRAY[1..20] OF JumpLoc;  { Long jump targets available
                                                for general use. }

NOTE: The unfortunate brevity of this name is due to Turbo Pascal's and PC-NFS' combined inability to search for the correct TPU file name for a unit name of more than 8 characters. Since this is a newly created unit, with no body of existing code using it, we were free to alter the name.