20 

    20 

    21 unit uLandTemplates;

    21 unit uLandTemplates;

    22 interface

    22 interface

    23 uses SDLh;

    23 uses SDLh;

    24 

    24 

    25 const NTPX = Low(LongInt);

    26 const NTPX = Low(LongInt);

    26 

    31 

    27 type PPointArray = ^TPointArray;

    32 type PPointArray = ^TPointArray;

    28      TPointArray = array[0..64] of TSDL_Rect;

    33      TPointArray = array[0..64] of TSDL_Rect;

    29      TEdgeTemplate = record

    34      TEdgeTemplate = record

    30                      BasePoints: PPointArray;

    35                      BasePoints: PPointArray;