git.sur5r.net Git - c128-kasse/blob - src/kasse.c

   1 #include <stdio.h>
   2 #include <conio.h>
   3 #include <stdlib.h>
   4 #include <string.h>
   5 #include <cbm.h>
   6
   7 #include "general.h"
   8 #include "config.h"
   9 #include "kasse.h"
  10 #include "credit_manager.h"
  11 #include "time.h"
  12 // drucker 4 oder 5
  13 // graphic 4,0,10
  14
  15 char print_buffer[81];
  16
  17 /* Hauptbildschirm ausgeben */
  18 static void print_screen() {
  19         BYTE i = 0;
  20         char *time = get_time();
  21         char profit[10];
  22         clrscr();
  23         if (format_euro(profit, 10, money) == NULL) {
  24                 cprintf("Einname %ld konnte nicht umgerechnet werden\r\n", money);
  25                 exit(1);
  26         }
  27         cprintf("C128-Kassenprogramm (phil_fry, sECuRE, sur5r)\r\
  28 \r\nUhrzeit: %s (wird nicht aktualisiert)\r\
  29 Eingenommen: %s, Verkauft: %ld Flaschen, Drucken: %s\r\n\r\n",
  30         time, profit, items_sold, (printing == 1 ? "ein" : "aus"));
  31         for (; i < status.num_items; ++i)
  32                 cprintf("Eintrag %x: %s (%d Cents, %d mal verkauft)\r\n",
  33                         i, status.status[i].item_name, status.status[i].price, status.status[i].times_sold);
  34         cprintf("\r\nBefehle: s) Daten sichern d) Drucken umschalten\r\
  35 g) Guthabenverwaltung     z) Zeit setzen\r\
  36 n) Neues Getraenk\r\n");
  37 }
  38
  39 static void log_file(const char *s) {
  40         BYTE c = cbm_open((BYTE)8, (BYTE)8, (BYTE)1, "log");
  41         if (c != 0) {
  42                 c128_perror(c, "cbm_open(log)");
  43                 save_items();
  44                 save_credits();
  45                 exit(1);
  46         }
  47         c = cbm_write((BYTE)8, s, strlen(s));
  48         if (c != strlen(s)) {
  49                 cprintf("Could not save logfile, please make sure the floppy is not full!\n");
  50                 save_items();
  51                 save_credits();
  52                 exit(1);
  53         }
  54         cbm_close((BYTE)8);
  55 }
  56
  57 /* Druckt eine entsprechende Zeile aus */
  58 static void print_log(BYTE n, int einheiten, char *nickname) {
  59         BYTE c;
  60         char *time = get_time();
  61         char price[10];
  62         /* Format:
  63            Transaction-ID (Anzahl verkaufter Einträge, inklusive des zu druckenden!)
  64            Uhrzeit
  65            Eintragname (= Getränk)
  66            Preis (in Cents)
  67            Anzahl
  68            Nickname (falls es vom Guthaben abgezogen wird)
  69            */
  70         if (format_euro(price, 10, status.status[n].price) == NULL) {
  71                 cprintf("Preis %d konnte nicht umgerechnet werden\r\n", status.status[n].price);
  72                 exit(1);
  73         }
  74
  75         sprintf(print_buffer, "[%lu] %s - %s - %s - %d - an %s\r\n",
  76                 items_sold, time, status.status[n].item_name, price,
  77                 einheiten, (nickname != NULL ? nickname : "Unbekannt"));
  78         c = cbm_open((BYTE)4, (BYTE)4, (BYTE)0, NULL);
  79         if (c != 0) {
  80                 c128_perror(c, "cbm_open(printer)");
  81                 save_items();
  82                 save_credits();
  83                 exit(1);
  84         }
  85         c = cbm_write((BYTE)4, print_buffer, strlen(print_buffer));
  86         if (c != strlen(print_buffer)) {
  87                 c128_perror(c, "write(printer)");
  88                 save_items();
  89                 save_credits();
  90                 exit(1);
  91         }
  92         cbm_close((BYTE)4);
  93         log_file(print_buffer);
  94 }
  95
  96 /* Dialog, der einen durch's Abrechnen der Einträge führt */
  97 void buy(BYTE n) {
  98         int negative = 1;
  99         char entered[5] = {'1', 0, 0, 0, 0};
 100         BYTE i = 0, matches = 0;
 101         BYTE c, nickname_len;
 102         int einheiten;
 103         char *nickname;
 104
 105         if (status.status[n].item_name == NULL) {
 106                 cprintf("FEHLER: Diese Einheit existiert nicht.\r\n");
 107                 return;
 108         }
 109         cprintf("Wieviel Einheiten \"%s\"? [1] \r\n", status.status[n].item_name);
 110         while (1) {
 111                 c = getchar();
 112                 if (c == 13)
 113                         break;
 114                 else if (c == 27) {
 115                         cprintf("Kauf abgebrochen, druecke RETURN...\r\n");
 116                         get_input();
 117                         return;
 118                 } else if (c == '-' && i == 0)
 119                         negative = -1;
 120                 else if (c > 47 && c < 58)
 121                         entered[i++] = c;
 122         }
 123         einheiten = atoi(entered) * negative;
 124         cprintf("\r\nAuf ein Guthaben kaufen? Wenn ja, Nickname eingeben:\r\n");
 125         nickname = get_input();
 126         if (nickname != NULL && *nickname != '\0' && *nickname != 32) {
 127                 nickname_len = strlen(nickname);
 128                 /* go through credits and remove the amount of money or set nickname
 129                  * to NULL if no such credit could be found */
 130                 for (c = 0; c < credits.num_items; ++c)
 131                         if (strncmp(nickname, credits.credits[c].nickname, nickname_len) == 0) {
 132                                 if (credits.credits[c].credit < (status.status[n].price * einheiten)) {
 133                                         cprintf("Sorry, %s hat nicht genug Geld :-(\r\n", nickname);
 134                                         return;
 135                                 }
 136                                 /* Geld abziehen */
 137                                 credits.credits[c].credit -= (status.status[n].price * einheiten);
 138                                 cprintf("\r\nVerbleibendes Guthaben fuer %s: %d Cents. Druecke RETURN...\r\n",
 139                                         nickname, credits.credits[c].credit);
 140                                 get_input();
 141                                 matches++;
 142                                 break;
 143                         }
 144                 if (matches == 0) {
 145                         cprintf("\r\nNickname nicht gefunden in der Guthabenverwaltung! Abbruch, druecke RETURN...\r\n");
 146                         get_input();
 147                         return;
 148                 }
 149         } else {
 150                 /* Ensure that nickname is NULL if it's empty because it's used in print_log */
 151                 nickname = NULL;
 152         }
 153         status.status[n].times_sold += einheiten;
 154         money += status.status[n].price * einheiten;
 155         items_sold += einheiten;
 156         if (printing == 1)
 157                 print_log(n, einheiten, nickname);
 158 }
 159
 160 void set_time_interactive() {
 161         BYTE part[3] = {'0', '0', '\0'};
 162         BYTE tp1, tp2, tp3;
 163         char *time_input, *time;
 164         cprintf("Gib die aktuelle Uhrzeit ein (Format HHMMSS):\r\n");
 165         time_input = get_input();
 166         part[0] = time_input[0];
 167         part[1] = time_input[1];
 168         tp1 = atoi(part);
 169         part[0] = time_input[2];
 170         part[1] = time_input[3];
 171         tp2 = atoi(part);
 172         part[0] = time_input[4];
 173         part[1] = time_input[5];
 174         tp3 = atoi(part);
 175         set_time(tp1, tp2, tp3);
 176
 177         time = get_time();
 178         cprintf("Zeit gesetzt: %s\r\n", time);
 179 }
 180
 181 int main() {
 182         char *c;
 183         toggle_videomode();
 184         /* Zeit erstmalig setzen */
 185         set_time_interactive();
 186         POKE(216, 255);
 187         /* Variablen zurechtbiegen */
 188         credits.num_items = 0;
 189         status.num_items = 0;
 190         /* Konfigurationsdatei laden */
 191         load_config();
 192         /* Einträge (=Getränke) und Zustand laden */
 193         load_items();
 194         /* Guthaben laden */
 195         load_credits();
 196         while (1) {
 197                 /* Bildschirm anzeigen */
 198                 print_screen();
 199                 /* Tastatureingaben abfragen */
 200                 c = get_input();
 201                 /* und eventuell weitere Dialoge anzeigen */
 202                 if (*c > 47 && *c < 58)
 203                         buy((*c) - 48);
 204                 else if (*c == 's') {
 205                         /* Zustandsdatei schreiben */
 206                         save_items();
 207                         save_credits();
 208                         cprintf("Statefile/Creditfile gesichert, druecke RETURN...\r\n");
 209                         get_input();
 210                 } else if (*c == 'd') {
 211                         /* Drucken an- oder ausschalten */
 212                         printing = (printing == 1 ? 0 : 1);
 213                         cprintf("Drucken ist nun %s, druecke RETURN...\r\n",
 214                                 (printing == 1 ? "eingeschaltet" : "ausgeschaltet"));
 215                         get_input();
 216                 } else if (*c == 'g') {
 217                         /* Guthabenverwalter aufrufen */
 218                         credit_manager();
 219                 } else if (*c == 'z') {
 220                         /* Zeit setzen */
 221                         set_time_interactive();
 222                 } else if (*c == 'n') {
 223                         strcpy(status.status[status.num_items].item_name, "mate");
 224                         status.status[status.num_items].price = 23;
 225                         status.status[status.num_items].times_sold = 5;
 226                         status.num_items++;
 227                 } else if (*c == 'q')
 228                         break;
 229         }
 230         cprintf("BYEBYE\r\n");
 231 }