ForAllObjDo Assign MyVariable 0 Assign MyVariable1 5242880000 Assign MyVariable2 262144000 {Assign my1 0 Assign my2 0 Label aa Find 0x2321414D52 Down Wildcards IfFound Assign my1 currentpos ifequal (my1%512) 0 block1 my1 else move 1 JumpTo aa EndIf move 2048 Label bb Find 0x2321414D52 Down Wildcards IfFound Assign my2 currentpos ifequal (my2%512) 0 block2 my2 else move 1 JumpTo bb EndIf CopyIntoNewFile "d:\hy\filee +MyVariable+.amr" Assign MyVariable (MyVariable+1) move -512 }[unlimited]