diff options
Diffstat (limited to 'mbbsd/dice.c')
| -rw-r--r-- | mbbsd/dice.c | 447 |
1 files changed, 447 insertions, 0 deletions
diff --git a/mbbsd/dice.c b/mbbsd/dice.c new file mode 100644 index 00000000..d64ce63c --- /dev/null +++ b/mbbsd/dice.c @@ -0,0 +1,447 @@ +/* $Id: dice.c,v 1.1 2002/03/07 15:13:48 in2 Exp $ */ +#include <stdio.h> +#include <stdlib.h> +#include <string.h> +#include <sys/types.h> +#include "config.h" +#include "pttstruct.h" +#include "common.h" +#include "modes.h" +#include "proto.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 + +extern int usernum; +static int flag[100], value[100]; + +typedef struct dicedata_t { + int mybet; + int mymoney; +} dicedata_t; + +static void set_bingo(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 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 ┌───────────────────────" + "──────────┐\033[m\n"); + prints("\033[45;37m倍率一\033[m\033[31m │ \033[33m[1]押一點 [2]押二點 " + "[3]押三點 [4]押四點 [5]押五點 [6]押六點 \033[31m │\033[m\n"); + prints("\033[31m │ \033[33m[7]押小 [8]押大 " + " \033[31m │\033[m\n"); + prints("\033[31m │ " + " │\033[m\n"); + prints("\033[45;37m賠率三\033[m\033[31m │ \033[33m[11]押中(總點數等於11" + "或10) \033[31m │\033[m\n"); + prints("\033[31m │ " + " │\033[m\n"); + prints("\033[45;37m賠率五\033[m\033[31m │ \033[33m[74]押小且四點 [83]押" + "大且三點 [66]押連號 \033[31m │\033[m\n"); + prints("\033[31m │ " + " │\033[m\n"); + prints("\033[31m │ \033[33m[12]押一二點 [13]押一三點 [14]押一四點" + " [15]押一五點 [16]押一六點\033[31m │\033[m\n"); + prints("\033[31m │ \033[33m[23]押二三點 [24]押二四點 [25]押二五點" + " [26]押二六點 [34]押三四點\033[31m │\033[m\n"); + prints("\033[31m │ \033[33m[35]押三五點 [36]押三六點 [45]押四五點" + " [46]押四六點 [56]押五六點\033[31m │\033[m\n"); + prints("\033[31m └────────────────────────" + "─────────┘\033[m\n"); +} + +static void show_count(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; +} + +extern userec_t cuser; + +static int del(int total, dicedata_t *table) { + int index, money; + char data[10]; + int i; + + while(1) { + do { + move(22,0); + clrtoeol(); + getdata(21, 0, "輸入退選的數字(打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, "多少錢: ", 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("你現在有 %u Ptt$歐", cuser.money); + table[i].mymoney -= money; + show_count(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); + /* 暫時降啦 因為那各clrtoline怪怪的 */ + for(i = 13; i <= 18; i++) { + move(i,0); + prints(" "); + } + move(12,0); + prints("\033[1;31m ┌──────────────────────" + "─┐\033[m\n\n\n\n\n\n"); + prints("\033[1;31m └──────────────────────" + "─┘\033[m"); + for(i = 0; i < 3; i++, j += 25) { + switch(bet[i]) { + case 1: + move(13, j);prints("\033[37m╭────╮\033[m"); + move(14, j);prints("\033[37m│ │\033[m"); + move(15, j);prints("\033[37m│ ● │\033[m"); + move(16, j);prints("\033[37m│ │\033[m"); + move(17, j);prints("\033[37m╰────╯\033[m"); + break; + case 2: + move(13, j);prints("\033[37m╭────╮\033[m"); + move(14, j);prints("\033[37m│ ●│\033[m"); + move(15, j);prints("\033[37m│ │\033[m"); + move(16, j);prints("\033[37m│● │\033[m"); + move(17, j);prints("\033[37m╰────╯\033[m"); + break; + case 3: + move(13, j);prints("\033[37m╭────╮\033[m"); + move(14, j);prints("\033[37m│ ●│\033[m"); + move(15, j);prints("\033[37m│ ● │\033[m"); + move(16, j);prints("\033[37m│● │\033[m"); + move(17, j);prints("\033[37m╰────╯\033[m"); + break; + case 4: + move(13, j);prints("\033[37m╭────╮\033[m"); + move(14, j);prints("\033[37m│● ●│\033[m"); + move(15, j);prints("\033[37m│ │\033[m"); + move(16, j);prints("\033[37m│● ●│\033[m"); + move(17, j);prints("\033[37m╰────╯\033[m"); + break; + case 5: + move(13, j);prints("\033[37m╭────╮\033[m"); + move(14, j);prints("\033[37m│● ●│\033[m"); + move(15, j);prints("\033[37m│ ● │\033[m"); + move(16, j);prints("\033[37m│● ●│\033[m"); + move(17, j);prints("\033[37m╰────╯\033[m"); + break; + case 6: + move(13, j);prints("\033[37m╭────╮\033[m"); + move(14, j);prints("\033[37m│● ●│\033[m"); + move(15, j);prints("\033[37m│● ●│\033[m"); + move(16, j);prints("\033[37m│● ●│\033[m"); + move(17, j);prints("\033[37m╰────╯\033[m"); + break; + } + } +} + +#define lockreturn0(unmode, state) if(lockutmpmode(unmode, state)) return 0 + +int dice_main(void) { + 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超過十元再來玩吧~~\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你現在有\033[1;31m %u \033[1;32mPtt$歐\033[m", + cuser.money); + getdata(20, 0, "\033[1;37m數字:加選 d:退選 s:開始或離開\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超過十元才能賭~\033[m"); + continue; + } + if(input[0] == 'd' || input[0] == 'D') { + del(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; +/*輸入錢的loop*/ + while(1) { + if(cuser.money < 10) + break; + getdata(21, 0, "\033[1;32m賭多少錢呢\033[1;37m(大於10 小於500)" + "\033[m: ", input, 9, 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,"骰子"); + 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,"骰子"); + } + break; + } + reload_money(); + move(19,0); + prints("\033[1;32m你現在有 \033[1;31m%u\033[1;32m Ptt$歐", + cuser.money); + if(sig != 2) + show_count(index, money); + } + + if(i == 0) { + fclose(winfp); + /*fclose(lostfp);*/ + unlockutmpmode(); + return 0; + } + + show_output(bet); + set_bingo(bet); + + for(j = 0; j < i; j++) { + if(table[j].mymoney <= 0) + continue; + ya = bingo(table[j].mybet); + if(ya == 0) { + /*sprintf(data, "%-15s 輸了 %-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){ /* 超過500塊錢才做log 減少io */ + sprintf(data, "%-15s 押%-2d選項%-8d塊錢 中了%d倍 淨賺:%-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你贏了 \033[1;31m%d\033[1;32m Ptt$ 唷~~" + " \033[m", total); + } else { + move(21,0); + clrtoeol(); + prints("\033[1;32m真可惜 下次再來碰碰運氣吧\033[m"); + } + + move(19,0); + clrtoeol(); + prints("\033[1;32m你現在有 \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; +} |