I wrote Stickman-Boxing when I started VB you can download the .exe at www.darkahn.cjb.net

All I used was a simple Random Number engine for eg:
If x>0 then
block
else
hit;