Can someone help me make this into...

[Mantis]

Can someone help me make this into a boxing game. I have the people but im not sure how to make them move or punch.

Code: Select all

CLS
SCREEN 13
CIRCLE (100, 100), 13
COLOR 7
LINE (100, 110)-STEP(0, 30)
COLOR 13
(100, 120)-STEP (25, -7)
COLOR 13
LINE (100, 120)-STEP(25,5)
COLOR 6
LINE (100, 140)-STEP(25, 20)
COLOR 6
LINE (100, 140)-STEP(-25, 20)
COLOR 3
CIRCLE (105, 98), 2
COLOR 3
CIRCLE (95, 98), 2
COLOR 10
CIRCLE (130, 113), 6
COLOR 10
CIRCLE (128, 128), 6
COLOR 4
CIRCLE (200, 100), 13
COLOR 13
LINE (200, 112)-STEP( 0, 30)
COLOR 6
LINE (200, 125)-STEP(-30, 5)
COLOR 6
LINE (200, 125)-STEP(-30, -12)
COLOR 9
LINE (200, 143)-STEP(25, 20)
COLOR 9
LINE (200, 143)-STEP(-25, 20)
COLOR 15
CIRCLE (205, 98), 2
COLOR 15
CIRCLE (195, 98), 2
COLOR 14 
CIRCLE (165, 112), 6
COLOR 14
CIRCLE (165, 130), 6

If you have any suggestions on how to make this better or if you know how to make them move from right to left and punch please tell me.

[surturz]

use COLOR 0 to erase what you have already drawn and then re-draw the new position.

e.g. adding the following will erase one of the boxer's gloves once you press a key ...

Code: Select all

DO: LOOP UNTIL INKEY$ > ""
COLOR 0
CIRCLE (130, 113), 6