| 1,5 → 1,5 |
|---|
| (* |
| Copyright 2021, 2022 Anton Krotov |
| Copyright 2021-2023 Anton Krotov |
| |
| This file is part of CEdit. |
| |
| 58,14 → 58,14 |
|---|
| |
| PROCEDURE GetImg (ptr, size: INTEGER): INTEGER; |
| VAR |
| image_data, dst, x, type: INTEGER; |
| image_data, dst, x, Type: INTEGER; |
| BEGIN |
| image_data := img_decode(ptr, size, 0); |
| IF image_data # 0 THEN |
| SYSTEM.GET(image_data + 4, x); |
| ASSERT(x = SIZE); |
| SYSTEM.GET(image_data + 20, type); |
| IF type # 3 THEN |
| SYSTEM.GET(image_data + 20, Type); |
| IF Type # 3 THEN |
| dst := img_convert(image_data, 0, 3, 0, 0); |
| img_destroy(image_data); |
| image_data := dst |