/*-------------------------------------------------------*/ /* mind.c ( YZU_CSE WindTop BBS ) */ /*-------------------------------------------------------*/ /* author : [email protected] */ /* target : 心理测验 */ /* create : 2003/08/05 */ /*-------------------------------------------------------*/ #undef _MODES_C_ #include "bbs.h" #define MAX_DESC_LENGTH (256) /* 叙述的长度 */ #define MAX_TEXT_LENGTH (512) /* 内文的长度 */ #define MAX_MIND_QUESTION (50) /* 最多题目个数 */ #define MAX_MIND_ANSWER (5) /* 每题最多答案数 */ #define MAX_MIND_RESULT (10) /* 最多结果数 */ #define LEN (50) /* 一行最多显示几个字 */ #define X (10) /* 预设输出 x 座标 */ #define Y (5) /* 预设输出 y 座标 */ #define DEF_PATH "/home/bbs/so_tmp/mind/" int x=X,y=Y; typedef struct { char question[MAX_DESC_LENGTH]; char ans_desc[MAX_MIND_ANSWER][MAX_DESC_LENGTH]; int ans_next[MAX_MIND_ANSWER]; int ans; } QUESTION; typedef struct { char title[MAX_DESC_LENGTH]; char desc[MAX_TEXT_LENGTH]; }RESULT; typedef struct { QUESTION question[MAX_MIND_QUESTION]; RESULT result[MAX_MIND_RESULT]; int qcount; int rcount; } MIND; int read_file(fpath,m) char *fpath; MIND *m; { FILE *fp; int num; int ans; int result; char buf[MAX_TEXT_LENGTH]; char *tmp,*tmp2; if(!(fp = fopen(fpath,"r"))) return -1; num = -1; result = 0; while(fgets(buf,sizeof(buf),fp)) { if(buf[1] == 'Q') { if(num >= 0) m->question[num].ans = ans; if(++num >= MAX_MIND_QUESTION) { fclose(fp); return -2; } strcpy(m->question[num].question , buf+3); if( tmp2 = strchr(m->question[num].question,'\n') ) *tmp2 = 0; ans = 0; } else if(buf[1] == 'A') { tmp = strchr(buf,']'); *tmp = 0; if(buf[3] == 'R') m->question[num].ans_next[ans] = atoi(buf+4); else m->question[num].ans_next[ans] = atoi(buf+3); strcpy(m->question[num].ans_desc[ans],tmp+1); if( tmp2 = strchr(m->question[num].ans_desc[ans],'\n') ) *tmp2 = 0; ++ans; } else if(buf[1] == 'R') { m->question[num].ans = ans; strcpy(m->result[result].title,buf+3); if( tmp2 = strchr(m->result[result].title,'\n') ) *tmp2 = 0; if(fgets(buf,sizeof(buf),fp)) strcpy(m->result[result].desc,buf); else memset(m->result[result].desc,0,MAX_TEXT_LENGTH); if( tmp2 = strchr(m->result[result].desc,'\n') ) *tmp2 = 0; if(++result >= MAX_MIND_RESULT) break; } } m->qcount = num+1; m->rcount = result; fclose(fp); return 1; } int print_quiz(char *src) { int wstate=0; int word=0; char *str = src; char buf[128],*tmp; char form[128] ; int pos=LEN+1; int height=0; sprintf(form,"%c-%ds",'%',pos+1); while(*str) { height++; tmp = str; move(y++,x); outs(" \033[0;37m▏\033[1;37m"); wstate=0; word=0; for(;word<pos && *str;str++) { wstate = (*str<0)?((wstate==1)?0:1):0; word++; } if(!(*str<0 && wstate==0)) str++; memset(buf,0,sizeof(buf)); strncpy(buf,tmp,str-tmp); prints(form,buf); if(strlen(buf)==pos) outs("\033[0;47;30m▉\033[40;30;1m▉\033[m "); else outs("\033[0;47;30m▉\033[40;30;1m▉\033[m "); } return height; } int draw_item(char *src,int pos,int mode) { char buf[128]; sprintf(buf,"%cd;37m %s %c-%ds",'%',(mode)?"◆":" ",'%',LEN-2); move(Y+pos+2,X); outs(" \033[0;37m▏\033[1;"); prints(buf,(mode)?41:40,src); outs("\033[0;47;30m▉\033[40;30;1m▉\033[m "); } static int draw_menu(QUESTION *question,int no) { int i,cur; int c; int h=0; y=Y;x=X; move(y++,x); prints(" \033[0;40;37mˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍ\033[m "); move(y++,x); prints(" \033[0;37;44m▏\033[1m%s %02d %-45s \033[0;47;34m▉\033[m ","第",no+1,"题"); move(y++,x); prints(" \033[0;37m▏\033[1m%-51s \033[0;47;30m▉\033[40;30;1m▉\033[m "," "); cur = 0; h = print_quiz(question[no].question)+2; move(y++,x); prints(" \033[0;37m▏\033[1m%-51s \033[0;47;30m▉\033[40;30;1m▉\033[m "," "); for(i=0;i<question[no].ans;++i,++y) { draw_item(question[no].ans_desc[i],i+h,(i==cur)?1:0); } move(y++,x); prints(" \033[0;37m▏\033[1m%-51s \033[0;47;30m▉\033[40;30;1m▉\033[m "," "); move(y++,x); prints(" \033[0;47;30m▇\033[30;1m▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇\033[40;30;1m▉\033[m "); outz("\033[1;37;42m 【操作说明】q)离开 Enter)作答 \033[m"); while(c = vkey() ) { draw_item(question[no].ans_desc[cur],cur+h,0); switch(c) { case KEY_UP : cur = (cur==0)?question[no].ans-1:cur-1 ; break ; case KEY_DOWN : cur = (cur+1) % question[no].ans ; break ; case '\n' : case ' ' : return cur; case 'q': vmsg(NULL); return -892226; } draw_item(question[no].ans_desc[cur],cur+h,1); } return 0; } int do_test(fpath,title) char *fpath; char *title; { int no,ans ; MIND m; if(read_file(fpath,&m) <= 0) return 1; no = 0; while(1) { clear();vs_head("心理测验", str_site); move(3,X);prints("目前测验的题目是 : %s",title); ans = draw_menu(m.question,no); if(ans == -892226) return ; no = m.question[no].ans_next[ans]; if( no < 0 ) { y=Y;x=X; no = -no; --no; clear();vs_head("心理测验", str_site); move(y++,x); prints(" \033[0;40;37mˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍˍ\033[m "); move(y++,x); prints(" \033[0;37;42m▏\033[1m结果：%-45s \033[0;47;32m▉\033[m ",m.result[no].title); move(y++,x); prints(" \033[0;37m▏\033[1m%-51s \033[0;47;30m▉\033[40;30;1m▉\033[m "," "); print_quiz(m.result[no].desc); move(y++,x); prints(" \033[0;37m▏\033[1m%-51s \033[0;47;30m▉\033[40;30;1m▉\033[m "," "); move(y++,x); prints(" \033[0;47;30m▇\033[30;1m▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇\033[40;30;1m▉\033[m "); vmsg(NULL); break; } } } /*-------------------------------------------------------*/ /* xover 选单 */ /*-------------------------------------------------------*/ extern XZ xz[]; static int mind_add(); typedef struct { char title[56]; char fpath[8]; } XMIND; static void mind_item(num, mind) int num; XMIND *mind; { prints("%6d %-64s\n", num, mind->title); } static int mind_body(xo) XO *xo; { XMIND *mind; int num, max, tail; move(3, 0); clrtobot(); max = xo->max; if (max <= 0) { if (vans("要新增资料吗(Y/N)？[N] ") == 'y') return mind_add(xo); return XO_QUIT; } mind = (XMIND *) xo_pool; num = xo->top; tail = num + XO_TALL; if (max > tail) max = tail; do { mind_item(++num, mind++); } while (num < max); return XO_NONE; } static int mind_head(xo) XO *xo; { vs_head("心理测验", str_site); outs("\ [←]离开 [Enter]测验 [h]投稿格式\n\ \033[30;47m 编号 测 验 名 称 \033[m"); return mind_body(xo); } static int mind_load(xo) XO *xo; { xo_load(xo, sizeof(XMIND)); return mind_body(xo); } static int mind_init(xo) XO *xo; { xo_load(xo, sizeof(XMIND)); return mind_head(xo); } static int mind_edit(mind,echo) XMIND *mind; int echo; { char fpath[128]; if(echo == DOECHO) { time_t t = time(0); memset(mind, 0, sizeof(XMIND)); archiv32(t, mind->fpath); } if(vget(b_lines, 0, "名称：", mind->title, sizeof(mind->title), echo)) { sprintf(fpath,"%s%s",DEF_PATH,mind->fpath); if(vedit(fpath, NA)) { if(echo == DOECHO) vmsg("取消新增"); else vmsg("取消修改"); return 0; } return 1; } else return 0; } static int mind_add(xo) XO *xo; { XMIND mind; if(!HAVE_PERM(PERM_SYSOP)) return XO_FOOT; if(mind_edit(&mind,DOECHO)) { rec_add(xo->dir, &mind, sizeof(XMIND)); xo->pos = XO_TAIL /* xo->max */ ; xo_load(xo, sizeof(XMIND)); } return mind_head(xo); } static int mind_delete(xo) XO *xo; { if(!HAVE_PERM(PERM_SYSOP)) return XO_FOOT; if (vans(msg_del_ny) == 'y') { if (!rec_del(xo->dir, sizeof(XMIND), xo->pos, NULL, NULL)) { return mind_load(xo); } } return XO_FOOT; } static int mind_change(xo) XO *xo; { XMIND *mind, mate; int pos, cur; if(!HAVE_PERM(PERM_SYSOP)) return XO_FOOT; pos = xo->pos; cur = pos - xo->top; mind = (XMIND *) xo_pool + cur; mate = *mind; mind_edit(mind, GCARRY); if (memcmp(mind, &mate, sizeof(XMIND))) { rec_put(xo->dir, mind, sizeof(XMIND), pos); move(3 + cur, 0); mind_item(++pos, mind); } return XO_INIT; } static int mind_browser(xo) XO *xo; { XMIND *mind; int pos, cur; char fpath[128]; if(!HAVE_PERM(PERM_SYSOP)) return XO_FOOT; pos = xo->pos; cur = pos - xo->top; mind = (XMIND *) xo_pool + cur; sprintf(fpath,"%s%s",DEF_PATH,mind->fpath); more(fpath,NULL); return XO_INIT; } static int mind_do(xo) XO *xo; { XMIND *mind; int pos, cur; char fpath[128]; pos = xo->pos; cur = pos - xo->top; mind = (XMIND *) xo_pool + cur; sprintf(fpath,"%s%s",DEF_PATH,mind->fpath); do_test(fpath,mind->title); return XO_INIT; } static int mind_help(xo) XO *xo; { char fpath[128]; sprintf(fpath,"%shelp",DEF_PATH); more(fpath,NULL); return mind_head(xo); } KeyFunc mind_cb[] = { XO_INIT, mind_init, XO_LOAD, mind_load, XO_HEAD, mind_head, XO_BODY, mind_body, Ctrl('P'), mind_add, 'r', mind_do, 'q', mind_browser, 'c', mind_change, 's', mind_init, 'd', mind_delete, 'h', mind_help }; int mind_main() { XO *xo; char fpath[64]; utmp_mode(M_OMENU); sprintf(fpath, "%sindex",DEF_PATH); xz[XZ_OTHER - XO_ZONE].xo = xo = xo_new(fpath); xz[XZ_OTHER - XO_ZONE].cb = mind_cb; xover(XZ_OTHER); free(xo); return 0; } -- ※ Origin: 元智大学 风之塔 <bbs.yzu.edu.tw> ※ From : bbs.yzu.edu.tw