Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
EDIT: Make a game in 10 lines or less.
#22
Okay, here is the code with the math simplified (there goes any hope of anyone else understanding it) Sad:

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 + 135) + ",130 r7 bm" + STR$(bX + 158) + "," + STR$(bY + 67) + "f2 bm" + STR$(bX + 160) + "," + STR$(bY + 67) + "g2 c1 bm136,66 r45 d65 l45 u64 c2 bm" + STR$(pX + 136) + ", 130 r5 c4 bm" + STR$(bX + 159) + "," + STR$(bY + 68) + "r0"
4 : bX = bX + ((bS AND 1) * 2) - 1
5 : bY = bY + (bS AND 2) - 1
6 : IF bX <= -22 OR bX >= 21 THEN bS = bS + -(((bS AND 1) * 2) - 1)
7 : IF ((bX >= pX - 24) AND (bX <= (pX - 17)) AND (bY = 61)) OR (bY = -1) 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 < 63) 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 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 PlayGGY - 03-09-2004, 12:55 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)