I think i did pretty well on it (for as simple as it was). But I found it didn't run smoothly, like when you would hold down the arrow key or something like that. This happened to me also when i was making a pacman clone.
Are there any techniques to make my games work better? thanx.
*******************************************************
Code: Select all
CLS
playerx = 40
playery = 23
row = 12
column = 79
DO
FOR column = 1 TO 79
keyed$ = INKEY$
LOCATE playery, playerx
PRINT CHR$(153)
oldplayery = playery
oldplayerx = playerx
IF keyed$ = CHR$(0) + CHR$(72) THEN playery = playery - 1
IF keyed$ = CHR$(0) + CHR$(80) THEN playery = playery + 1
IF keyed$ = CHR$(0) + CHR$(75) THEN playerx = playerx - 1
IF keyed$ = CHR$(0) + CHR$(77) THEN playerx = playerx + 1
IF keyed$ = CHR$(27) THEN END
LOCATE oldplayery, oldplayerx
PRINT " "
LOCATE playery, playerx
PRINT CHR$(153)
LOCATE row, column
PRINT " "; CHR$(141)
LOCATE row + 1, column
PRINT " "; CHR$(140); CHR$(140)
LOCATE row + 2, column
PRINT " "; CHR$(144)
FOR nothing = 1 TO 50000
NEXT
IF row = playery OR row + 1 = playery OR row + 2 = playery AND column = playerx THEN
PRINT "HA HA! The ASCII symbols caught you!"
PRINT "YOu LOsE!"
END
END IF
NEXT
LOOP