how can I copy every 7 line and paste new file

[subami]

I have a file which has so many lines.
I want to copy every 7 line text including the cursor point line, and paste the new file.
help me !

ex)

aaa
bbb
ccc ->copy <-start cursor point
dddd
www
qqqq

ccc
eee
ggg ->copy
hhh
uuu
iiiii

rrr
eee
www ->copy
qqq
aaa
ddd

and paste the new file

[Mofi]

Here it is. The green macro code is for making sure, that the end of file is after a line break. This is necessary because you will run into an endless loop, if the last line of the file does not have a line break. Nothing is changed on the source file, if it ends with a line break. The macro uses clipboard 9 for copying the data.

InsertMode
ColumnModeOff
HexOff
UnixReOff
ToggleBookmark
Bottom
IfColNum 1
Else
"
"
EndIf
PreviousBookmark
ToggleBookmark
Clipboard 9
ClearClipboard
Loop
SelectLine
StartSelect
CopyAppend
EndSelect
Key DOWN ARROW
IfEof
ExitLoop
EndIf
Key DOWN ARROW
IfEof
ExitLoop
EndIf
Key DOWN ARROW
IfEof
ExitLoop
EndIf
Key DOWN ARROW
IfEof
ExitLoop
EndIf
Key DOWN ARROW
IfEof
ExitLoop
EndIf
Key DOWN ARROW
IfEof
ExitLoop
EndIf
EndLoop
NewFile
Paste
Top
ClearClipboard
Clipboard 0

[subami]

thank you very much. it works perfectly!