Game project part 4

Private Sub cmdRightB_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

shpHeadB.Left = shpHeadB.Left + 20

shpBodyB.Left = shpBodyB.Left + 20

shpBoxerB.Left = shpBoxerB.Left + 20

shpLLegB.Left = shpLLegB.Left + 20

shpRlegB.Left = shpRlegB.Left + 20

shpShoeB.Left = shpShoeB.Left + 20

liHandStable1B.X1 = liHandStable1B.X1 + 20

liHandStable1B.X2 = liHandStable1B.X2 + 20

liHandStable2B.X1 = liHandStable2B.X1 + 20

liHandStable2B.X2 = liHandStable2B.X2 + 20

liHandMoveB.X1 = liHandMoveB.X1 + 20

liHandMoveB.X2 = liHandMoveB.X2 + 20

End Sub

Private Sub cmdUpA_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

shpHeadA.Top = shpHeadA.Top - 20

shpBodyA.Top = shpBodyA.Top - 20

shpboxerA.Top = shpboxerA.Top - 20

shpLlegA.Top = shpLlegA.Top - 20

shpRlegA.Top = shpRlegA.Top - 20

shpShoeA.Top = shpShoeA.Top - 20

liHandStable1A.Y1 = liHandStable1A.Y1 - 20

liHandStable1A.Y2 = liHandStable1A.Y2 - 20

liHandStable2A.Y1 = liHandStable2A.Y1 - 20

liHandStable2A.Y2 = liHandStable2A.Y2 - 20

liHandMoveA.Y1 = liHandMoveA.Y1 - 20

liHandMoveA.Y2 = liHandMoveA.Y2 - 20

End Sub

Part 3 | Part 5

RAW Game Project

1. Game project part 1
2. Game project part 2
3. Game project part 3
4. Game project part 4
5. Game project part 5
6. Game project part 6