uifc32.c 61.2 KB
Newer Older
deuce's avatar
deuce committed
1
/* uifc32.c */
2
3
4

/* Curses implementation of UIFC (user interface) library based on uifc.c */

rswindell's avatar
rswindell committed
5
6
/* $Id$ */

7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
/****************************************************************************
 * @format.tab-size 4		(Plain Text/Source Code File Header)			*
 * @format.use-tabs true	(see http://www.synchro.net/ptsc_hdr.html)		*
 *																			*
 * Copyright 2003 Rob Swindell - http://www.synchro.net/copyright.html		*
 *																			*
 * This library is free software; you can redistribute it and/or			*
 * modify it under the terms of the GNU Lesser General Public License		*
 * as published by the Free Software Foundation; either version 2			*
 * of the License, or (at your option) any later version.					*
 * See the GNU Lesser General Public License for more details: lgpl.txt or	*
 * http://www.fsf.org/copyleft/lesser.html									*
 *																			*
 * Anonymous FTP access to the most recent released source is available at	*
 * ftp://vert.synchro.net, ftp://cvs.synchro.net and ftp://ftp.synchro.net	*
 *																			*
 * Anonymous CVS access to the development source and modification history	*
 * is available at cvs.synchro.net:/cvsroot/sbbs, example:					*
 * cvs -d :pserver:anonymous@cvs.synchro.net:/cvsroot/sbbs login			*
 *     (just hit return, no password is necessary)							*
 * cvs -d :pserver:anonymous@cvs.synchro.net:/cvsroot/sbbs checkout src		*
 *																			*
 * For Synchronet coding style and modification guidelines, see				*
 * http://www.synchro.net/source.html										*
 *																			*
 * You are encouraged to submit any modifications (preferably in Unix diff	*
 * format) via e-mail to mods@synchro.net									*
 *																			*
 * Note: If this box doesn't appear square, then you need to fix your tabs.	*
 ****************************************************************************/

#ifdef __unix__
	#include <stdio.h>
	#include <unistd.h>
	#ifdef __QNX__
		#include <strings.h>
	#endif
	#include "ciowrap.h"
    #define mswait(x) delay(x)
deuce's avatar
deuce committed
46
47
48
49
50
51
	#if defined(putch) && defined(NO_ECHOCHAR)
		#undef putch
	#endif
	#if !defined(putch)
    	#define putch(x)	_putch(x,TRUE)
	#endif
52
    #define clreol()	clrtoeol()
53
54
55
56
#elif defined(_WIN32)
	#include <share.h>
	#include <conio.h>
	#include <windows.h>
57
	#include "keys.h"
58
59
60
61
	#define mswait(x) Sleep(x)
#endif

#include "uifc.h"
62
#define MAX_GETSTR	5120
63
64
65
66
67
68
69
70
							/* Bottom line elements */
#define BL_INS      (1<<0)  /* INS key */
#define BL_DEL      (1<<1)  /* DEL key */
#define BL_GET      (1<<2)  /* Get key */
#define BL_PUT      (1<<3)  /* Put key */

#define BLINK	128

71
static char  hclr,lclr,bclr,cclr,lbclr;
72
73
74
static int   cursor;
static char* helpfile=0;
static uint  helpline=0;
deuce's avatar
deuce committed
75
76
77
static size_t blk_scrn_len;
static char* blk_scrn;
static uchar* tmp_buffer;
78
static uchar* tmp_buffer2;
79
80
81
82
83
84
85
static win_t sav[MAX_BUFS];
static uifcapi_t* api;

/* Prototypes */
static int   uprintf(int x, int y, unsigned char attr, char *fmt,...);
static void  bottomline(int line);
static char  *utimestr(time_t *intime);
deuce's avatar
deuce committed
86
static void  help(void);
87
static int   ugetstr(int left, int top, int width, char *outstr, int max, long mode, int *lastkey);
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
static void  timedisplay(void);

/* API routines */
static void uifcbail(void);
static int  uscrn(char *str);
static int  ulist(int mode, int left, int top, int width, int *dflt, int *bar
	,char *title, char **option);
static int  uinput(int imode, int left, int top, char *prompt, char *str
	,int len ,int kmode);
static void umsg(char *str);
static void upop(char *str);
static void sethelp(int line, char* file);
static void showbuf(int mode, int left, int top, int width, int height, char *title
	, char *hbuf, int *curp, int *barp);

/* Dynamic menu support */
static int *last_menu_cur=NULL;
static int *last_menu_bar=NULL;
static int save_menu_cur=-1;
static int save_menu_bar=-1;

109
110
111
112
113
114
115
/* Internal Structs */
struct uifc_mouse_event {
	int	x;
	int	y;
	int	button;
};

116
117
118
119
120
121
122
123
/* Mouse support */
#ifdef _WIN32
int	uifc_last_button_press=0;
struct uifc_mouse_event	last_mouse_click;
#define kbhit()	console_hit()
int	console_hit(void);
#endif

124
125
126
127
128
129
130
131
132
133
134
135
static void reset_dynamic(void) {
	last_menu_cur=NULL;
	last_menu_bar=NULL;
	save_menu_cur=-1;
	save_menu_bar=-1;
}

/****************************************************************************/
/* Initialization function, see uifc.h for details.							*/
/* Returns 0 on success.													*/
/****************************************************************************/

deuce's avatar
deuce committed
136
int kbwait(void) {
137
	int timeout=0;
138
	while(timeout++<50) {
139
		if(kbhit())
140
			return(TRUE);
141
		mswait(1);
142
143
144
145
	}
	return(FALSE);
}

146
147
#ifdef _WIN32

148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
int console_hit(void)
{
	INPUT_RECORD input;
	DWORD num=0;

	while(1) {
		if(!PeekConsoleInput(GetStdHandle(STD_INPUT_HANDLE), &input, 1, &num)
			|| !num)
			break;
		if(input.EventType==KEY_EVENT && input.Event.KeyEvent.bKeyDown)
			return(1);
		if(input.EventType==MOUSE_EVENT) {
			if(!input.Event.MouseEvent.dwEventFlags
				&& (!input.Event.MouseEvent.dwButtonState
					|| input.Event.MouseEvent.dwButtonState==FROM_LEFT_1ST_BUTTON_PRESSED
					|| input.Event.MouseEvent.dwButtonState==RIGHTMOST_BUTTON_PRESSED))
				return(1);
			else
				uifc_last_button_press=0;
		}
		if(ReadConsoleInput(GetStdHandle(STD_INPUT_HANDLE), &input, 1, &num)
			&& num) {
			continue;
		}
	}
	return(0);
}

176
int inkey()
177
{
178
179
180
	char str[128];
	INPUT_RECORD input;
	DWORD num=0;
181

182
183
	while(1) {
		if(!ReadConsoleInput(GetStdHandle(STD_INPUT_HANDLE), &input, 1, &num)
184
			|| !num || (input.EventType!=KEY_EVENT && input.EventType!=MOUSE_EVENT))
185
186
			continue;

187
188
189
190
		switch(input.EventType) {
			case KEY_EVENT:
				if(!input.Event.KeyEvent.bKeyDown)
					continue;
191
#if 0
192
193
194
195
196
197
198
199
200
201
202
203
				sprintf(str,"keydown=%d\n",input.Event.KeyEvent.bKeyDown);
				OutputDebugString(str);
				sprintf(str,"repeat=%d\n",input.Event.KeyEvent.wRepeatCount);
				OutputDebugString(str);
				sprintf(str,"keycode=%x\n",input.Event.KeyEvent.wVirtualKeyCode);
				OutputDebugString(str);
				sprintf(str,"scancode=%x\n",input.Event.KeyEvent.wVirtualScanCode);
				OutputDebugString(str);
				sprintf(str,"ascii=%d\n",input.Event.KeyEvent.uChar.AsciiChar);
				OutputDebugString(str);
				sprintf(str,"dwControlKeyState=%lx\n",input.Event.KeyEvent.dwControlKeyState);
				OutputDebugString(str);
204
#endif
205

206
207
				if(input.Event.KeyEvent.uChar.AsciiChar)
					return(input.Event.KeyEvent.uChar.AsciiChar);
208

209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
				return(input.Event.KeyEvent.wVirtualScanCode<<8);
				break;
			case MOUSE_EVENT:
				if(input.Event.MouseEvent.dwEventFlags!=0) {
					uifc_last_button_press=0;
					continue;
				}
				if(input.Event.MouseEvent.dwButtonState==0) {
					if(uifc_last_button_press) {
						last_mouse_click.x=input.Event.MouseEvent.dwMousePosition.X;
						last_mouse_click.y=input.Event.MouseEvent.dwMousePosition.Y;
						last_mouse_click.button=uifc_last_button_press;
						uifc_last_button_press=0;
						return(KEY_MOUSE);
					}
				}
				else {
					uifc_last_button_press=0;
					switch(input.Event.MouseEvent.dwButtonState) {
						case FROM_LEFT_1ST_BUTTON_PRESSED:
							uifc_last_button_press=1;
							break;
						case RIGHTMOST_BUTTON_PRESSED:
							uifc_last_button_press=2;
							break;
						default:
							uifc_last_button_press=0;
					}
				}
		}
239
240
241
	}

	return(0);
242
}
243

244
245
246
247
248
249
#else 

	#define inkey() getch()

#endif

250
251
252
253
int uifcini32(uifcapi_t* uifcapi)
{
	int 	i;
	struct	text_info txtinfo;
254
255
256
#ifdef _WIN32
	DWORD	conmode;
#endif
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271

    if(uifcapi==NULL || uifcapi->size!=sizeof(uifcapi_t))
        return(-1);

    api=uifcapi;

    /* install function handlers */            
    api->bail=uifcbail;
    api->scrn=uscrn;
    api->msg=umsg;
    api->pop=upop;
    api->list=ulist;
    api->input=uinput;
    api->sethelp=sethelp;
    api->showhelp=help;
deuce's avatar
deuce committed
272
	api->showbuf=showbuf;
273
	api->timedisplay=timedisplay;
274
	api->getstrxy=ugetstr;
275

276
277
278
279
	/* A esc_delay of less than 10 is stupid... silently override */
	if(api->esc_delay < 10)
		api->esc_delay=25;

280
281
282
283
284
285
#ifdef PDCURSES
	if(mouse_set(BUTTON1_CLICKED|BUTTON3_CLICKED)==0)
		api->mode|=UIFC_MOUSE;
	else
		mouse_set(0);
#endif
286
287
288
289
#ifdef __unix__
	initciowrap(api->mode);
	#ifdef NCURSES_VERSION_MAJOR
		ESCDELAY=api->esc_delay;
290
291
292
293
294
		
		if(mousemask(BUTTON1_CLICKED|BUTTON3_CLICKED,NULL)==BUTTON1_CLICKED|BUTTON3_CLICKED)
			api->mode|=UIFC_MOUSE;
		else
			mousemask(0,NULL);
295
	#endif
296
	
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
#else
    if(api->scrn_len!=0) {
        switch(api->scrn_len) {
            case 14:
                textmode(C80X14);
                break;
            case 21:
                textmode(C80X21);
                break;
            case 25:
                textmode(C80);
                break;
            case 28:
                textmode(C80X28);
                break;
            case 43:
                textmode(C80X43);
                break;
            case 50:
                textmode(C80X50);
                break;
            case 60:
                textmode(C80X60);
                break;
            default:
                textmode(C4350);
                break;
        }
    }
#endif

    clrscr();

    gettextinfo(&txtinfo);
#ifdef _WIN32
332
	api->mode|=UIFC_MOUSE;
333
334
    /* unsupported mode? */
    if(txtinfo.screenheight<MIN_LINES
deuce's avatar
deuce committed
335
/*        || txtinfo.screenheight>MAX_LINES */
336
337
338
339
        || txtinfo.screenwidth<80) {
        textmode(C80);  /* set mode to 80x25*/
        gettextinfo(&txtinfo);
    }
340
341

	if(GetConsoleMode(GetStdHandle(STD_INPUT_HANDLE), &conmode))
342
343
344
		conmode&=~ENABLE_PROCESSED_INPUT;
		conmode|=ENABLE_MOUSE_INPUT;
		SetConsoleMode(GetStdHandle(STD_INPUT_HANDLE), conmode);
345
346
347
#endif

    api->scrn_len=txtinfo.screenheight;
deuce's avatar
deuce committed
348
349
350
    if(api->scrn_len<MIN_LINES) {
        cprintf("\7UIFC: Screen length (%u) must be %d lines or greater\r\n"
            ,api->scrn_len,MIN_LINES);
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
        return(-2);
    }
    api->scrn_len--; /* account for status line */

    if(txtinfo.screenwidth<80) {
        cprintf("\7UIFC: Screen width (%u) must be at least 80 characters\r\n"
            ,txtinfo.screenwidth);
        return(-3);
    }
	api->scrn_width=txtinfo.screenwidth;

    if(!(api->mode&UIFC_COLOR)
        && (api->mode&UIFC_MONO
            || txtinfo.currmode==MONO || txtinfo.currmode==BW80)) {
        bclr=BLACK;
        hclr=WHITE;
        lclr=LIGHTGRAY;
        cclr=LIGHTGRAY;
369
370
371
372
373
374
#ifdef __unix__
		if(txtinfo.currmode==MONO)
			lbclr=WHITE|(BLACK<<4);		/* no color on curses means no inverse either */
		else
#endif
			lbclr=BLACK|(LIGHTGRAY<<4);	/* lightbar color */
375
376
377
378
379
    } else {
        bclr=BLUE;
        hclr=YELLOW;
        lclr=WHITE;
        cclr=CYAN;
380
		lbclr=BLUE|(LIGHTGRAY<<4);	/* lightbar color */
381
    }
382

deuce's avatar
deuce committed
383
384
385
386
387
388
389
390
391
392
393
	blk_scrn_len=api->scrn_width*api->scrn_len*2;
	if((blk_scrn=(char *)MALLOC(blk_scrn_len))==NULL)  {
				cprintf("UIFC line %d: error allocating %u bytes."
					,__LINE__,blk_scrn_len);
				return(-1);
	}
	if((tmp_buffer=(uchar *)MALLOC(blk_scrn_len))==NULL)  {
				cprintf("UIFC line %d: error allocating %u bytes."
					,__LINE__,blk_scrn_len);
				return(-1);
	}
394
395
396
397
398
	if((tmp_buffer2=(uchar *)MALLOC(blk_scrn_len))==NULL)  {
				cprintf("UIFC line %d: error allocating %u bytes."
					,__LINE__,blk_scrn_len);
				return(-1);
	}
deuce's avatar
deuce committed
399
    for(i=0;i<blk_scrn_len;i+=2) {
400
401
402
403
404
405
406
407
408
409
        blk_scrn[i]='';
        blk_scrn[i+1]=cclr|(bclr<<4);
    }

    cursor=_NOCURSOR;
    _setcursortype(cursor);

    return(0);
}

410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
static void hidemouse(void)
{
	if(api->mode&UIFC_MOUSE) {
		#ifdef XCURSES
			mouse_set(0);
		#endif
		#ifdef NCURSES_VERSION_MAJOR
			mousemask(0,NULL);
		#endif
	}
}

static void showmouse(void)
{
	if(api->mode&UIFC_MOUSE) {
		#ifdef XCURSES
			mouse_set(BUTTON1_CLICKED|BUTTON3_CLICKED);
		#endif
		#ifdef NCURSES_VERSION_MAJOR
			mousemask(BUTTON1_CLICKED|BUTTON3_CLICKED,NULL);
		#endif
	}
}

static int uifc_getmouse(struct uifc_mouse_event *mevent)
{
	mevent->x=0;
	mevent->y=0;
	mevent->button=0;
	if(api->mode&UIFC_MOUSE) {
440
441
442
		#ifdef _WIN32
			memcpy(mevent,&last_mouse_click,sizeof(last_mouse_click));
		#endif
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
		#ifdef NCURSES_VERSION_MAJOR
			MEVENT	mevnt;

			if(getmouse(&mevnt)==OK) {
				mevent->x=mevnt.x;
				mevent->y=mevnt.y;
				switch(mevnt.bstate) {
					case BUTTON1_CLICKED:
						mevent->button=1;
						break;
					case BUTTON3_CLICKED:
						mevent->button=2;
						break;
				}
			}
			else
				return(-1);
		#endif
		#ifdef XCURSES
			if(getmouse()==0) {
				mevent->x=Mouse_status.x;
				mevent->y=Mouse_status.y;
				if(Mouse_status.button[1]==BUTTON_CLICKED)
					mevent->button=1;
				if(Mouse_status.button[3]==BUTTON_CLICKED)
					mevent->button=3;
			}
			else
				return(-1);
		#endif
473
474
475

		if(mevent->button==2)
			return(ESC);
476
		if(mevent->y==api->buttony) {
477
			if(mevent->x>=api->exitstart
478
					&& mevent->x<=api->exitend
479
					&& mevent->button==1) {
480
481
482
483
484
485
486
487
488
489
490
491
492
				return(ESC);
			}
			if(mevent->x>=api->helpstart
					&& mevent->x<=api->helpend
					&& mevent->button==1) {
				return(KEY_F(1));
			}
		}
		return(0);
	}
	return(-1);
}

493
494
495
496
void uifcbail(void)
{
	_setcursortype(_NORMALCURSOR);
	textattr(LIGHTGRAY);
497
	hidemouse();
498
499
500
501
502
503
504
	clrscr();
#ifdef __unix__
	nl();
	nocbreak();
	noraw();
	refresh();
	endwin();
505
506
507
#ifdef XCURSES
	XCursesExit();
#endif
508
#endif
deuce's avatar
deuce committed
509
510
	FREE(blk_scrn);
	FREE(tmp_buffer);
511
	FREE(tmp_buffer2);
512
513
514
515
516
517
518
519
520
521
}

/****************************************************************************/
/* Clear screen, fill with background attribute, display application title.	*/
/* Returns 0 on success.													*/
/****************************************************************************/
int uscrn(char *str)
{
    textattr(bclr|(cclr<<4));
    gotoxy(1,1);
522
    clreol();
523
524
525
526
527
    gotoxy(3,1);
	cputs(str);
    if(!puttext(1,2,api->scrn_width,api->scrn_len,blk_scrn))
        return(-1);
    gotoxy(1,api->scrn_len+1);
528
    clreol();
529
530
531
532
533
534
535
536
	reset_dynamic();
    return(0);
}

/****************************************************************************/
/****************************************************************************/
static void scroll_text(int x1, int y1, int x2, int y2, int down)
{
537
	gettext(x1,y1,x2,y2,tmp_buffer2);
538
	if(down)
539
		puttext(x1,y1+1,x2,y2,tmp_buffer2);
540
	else
541
		puttext(x1,y1,x2,y2-1,tmp_buffer2+(((x2-x1)+1)*2));
542
543
544
545
546
547
548
549
550
551
552
553
554
}

/****************************************************************************/
/* Updates time in upper left corner of screen with current time in ASCII/  */
/* Unix format																*/
/****************************************************************************/
static void timedisplay()
{
	static time_t savetime;
	time_t now;

	now=time(NULL);
	if(difftime(now,savetime)>=60) {
555
		uprintf(api->scrn_width-25,1,bclr|(cclr<<4),utimestr(&now));
556
557
558
559
560
561
562
563
564
565
566
567
		savetime=now; 
	}
}

/****************************************************************************/
/* Truncates white-space chars off end of 'str'								*/
/****************************************************************************/
static void truncsp(char *str)
{
	uint c;

	c=strlen(str);
deuce's avatar
deuce committed
568
	while(c && (uchar)str[c-1]<=' ') c--;
569
570
571
572
573
574
575
576
	if(str[c]!=0)	/* don't write to string constants */
		str[c]=0;
}

/****************************************************************************/
/* General menu function, see uifc.h for details.							*/
/****************************************************************************/
int ulist(int mode, int left, int top, int width, int *cur, int *bar
deuce's avatar
deuce committed
577
	, char *initial_title, char **option)
578
{
deuce's avatar
deuce committed
579
	uchar line[256],shade[256],*ptr,a,b,c,longopt
580
		,search[MAX_OPLN],bline=0,*win;
581
582
583
	int height,y;
	int i,j,opts=0,s=0; /* s=search index into options */
	int	is_redraw=0;
deuce's avatar
deuce committed
584
585
586
587
	uint s_top=SCRN_TOP;
	uint s_left=SCRN_LEFT;
	uint s_right=SCRN_RIGHT;
	uint s_bottom=api->scrn_len-3;
588
589
	uint title_len;
	struct uifc_mouse_event mevnt;
deuce's avatar
deuce committed
590
	char	title[MAX_OPLN];
591

deuce's avatar
deuce committed
592
	sprintf(title,"%.*s",sizeof(title)-1,initial_title);
593
594
595
	hidemouse();

	title_len=strlen(title);
596
597
598

	if(mode&WIN_FAT) {
		s_top=1;
599
		s_left=2;
600
601
		s_right=api->scrn_width-3;  /* Leave space for the shadow */
		s_bottom=api->scrn_len-1;   /* Leave one for the shadow */
602
	}
603
604
605
606
607
608
609
	if(mode&WIN_SAV && api->savnum>=MAX_BUFS-1)
		putch(7);
	if(mode&WIN_INS) bline|=BL_INS;
	if(mode&WIN_DEL) bline|=BL_DEL;
	if(mode&WIN_GET) bline|=BL_GET;
	if(mode&WIN_PUT) bline|=BL_PUT;
	bottomline(bline);
deuce's avatar
deuce committed
610
	while(opts<MAX_OPTS)
611
612
613
		if(option[opts][0]==0)
			break;
		else opts++;
deuce's avatar
deuce committed
614
	if(mode&WIN_XTR && opts<MAX_OPTS)
615
		opts++;
616
	height=opts+4;
617
618
	if(top+height>s_bottom)
		height=(s_bottom)-top;
619
620
	if(!width || width<title_len+6) {
		width=title_len+6;
621
622
623
		for(i=0;i<opts;i++) {
			truncsp(option[i]);
			if((j=strlen(option[i])+5)>width)
624
				width=j;
625
626
		}
	}
627
628
	if(width>(s_right+1)-s_left) {
		width=(s_right+1)-s_left;
629
		if(title_len>(width-4)) {
630
631
632
633
634
			*(title+width-7)='.';
			*(title+width-6)='.';
			*(title+width-5)='.';
			*(title+width-4)=0;
		}
635
	}
636
	if(mode&WIN_L2R)
deuce's avatar
deuce committed
637
		left=(s_right-s_left-width+1)/2;
638
	else if(mode&WIN_RHT)
deuce's avatar
deuce committed
639
		left=s_right-(width+4+left);
640
	if(mode&WIN_T2B)
deuce's avatar
deuce committed
641
		top=(api->scrn_len-height+1)/2-2;
642
	else if(mode&WIN_BOT)
643
		top=s_bottom-height-top;
644
645
	if(left<0)
		left=0;
646
647
	if(top<0)
		top=0;
648
649
650

	/* Dynamic Menus */
	if(mode&WIN_DYN
651
652
653
			&& cur != NULL
			&& bar != NULL
			&& last_menu_cur==cur
654
655
656
657
			&& last_menu_bar==bar
			&& save_menu_cur==*cur
			&& save_menu_bar==*bar)
		is_redraw=1;
658
659
660
661
	if(mode&WIN_DYN && mode&WIN_REDRAW)
		is_redraw=1;
	if(mode&WIN_DYN && mode&WIN_NODRAW)
		is_redraw=0;
662
663
664
665
666
667

	if(!is_redraw) {
		if(mode&WIN_SAV && api->savdepth==api->savnum) {
			if((sav[api->savnum].buf=(char *)MALLOC((width+3)*(height+2)*2))==NULL) {
				cprintf("UIFC line %d: error allocating %u bytes."
					,__LINE__,(width+3)*(height+2)*2);
668
				return(-1);
669
			}
670
671
672
673
674
675
			gettext(s_left+left,s_top+top,s_left+left+width+1
				,s_top+top+height,sav[api->savnum].buf);
			sav[api->savnum].left=s_left+left;
			sav[api->savnum].top=s_top+top;
			sav[api->savnum].right=s_left+left+width+1;
			sav[api->savnum].bot=s_top+top+height;
676
			api->savdepth++;
677
678
		}
		else if(mode&WIN_SAV
679
680
681
682
			&& (sav[api->savnum].left!=s_left+left
			|| sav[api->savnum].top!=s_top+top
			|| sav[api->savnum].right!=s_left+left+width+1
			|| sav[api->savnum].bot!=s_top+top+height)) { /* dimensions have changed */
683
684
685
686
687
688
			puttext(sav[api->savnum].left,sav[api->savnum].top,sav[api->savnum].right,sav[api->savnum].bot
				,sav[api->savnum].buf);	/* put original window back */
			FREE(sav[api->savnum].buf);
			if((sav[api->savnum].buf=(char *)MALLOC((width+3)*(height+2)*2))==NULL) {
				cprintf("UIFC line %d: error allocating %u bytes."
					,__LINE__,(width+3)*(height+2)*2);
689
				return(-1);
690
			}
691
692
693
694
695
696
			gettext(s_left+left,s_top+top,s_left+left+width+1
				,s_top+top+height,sav[api->savnum].buf);	  /* save again */
			sav[api->savnum].left=s_left+left;
			sav[api->savnum].top=s_top+top;
			sav[api->savnum].right=s_left+left+width+1;
			sav[api->savnum].bot=s_top+top+height;
697
		}
698
699
700
701
702
	}

	if(!is_redraw) {
		if(mode&WIN_ORG) { /* Clear around menu */
			if(top)
703
				puttext(1,2,api->scrn_width,s_top+top-1,blk_scrn);
704
			if(s_top+height+top<=api->scrn_len)
deuce's avatar
deuce committed
705
				puttext(1,s_top+height+top,api->scrn_width,api->scrn_len,blk_scrn);
706
			if(left)
deuce's avatar
deuce committed
707
				puttext(1,s_top+top,s_left+left-1,s_top+height+top
708
					,blk_scrn);
709
			if(s_left+left+width<=s_right)
deuce's avatar
deuce committed
710
				puttext(s_left+left+width,s_top+top,/* s_right+2 */api->scrn_width
711
					,s_top+height+top,blk_scrn);
712
		}
deuce's avatar
deuce committed
713
		ptr=tmp_buffer;
714
715
716
		*(ptr++)='';
		*(ptr++)=hclr|(bclr<<4);

717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
		if(api->mode&UIFC_MOUSE) {
			*(ptr++)='[';
			*(ptr++)=hclr|(bclr<<4);
			/* *(ptr++)=''; */
			*(ptr++)='X';
			*(ptr++)=lclr|(bclr<<4);
			*(ptr++)=']';
			*(ptr++)=hclr|(bclr<<4);
			*(ptr++)='[';
			*(ptr++)=hclr|(bclr<<4);
			*(ptr++)='?';
			*(ptr++)=lclr|(bclr<<4);
			*(ptr++)=']';
			*(ptr++)=hclr|(bclr<<4);
			i=6;
			api->buttony=s_top+top-1;
			api->exitstart=s_left+left;
			api->exitend=s_left+left+2;
			api->helpstart=s_left+left+3;
			api->helpend=s_left+left+5;
		}
		else
			i=0;

741
742
		for(;i<width-2;i++) {
			*(ptr++)='';
743
			*(ptr++)=hclr|(bclr<<4);
744
745
746
747
748
		}
		*(ptr++)='';
		*(ptr++)=hclr|(bclr<<4);
		*(ptr++)='';
		*(ptr++)=hclr|(bclr<<4);
749
		a=title_len;
750
751
752
		b=(width-a-1)/2;
		for(i=0;i<b;i++) {
			*(ptr++)=' ';
753
			*(ptr++)=hclr|(bclr<<4);
754
755
756
		}
		for(i=0;i<a;i++) {
			*(ptr++)=title[i];
757
			*(ptr++)=hclr|(bclr<<4);
758
759
760
		}
		for(i=0;i<width-(a+b)-2;i++) {
			*(ptr++)=' ';
761
			*(ptr++)=hclr|(bclr<<4);
762
763
764
765
766
767
768
		}
		*(ptr++)='';
		*(ptr++)=hclr|(bclr<<4);
		*(ptr++)='';
		*(ptr++)=hclr|(bclr<<4);
		for(i=0;i<width-2;i++) {
			*(ptr++)='';
769
			*(ptr++)=hclr|(bclr<<4);
770
771
772
773
774
775
776
777
778
779
		}
		*(ptr++)='';
		*(ptr++)=hclr|(bclr<<4);

		if((*cur)>=opts)
			(*cur)=opts-1;			/* returned after scrolled */

		if(!bar) {
			if((*cur)>height-5)
				(*cur)=height-5;
780
			i=0;
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
		}
		else {
			if((*bar)>=opts)
				(*bar)=opts-1;
			if((*bar)>height-5)
				(*bar)=height-5;
			if((*cur)==opts-1)
				(*bar)=height-5;
			if((*bar)<0)
				(*bar)=0;
			if((*cur)<(*bar))
				(*cur)=(*bar);
			i=(*cur)-(*bar);
			if(i+(height-5)>=opts) {
				i=opts-(height-4);
				(*cur)=i+(*bar);
				}
			}
			if((*cur)<0)
				(*cur)=0;

			j=0;
			if(i<0) i=0;
			longopt=0;
			while(j<height-4 && i<opts) {
				*(ptr++)='';
				*(ptr++)=hclr|(bclr<<4);
				*(ptr++)=' ';
				*(ptr++)=hclr|(bclr<<4);
				*(ptr++)='';
				*(ptr++)=lclr|(bclr<<4);
				if(i==(*cur))
813
					a=lbclr;
814
815
816
817
818
819
820
821
822
823
824
825
826
827
				else
					a=lclr|(bclr<<4);
				b=strlen(option[i]);
				if(b>longopt)
					longopt=b;
				if(b+4>width)
					b=width-4;
				for(c=0;c<b;c++) {
					*(ptr++)=option[i][c];
					*(ptr++)=a; 
				}
				while(c<width-4) {
					*(ptr++)=' ';
					*(ptr++)=a;
828
					c++;
829
830
831
832
833
834
835
836
837
838
839
840
841
				}
				*(ptr++)='';
				*(ptr++)=hclr|(bclr<<4);
				i++;
				j++; 
			}
			*(ptr++)='';
			*(ptr++)=hclr|(bclr<<4);
			for(i=0;i<width-2;i++) {
				*(ptr++)='';
				*(ptr++)=hclr|(bclr<<4); 
			}
			*(ptr++)='';
deuce's avatar
deuce committed
842
			*(ptr)=hclr|(bclr<<4);	/* Not incremented to shut ot BCC */
843
			puttext(s_left+left,s_top+top,s_left+left+width-1
deuce's avatar
deuce committed
844
				,s_top+top+height-1,tmp_buffer);
845
846
847
848
849
850
			if(bar)
				y=top+3+(*bar);
			else
				y=top+3+(*cur);
			if(opts+4>height && ((!bar && (*cur)!=opts-1)
				|| (bar && ((*cur)-(*bar))+(height-4)<opts))) {
851
				gotoxy(s_left+left+1,s_top+top+height-2);
852
853
854
855
856
857
				textattr(lclr|(bclr<<4));
				putch(31);	   /* put down arrow */
				textattr(hclr|(bclr<<4)); 
			}

			if(bar && (*bar)!=(*cur)) {
858
				gotoxy(s_left+left+1,s_top+top+3);
859
860
861
862
863
864
				textattr(lclr|(bclr<<4));
				putch(30);	   /* put the up arrow */
				textattr(hclr|(bclr<<4)); 
			}

			if(bclr==BLUE) {
865
866
				gettext(s_left+left+width,s_top+top+1,s_left+left+width+1
					,s_top+top+height-1,shade);
867
868
				for(i=1;i<height*4;i+=2)
					shade[i]=DARKGRAY;
869
870
871
872
				puttext(s_left+left+width,s_top+top+1,s_left+left+width+1
					,s_top+top+height-1,shade);
				gettext(s_left+left+2,s_top+top+height,s_left+left+width+1
					,s_top+top+height,shade);
873
874
				for(i=1;i<width*2;i+=2)
					shade[i]=DARKGRAY;
875
876
				puttext(s_left+left+2,s_top+top+height,s_left+left+width+1
					,s_top+top+height,shade);
877
878
879
880
881
882
883
884
			}
	}
	else {	/* Is a redraw */
		i=(*cur)-(*bar);
		j=2;

		longopt=0;
		while(j<height-2 && i<opts) {
deuce's avatar
deuce committed
885
			ptr=tmp_buffer;
886
			if(i==(*cur))
887
				a=lbclr;
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
			else
				a=lclr|(bclr<<4);
			b=strlen(option[i]);
			if(b>longopt)
				longopt=b;
			if(b+4>width)
				b=width-4;
			for(c=0;c<b;c++) {
				*(ptr++)=option[i][c];
				*(ptr++)=a; 
			}
			while(c<width-4) {
				*(ptr++)=' ';
				*(ptr++)=a;
				c++; 
			}
			i++;
			j++; 
906
			puttext(s_left+left+3,s_top+top+j,s_left+left+width-2
deuce's avatar
deuce committed
907
				,s_top+top+j,tmp_buffer); 
908
909
910
911
912
913
914
915
916
		}
		if(bar)
			y=top+3+(*bar);
		else
			y=top+3+(*cur);
	}

	last_menu_cur=cur;
	last_menu_bar=bar;
917
918
	if(mode&WIN_IMM)
		return(-2);
919
920
921

	showmouse();

922
923
924
925
926
927
928
929
	while(1) {
	#if 0					/* debug */
		gotoxy(30,1);
		cprintf("y=%2d h=%2d c=%2d b=%2d s=%2d o=%2d"
			,y,height,*cur,bar ? *bar :0xff,api->savdepth,opts);
	#endif
		timedisplay();
		i=0;
930
931
		if(kbwait()) {
			i=inkey();
932
933
			if(i==KEY_BACKSPACE || i==BS)
				i=ESC;
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
1001
1002
1003
1004
1005
1006
1007
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021
1022
1023
1024
1025
1026
1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
#ifdef KEY_MOUSE
			if(i==KEY_MOUSE) {
#else
			if(0) {
#endif
				if((i=uifc_getmouse(&mevnt))==0) {
					/* Clicked in menu */
					if(mevnt.x>=s_left+left+2
							&& mevnt.x<=s_left+left+width
							&& mevnt.y>=s_top+top+2
							&& mevnt.y<=(s_top+top+height)-3
							&& mevnt.button==1) {

						(*cur)=(mevnt.y)-(s_top+top+2);
						if(bar)
							(*bar)=(*cur);
						y=top+3+((mevnt.y)-(s_top+top+2));

						if(!opts || (mode&WIN_XTR && (*cur)==opts-1))
							continue;

						if(mode&WIN_ACT) {
							hidemouse();
							if((win=(char *)MALLOC((width+3)*(height+2)*2))==NULL) {
								cprintf("UIFC line %d: error allocating %u bytes."
									,__LINE__,(width+3)*(height+2)*2);
								return(-1);
							}
							gettext(s_left+left,s_top+top,s_left
								+left+width-1,s_top+top+height-1,win);
							for(i=1;i<(width*height*2);i+=2)
								win[i]=lclr|(cclr<<4);
							j=(((y-top)*width)*2)+7+((width-4)*2);
							for(i=(((y-top)*width)*2)+7;i<j;i+=2)
								win[i]=hclr|(cclr<<4);

							puttext(s_left+left,s_top+top,s_left
								+left+width-1,s_top+top+height-1,win);
							free(win);
							showmouse();
						}
						else if(mode&WIN_SAV) {
							hidemouse();
							puttext(sav[api->savnum].left,sav[api->savnum].top
								,sav[api->savnum].right,sav[api->savnum].bot
								,sav[api->savnum].buf);
							showmouse();
							free(sav[api->savnum].buf);
							api->savdepth--;
						}
						return(*cur);
					}
					/* Clicked Scroll Up */
					if(mevnt.x==s_left+left
							&& mevnt.y==s_top+top+2
							&& mevnt.button==1) {
						if(!opts)
							continue;
						*cur -= (height-5);
						if(*cur<0)
							*cur = 0;
						if(bar)
							*bar=0;
						y=s_top+top;
						gotoxy(s_left+left+1,s_top+top+3);
						textattr(lclr|(bclr<<4));
						if(*cur && opts>height-3)  /* Scroll mode */
							putch(30);	   /* put the up arrow */
						else
							putch(' ');    /* delete the up arrow */
						gotoxy(s_left+left+1,s_top+top+height-2);
						if(opts > height-3 && *cur + height - 4 < opts)
							putch(31);	   /* put the down arrow */
						else
							putch(' ');    /* delete the down arrow */
						for(i=*cur,j=0;i<=*cur-5+height;i++,j++)
							uprintf(s_left+left+3,s_top+top+3+j
								,i==*cur ? lbclr
									: lclr|(bclr<<4)
								,"%-*.*s",width-4,width-4,option[i]);
						continue;
					}
					/* Clicked Scroll Down */
					if(mevnt.x=s_left+left
							&& mevnt.y==(s_top+top+height)-3
							&& mevnt.button==1) {
						if(!opts)
							continue;
						*cur += (height-5);
						if(*cur>opts-1)
							*cur = opts-1;
						if(bar)
							*bar = height-5;
						y=height-5+s_top+top;
						gotoxy(s_left+left+1,s_top+top+3);
						textattr(lclr|(bclr<<4));
						if(*cur>height-5)  /* Scroll mode */
							putch(30);	   /* put the up arrow */
						else
							putch(' ');    /* delete the up arrow */
						gotoxy(s_left+left+1,s_top+top+height-2);
						if(*cur < opts-1)
							putch(31);	   /* put the down arrow */
						else
							putch(' ');    /* delete the down arrow */
						for(i=*cur+5-height,j=0;i<=*cur;i++,j++)
							uprintf(s_left+left+3,s_top+top+3+j
								,i==*cur ? lbclr
									: lclr|(bclr<<4)
								,"%-*.*s",width-4,width-4,option[i]);
						continue;
					}
				}
			}
1048
1049
1050
1051
1052
1053
1054
1055
			if(i>255) {
				s=0;
				switch(i) {
					/* ToDo extended keys */
					case KEY_HOME:	/* home */
						if(!opts)
							break;
						if(opts+4>height) {
1056
							gotoxy(s_left+left+1,s_top+top+3);
1057
1058
							textattr(lclr|(bclr<<4));
							putch(' ');    /* Delete the up arrow */
1059
							gotoxy(s_left+left+1,s_top+top+height-2);
1060
							putch(31);	   /* put the down arrow */
1061
							uprintf(s_left+left+3,s_top+top+3
1062
								,lbclr
1063
1064
								,"%-*.*s",width-4,width-4,option[0]);
							for(i=1;i<height-4;i++)    /* re-display options */
1065
								uprintf(s_left+left+3,s_top+top+3+i
1066
1067
1068
1069
1070
1071
1072
1073
									,lclr|(bclr<<4)
									,"%-*.*s",width-4,width-4,option[i]);
							(*cur)=0;
							if(bar)
								(*bar)=0;
							y=top+3;
							break; 
						}
1074
1075
						gettext(s_left+3+left,s_top+y
							,s_left+left+width-2,s_top+y,line);
1076
1077
						for(i=1;i<width*2;i+=2)
							line[i]=lclr|(bclr<<4);
1078
1079
						puttext(s_left+3+left,s_top+y
							,s_left+left+width-2,s_top+y,line);
1080
1081
1082
1083
						(*cur)=0;
						if(bar)
							(*bar)=0;
						y=top+3;
1084
1085
						gettext(s_left+3+left,s_top+y
							,s_left+left+width-2,s_top+y,line);
1086
						for(i=1;i<width*2;i+=2)
1087
							line[i]=lbclr;
1088
1089
						puttext(s_left+3+left,s_top+y
							,s_left+left+width-2,s_top+y,line);
1090
1091
1092
1093
1094
						break;
					case KEY_UP:	/* up arrow */
						if(!opts)
							break;
						if(!(*cur) && opts+4>height) {
1095
							gotoxy(s_left+left+1,s_top+top+3); /* like end */
1096
1097
							textattr(lclr|(bclr<<4));
							putch(30);	   /* put the up arrow */
1098
							gotoxy(s_left+left+1,s_top+top+height-2);
1099
1100
							putch(' ');    /* delete the down arrow */
							for(i=(opts+4)-height,j=0;i<opts;i++,j++)
1101
								uprintf(s_left+left+3,s_top+top+3+j
1102
									,i==opts-1 ? lbclr
1103
1104
1105
1106
1107
1108
1109
1110
										: lclr|(bclr<<4)
									,"%-*.*s",width-4,width-4,option[i]);
							(*cur)=opts-1;
							if(bar)
								(*bar)=height-5;
							y=top+height-2;
							break; 
						}
1111
1112
						gettext(s_left+3+left,s_top+y
							,s_left+left+width-2,s_top+y,line);
1113
1114
						for(i=1;i<width*2;i+=2)
							line[i]=lclr|(bclr<<4);
1115
1116
						puttext(s_left+3+left,s_top+y
							,s_left+left+width-2,s_top+y,line);
1117
1118
1119
1120
1121
1122
1123
1124
1125
1126
1127
1128
1129
1130
						if(!(*cur)) {
							y=top+height-2;
							(*cur)=opts-1;
							if(bar)
								(*bar)=height-5; 
						}
						else {
							(*cur)--;
							y--;
							if(bar && *bar)
								(*bar)--; 
						}
						if(y<top+3) {	/* scroll */
							if(!(*cur)) {
1131
								gotoxy(s_left+left+1,s_top+top+3);
1132
1133
1134
1135
								textattr(lclr|(bclr<<4));
								putch(' '); /* delete the up arrow */
							}  
							if((*cur)+height-4==opts-1) {
1136
								gotoxy(s_left+left+1,s_top+top+height-2);
1137
1138
1139
1140
								textattr(lclr|(bclr<<4));
								putch(31);	/* put the dn arrow */
							}
							y++;
1141
1142
1143
							scroll_text(s_left+left+2,s_top+top+3
								,s_left+left+width-3,s_top+top+height-2,1);
							uprintf(s_left+left+3,s_top+top+3
1144
								,lbclr
1145
1146
1147
								,"%-*.*s",width-4,width-4,option[*cur]);
						}
						else {
1148
1149
							gettext(s_left+3+left,s_top+y
								,s_left+left+width-2,s_top+y,line);
1150
							for(i=1;i<width*2;i+=2)
1151
								line[i]=lbclr;
1152
1153
							puttext(s_left+3+left,s_top+y
								,s_left+left+width-2,s_top+y,line);
1154
1155
						}
						break;
deuce's avatar
deuce committed
1156
1157
					case KEY_PPAGE:	/* PgUp */
						if(!opts)
1158
							break;
deuce's avatar
deuce committed
1159
1160
1161
1162
1163
1164
1165
1166
1167
1168
1169
1170
1171
1172
1173
1174
1175
1176
						*cur -= (height-5);
						if(*cur<0)
							*cur = 0;
						if(bar)
							*bar=0;
						y=s_top+top;
						gotoxy(s_left+left+1,s_top+top+3);
						textattr(lclr|(bclr<<4));
						if(*cur && opts>height-3)  /* Scroll mode */
							putch(30);	   /* put the up arrow */
						else
							putch(' ');    /* delete the up arrow */
						gotoxy(s_left+left+1,s_top+top+height-2);
						if(opts > height-3 && *cur + height - 4 < opts)
							putch(31);	   /* put the down arrow */
						else
							putch(' ');    /* delete the down arrow */
						for(i=*cur,j=0;i<=*cur-5+height;i++,j++)
1177
							uprintf(s_left+left+3,s_top+top+3+j
deuce's avatar
deuce committed
1178
1179
								,i==*cur ? lbclr
									: lclr|(bclr<<4)
1180
								,"%-*.*s",width-4,width-4,option[i]);
deuce's avatar
deuce committed
1181
1182
1183
1184
1185
1186
1187
						break;
					case KEY_NPAGE:	/* PgDn */
						if(!opts)
							break;
						*cur += (height-5);
						if(*cur>opts-1)
							*cur = opts-1;
1188
						if(bar)
deuce's avatar
deuce committed
1189
1190
1191
1192
1193
1194
1195
1196
1197
1198
1199
1200
1201
1202
1203
1204
1205
1206
							*bar = height-5;
						y=height-5+s_top+top;
						gotoxy(s_left+left+1,s_top+top+3);
						textattr(lclr|(bclr<<4));
						if(*cur>height-5)  /* Scroll mode */
							putch(30);	   /* put the up arrow */
						else
							putch(' ');    /* delete the up arrow */
						gotoxy(s_left+left+1,s_top+top+height-2);
						if(*cur < opts-1)
							putch(31);	   /* put the down arrow */
						else
							putch(' ');    /* delete the down arrow */
						for(i=*cur+5-height,j=0;i<=*cur;i++,j++)
							uprintf(s_left+left+3,s_top+top+3+j
								,i==*cur ? lbclr
									: lclr|(bclr<<4)
								,"%-*.*s",width-4,width-4,option[i]);
1207
1208
1209
1210
1211
						break;
					case KEY_END:	/* end */
						if(!opts)
							break;
						if(opts+4>height) {	/* Scroll mode */
1212
							gotoxy(s_left+left+1,s_top+top+3);
1213
1214
							textattr(lclr|(bclr<<4));
							putch(30);	   /* put the up arrow */
1215
							gotoxy(s_left+left+1,s_top+top+height-2);
1216
1217
							putch(' ');    /* delete the down arrow */
							for(i=(opts+4)-height,j=0;i<opts;i++,j++)
1218
								uprintf(s_left+left+3,s_top+top+3+j
1219
									,i==opts-1 ? lbclr
1220
1221
1222
1223
1224
1225
1226
1227
										: lclr|(bclr<<4)
									,"%-*.*s",width-4,width-4,option[i]);
							(*cur)=opts-1;
							y=top+height-2;
							if(bar)
								(*bar)=height-5;
							break; 
						}
1228
1229
						gettext(s_left+3+left,s_top+y
							,s_left+left+width-2,s_top+y,line);
1230
1231
						for(i=1;i<width*2;i+=2)
							line[i]=lclr|(bclr<<4);
1232
1233
						puttext(s_left+3+left,s_top+y
							,s_left+left+width-2,s_top+y,line);
1234
1235
1236
1237
						(*cur)=opts-1;
						y=top+height-2;
						if(bar)
							(*bar)=height-5;
1238
1239
						gettext(s_left+3+left,s_top+y
							,s_left+left+width-2,s_top+y,line);
1240
						for(i=1;i<148;i+=2)
1241
							line[i]=lbclr;
1242
1243
						puttext(s_left+3+left,s_top+y
							,s_left+left+width-2,s_top+y,line);
1244
1245
1246
1247
1248
						break;
					case KEY_DOWN:	/* dn arrow */
						if(!opts)
							break;
						if((*cur)==opts-1 && opts+4>height) { /* like home */
1249
							gotoxy(s_left+left+1,s_top+top+3);
1250
1251
							textattr(lclr|(bclr<<4));
							putch(' ');    /* Delete the up arrow */
1252
							gotoxy(s_left+left+1,s_top+top+height-2);
1253
							putch(31);	   /* put the down arrow */
1254
							uprintf(s_left+left+3,s_top+top+3
1255
								,lbclr
1256
1257
								,"%-*.*s",width-4,width-4,option[0]);
							for(i=1;i<height-4;i++)    /* re-display options */
1258
								uprintf(s_left+left+3,s_top+top+3+i
1259
1260
1261
1262
1263
1264
1265
1266
									,lclr|(bclr<<4)
									,"%-*.*s",width-4,width-4,option[i]);
							(*cur)=0;
							y=top+3;
							if(bar)
								(*bar)=0;
							break; 
						}
1267
1268
						gettext(s_left+3+left,s_top+y
							,s_left+left+width-2,s_top+y,line);
1269
1270
						for(i=1;i<width*2;i+=2)
							line[i]=lclr|(bclr<<4);
1271
1272
						puttext(s_left+3+left,s_top+y
							,s_left+left+width-2,s_top+y,line);
1273
1274
1275
1276
1277
1278
						if((*cur)==opts-1) {
							(*cur)=0;
							y=top+3;
							if(bar) {
								/* gotoxy(1,1); cprintf("bar=%08lX ",bar); */
								(*bar)=0; 
deuce's avatar
deuce committed
1279
							}
1280
1281
1282
1283
1284
1285
1286
						}
						else {
							(*cur)++;
							y++;
							if(bar && (*bar)<height-5) {
								/* gotoxy(1,1); cprintf("bar=%08lX ",bar); */
								(*bar)++; 
deuce's avatar
deuce committed
1287
							}
1288
1289
1290
						}
						if(y==top+height-1) {	/* scroll */
							if(*cur==opts-1) {
1291
								gotoxy(s_left+left+1,s_top+top+height-2);
1292
1293
1294
1295
								textattr(lclr|(bclr<<4));
								putch(' ');	/* delete the down arrow */
							}
							if((*cur)+4==height) {
1296
								gotoxy(s_left+left+1,s_top+top+3);
1297
1298
1299
1300
1301
								textattr(lclr|(bclr<<4));
								putch(30);	/* put the up arrow */
							}
							y--;
							/* gotoxy(1,1); cprintf("\rdebug: %4d ",__LINE__); */
1302
1303
							scroll_text(s_left+left+2,s_top+top+3
								,s_left+left+width-3,s_top+top+height-2,0);
1304
							/* gotoxy(1,1); cprintf("\rdebug: %4d ",__LINE__); */
1305
							uprintf(s_left+left+3,s_top+top+height-2
1306
								,lbclr
1307
1308
1309
								,"%-*.*s",width-4,width-4,option[*cur]);
						}
						else {
1310
1311
							gettext(s_left+3+left,s_top+y
								,s_left+left+width-2,s_top+y
1312
1313
								,line);
							for(i=1;i<width*2;i+=2)
1314
								line[i]=lbclr;
1315
1316
							puttext(s_left+3+left,s_top+y
								,s_left+left+width-2,s_top+y
1317
1318
1319
1320
1321
1322
1323
								,line);
						}
						break;
					case KEY_F(1):	/* F1 */
						help();
						break;