23 

    23 

    24 uses SDLh, uTypes, uFloat, GLunit, uConsts, Math, uMobile;

    24 uses SDLh, uTypes, uFloat, GLunit, uConsts, Math, uMobile;

    25 

    25 

    26 var

    26 var

    27 /////// init flags ///////

    27 /////// init flags ///////

    28     cScreenWidth    : LongInt     = 1024;

    30     cScreenWidth    : LongInt     = 1024;

    29     cScreenHeight   : LongInt     = 768;

    31     cScreenHeight   : LongInt     = 768;

    30     cBits           : LongInt     = 32;

    32     cBits           : LongInt     = 32;

    31     ipcPort         : Word        = 0;

    33     ipcPort         : Word        = 0;

    32     cFullScreen     : boolean     = false;

    34     cFullScreen     : boolean     = false;