2 * RGB2R-C128-Kassenprogramm
3 * © 2007-2009 phil_fry, sECuRE, sur5r
4 * See LICENSE for license information
18 #include "vdc_patch_charset.h"
20 static char *filter = NULL;
21 static BYTE filter_len;
23 static BYTE current_credits_page = 0;
25 static void credit_print_screen(void) {
27 char buffer[EUR_FORMAT_MINLEN + 1];
30 cprintf("credit_manager (phil_fry, sECuRE, sur5r) v:" GV "\r\n\r\n");
31 pages = (credits.num_items / CREDITS_PER_PAGE);
32 if (current_credits_page > pages)
33 current_credits_page = pages;
34 cprintf("Datei: CREDITS (Seite %d von %d)\r\n\r\n", current_credits_page,
36 for (i = (current_credits_page * CREDITS_PER_PAGE);
37 i < credits.num_items &&
38 i < ((current_credits_page + 1) * CREDITS_PER_PAGE);
41 strncasecmp(credits.credits[i].nickname, filter, filter_len) == 0) {
42 if (format_euro(buffer, sizeof(buffer), credits.credits[i].credit) !=
44 cprintf("Error: Could not format credit %d\r\n",
45 credits.credits[i].credit);
49 cprintf("%d: %s: %s\r\n", i, credits.credits[i].nickname, buffer);
52 cprintf("\r\nn) Neu d) L" oUML "schen p) Einzahlen b) Seite hoch "
53 "f) Seite runter\r\ng) Filtern s) Speichern z) Zur" uUML "ck\r\n");
56 static int8_t find_credit_idx(char *name) {
58 for (i = 0; i < credits.num_items; ++i) {
59 if (strncasecmp(name, credits.credits[i].nickname, NICKNAME_MAX_LEN + 1) ==
67 struct credits_t *find_credit(char *name) {
69 if ((i = find_credit_idx(name)) >= 0) {
70 return &credits.credits[i];
75 void deposit_credit(char *nickname) {
76 char *time = get_time();
77 struct credits_t *credit;
80 if ((credit = find_credit(nickname)) == NULL)
81 return; // cannot find named credit
83 cprintf("\r\nEinzahlung in Cent:\r\n");
84 if ((deposit = cget_number(0)) == 0)
87 credit->credit += deposit;
90 cprintf("\r\nEinzahlung durchgef" uUML "hrt, dr" uUML "cke RETURN...\r\n");
94 static void new_credit(void) {
95 char name[NICKNAME_MAX_LEN + 1];
99 if (credits.num_items == MAX_CREDIT_ITEMS) {
100 cprintf("\rEs ist bereits die maximale Anzahl an Eintr" aUML
101 "gen erreicht, dr" uUML "cke RETURN...\r\n");
107 cprintf("\rNickname (max. 10 Zeichen):\r\n");
108 if (cgetn_input(name, sizeof(name)) == 0)
111 if (find_credit_idx(name) >= 0) {
112 cprintf("\rNickname existiert bereits, dr" uUML "cke RETURN...\r\n");
117 cprintf("\r\nGuthaben in Cents:\r\n");
118 if ((credit = cget_number(0)) == 0)
120 strncpy(credits.credits[credits.num_items].nickname, name, NICKNAME_MAX_LEN);
121 credits.credits[credits.num_items].credit = credit;
124 sprintf(print_buffer, "%c%s - Guthaben mit %d Cent f" uUML "r %s angelegt\r",
125 17, time, credit, name);
131 static void delete_credit(char *nickname) {
133 if ((i = find_credit_idx(nickname)) < 0) {
134 cprintf("\r Nick existiert nicht\r\n");
138 if (i != credits.num_items) {
139 credits.credits[i] = credits.credits[credits.num_items];
141 memset(credits.credits[credits.num_items].nickname, '\0',
142 NICKNAME_MAX_LEN + 1);
143 credits.credits[credits.num_items].credit = 0;
147 void credit_manager() {
148 char nickname[NICKNAME_MAX_LEN + 1];
151 credit_print_screen();
158 cputs("\rName?\r\n");
159 if (cget_nickname(nickname, sizeof(nickname))) {
160 delete_credit(nickname);
167 if (current_credits_page < (credits.num_items / CREDITS_PER_PAGE))
168 current_credits_page++;
171 if (current_credits_page > 0)
172 current_credits_page--;
175 cputs("\rName?\r\n");
176 if (cget_nickname(nickname, sizeof(nickname))) {
177 deposit_credit(nickname);
181 cprintf("Filter eingeben:\r\n");
182 filter = get_input();
183 if (filter == NULL || *filter == PETSCII_SP ||
184 (filter_len = strlen(filter)) == 0)
191 cprintf("Unbekannter Befehl, dr" uUML "cke RETURN...\r\n");