.

projects/11/Pong/Ball.vm

@@ -0,0 +1,435 @@
+function Ball.new 0
+push constant 15
+call Memory.alloc 1
+pop pointer 0
+push argument 0
+pop this 0
+push argument 1
+pop this 1
+push argument 2
+pop this 10
+push argument 3
+push constant 6
+sub
+pop this 11
+push argument 4
+pop this 12
+push argument 5
+push constant 6
+sub
+pop this 13
+push constant 0
+pop this 14
+push pointer 0
+call Ball.show 1
+pop temp 0
+push pointer 0
+return
+function Ball.dispose 0
+push argument 0
+pop pointer 0
+push pointer 0
+call Memory.deAlloc 1
+pop temp 0
+push constant 0
+return
+function Ball.show 0
+push argument 0
+pop pointer 0
+push constant 1
+neg
+call Screen.setColor 1
+pop temp 0
+push pointer 0
+call Ball.draw 1
+pop temp 0
+push constant 0
+return
+function Ball.hide 0
+push argument 0
+pop pointer 0
+push constant 0
+call Screen.setColor 1
+pop temp 0
+push pointer 0
+call Ball.draw 1
+pop temp 0
+push constant 0
+return
+function Ball.draw 0
+push argument 0
+pop pointer 0
+push this 0
+push this 1
+push this 0
+push constant 5
+add
+push this 1
+push constant 5
+add
+call Screen.drawRectangle 4
+pop temp 0
+push constant 0
+return
+function Ball.getLeft 0
+push argument 0
+pop pointer 0
+push this 0
+return
+function Ball.getRight 0
+push argument 0
+pop pointer 0
+push this 0
+push constant 5
+add
+return
+function Ball.setDestination 3
+push argument 0
+pop pointer 0
+push argument 1
+push this 0
+sub
+pop this 2
+push argument 2
+push this 1
+sub
+pop this 3
+push this 2
+call Math.abs 1
+pop local 0
+push this 3
+call Math.abs 1
+pop local 1
+push local 0
+push local 1
+lt
+pop this 7
+push this 7
+not
+if-goto L0
+push local 0
+pop local 2
+push local 1
+pop local 0
+push local 2
+pop local 1
+push this 1
+push argument 2
+lt
+pop this 8
+push this 0
+push argument 1
+lt
+pop this 9
+goto L1
+label L0
+push this 0
+push argument 1
+lt
+pop this 8
+push this 1
+push argument 2
+lt
+pop this 9
+label L1
+push constant 2
+push local 1
+call Math.multiply 2
+push local 0
+sub
+pop this 4
+push constant 2
+push local 1
+call Math.multiply 2
+pop this 5
+push constant 2
+push local 1
+push local 0
+sub
+call Math.multiply 2
+pop this 6
+push constant 0
+return
+function Ball.move 0
+push argument 0
+pop pointer 0
+push pointer 0
+call Ball.hide 1
+pop temp 0
+push this 4
+push constant 0
+lt
+not
+if-goto L2
+push this 4
+push this 5
+add
+pop this 4
+goto L3
+label L2
+push this 4
+push this 6
+add
+pop this 4
+push this 9
+not
+if-goto L4
+push this 7
+not
+if-goto L5
+push this 0
+push constant 4
+add
+pop this 0
+goto L6
+label L5
+push this 1
+push constant 4
+add
+pop this 1
+label L6
+goto L7
+label L4
+push this 7
+not
+if-goto L8
+push this 0
+push constant 4
+sub
+pop this 0
+goto L9
+label L8
+push this 1
+push constant 4
+sub
+pop this 1
+label L9
+label L7
+label L3
+push this 8
+not
+if-goto L10
+push this 7
+not
+if-goto L11
+push this 1
+push constant 4
+add
+pop this 1
+goto L12
+label L11
+push this 0
+push constant 4
+add
+pop this 0
+label L12
+goto L13
+label L10
+push this 7
+not
+if-goto L14
+push this 1
+push constant 4
+sub
+pop this 1
+goto L15
+label L14
+push this 0
+push constant 4
+sub
+pop this 0
+label L15
+label L13
+push this 0
+push this 10
+gt
+not
+not
+if-goto L16
+push constant 1
+pop this 14
+push this 10
+pop this 0
+goto L17
+label L16
+label L17
+push this 0
+push this 11
+lt
+not
+not
+if-goto L18
+push constant 2
+pop this 14
+push this 11
+pop this 0
+goto L19
+label L18
+label L19
+push this 1
+push this 12
+gt
+not
+not
+if-goto L20
+push constant 3
+pop this 14
+push this 12
+pop this 1
+goto L21
+label L20
+label L21
+push this 1
+push this 13
+lt
+not
+not
+if-goto L22
+push constant 4
+pop this 14
+push this 13
+pop this 1
+goto L23
+label L22
+label L23
+push pointer 0
+call Ball.show 1
+pop temp 0
+push this 14
+return
+function Ball.bounce 5
+push argument 0
+pop pointer 0
+push this 2
+push constant 10
+call Math.divide 2
+pop local 2
+push this 3
+push constant 10
+call Math.divide 2
+pop local 3
+push argument 1
+push constant 0
+eq
+not
+if-goto L24
+push constant 10
+pop local 4
+goto L25
+label L24
+push this 2
+push constant 0
+lt
+not
+push argument 1
+push constant 1
+eq
+and
+push this 2
+push constant 0
+lt
+push argument 1
+push constant 1
+neg
+eq
+and
+or
+not
+if-goto L26
+push constant 20
+pop local 4
+goto L27
+label L26
+push constant 5
+pop local 4
+label L27
+label L25
+push this 14
+push constant 1
+eq
+not
+if-goto L28
+push constant 506
+pop local 0
+push local 3
+push constant 50
+neg
+call Math.multiply 2
+push local 2
+call Math.divide 2
+pop local 1
+push this 1
+push local 1
+push local 4
+call Math.multiply 2
+add
+pop local 1
+goto L29
+label L28
+push this 14
+push constant 2
+eq
+not
+if-goto L30
+push constant 0
+pop local 0
+push local 3
+push constant 50
+call Math.multiply 2
+push local 2
+call Math.divide 2
+pop local 1
+push this 1
+push local 1
+push local 4
+call Math.multiply 2
+add
+pop local 1
+goto L31
+label L30
+push this 14
+push constant 3
+eq
+not
+if-goto L32
+push constant 250
+pop local 1
+push local 2
+push constant 25
+neg
+call Math.multiply 2
+push local 3
+call Math.divide 2
+pop local 0
+push this 0
+push local 0
+push local 4
+call Math.multiply 2
+add
+pop local 0
+goto L33
+label L32
+push constant 0
+pop local 1
+push local 2
+push constant 25
+call Math.multiply 2
+push local 3
+call Math.divide 2
+pop local 0
+push this 0
+push local 0
+push local 4
+call Math.multiply 2
+add
+pop local 0
+label L33
+label L31
+label L29
+push pointer 0
+push local 0
+push local 1
+call Ball.setDestination 3
+pop temp 0
+push constant 0
+return