open FDDE git 0 open FDDE 3ds 1 ImpType Standard ; Set D Long 16 ; GoTo D 0 ; Get B Long 0 ; SavePos Q 0 ; Math J = 4 ; Math J += D ; GoTo Q 0 ; For T = 1 To B ; GoTo J 0 ; Get X Long 0 ; Get Y Long 0 ; Get Z Long 0 ; Math H = T ; Math H -= 1 ; Math H *= 12 ; Math H += 110 ; Goto H 1 ; Put X Long 1 ; Put Y Long 1 ; Put Z Long 1 ; Math J += 52 ; Next T ;