|
@ -950,13 +950,20 @@ ackbibi() |
|
|
register n; |
|
|
register n; |
|
|
|
|
|
|
|
|
vfile("ackbibi:"); |
|
|
vfile("ackbibi:"); |
|
|
|
|
|
#ifdef SYLIXOS |
|
|
|
|
|
Readnum = HOWMANY; |
|
|
|
|
|
#else |
|
|
Readnum = 1; |
|
|
Readnum = 1; |
|
|
|
|
|
#endif |
|
|
stohdr(0L); |
|
|
stohdr(0L); |
|
|
for (n=3; --n>=0; ) { |
|
|
for (n=3; --n>=0; ) { |
|
|
purgeline(); |
|
|
purgeline(); |
|
|
zshhdr(4,ZFIN, Txhdr); |
|
|
zshhdr(4,ZFIN, Txhdr); |
|
|
switch (readline(100)) { |
|
|
switch (readline(100)) { |
|
|
case 'O': |
|
|
case 'O': |
|
|
|
|
|
#ifdef SYLIXOS |
|
|
|
|
|
Readnum = 1; |
|
|
|
|
|
#endif |
|
|
readline(1); /* Discard 2nd 'O' */ |
|
|
readline(1); /* Discard 2nd 'O' */ |
|
|
vfile("ackbibi complete"); |
|
|
vfile("ackbibi complete"); |
|
|
return; |
|
|
return; |
|
|