Posted Tue Jan 17, 2012 7:04 PM
Posted Wed Jan 18, 2012 4:11 PM
raisinland, on Tue Jan 17, 2012 7:04 PM, said:
Posted Wed Jan 18, 2012 7:27 PM
Posted Thu Jan 19, 2012 11:53 AM
raisinland, on Wed Jan 18, 2012 7:27 PM, said:
Posted Fri Jan 20, 2012 12:01 PM
Posted Sun Jan 22, 2012 6:30 AM
raisinland, on Wed Jan 18, 2012 7:27 PM, said:
Posted Mon Jan 23, 2012 3:02 AM
Posted Mon Jan 23, 2012 2:33 PM
raisinland, on Fri Jan 20, 2012 12:01 PM, said:
Posted Fri Jan 27, 2012 3:17 AM
Posted Fri Jan 27, 2012 12:03 PM
Posted Sun Mar 18, 2012 4:26 PM
raisinland, on Mon Jan 23, 2012 3:02 AM, said:
unsigned char a;
unsigned char b;
unsigned char c;
unsigned char d;
unsigned char e;
unsigned char f;
unsigned char g;
unsigned char h;
unsigned char stringTemp[4];
tgi_install(&lynxtgi);
tgi_init();
CLI();
while (tgi_busy())
;
tgi_clear();
a = (unsigned char)PEEK(0xFC55);
b = (unsigned char)PEEK(0xFC54);
c = (unsigned char)PEEK(0xFC53);
d = (unsigned char)PEEK(0xFC52);
e = (unsigned char)PEEK(0xFC63);
f = (unsigned char)PEEK(0xFC62);
g = (unsigned char)PEEK(0xFC61);
h = (unsigned char)PEEK(0xFC60);
tgi_setcolor(COLOR_GREEN);
tgi_outtextxy(0, 0, "Peek A,B,C,D,E,F,G,H");
itoa(a, stringTemp, 16);
tgi_outtextxy(0, 10, stringTemp);
itoa(b, stringTemp, 16);
tgi_outtextxy(0, 20, stringTemp);
itoa(c, stringTemp, 16);
tgi_outtextxy(0, 30, stringTemp);
itoa(d, stringTemp, 16);
tgi_outtextxy(0, 40, stringTemp);
itoa(e, stringTemp, 16);
tgi_outtextxy(0, 50, stringTemp);
itoa(f, stringTemp, 16);
tgi_outtextxy(0, 60, stringTemp);
itoa(g, stringTemp, 16);
tgi_outtextxy(0, 70, stringTemp);
itoa(h, stringTemp, 16);
tgi_outtextxy(0, 80, stringTemp);
tgi_updatedisplay();
__asm__("wait: lda $fcb0");
__asm__(" beq wait");
tgi_clear();
POKE(0xFC92, 0x80);
POKE(0xFC52, 0xfe); // D
POKE(0xFC53, 0xff); // C
POKE(0xFC54, 0x00); // B
POKE(0xFC55, 0x80); // A
__asm__("notready: bit $fc92");
__asm__(" bmi notready");
a = (unsigned char)PEEK(0xFC55);
b = (unsigned char)PEEK(0xFC54);
c = (unsigned char)PEEK(0xFC53);
d = (unsigned char)PEEK(0xFC52);
e = (unsigned char)PEEK(0xFC63);
f = (unsigned char)PEEK(0xFC62);
g = (unsigned char)PEEK(0xFC61);
h = (unsigned char)PEEK(0xFC60);
tgi_setcolor(COLOR_GREEN);
tgi_outtextxy(0, 0, "Peek A,B,C,D,E,F,G,H");
itoa(a, stringTemp, 16);
tgi_outtextxy(0, 10, stringTemp);
itoa(b, stringTemp, 16);
tgi_outtextxy(0, 20, stringTemp);
itoa(c, stringTemp, 16);
tgi_outtextxy(0, 30, stringTemp);
itoa(d, stringTemp, 16);
tgi_outtextxy(0, 40, stringTemp);
itoa(e, stringTemp, 16);
tgi_outtextxy(0, 50, stringTemp);
itoa(f, stringTemp, 16);
tgi_outtextxy(0, 60, stringTemp);
itoa(g, stringTemp, 16);
tgi_outtextxy(0, 70, stringTemp);
itoa(h, stringTemp, 16);
tgi_outtextxy(0, 80, stringTemp);
tgi_updatedisplay();
while (1)
;
POKE(0xFC92, 0x80); POKE(0xFC52, 0x00); // D POKE(0xFC53, 0x00); // C POKE(0xFC52, 0x01); // D POKE(0xFC54, 0x02); // B POKE(0xFC55, 0x00); // A
POKE(0xFC52, 0x00); // D POKE(0xFC53, 0xFF); // C -> set to negative value before signed math POKE(0xFC54, 0x00); // B POKE(0xFC92, 0x80); // Turn on signed math POKE(0xFC52, 0xFF); // D Non-zero value
POKE(0xFC53, 0xFF); // Cthe result changed to CD being 0x0001, as described by the documentation.
Posted Sat Mar 24, 2012 7:16 PM
0 members, 0 guests, 0 anonymous users