ahk分割文本

; 功能：将大小说自动切割为固定大小的文件(需split.exe)
; 用法：将本程序复制到待处理文件目录下
; 将文件名(a.txt)复制到剪贴板(TC下按Ctrl+2)
; 运行本程序

;filename = 无奈三国.txt
filename = %clipboard%
splitsize = 50 ; K

; 1.获取文件大小
FileGetSize, filesize, %filename%, K
;msgbox %filesize%

; 1.5.若文件小于要分割的大小，退出
if ( filesize < splitsize )
ExitApp

; 2.获取文件行数
loop, read, %filename%
{
line_number := A_Index
}
;msgbox %line_number%

; 3.计算共多少行
wjs := Ceil(filesize/splitsize)
fenhsh := Ceil(line_number/wjs)
;msgbox %fenhsh%

; 4.使用split命令切割
RunWait, cmd /c d:\bin\bin32\split.exe -l %fenhsh% %filename%

; 5.重命名
Loop, x??
FileMove, %A_LoopFileName%, %A_LoopFileName%%filename%


FileDelete, %filename%
FileDelete, 10将文本切割为固定大小.ahk