Como hacer el numero mágico en visual foxpro6.0

Quiero hacer el numero mágico en fox pro y no me sale bien