git.sur5r.net Git - c128-kasse/blob - 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 void print_screen() {
  19         BYTE i = 0;
  20         char *time = get_time();
  21         clrscr();
  22         cprintf("C128-Kassenprogramm\r\n\r\nUhrzeit: %s (wird nicht aktualisiert)\r\nEingenommen: %ld Cents, Verkauft: %ld Flaschen, Drucken: %s\r\n\r\n", time, money, items_sold, (printing == 1 ? "ein" : "aus"));
  23         free(time);
  24         for (; i < status.num_items; ++i)
  25                 cprintf("Eintrag %x: %s (%d Cents, %d mal verkauft)\r\n",
  26                         i, status.status[i].item_name, status.status[i].price, status.status[i].times_sold);
  27         cprintf("\r\nBefehle: s) Daten sichern d) Drucken umschalten\r\ng) Guthabenverwaltung z) Zeit setzen\r\nn) Neues Getraenk\r\n");
  28 }
  29
  30 void log_file(char * s) {
  31         FILE *f;
  32         if (s == NULL)
  33                 return;
  34         if ((f = fopen("log", "a")) == NULL)
  35                 c128_perror(23, "kann logfile nicht oeffnen");
  36         fputs(s, f);
  37         fclose(f);
  38 }
  39
  40 /* Druckt eine entsprechende Zeile aus */
  41 void print_log(BYTE n, int einheiten, char *nickname) {
  42         BYTE c;
  43         /* Format:
  44            Transaction-ID (Anzahl verkaufter Einträge, inklusive des zu druckenden!)
  45            Uhrzeit (TODO)
  46            Eintragname (= Getränk)
  47            Preis (in Cents)
  48            Anzahl
  49            Nickname (falls es vom Guthaben abgezogen wird)
  50            */
  51 //      sprintf(print_buffer, "[%d] UHRZEIT - %s - %d - %d - an %s\r\n", items_sold, status[n].item_name, status[n].price, einheiten, (nickname != NULL ? nickname : "Unbekannt"));
  52         c = cbm_open((BYTE)4, (BYTE)4, (BYTE)0, NULL);
  53         if (c != 0) {
  54                 c128_perror(c, "cbm_open(printer)");
  55                 save_items();
  56                 exit(1);
  57         }
  58         c = cbm_write((BYTE)4, print_buffer, strlen(print_buffer));
  59         if (c != strlen(print_buffer)) {
  60                 c128_perror(c, "write(printer)");
  61                 save_items();
  62                 exit(1);
  63         }
  64         cbm_close((BYTE)4);
  65         log_file(print_buffer);
  66 }
  67
  68 /* Dialog, der einen durch's Abrechnen der Einträge führt */
  69 void buy(BYTE n) {
  70         int negative = 1;
  71         char entered[5] = {'1', 0, 0, 0, 0};
  72         BYTE i = 0, matches = 0;
  73         BYTE c, nickname_len, single_match;
  74         int einheiten;
  75         char *nickname;
  76         if (status.status[n].item_name == NULL)
  77                 cprintf("FEHLER: Diese Einheit existiert nicht.\r\n");
  78         else {
  79                 cprintf("Wieviel Einheiten \"%s\"?\r\n", status.status[n].item_name);
  80                 while (1) {
  81                         c = getchar();
  82                         if (c == 13)
  83                                 break;
  84                         else if (c == '-'&& i == 0)
  85                                 negative = -1;
  86                         else if (c > 47 && c < 58)
  87                                 entered[i++] = c;
  88                 }
  89                 einheiten = atoi(entered) * negative;
  90                 cprintf("\r\nAuf ein Guthaben kaufen? Wenn ja, Nickname eingeben:\r\n");
  91                 nickname = get_input();
  92                 if (nickname[0] == '\0') {
  93                         free(nickname);
  94                         nickname = NULL;
  95                 } else {
  96                         nickname_len = strlen(nickname);
  97                         /* go through credits and remove the amount of money or set nickname
  98                          * to NULL if no such credit could be found */
  99                         for (c = 0; c < credits.num_items; ++c)
 100                                 if (strncmp(nickname, credits.credits[c].nickname, nickname_len) == 0) {
 101                                         if (++matches == 2)
 102                                                 break;
 103                                         else single_match = c;
 104                                 }
 105                         if (matches == 1) {
 106                                 if (credits.credits[single_match].credit < (status.status[n].price * einheiten)) {
 107                                         cprintf("Sorry, %s hat nicht genug Geld :-(\r\n", nickname);
 108                                         free(nickname);
 109                                         return;
 110                                 } else {
 111                                         /* Geld abziehen */
 112                                         credits.credits[single_match].credit -= (status.status[n].price * einheiten);
 113                                         cprintf("\r\nVerbleibendes Guthaben fuer %s: %d Cents. Druecke ANYKEY...\r\n",
 114                                                 nickname, credits.credits[single_match].credit);
 115                                         getchar();
 116                                 }
 117                         } else if (matches == 0) {
 118                                 // TODO
 119                         } else {
 120                                 free(nickname);
 121                                 nickname = NULL;
 122                         }
 123                 }
 124                 status.status[n].times_sold += einheiten;
 125                 money += status.status[n].price * einheiten;
 126                 items_sold += einheiten;
 127                 if (printing == 1)
 128                         print_log(n, einheiten, nickname);
 129                 if (nickname != NULL)
 130                         free(nickname);
 131         }
 132 }
 133
 134 void set_time_interactive() {
 135         BYTE part[3] = {'0', '0', '\0'};
 136         BYTE tp1, tp2, tp3;
 137         char *time_input, *time;
 138         cprintf("Gib die aktuelle Uhrzeit ein (Format HHMMSS):\r\n");
 139         time_input = get_input();
 140         part[0] = time_input[0];
 141         part[1] = time_input[1];
 142         tp1 = atoi(part);
 143         part[0] = time_input[2];
 144         part[1] = time_input[3];
 145         tp2 = atoi(part);
 146         part[0] = time_input[4];
 147         part[1] = time_input[5];
 148         tp3 = atoi(part);
 149         set_time(tp1, tp2, tp3);
 150
 151         time = get_time();
 152         cprintf("Zeit gesetzt: %s\r\n", time);
 153         free(time);
 154 }
 155
 156 int main() {
 157         BYTE c;
 158         toggle_videomode();
 159         /* Zeit erstmalig setzen */
 160         set_time_interactive();
 161         POKE(216, 255);
 162         /* Konfigurationsdatei laden */
 163         load_config();
 164         /* Einträge (=Getränke) und Zustand laden */
 165         load_items();
 166         /* Guthaben laden */
 167         load_credits();
 168         while (1) {
 169                 /* Bildschirm anzeigen */
 170                 print_screen();
 171                 /* Tastatureingaben abfragen */
 172                 c = getchar();
 173                 /* und eventuell weitere Dialoge anzeigen */
 174                 if (c > 47 && c < 58)
 175                         buy(c - 48);
 176                 else if (c == 's') {
 177                         /* Zustandsdatei schreiben */
 178                         save_items();
 179                         save_credits();
 180                         cprintf("Statefile/Creditfile gesichert, druecke ANYKEY...\r\n");
 181                         getchar();
 182                 } else if (c == 'd') {
 183                         /* Drucken an- oder ausschalten */
 184                         printing = (printing == 1 ? 0 : 1);
 185                         cprintf("Drucken ist nun %s, druecke ANYKEY...\r\n", (printing == 1 ? "eingeschaltet" : "ausgeschaltet"));
 186                         getchar();
 187                 } else if (c == 'g') {
 188                         /* Guthabenverwalter aufrufen */
 189                         credit_manager();
 190                 } else if (c == 'z') {
 191                         /* Zeit setzen */
 192                         set_time_interactive();
 193                 } else if (c == 'n') {
 194                         strcpy(status.status[status.num_items].item_name, "mate");
 195                         status.status[status.num_items].price = 23;
 196                         status.status[status.num_items].times_sold = 5;
 197                         status.num_items++;
 198                 } else if (c == 'q')
 199                         break;
 200         }
 201         cprintf("BYEBYE\r\n");
 202 }