/* $Id: dice.c,v 1.7 2003/01/16 12:23:03 kcwu Exp $ */ #include "bbs.h" #define DICE_TXT BBSHOME "/etc/dice.txt" #define DICE_DATA BBSHOME "/etc/dice.data" #define DICE_WIN BBSHOME "/etc/windice.log" #define DICE_LOST BBSHOME "/etc/lostdice.log" #define B_MAX 500 #define B_MIN 10 #define B_COMMON 1 #define B_TIMES 5 #define B_THIRD 3 typedef struct dicedata_t { int mybet; int mymoney; } dicedata_t; static void set_bingo(int flag[100],int bet[]) { int i, j = 0, k = 0, m = 0; for (i = 0; i < 3; i++) for (j = 2; j > i; j--) if (bet[j] < bet[j - 1]) { m = bet[j]; bet[j] = bet[j - 1]; bet[j - 1] = m; } for (i = 0; i < 100; i++) flag[i] = 0; for (i = 0; i < 3; i++) flag[bet[i]]++; j = bet[0] + bet[1] + bet[2]; if ((abs(bet[1] - bet[0]) == 1 && abs(bet[2] - bet[0]) == 2) || (abs(bet[2] - bet[0]) == 1 && abs(bet[1] - bet[0]) == 2)) flag[66] = B_TIMES; if (j < 10) { flag[7] = B_COMMON; for (i = 0; i < 3; i++) if (bet[i] == 4) flag[74] = B_TIMES; } else if (j > 11) { flag[8] = B_COMMON; for (i = 0; i < 3; i++) if (bet[i] == 3) flag[83] = B_TIMES; } else flag[11] = B_THIRD; for (i = 0; i < 3; i++) for (j = i; j < 3; j++) { m = bet[i]; k = bet[j]; if (m != k) flag[m * 10 + k] = B_TIMES; } } static int bingo(int flag[100],int mybet) { return flag[mybet]; } int IsNum(char *a, int n) { int i; for (i = 0; i < n; i++) if (a[i] > '9' || a[i] < '0') return 0; return 1; } int IsSNum(char *a) { int i; for (i = 0; a[i]; i++) if (a[i] > '9' || a[i] < '0') return 0; return 1; } static void show_data(void) { move(0, 0); prints("\033[31m �z�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w" "�w�w�w�w�w�w�w�w�w�w�{\033[m\n"); prints("\033[45;37m���v�@\033[m\033[31m �x \033[33m[1]��@�I [2]��G�I " "[3]��T�I [4]��|�I [5]�㤭�I [6]�㤻�I \033[31m �x\033[m\n"); prints("\033[31m �x \033[33m[7]��p [8]��j " " \033[31m �x\033[m\n"); prints("\033[31m �x " " �x\033[m\n"); prints("\033[45;37m�߲v�T\033[m\033[31m �x \033[33m[11]�㤤(�`�I�Ƶ���11" "��10) \033[31m �x\033[m\n"); prints("\033[31m �x " " �x\033[m\n"); prints("\033[45;37m�߲v��\033[m\033[31m �x \033[33m[74]��p�B�|�I [83]��" "�j�B�T�I [66]��s�� \033[31m �x\033[m\n"); prints("\033[31m �x " " �x\033[m\n"); prints("\033[31m �x \033[33m[12]��@�G�I [13]��@�T�I [14]��@�|�I" " [15]��@���I [16]��@���I\033[31m �x\033[m\n"); prints("\033[31m �x \033[33m[23]��G�T�I [24]��G�|�I [25]��G���I" " [26]��G���I [34]��T�|�I\033[31m �x\033[m\n"); prints("\033[31m �x \033[33m[35]��T���I [36]��T���I [45]��|���I" " [46]��|���I [56]�㤭���I\033[31m �x\033[m\n"); prints("\033[31m �|�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w" "�w�w�w�w�w�w�w�w�w�}\033[m\n"); } static void show_count(int value[100],int index, int money) { int i = 0, count = 2, j, k; value[index] += money; move(14, 0); clrtoline(18); for (i = 1, j = 13; i <= 8; i++, count += 12) { if (i == 6) { j = 14; count = 2; } move(j, count); prints("[%2d]:%d ", i, value[i]); } count = 2; i = 15; for (j = 1; j <= 5; j++) for (k = j + 1; k <= 6; k++, count += 12) { if (j == 2 && k == 4) { i = 16; count = 2; } else if (j == 4 && k == 5) { i = 17; count = 2; } move(i, count); prints("[%d%d]:%d ", j, k, value[j * 10 + k]); } move(18, 2); prints("[11]:%d", value[11]); move(18, 14); prints("[66]:%d", value[66]); move(18, 26); prints("[74]:%d", value[74]); move(18, 38); prints("[83]:%d", value[83]); } static int check_index(int index) { int i, tp[] = {1, 2, 3, 4, 5, 6, 7, 8, 11, 12, 13, 14, 15, 16, 23, 24, 25, 26, 34, 35, 36, 45, 46, 56, 66, 74, 83}; if (index < 0 || index > 100) return 0; for (i = 0; i < 27; i++) if (index == tp[i]) return 1; return 0; } static int del(int value[100],int total, dicedata_t * table) { int index, money; char data[10]; int i; while (1) { do { move(22, 0); clrtoeol(); getdata(21, 0, "��J�h�諸�Ʀr(��q���}): ", data, 3, LCECHO); if (data[0] == 'q' || data[0] == 'Q') return 0; } while (!IsNum(data, strlen(data))); index = atoi(data); for (i = 0; i < total; i++) { if (table[i].mybet == index) { do { getdata(21, 0, "�h�ֿ�: ", data, 10, LCECHO); } while (!IsNum(data, strlen(data))); money = atoi(data); if (money > table[i].mymoney) { move(22, 0); clrtoeol(); prints("��������"); i--; continue; } demoney(money); move(19, 0); clrtoeol(); prints("�A�{�b�� %u Ptt$��", cuser.money); table[i].mymoney -= money; show_count(value, index, -money); break; } } } return 0; } static int IsLegal(char *data) { int money = atoi(data); if (IsNum(data, strlen(data)) && money <= B_MAX && money >= B_MIN) return money; return 0; } static void show_output(int bet[]) { int i, j = 10; move(12, 0); clrtoline(17); /* �Ȯɭ��� �]�����Uclrtoline�ǩǪ� */ for (i = 13; i <= 18; i++) { move(i, 0); prints(" "); } move(12, 0); prints("\033[1;31m �z�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w" "�w�{\033[m\n\n\n\n\n\n"); prints("\033[1;31m �|�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w�w" "�w�}\033[m"); for (i = 0; i < 3; i++, j += 25) { switch (bet[i]) { case 1: move(13, j); prints("\033[37m�~�w�w�w�w��\033[m"); move(14, j); prints("\033[37m�x �x\033[m"); move(15, j); prints("\033[37m�x �� �x\033[m"); move(16, j); prints("\033[37m�x �x\033[m"); move(17, j); prints("\033[37m���w�w�w�w��\033[m"); break; case 2: move(13, j); prints("\033[37m�~�w�w�w�w��\033[m"); move(14, j); prints("\033[37m�x ���x\033[m"); move(15, j); prints("\033[37m�x �x\033[m"); move(16, j); prints("\033[37m�x�� �x\033[m"); move(17, j); prints("\033[37m���w�w�w�w��\033[m"); break; case 3: move(13, j); prints("\033[37m�~�w�w�w�w��\033[m"); move(14, j); prints("\033[37m�x ���x\033[m"); move(15, j); prints("\033[37m�x �� �x\033[m"); move(16, j); prints("\033[37m�x�� �x\033[m"); move(17, j); prints("\033[37m���w�w�w�w��\033[m"); break; case 4: move(13, j); prints("\033[37m�~�w�w�w�w��\033[m"); move(14, j); prints("\033[37m�x�� ���x\033[m"); move(15, j); prints("\033[37m�x �x\033[m"); move(16, j); prints("\033[37m�x�� ���x\033[m"); move(17, j); prints("\033[37m���w�w�w�w��\033[m"); break; case 5: move(13, j); prints("\033[37m�~�w�w�w�w��\033[m"); move(14, j); prints("\033[37m�x�� ���x\033[m"); move(15, j); prints("\033[37m�x �� �x\033[m"); move(16, j); prints("\033[37m�x�� ���x\033[m"); move(17, j); prints("\033[37m���w�w�w�w��\033[m"); break; case 6: move(13, j); prints("\033[37m�~�w�w�w�w��\033[m"); move(14, j); prints("\033[37m�x�� ���x\033[m"); move(15, j); prints("\033[37m�x�� ���x\033[m"); move(16, j); prints("\033[37m�x�� ���x\033[m"); move(17, j); prints("\033[37m���w�w�w�w��\033[m"); break; } } } #define lockreturn0(unmode, state) if(lockutmpmode(unmode, state)) return 0 int dice_main(void) { int flag[100], value[100]; char input[10], data[256], ch; dicedata_t table[256]; int bet[3], index, money = 0, i, ya = 0, j, total, sig = 0; FILE *winfp /* , *lostfp */ ; more(DICE_TXT, NA); reload_money(); if (cuser.money < 10) { move(19, 0); prints("\033[1;37m�W�L�Q���A�Ӫ��a~~\033[m"); pressanykey(); return 0; } lockreturn0(DICE, LOCK_MULTI); winfp = fopen(DICE_WIN, "a"); /* lostfp = fopen(DICE_LOST,"a"); */ if (!winfp /* || !lostfp */ ) return 0; do { total = 0; i = 0; ch = 'y'; clear(); show_data(); for (j = 0; j < 3; j++) bet[j] = rand() % 6 + 1; for (j = 0; j < 100; j++) value[j] = 0; while (1) { move(19, 0); prints("\033[1;32m�A�{�b��\033[1;31m %u \033[1;32mPtt$��\033[m", cuser.money); getdata(20, 0, "\033[1;37m�Ʀr:�[�� d:�h�� s:�}�l�����}\033[m: ", input, 5, LCECHO); reload_money(); if (input[0] != 's' && input[0] != 'd' && cuser.money < 10) { move(21, 0); clrtoeol(); prints("\033[1;37m�W�L�Q���~���~\033[m"); continue; } if (input[0] == 'd' || input[0] == 'D') { del(value, i, table); continue; } if (input[0] == 's' || input[0] == 'S') break; if (!IsNum(input, strlen(input))) continue; index = atoi(input); if (check_index(index) == 0) continue; /* ��J����loop */ while (1) { if (cuser.money < 10) break; getdata(21, 0, "\033[1;32m��h�ֿ��O\033[1;37m(�j��10 �p��500)" "\033[m: ", input, sizeof(input), LCECHO); if (!(money = IsLegal(input)) || input[0] == '0') continue; reload_money(); if (money > cuser.money) continue; for (j = 0, sig = 0; j < i; j++) if (table[j].mybet == index) { if (table[j].mymoney == B_MAX) sig = 2; else if (table[j].mymoney + money > B_MAX) { sig = 1; break; } else { vice(money, "��l"); table[j].mymoney += money; j = -1; break; } } if (sig == 2) break; if (sig == 1) continue; if (j != -1) { bzero((char *)&table[i], sizeof(dicedata_t)); table[i].mybet = index; table[i++].mymoney = money; vice(money, "��l"); } break; } reload_money(); move(19, 0); prints("\033[1;32m�A�{�b�� \033[1;31m%u\033[1;32m Ptt$��", cuser.money); if (sig != 2) show_count(value,index, money); } if (i == 0) { fclose(winfp); /* fclose(lostfp); */ unlockutmpmode(); return 0; } show_output(bet); set_bingo(flag, bet); for (j = 0; j < i; j++) { if (table[j].mymoney <= 0) continue; ya = bingo(flag, table[j].mybet); if (ya == 0) { /* * sprintf(data, "%-15s ��F %-8d $", cuser.userid, * table[j].mymoney); fprintf(lostfp, "%s\n", data); */ continue; } demoney(table[j].mymoney * ya + table[j].mymoney); total += table[j].mymoney * ya; if (table[j].mymoney * ya > 500) { /* �W�L500�����~��log ���io */ snprintf(data, sizeof(data), "%-15s ��%-2d�ﶵ%-8d���� ���F%d�� �b��:%-8d\n", cuser.userid, table[j].mybet, table[j].mymoney, ya, table[j].mymoney * ya); fputs(data, winfp); } ya = 0; } if (total > 0) { move(21, 0); prints("\033[1;32m�AĹ�F \033[1;31m%d\033[1;32m Ptt$ ��~~" " \033[m", total); } else { move(21, 0); clrtoeol(); prints("\033[1;32m�u�i�� �U���A�ӸI�I�B��a\033[m"); } move(19, 0); clrtoeol(); prints("\033[1;32m�A�{�b�� \033[1;31m%u\033[1;32m Ptt$��\033[m", cuser.money); getdata(23, 0, "\033[1;32m�~��İ�[\033[1;37my/n\033[1;32m]\033[m: ", input, 2, LCECHO); } while (input[0] != 'n' && input[0] != 'N'); fclose(winfp); /* fclose(lostfp); */ unlockutmpmode(); return 0; }