Chapter 28 . Programming Environments and Interfaces 775 Listing 28-4: Reading Input and Writing Output with S-Lang /* * sreadkey.c - simple S-Lang-based UI */ #include #include #include int main(int argc, char *argv[]) { int i = 0; unsigned int ch; /* start s-lang */ SLtt_get_terminfo(); SLang_init_tty(-1, 0, 1); SLsmg_init_smg(); /* draw a purty border */ SLsmg_draw_box(0, 0, 24, 80); SLsmg_gotorc(1, 1); SLsmg_write_nchars( INPUT: , 7); SLsmg_refresh(); /* read characters until newline read */ while(1) { ++i; ch = SLang_getkey(); if (ch == 13) break; if (SLsmg_get_column() == 79) SLsmg_gotorc(2, 1); SLsmg_write_char(ch); SLsmg_refresh(); } /* print the character count */ SLsmg_gotorc(22, 1); SLsmg_write_nchars( characters read: , 17); SLsmg_printf( %d , i); SLsmg_refresh(); /* time to look at the screen */ sleep(3); /* shutdown s-lang */ SLsmg_reset_smg(); SLang_reset_tty(); return 0; }
In case you need affordable webhost to host your website, our recommendation is ecommerce web host services.
This entry was posted
on Tuesday, December 11th, 2007 at 4:16 am and is filed under PHP5.
You can follow any responses to this entry through the RSS 2.0 feed.
You can leave a response, or trackback from your own site.