Comments (5)

By Manuel

Ascended (15765)

Manuel's picture

02-10-2005, 23:17

Enjoy:

1 DEFINTA-Z:OPEN"grp:"AS1:SCREEN5:LINE(0,10)-(255,212),,B:J=1:D=-1:Y=12:X=2:FORI=0TO1:I=0:
IFPOINT(X,Y)<>15THENPSET(X,Y):D=(D+J)MOD4:P=P+J:X=X-(D=0)+(D=2):Y=Y-(D=1)+(D=3):
IFJ=0THENJ=-(INKEY$<>""):NEXTELSEJ=0:PSET(0,0):PRINT#1,"P:",P:NEXTELSESCREEN0:PRINTP

By BiFi

Enlighted (4348)

BiFi's picture

11-10-2005, 10:50

ahwell, I'll add mine as well Smile

1 POKE-609,199

enjoy! Wink

By snout

Ascended (15187)

snout's picture

11-10-2005, 13:25

ey BiFi, can you explain why this code does state 'Ok' before hanging the MSX? Smile

By Edwin

Paragon (1182)

Edwin's picture

11-10-2005, 16:50

It reboots at the first interrupt. Considering that your return was detected at an interrupt as well, it has plenty of time to execute the instruction and print ok until the next interrupt.

By BiFi

Enlighted (4348)

BiFi's picture

14-10-2005, 20:48

here's another one:

1 poke-609,118

Wink