equal
deleted
inserted
replaced
1146 var preShiftWorldDx: LongInt; |
1146 var preShiftWorldDx: LongInt; |
1147 |
1147 |
1148 procedure ShiftWorld(Dir: LongInt); inline; |
1148 procedure ShiftWorld(Dir: LongInt); inline; |
1149 begin |
1149 begin |
1150 preShiftWorldDx:= WorldDx; |
1150 preShiftWorldDx:= WorldDx; |
1151 WorldDx:= WorldDx + Dir * LongInt(playWidth); |
1151 WorldDx:= WorldDx + LongInt(Dir * LongInt(playWidth)); |
1152 |
1152 |
1153 end; |
1153 end; |
1154 |
1154 |
1155 procedure UnshiftWorld(); inline; |
1155 procedure UnshiftWorld(); inline; |
1156 begin |
1156 begin |