マクロ本体です。

'行頭に全角スペースがなければ挿入

proc main
	'編集中の文書がなければ終了
	if @hwnd = 0 then exit proc
	'まとめて Undo できるようにしておく
	@UndoBlock = 1
	'もし自動的に先頭から始めたければ、次のコメントアウトをはずす
	'@MoveFileTop
	'カーソル位置がファイル末尾でない限り繰返す
	do while @Code <> CODE_EOF 
		'カーソル位置コードが全角スペースでも「でもないときだけ空白挿入
		if @Code <> `　` and @code <> `「` then @Insert "　"
		'次の行頭（改行単位）に移動
		@MoveNextLineCr
	'ここまでループ
	loop
	'ここまでまとめて Undo の対象になる
	@UndoBlock = 0
end proc