You haven't set up collisions,
Collisions C_BOX,C_BOX,1,1 ;<---add this line ;Main Loop While Not KeyDown(1)
Collisions C_BOX,C_BOX,1,1 ;<---add this line ;Main Loop While Not KeyDown(1)