equal
deleted
inserted
replaced
75 AddFileLog('CheckLandDigest: ' + s); |
75 AddFileLog('CheckLandDigest: ' + s); |
76 {$ENDIF} |
76 {$ENDIF} |
77 if digest = '' then |
77 if digest = '' then |
78 digest:= s |
78 digest:= s |
79 else |
79 else |
80 {$IFNDEF IPHONEOS} |
|
81 //HACK & FIXME!!! |
|
82 TryDo(s = digest, 'Different maps generated, sorry', true) |
80 TryDo(s = digest, 'Different maps generated, sorry', true) |
83 {$ENDIF} |
|
84 end; |
81 end; |
85 |
82 |
86 procedure DrawLine(X1, Y1, X2, Y2: LongInt; Color: Longword); |
83 procedure DrawLine(X1, Y1, X2, Y2: LongInt; Color: Longword); |
87 var |
84 var |
88 eX, eY, dX, dY: LongInt; |
85 eX, eY, dX, dY: LongInt; |