Mining Event (No Scripting)

[germen]

Ok i made a mining eventsorta replicates the one on runescape, ive seen alot of mining scripts out there, none that work to well so i spent a couple of hours and fixed it. Here it is, leave feedback
----------------------- Page 1 ---------------------------

@>Show Choices: Mine, Prospect
: When [Mine]
@>Conditional Branch:[Pikaxe] in Inventory
@>Conditional Branch: Variable [001: Mining Exp] >=0
@>Control Variables:[0015: Make or Miss?] = Random No. (1.6) *you can change
@>Conditional Branch: Variable [0015: Make or Miss?] ==6
@>Text: You swing your axe. . .
@>Wait: 10 frame(s)
@>Text: and miss, but you swing again!
@>Wait: 10 frame(s)
@>Text: and miss, but you swing again!
@>Wait: 10 frame(s)
@>Text: You fail to mine the rock.
@>
: Else
@>
: Branch End
@>Conditional Branch: Variable [0015: Make or Miss?] ==5
@>Text: You swing your axe. . .
@>Wait: 10 frame(s)
@>Text: and miss, but you swing again!
@>Wait: 10 frame(s)
@>Text: and miss, but you swing again!
@>Wait: 5 frame(s)
@>Text: You managed to get an Ore!
@>Change Items:[Copper Ore], +1
@>Control Variables: [001: Mining Exp] +=15
@>Control Self Switch: A =ON
@>
: Else
@>
: Branch End
@>Conditional Branch: Variable [0015: Make or Miss?] ==4
@>Text: You swing your axe. . .
@>Wait: 10 frame(s)
@>Text: and miss, but you swing again!
@>Wait: 10 frame(s)
@>Text: You managed to get an Ore!
@>Change Items:[Copper Ore], +1
@>Control Variables: [001: Mining Exp] +=15
@>Control Self Switch: A =ON
@>
: Else
@>
: Branch End
@>Conditional Branch: Variable [0015: Make or Miss?] ==3
@>Text: You swing your axe. . .
@>Wait: 10 frame(s)
@>Text: and miss, but you swing again!
@>Wait: 5 frame(s)
@>Text: You managed to get an Ore!
@>Change Items:[Copper Ore], +1
@>Control Variables: [001: Mining Exp] +=15
@>Control Self Switch: A =ON
@>
: Else
@>
: Branch End
@>Conditional Branch: Variable [0015: Make or Miss?] ==2
@>Text: You swing your axe. . .
@>Wait: 10 frame(s)
@>Text: You managed to get an Ore!
@>Change Items:[Copper Ore], +1
@>Control Variables: [001: Mining Exp] +=15
@>Control Self Switch: A =ON
@>
: Else
@>
: Branch End
@>Conditional Branch: Variable [0015: Make or Miss?] ==1
@>Text: You swing your axe. . .
@>Wait: 5 frame(s)
@>Text: You managed to get an Ore!
@>Change Items:[Copper Ore], +1
@>Control Variables: [001: Mining Exp] +=15
@>Control Self Switch: A =ON
@>
: Else
@>
: Branch End
@>
: Else
@>Text: Your not level enough to mine here!
@>
: Branch End
@>
: Else
@>You Don't Have a Pikaxe!
@>
: Branch End
@>
: When [Prospect]
@>This rock contains Bronze Ore.
@>
: When Cancel
@>
: Branch End
@>

------------------------ Page 2 -----------------------------
*Note* Left hand side of window Self Switch A=ON
*Note* Parallel Process must be checked.

@>Wait: 40 Frame(s)
@>Control Self Switch: A =OFF
@>

sorry if there are any typos, wrote this at 2 in the morning @_@