equal
deleted
inserted
replaced
702 begin |
702 begin |
703 if ((AMask and p^[x]) = 0) then // Tiy was having trouble generating transparent black |
703 if ((AMask and p^[x]) = 0) then // Tiy was having trouble generating transparent black |
704 Land[cpY + y, cpX + x]:= 0 |
704 Land[cpY + y, cpX + x]:= 0 |
705 else if p^[x] = (AMask or RMask) then |
705 else if p^[x] = (AMask or RMask) then |
706 Land[cpY + y, cpX + x]:= COLOR_INDESTRUCTIBLE |
706 Land[cpY + y, cpX + x]:= COLOR_INDESTRUCTIBLE |
707 else if p^[x] = cWhiteColor then |
707 else if p^[x] = $FFFFFFFF then |
708 Land[cpY + y, cpX + x]:= COLOR_LAND; |
708 Land[cpY + y, cpX + x]:= COLOR_LAND; |
709 |
709 |
710 end; |
710 end; |
711 p:= @(p^[tmpsurf^.pitch div 4]); |
711 p:= @(p^[tmpsurf^.pitch div 4]); |
712 end; |
712 end; |