|
@@ 3196-3196 (lines=1) @@
|
| 3193 |
|
{ |
| 3194 |
|
$COLOR = unpack("n",$VIDE.substr($IMG,floor($P),1)); |
| 3195 |
|
if (($P*8)%8 == 0) $COLOR[1] = $COLOR[1] >>7; |
| 3196 |
|
elseif (($P*8)%8 == 1) $COLOR[1] = ($COLOR[1] & 0x40)>>6; |
| 3197 |
|
elseif (($P*8)%8 == 2) $COLOR[1] = ($COLOR[1] & 0x20)>>5; |
| 3198 |
|
elseif (($P*8)%8 == 3) $COLOR[1] = ($COLOR[1] & 0x10)>>4; |
| 3199 |
|
elseif (($P*8)%8 == 4) $COLOR[1] = ($COLOR[1] & 0x8)>>3; |
|
@@ 3197-3197 (lines=1) @@
|
| 3194 |
|
$COLOR = unpack("n",$VIDE.substr($IMG,floor($P),1)); |
| 3195 |
|
if (($P*8)%8 == 0) $COLOR[1] = $COLOR[1] >>7; |
| 3196 |
|
elseif (($P*8)%8 == 1) $COLOR[1] = ($COLOR[1] & 0x40)>>6; |
| 3197 |
|
elseif (($P*8)%8 == 2) $COLOR[1] = ($COLOR[1] & 0x20)>>5; |
| 3198 |
|
elseif (($P*8)%8 == 3) $COLOR[1] = ($COLOR[1] & 0x10)>>4; |
| 3199 |
|
elseif (($P*8)%8 == 4) $COLOR[1] = ($COLOR[1] & 0x8)>>3; |
| 3200 |
|
elseif (($P*8)%8 == 5) $COLOR[1] = ($COLOR[1] & 0x4)>>2; |
|
@@ 3198-3198 (lines=1) @@
|
| 3195 |
|
if (($P*8)%8 == 0) $COLOR[1] = $COLOR[1] >>7; |
| 3196 |
|
elseif (($P*8)%8 == 1) $COLOR[1] = ($COLOR[1] & 0x40)>>6; |
| 3197 |
|
elseif (($P*8)%8 == 2) $COLOR[1] = ($COLOR[1] & 0x20)>>5; |
| 3198 |
|
elseif (($P*8)%8 == 3) $COLOR[1] = ($COLOR[1] & 0x10)>>4; |
| 3199 |
|
elseif (($P*8)%8 == 4) $COLOR[1] = ($COLOR[1] & 0x8)>>3; |
| 3200 |
|
elseif (($P*8)%8 == 5) $COLOR[1] = ($COLOR[1] & 0x4)>>2; |
| 3201 |
|
elseif (($P*8)%8 == 6) $COLOR[1] = ($COLOR[1] & 0x2)>>1; |
|
@@ 3199-3199 (lines=1) @@
|
| 3196 |
|
elseif (($P*8)%8 == 1) $COLOR[1] = ($COLOR[1] & 0x40)>>6; |
| 3197 |
|
elseif (($P*8)%8 == 2) $COLOR[1] = ($COLOR[1] & 0x20)>>5; |
| 3198 |
|
elseif (($P*8)%8 == 3) $COLOR[1] = ($COLOR[1] & 0x10)>>4; |
| 3199 |
|
elseif (($P*8)%8 == 4) $COLOR[1] = ($COLOR[1] & 0x8)>>3; |
| 3200 |
|
elseif (($P*8)%8 == 5) $COLOR[1] = ($COLOR[1] & 0x4)>>2; |
| 3201 |
|
elseif (($P*8)%8 == 6) $COLOR[1] = ($COLOR[1] & 0x2)>>1; |
| 3202 |
|
elseif (($P*8)%8 == 7) $COLOR[1] = ($COLOR[1] & 0x1); |
|
@@ 3200-3200 (lines=1) @@
|
| 3197 |
|
elseif (($P*8)%8 == 2) $COLOR[1] = ($COLOR[1] & 0x20)>>5; |
| 3198 |
|
elseif (($P*8)%8 == 3) $COLOR[1] = ($COLOR[1] & 0x10)>>4; |
| 3199 |
|
elseif (($P*8)%8 == 4) $COLOR[1] = ($COLOR[1] & 0x8)>>3; |
| 3200 |
|
elseif (($P*8)%8 == 5) $COLOR[1] = ($COLOR[1] & 0x4)>>2; |
| 3201 |
|
elseif (($P*8)%8 == 6) $COLOR[1] = ($COLOR[1] & 0x2)>>1; |
| 3202 |
|
elseif (($P*8)%8 == 7) $COLOR[1] = ($COLOR[1] & 0x1); |
| 3203 |
|
$COLOR[1] = $PALETTE[$COLOR[1]+1]; |
|
@@ 3201-3201 (lines=1) @@
|
| 3198 |
|
elseif (($P*8)%8 == 3) $COLOR[1] = ($COLOR[1] & 0x10)>>4; |
| 3199 |
|
elseif (($P*8)%8 == 4) $COLOR[1] = ($COLOR[1] & 0x8)>>3; |
| 3200 |
|
elseif (($P*8)%8 == 5) $COLOR[1] = ($COLOR[1] & 0x4)>>2; |
| 3201 |
|
elseif (($P*8)%8 == 6) $COLOR[1] = ($COLOR[1] & 0x2)>>1; |
| 3202 |
|
elseif (($P*8)%8 == 7) $COLOR[1] = ($COLOR[1] & 0x1); |
| 3203 |
|
$COLOR[1] = $PALETTE[$COLOR[1]+1]; |
| 3204 |
|
} |
|
@@ 3202-3202 (lines=1) @@
|
| 3199 |
|
elseif (($P*8)%8 == 4) $COLOR[1] = ($COLOR[1] & 0x8)>>3; |
| 3200 |
|
elseif (($P*8)%8 == 5) $COLOR[1] = ($COLOR[1] & 0x4)>>2; |
| 3201 |
|
elseif (($P*8)%8 == 6) $COLOR[1] = ($COLOR[1] & 0x2)>>1; |
| 3202 |
|
elseif (($P*8)%8 == 7) $COLOR[1] = ($COLOR[1] & 0x1); |
| 3203 |
|
$COLOR[1] = $PALETTE[$COLOR[1]+1]; |
| 3204 |
|
} |
| 3205 |
|
else |
geekwright /
XoopsCore
