ilechr
r
r
chfgetcfpr
ifchEOFr
r
gotour
r
r
chfgetcfpr
r
ifchr
gotow寻找下一个r
chfgetcfpr
gotour
r
r
elseifflag1说明为行注释r
r
ififlag0处理注释出现之前的字符r
r
otheriflag10r
forj0j11jr
r
ifstrcmpSi
gleWordjother0r
r
r
fpri
tfout