Onbreken er foto's? Stuur die van jou ook in!Voeg foto toe

Reacties (5)

Van Manuel

Ascended (18129)

afbeelding van Manuel

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

Van BiFi

Enlighted (4348)

afbeelding van BiFi

11-10-2005, 10:50

ahwell, I'll add mine as well Smile

1 POKE-609,199

enjoy! Wink

Van snout

Ascended (15184)

afbeelding van snout

11-10-2005, 13:25

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

Van Edwin

Paragon (1182)

afbeelding van Edwin

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.

Van BiFi

Enlighted (4348)

afbeelding van BiFi

14-10-2005, 20:48

here's another one:

1 poke-609,118

Wink