なんかいろいろおかしかった
これまでのことは忘れて

//---英字取り出し.mac(ここから)---
begingroupundo;disabledraw;
replaceallfast "(\"[A-Z]+\")「([ぁ-んー]+)」","\\1,",regular;
replaceallfast "^\"","\\(\"",regular;
replaceallfast ",$","\\)",regular;
endgroupundo;enabledraw;endmacro;
//---英字取り出し.mac(ここまで)---

//---ひらがな取り出し.mac(ここから)---
begingroupundo;disabledraw;
replaceallfast "(\"[A-Z]+\")「([ぁ-んー]+)」","\"\\2,\"",regular;
replaceallfast "^\"","\\(\"",regular;
replaceallfast ",\"$","\\)",regular;
endgroupundo;enabledraw;endmacro;
//---ひらがな取り出し.mac(ここまで)---