{**********************************************************************
{*
{*
{* Darts Globals -- Version 3.0  (implementation)
{*
{* Copyright (c)
{* Steven E. Glass and Apple Computer, Inc.  1986-1989
{* All Rights Reserved.
{*
{* Developer Technical Support Apple II Sample Code
{*
{* This file contains the code which intializes the global variables 
{* used by the program.
{*
{**********************************************************************}

{$R-}

{**********************************************************************}
{*
{* InitGlobals
{*
{* Global variables are initialiazed by this procedure.
{*
{**********************************************************************}
procedure InitGlobals;

    begin   {of InitGlobals}
        userID := MMStartup;
        score[1] := 0;
        score[2] := 0;
        
        gameType := 0;
        
        scoreStringArray[0] := @scoreStrings[1];
        scoreStringArray[1] := @scoreStrings[2];
        
        BlankStr := ' ';
        OneStr := '\';
        TwoStr := 'X';
        ThreeStr := '*';
    end;    {of InitGlobals}
