MSX POSITサンプル

画面左上の座標はBASICのLOCATEは(0,0)だがPOSITは(1,1)のようだ。

posit.c

/*
z88dk / WebMSX
zcc +msx -lndos -create-app posit.c
bload"cas:",r
*/

#include <stdio.h>

int cls()
{
#asm
        xor     a
        call    $00c3           ; CLS
#endasm
}

int posit(int xy)
{
#asm
        call    $00c6           ; POSIT
#endasm
}

int posit2(char x, char y)
{
#asm
        ld      ix, 0
        add     ix, sp
        ld      l, (ix+2)       ; y
        ld      h, (ix+4)       ; x
        call    $00c6           ; POSIT
#endasm
}

#define locate(x,y) posit((((x)+1)<<8)|((y)+1))

void main()
{
        cls();
        locate(1, 0);
        puts("locate");
        posit(0x0403);
        puts("posit");
        posit2(6, 5);
        puts("posit2");
}