| 19,7 → 19,7 |
|---|
| |
| MODULE Graph; |
| |
| IMPORT SYSTEM, K := KOSAPI, Lines, Languages; |
| IMPORT SYSTEM, KOSAPI, Lines, Languages; |
| |
| CONST |
| |
| 61,7 → 61,7 |
|---|
| |
| PROCEDURE DrawCanvas* (canvas: tCanvas; x, y: INTEGER); |
| BEGIN |
| K.sysfunc7(65, canvas.bitmap, canvas.width*65536 + canvas.height, x*65536 + y, 32, 0, 0); |
| KOSAPI.sysfunc7(65, canvas.bitmap, canvas.width*65536 + canvas.height, x*65536 + y, 32, 0, 0) |
| END DrawCanvas; |
| |
| |
| 285,7 → 285,7 |
|---|
| ELSE |
| color := canvas.textColor |
| END; |
| K.sysfunc6(4, x*65536 + y, font + color, SYSTEM.ADR(c), 1, canvas.bitmap - 8) |
| KOSAPI.sysfunc6(4, x*65536 + y, font + color, SYSTEM.ADR(c), 1, canvas.bitmap - 8) |
| END; |
| INC(x, canvas.font.width); |
| INC(i); |
| 307,7 → 307,7 |
|---|
| canvas: tCanvas; |
| BEGIN |
| NEW(canvas); |
| canvas.bitmap := K.malloc(width*height*4 + 8); |
| canvas.bitmap := KOSAPI.malloc(width*height*4 + 8); |
| ASSERT(canvas.bitmap # 0); |
| SYSTEM.PUT32(canvas.bitmap, width); |
| SYSTEM.PUT32(canvas.bitmap + 4, height); |
| 322,7 → 322,7 |
|---|
| PROCEDURE destroy* (VAR canvas: tCanvas); |
| BEGIN |
| IF canvas # NIL THEN |
| canvas.bitmap := K.free(canvas.bitmap); |
| canvas.bitmap := KOSAPI.free(canvas.bitmap); |
| DISPOSE(canvas) |
| END |
| END destroy; |