Commit | Line | Data |
---|---|---|
1 | main $( | |
2 | extrn read, write; | |
3 | auto i, c, state, line 100; | |
4 | ||
5 | loop: | |
6 | state = i = 0; | |
7 | loop1: | |
8 | c = read(); | |
9 | if(c==4) return; | |
10 | if(c==':' & state==0) state = 2; | |
11 | if((c<'0' ^ c>'9'&c<'a' ^ c>'z') & state==0) state = 1; | |
12 | line[i] = c; | |
13 | i = i+1; | |
14 | if(c!=012) goto loop1; | |
15 | if(state==2 ^ i==1) goto noi; | |
16 | write(' '); | |
17 | write(' '); | |
18 | noi: | |
19 | i = 0; | |
20 | loop3: | |
21 | c = line[i]; | |
22 | write(c); | |
23 | i = i+1; | |
24 | if(c!=012) goto loop3; | |
25 | goto loop; | |
26 | $) |