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 strncmp(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 (strncmp(name, credits.credits[i].nickname, NICKNAME_MAX_LEN + 1) == 0) {
66 struct credits_t *find_credit(char *name) {
68 if ((i = find_credit_idx(name)) >= 0) {
69 return &credits.credits[i];
74 void deposit_credit(char *nickname) {
75 char *time = get_time();
76 struct credits_t *credit;
79 if ((credit = find_credit(nickname)) == NULL)
80 return; // cannot find named credit
82 cprintf("\r\nEinzahlung in Cent:\r\n");
83 if ((deposit = cget_number(0)) == 0)
86 credit->credit += deposit;
89 cprintf("\r\nEinzahlung durchgef" uUML "hrt, dr" uUML "cke RETURN...\r\n");
93 static void new_credit(void) {
94 char name[NICKNAME_MAX_LEN + 1];
98 if (credits.num_items == MAX_CREDIT_ITEMS) {
99 cprintf("\rEs ist bereits die maximale Anzahl an Eintr" aUML
100 "gen erreicht, dr" uUML "cke RETURN...\r\n");
106 cprintf("\rNickname (max. 10 Zeichen):\r\n");
107 if (cgetn_input(name, sizeof(name)) == 0)
110 if (find_credit_idx(name) >= 0) {
111 cprintf("\rNickname existiert bereits, dr" uUML "cke RETURN...\r\n");
116 cprintf("\r\nGuthaben in Cents:\r\n");
117 if ((credit = cget_number(0)) == 0)
119 strncpy(credits.credits[credits.num_items].nickname, name, NICKNAME_MAX_LEN);
120 credits.credits[credits.num_items].credit = credit;
123 sprintf(print_buffer, "%c%s - Guthaben mit %d Cent f" uUML "r %s angelegt\r",
124 17, time, credit, name);
130 static void delete_credit(char *nickname) {
132 if ((i = find_credit_idx(nickname)) < 0) {
133 cprintf("\r Nick existiert nicht\r\n");
137 if (i != credits.num_items) {
138 credits.credits[i] = credits.credits[credits.num_items];
140 memset(credits.credits[credits.num_items].nickname, '\0',
141 NICKNAME_MAX_LEN + 1);
142 credits.credits[credits.num_items].credit = 0;
146 void credit_manager() {
147 char nickname[NICKNAME_MAX_LEN + 1];
150 credit_print_screen();
157 cputs("\rName?\r\n");
158 if (cget_nickname(nickname, sizeof(nickname))) {
159 delete_credit(nickname);
166 if (current_credits_page < (credits.num_items / CREDITS_PER_PAGE))
167 current_credits_page++;
170 if (current_credits_page > 0)
171 current_credits_page--;
174 cputs("\rName?\r\n");
175 if (cget_nickname(nickname, sizeof(nickname))) {
176 deposit_credit(nickname);
180 cprintf("Filter eingeben:\r\n");
181 filter = get_input();
182 if (filter == NULL || *filter == PETSCII_SP ||
183 (filter_len = strlen(filter)) == 0)
190 cprintf("Unbekannter Befehl, dr" uUML "cke RETURN...\r\n");