700 |
700 |
701 // Why is this here. For one thing, there's no test on +1 being safe. |
701 // Why is this here. For one thing, there's no test on +1 being safe. |
702 //Land[py, px+1]:= lfBasic; |
702 //Land[py, px+1]:= lfBasic; |
703 |
703 |
704 if allpx then |
704 if allpx then |
705 UpdateLandTexture(xx, Pred(s^.h), yy, Pred(s^.w)) |
705 UpdateLandTexture(xx, Pred(s^.h), yy, Pred(s^.w), true) |
706 else |
706 else |
707 begin |
707 begin |
708 UpdateLandTexture( |
708 UpdateLandTexture( |
709 max(0, min(LAND_WIDTH, xx)), |
709 max(0, min(LAND_WIDTH, xx)), |
710 min(LAND_WIDTH - xx, Pred(s^.w)), |
710 min(LAND_WIDTH - xx, Pred(s^.w)), |
711 max(0, min(LAND_WIDTH, yy)), |
711 max(0, min(LAND_WIDTH, yy)), |
712 min(LAND_HEIGHT - yy, Pred(s^.h)) |
712 min(LAND_HEIGHT - yy, Pred(s^.h)), false // could this be true without unnecessarily creating blanks? |
713 ); |
713 ); |
714 end; |
714 end; |
715 ////////////////////////////////// TODO - ASK UNC0RR FOR A GOOD HOME FOR THIS //////////////////////////////////// |
715 ////////////////////////////////// TODO - ASK UNC0RR FOR A GOOD HOME FOR THIS //////////////////////////////////// |
716 end |
716 end |
717 end; |
717 end; |