Category : C Source Code
Archive   : TCCLB2.ZIP
Filename : GETSTRNM.C

 
Output of file : GETSTRNM.C contained in archive : TCCLB2.ZIP
#include "tcclib.h"
#include
#include

int select ( char *menu[], int items, int x1, int y1, int x2 );

int getstringnum ( char *menu[], int items, int x1, int y1, int x2, int y2 )
{
int x, y, selection;
int xborder = 2, yborder = 1;
char *buffer;

/* 1. Display pop-up menu */
if ((buffer = calloc ((x2-x1+1)*(y2-y1+1)*2, sizeof (char))) == NULL )
return (-1);
gettext (x1, y1, x2, y2, buffer);
BlockErase (x1, y1, x2, y2);
DrawBox (x1, y1, x2, y2);
for ( y = y1 + yborder, x = 0; y < y2 && x < items; ++x, ++y ) {
AtSay (x1+xborder, y, menu[x]);
}

/* 2. Obtain selection */
selection = select (menu, items, x1 + xborder - 1, y1 + yborder, x2 - xborder + 1);

/* 3. Erase pop-up menu and restore screen */
puttext (x1, y1, x2, y2, buffer);
free (buffer);

return (selection);
}



  3 Responses to “Category : C Source Code
Archive   : TCCLB2.ZIP
Filename : GETSTRNM.C
”

  1. Daniel says:
    January 27, 2013 at 3:59 pm

    Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!

  2. Joshie says:
    March 18, 2014 at 4:57 pm

    This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.

  3. DiskingRound says:
    January 14, 2015 at 10:57 pm

    But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/