equal
deleted
inserted
replaced
99 |
99 |
100 procedure MakeCrossHairs; |
100 procedure MakeCrossHairs; |
101 var t: LongInt; |
101 var t: LongInt; |
102 tmpsurf, texsurf: PSDL_Surface; |
102 tmpsurf, texsurf: PSDL_Surface; |
103 Color, i: Longword; |
103 Color, i: Longword; |
104 s: shortstring; |
|
105 begin |
104 begin |
106 tmpsurf:= LoadDataImage(ptGraphics, cCHFileName, ifAlpha or ifCritical); |
105 tmpsurf:= LoadDataImage(ptGraphics, cCHFileName, ifAlpha or ifCritical); |
107 |
106 |
108 for t:= 0 to Pred(TeamsCount) do |
107 for t:= 0 to Pred(TeamsCount) do |
109 with TeamsArray[t]^ do |
108 with TeamsArray[t]^ do |