Easy language Development Mini-game

1. Program Section
. assembly Window Assembly 1
an array of assembly variables, integer type, "3"
. Assembly variable champion, integer type
. Assembly variable end point, Integer type
. Assembly variable to end number, integer type

. Sub-Program Display object

animated object. Zoom Ratio = 212
animated object. Type value = 0
array [1] = Animation box. Create object (Animated object, 10, 30, True, "1")
animation box. Set hierarchy (array [1], 1)
animation box. Picture (array [1], #兔子一号,)

animated object. Zoom Ratio =
Array [2] = Animation box. Create object (Animated object, 10, 100, True, "2")
animation box. Set hierarchy (array [2], 1)
animation box. Picture (array [2], #乌龟一号,)

Array [3] = Animation box. Create object (Animated object, 10, 170, True, "3")
animation box. Set hierarchy (array [3], 1)
animation box. Picture (array [3], #小猪一号,)

animated object. Zoom Ratio =
animated object. Type value = 1
End point = Animation box. Create object (Animated object, 666,-10, false, "end")
animation box. Set picture (end, #终点线, 0)
animation box. Set level (end, 1)


. Sub-Program __ Start window _ creation completed

Display object ()

. Subroutine _ button 1_ clicked

Champion = 0
end point = 0
animation box. Play animation (array [1], 0,,,)
animation box. Play animation (array [2], 0,,,)
animation box. Play animation (array [3], 0,,,)
animation box. Auto Advance (array [1], to value (edit box 1. Contents), 30,,, True,, true,,)
animation box. Auto Advance (array [2], to Value (edit box 2. Contents), 30,,, True,, true,,)
animation box. Auto Advance (array [3], to Value (edit box 3. Contents), 30,,, True,, true,,)


. Subroutine _ button 2_ clicked

animation box. Destroy all Objects ()
Display object ()

. Sub-program show champion
. Parameter Championship, integer type
local variable Identity value _ Temp 1, Integer type
local variable Identity value _ Temp 2, Integer type

. Judgment Start (Champion = array [1])
Identity Value _ Temp 1 = Animation box. Create object (animated object, 200, 200, true,)
animation box. Set Picture (Identity value _ temporary 1, #兔子一号,)
animation box. Play Animation (Identity value _ Temp 1, 0,,,)
Identity Value _ Temp 2 = Animation box. Create object (animated object, 200, 200, true,)
animation box. Text (Identity value _ Temporary 2, "Rabbit won! ",,)
. Judgment (Champion = array [2])
Identity Value _ Temp 1 = Animation box. Create object (animated object, 200, 200, true,)
animation box. Set Picture (Identity value _ temporary 1, #乌龟一号,)
animation box. Play Animation (Identity value _ Temp 1, 0,,,)
Identity Value _ Temp 2 = Animation box. Create object (animated object, 200, 200, true,)
animation box. Text (Identity value _ Temporary 2, "the Turtle won!" ",,)
. Judgment (Champion = array [3])
Identity Value _ Temp 1 = Animation box. Create object (animated object, 200, 200, true,)
animation box. Set Picture (Identity value _ temporary 1, #小猪一号,)
animation box. Play Animation (Identity value _ Temp 1, 0,,,)
Identity Value _ Temp 2 = Animation box. Create object (animated object, 200, 200, true,)
animated box. Text (Identity value _ Temporary 2, "Piglet won! ",,)
. The default

. End of Judgment


. Subroutine _ Animation Frame _ Collision to Object
. Parametric collision Object identification value, Integer type
. Parameter collision Front horizontal axis, integer type
. Parameter pre-collision ordinate, integer type
. Parameter is a collision object identification value, Integer type

to end number = number of endpoints + 1
. If true (Champion = 0)
Champion = Collision Object Identification Value
. If it really ends

if True (to the end number = 3)
Show Champion (Champion)
. If it really ends

2. Picture Resource table
. Picture finish Line
. Picture Rabbit Number One
. Picture Turtle Number One
. Picture Piggy One

3. Front screen

Easy language Development Mini-game