diffs to ana.c
Chris Gordon
cagordon at watnot.UUCP
Tue Mar 18 04:20:16 AEST 1986
I recently made a few changes to ana.c. The changes I made do the following:
- ^W now works properly (plus the ascii code was wrong)
- BS/DEL doesn't always clear the screen
- it now tells you which letters you have remaining.
Here are the diffs:
#-------------- snip here on dotted line ---------------------
200c200
< case '\0177':
---
> case '\177':
206a207,208
> display_letters(level);
> refresh();
211a214
> display(level);
217d219
< display(level);
220c222
< case '\023': /* ^w - erase word */
---
> case '\027': /* ^w - erase word */
231a234
> if (level > 0) { compute(level-1); } else { lcopy(savelet, letters[0]); }
235c238
< case '\06': /* ^f - page forward */
---
> case '\006': /* ^f - page forward */
242c245
< case '\02': /* ^b - page back */
---
> case '\002': /* ^b - page back */
254a258
> display_letters(level);
294a299
> display_letters(level);
322a328,349
> }
>
> display_letters(level)
> int level;
> {
> register int ll,ln,cl,rw;
> mvaddstr(LINES-3,0,"Letters remaining: ");
> cl=19;
> rw=LINES-3;
> for(ll=0;ll<26;ll++)
> {
> for(ln=1;ln<=letters[level][ll];ln++)
> {
> mvaddch(rw,cl++,ll+'a');
> if (cl == COLS)
> {
> rw++;cl=0;
> }
> }
> }
> if ( ! (cl == COLS)) clrtoeol();
> mvaddstr(LINES-1,0,phrase); clrtoeol();
More information about the Comp.sources.unix
mailing list