论坛的大师能否帮我翻译一下程序

kevindezxw

O1234
G91G28Z0.

#4=0.
#5=1
#6=49.
N123

#1=0
#3=4
#2=64.


WHILE[#1LT#3]DO1

#5202=#4*#6
#5201=#1*#2
#1=#1+1
M198P111



END1



#4=#4+1
IF[#4LT#5]GOTO123





#5202=0

#5201=0
M30

￥举个栗子￥

这是自动分中程序主程序，没什么意义，关键在子程序里面。