Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
EDIT: Make a game in 10 lines or less.
#13
Here it is ( I am posting this in the Projects forum, too, where I will explain some what I did):
Code:
1 : SCREEN 13
2 : IF INP(96) = 57 THEN pX = pX - -(pX > 1) ELSE pX = pX + -(pX < 39)
3 : DRAW "c0 bm" + STR$(pX - 1 + 136) + ",130 r7 bm" + STR$(bX + 23 - 1 + 136) + "," + STR$(bY + 2 - 1 + 66) + "f2 bm" + STR$(bX + 23 + 1 + 136) + "," + STR$(bY + 2 - 1 + 66) + "g2 c1 bm136,66 r45 d65 l45 u64 c2 bm" + STR$(pX + 136) + ", 130 r5 c4 bm" + STR$(bX + 23 + 136) + "," + STR$(bY + 2 + 66) + "r0"
4 : bX = bX + ((bS AND 1) * 2) - 1
5 : bY = bY + (bS AND 2) - 1
6 : IF bX <= 1 - 23 OR bX >= 44 - 23 THEN bS = bS + -(((bS AND 1) * 2) - 1)
7 : IF ((bX >= pX - 23) AND (bX <= (pX + 5 - 23)) AND (bY = 63 - 2)) OR (bY = 1 - 2) THEN bS = bS + -((bS AND 2) - 1) * 2
8 : time = TIMER
9 : IF time = TIMER AND ((dummy$ = INKEY$) OR 1) THEN GOTO 9
10 : IF (bY < 65 - 2) THEN GOTO 2 ELSE PRINT "                You lose"

'10 line "Wall" pong.  Made by Daniel Miller.
'Controls:  Hold space bar to move to the left.
'           Let go to move to the right.
'Features:  No flicker
'           No keyboard "clicks"
'           Goes the same speed on every computer
Reply


Messages In This Thread
EDIT: Make a game in 10 lines or less. - by andy - 03-07-2004, 04:04 PM
EDIT: Make a game in 10 lines or less. - by PlayGGY - 03-08-2004, 01:01 PM
EDIT: Make a game in 10 lines or less. - by KiZ - 03-09-2004, 12:30 AM
EDIT: Make a game in 10 lines or less. - by KiZ - 03-09-2004, 12:40 AM
EDIT: Make a game in 10 lines or less. - by Zack - 03-09-2004, 08:39 AM
EDIT: Make a game in 10 lines or less. - by KiZ - 03-09-2004, 03:19 PM
10 line game... - by jatos - 03-09-2004, 06:10 PM
my 10 liner - by jatos - 03-09-2004, 09:38 PM
EDIT: Make a game in 10 lines or less. - by KiZ - 03-09-2004, 10:52 PM
EDIT: Make a game in 10 lines or less. - by seph - 05-13-2004, 12:58 AM
EDIT: Make a game in 10 lines or less. - by seph - 05-13-2004, 02:48 AM

Forum Jump:


Users browsing this thread: 1 Guest(s)