summaryrefslogtreecommitdiffstats
path: root/console/guess.c
diff options
context:
space:
mode:
Diffstat (limited to 'console/guess.c')
-rw-r--r--console/guess.c369
1 files changed, 369 insertions, 0 deletions
diff --git a/console/guess.c b/console/guess.c
new file mode 100644
index 00000000..c5408b88
--- /dev/null
+++ b/console/guess.c
@@ -0,0 +1,369 @@
+/* $Id$ */
+#include "bbs.h"
+#define LOGPASS BBSHOME "/etc/winguess.log"
+
+static void
+show_table(char TABLE[], char ifcomputer)
+{
+ int i;
+
+ move(0, 35);
+ outs(ANSI_COLOR(1;44;33) " 【 猜數字 】 " ANSI_RESET);
+ move(8, 1);
+ outs(ANSI_COLOR(1;44;36) "目 前 倍 率" ANSI_RESET "\n");
+ outs(ANSI_COLOR(1;33) "=================" ANSI_RESET "\n");
+ if (ifcomputer) {
+ outs("贏電腦: 2 倍\n");
+ outs("輸電腦: 0 倍\n");
+ } else {
+ for (i = 1; i <= 6; i++)
+ prints("第%d次, %02d倍\n", i, TABLE[i]);
+ }
+ outs(ANSI_COLOR(33) "=================" ANSI_RESET);
+}
+
+static int
+get_money(void)
+{
+ int money, i;
+ char data[20];
+
+ move(1, 0);
+ prints("您目前有:%d " MONEYNAME "$", cuser.money);
+ do {
+ getdata(2, 0, "要賭多少(5-10或按q離開): ", data, 9, LCECHO);
+ money = 0;
+ if (data[0] == 'q' || data[0] == 'Q') {
+ unlockutmpmode();
+ return 0;
+ }
+ for (i = 0; data[i]; i++)
+ if (data[i] < '0' || data[i] > '9') {
+ money = -1;
+ break;
+ }
+ if (money != -1) {
+ money = atoi(data);
+ reload_money();
+ if (money > cuser.money || money <= 4 || money > 10 ||
+ money < 1)
+ money = -1;
+ }
+ } while (money == -1);
+ move(1, 0);
+ clrtoeol();
+ reload_money();
+ prints("您目前有:%d " MONEYNAME "$", cuser.money - money);
+ return money;
+}
+
+static int
+check_data(const char *str)
+{
+ int i, j;
+
+ if (strlen(str) != 4)
+ return -1;
+ for (i = 0; i < 4; i++)
+ if (str[i] < '0' || str[i] > '9')
+ return -1;
+ for (i = 0; i < 4; i++)
+ for (j = i + 1; j < 4; j++)
+ if (str[i] == str[j])
+ return -1;
+ return 1;
+}
+
+static char *
+get_data(char data[5], int count)
+{
+ while (1) {
+ getdata(6, 0, "輸入四位數字(不重複): ", data, 5, LCECHO);
+ if (check_data(data) == 1)
+ break;
+ }
+ return data;
+}
+
+static int
+guess_play(const char *data, const char *answer, int count)
+{
+ int A_num = 0, B_num = 0;
+ int i, j;
+
+ for (i = 0; i < 4; i++) {
+ if (data[i] == answer[i])
+ A_num++;
+ for (j = 0; j < 4; j++)
+ if (i == j)
+ continue;
+ else if (data[i] == answer[j]) {
+ B_num++;
+ break;
+ }
+ }
+ if (A_num == 4)
+ return 1;
+ move(count + 8, 55);
+ prints("%s => " ANSI_COLOR(1;32) "%dA %dB" ANSI_RESET, data, A_num, B_num);
+ return 0;
+}
+
+static int
+result(int correct, int number)
+{
+ char a = 0, b = 0, i, j;
+ char n1[5], n2[5];
+
+ snprintf(n1, sizeof(n1), "%04d", correct);
+ snprintf(n2, sizeof(n2), "%04d", number);
+ for (i = 0; i < 4; i++)
+ for (j = 0; j < 4; j++)
+ if (n1[(int)i] == n2[(int)j])
+ b++;
+ for (i = 0; i < 4; i++)
+ if (n1[(int)i] == n2[(int)i]) {
+ b--;
+ a++;
+ }
+ return 10 * a + b;
+}
+
+static int
+legal(int number)
+{
+ char i, j;
+ char temp[5];
+
+ snprintf(temp, sizeof(temp), "%04d", number);
+ for (i = 0; i < 4; i++)
+ for (j = i + 1; j < 4; j++)
+ if (temp[(int)i] == temp[(int)j])
+ return 0;
+ return 1;
+}
+
+static void
+initcomputer(char flag[])
+{
+ int i;
+
+ for (i = 0; i < 10000; i++)
+ if (legal(i))
+ flag[i] = 1;
+ else
+ flag[i] = 0;
+}
+
+static int
+computer(int correct, int total, char flag[], int n[])
+{
+ int guess;
+ static int j;
+ int k, i;
+ char data[5];
+
+ if (total == 1) {
+ do {
+ guess = random() % 10000;
+ } while (!legal(guess));
+ } else
+ guess = n[random() % j];
+ k = result(correct, guess);
+ if (k == 40) {
+ move(total + 8, 25);
+ snprintf(data, sizeof(data), "%04d", guess);
+ prints("%s => 猜中了!!", data);
+ return 1;
+ } else {
+ move(total + 8, 25);
+ snprintf(data, sizeof(data), "%04d", guess);
+ prints("%s => " ANSI_COLOR(1;32) "%dA %dB" ANSI_RESET, data, k / 10, k % 10);
+ }
+ j = 0;
+ for (i = 0; i < 10000; i++)
+ if (flag[i]) {
+ if (result(i, guess) != k)
+ flag[i] = 0;
+ else
+ n[j++] = i;
+ }
+ return 0;
+}
+
+static void
+Diff_Random(char *answer)
+{
+ register int i = 0, j, k;
+
+ while (i < 4) {
+ k = random() % 10 + '0';
+ for (j = 0; j < i; j++)
+ if (k == answer[j])
+ break;
+ if (j == i) {
+ answer[j] = k;
+ i++;
+ }
+ }
+ answer[4] = 0;
+}
+
+#define lockreturn0(unmode, state) if(lockutmpmode(unmode, state)) return 0
+
+int
+guess_main(void)
+{
+ char data[5];
+ int money;
+ char computerwin = 0, youwin = 0;
+ int count = 0, c_count = 0;
+ char ifcomputer[2];
+ char answer[5];
+ int *n = NULL;
+ char yournum[5];
+ char *flag = NULL;
+ char TABLE[] = {0, 10, 8, 4, 2, 1, 0, 0, 0, 0, 0};
+ FILE *file;
+
+ clear();
+ showtitle("猜數字", BBSName);
+ lockreturn0(GUESSNUM, LOCK_MULTI);
+
+ reload_money();
+ if (cuser.money < 5) {
+ clear();
+ move(12, 35);
+ unlockutmpmode();
+ vmsg("錢不夠啦 至少要 5 " MONEYNAME "$");
+ return 1;
+ }
+ if ((money = get_money()) == 0)
+ return 1;
+ vice(money, "猜數字");
+
+ Diff_Random(answer);
+ move(2, 0);
+ clrtoeol();
+ prints("您下注 :%d " MONEYNAME "$", money);
+
+ getdata_str(4, 0, "您要和電腦比賽嗎? <y/n>[y]:",
+ ifcomputer, sizeof(ifcomputer), LCECHO, "y");
+ if (ifcomputer[0] == 'y') {
+ ifcomputer[0] = 1;
+ show_table(TABLE, 1);
+ } else {
+ ifcomputer[0] = 0;
+ show_table(TABLE, 0);
+ }
+ if (ifcomputer[0]) {
+ do {
+ getdata(5, 0, "請輸入您要讓電腦猜的數字: ",
+ yournum, sizeof(yournum), LCECHO);
+ } while (!legal(atoi(yournum)));
+ move(8, 25);
+ outs("電腦猜");
+ flag = malloc(sizeof(char) * 10000);
+ n = malloc(sizeof(int) * 1500);
+ initcomputer(flag);
+ }
+ move(8, 55);
+ outs("你猜");
+ while (((!computerwin || !youwin) && count < 10 && (ifcomputer[0])) ||
+ (!ifcomputer[0] && count < 10 && !youwin)) {
+ if (!computerwin && ifcomputer[0]) {
+ ++c_count;
+ if (computer(atoi(yournum), c_count, flag, n))
+ computerwin = 1;
+ }
+ move(20, 55);
+ prints("第 %d 次機會 ", count + 1);
+ if (!youwin) {
+ ++count;
+ if (guess_play(get_data(data, count), answer, count))
+ youwin = 1;
+ }
+ }
+ move(17, 35);
+ free(flag);
+ free(n);
+ if (ifcomputer[0]) {
+ if (count > c_count) {
+ outs("你輸給電腦了");
+ move(18, 35);
+ prints("你賠了 %d ", money);
+ if ((file = fopen(LOGPASS, "a"))) {
+ fprintf(file, "電腦第%d次猜中, ", c_count);
+ if (youwin)
+ fprintf(file, "%s 第%d次猜中, ", cuser.userid, count);
+ else
+ fprintf(file, "%s 沒猜中, ", cuser.userid);
+ fprintf(file, "電腦賺走了%s %d " MONEYNAME "$\n", cuser.userid, money);
+ fclose(file);
+ }
+ } else if (count < c_count) {
+ outs("真厲害, 讓你賺到囉");
+ move(18, 35);
+ prints("你賺走了 %d ", money * 2);
+ demoney(money * 2);
+ if ((file = fopen(LOGPASS, "a"))) {
+ fprintf(file, "id: %s, 第%d次猜中, 電腦第%d次猜中, "
+ "贏了電腦 %d " MONEYNAME "$\n", cuser.userid, count,
+ c_count, money * 2);
+ fclose(file);
+ }
+ } else {
+ prints("真厲害, 和電腦打成平手了, 拿回本錢%d\n", money);
+ demoney(money);
+ if ((file = fopen(LOGPASS, "a"))) {
+ fprintf(file, "id: %s 和電腦打成了平手\n", cuser.userid);
+ fclose(file);
+ }
+ }
+ unlockutmpmode();
+ pressanykey();
+ return 1;
+ }
+ if (youwin) {
+ demoney(TABLE[count] * money);
+ if (count < 5) {
+ outs("真厲害, 錢被你賺走了");
+ if ((file = fopen(LOGPASS, "a"))) {
+ fprintf(file, "id: %s, 第%d次猜中, 贏了 %d " MONEYNAME "$\n",
+ cuser.userid, count, TABLE[count] * money);
+ fclose(file);
+ }
+ } else if (count > 5) {
+ outs("唉, 太多次才猜出來了");
+ if ((file = fopen(LOGPASS, "a"))) {
+ fprintf(file, "id: %s, 第%d次才猜中, 賠了 %d " MONEYNAME "$\n",
+ cuser.userid, count, money);
+ fclose(file);
+ }
+ } else {
+ outs("五次猜出來, 還你本錢吧");
+ move(18, 35);
+ clrtoeol();
+ prints("你拿回了%d " MONEYNAME "$\n", money);
+ if ((file = fopen(LOGPASS, "a"))) {
+ fprintf(file, "id: %s, 第%d次猜中, 拿回了本錢 %d " MONEYNAME "$\n",
+ cuser.userid, count, money);
+ fclose(file);
+ }
+ }
+ unlockutmpmode();
+ pressanykey();
+ return 1;
+ }
+ move(17, 35);
+ prints("嘿嘿 標準答案是 %s ", answer);
+ move(18, 35);
+ outs("下次再來吧");
+ if ((file = fopen(BBSHOME "/etc/loseguess.log", "a"))) {
+ fprintf(file, "id: %s 賭了 %d " MONEYNAME "$\n", cuser.userid, money);
+ fclose(file);
+ }
+ unlockutmpmode();
+ pressanykey();
+ return 1;
+}
generated by cgit v1.2.3 (git 2.25.1) at 2024-06-26 06:32:52 +0800