aboutsummaryrefslogtreecommitdiffstats
path: root/hexcalc.c
diff options
context:
space:
mode:
Diffstat (limited to 'hexcalc.c')
-rw-r--r--hexcalc.c185
1 files changed, 185 insertions, 0 deletions
diff --git a/hexcalc.c b/hexcalc.c
new file mode 100644
index 0000000..18bd2fd
--- /dev/null
+++ b/hexcalc.c
@@ -0,0 +1,185 @@
+#include <stdio.h>
+#include <stdlib.h>
+#include "hexcalc.h"
+#include <ncurses.h>
+#include "output.h"
+#include "input.h"
+typedef enum {FIELDHEX,FIELDDEC,FIELDBIN} eFields;
+
+void hexcalc(tOutput* output,thHexCalc* hHexCalc)
+{
+ tInt16 offsx;
+ tInt16 offsy;
+ tInt64 akkumulator=0;
+ int i;
+ int j;
+ int cursorline=-1;
+ tInt16 ch=0;
+ tUInt64 x;
+ tUInt64 newval=0;
+ tUInt8 dig=0;
+ tUInt64 g=10;
+ tBool neg=0;
+ eFields field=FIELDHEX;
+
+// hHexCalc->valuenum=0;
+ if (hHexCalc->operators[0]==0) hHexCalc->operators[0]='=';
+
+ offsx=COLS/2-40;
+ offsy=LINES/2-10;
+ drawframe(output,offsy,offsx,21,79,"HexCalc");
+
+ setcolor(output,COLOR_BRACKETS);
+ for (i=0;i<17;i++)
+ {
+ mvwprintw(output->win,offsy+2+i,offsx+2,"[ ] [ ] [ ]");
+ }
+ setcolor(output,COLOR_MENUNORMAL);
+ mvwprintw(output->win,offsy+20,offsx+ 2,":Add");
+ mvwprintw(output->win,offsy+20,offsx+ 8,":Sub");
+ mvwprintw(output->win,offsy+20,offsx+14,":Mul");
+ mvwprintw(output->win,offsy+20,offsx+20,":Div");
+ mvwprintw(output->win,offsy+20,offsx+26,":Mod");
+ mvwprintw(output->win,offsy+20,offsx+32,">:Right");
+ mvwprintw(output->win,offsy+20,offsx+41,"<:Left");
+ mvwprintw(output->win,offsy+20,offsx+49,":And");
+ mvwprintw(output->win,offsy+20,offsx+55,":Or");
+ mvwprintw(output->win,offsy+20,offsx+61,":Xor");
+
+ mvwprintw(output->win,offsy+20,offsx+74,"Exit");
+
+ setcolor(output,COLOR_MENUHOTKEY);
+ mvwprintw(output->win,offsy+20,offsx+ 1,"+");
+ mvwprintw(output->win,offsy+20,offsx+ 7,"-");
+ mvwprintw(output->win,offsy+20,offsx+13,"*");
+ mvwprintw(output->win,offsy+20,offsx+19,"/");
+ mvwprintw(output->win,offsy+20,offsx+25,"%%");
+ mvwprintw(output->win,offsy+20,offsx+31,">");
+ mvwprintw(output->win,offsy+20,offsx+40,"<");
+ mvwprintw(output->win,offsy+20,offsx+48,"&");
+ mvwprintw(output->win,offsy+20,offsx+54,"|");
+ mvwprintw(output->win,offsy+20,offsx+60,"^");
+ mvwprintw(output->win,offsy+20,offsx+75,"x");
+
+
+ setcolor(output,COLOR_TEXT);
+ mvwprintw(output->win,offsy+1,offsx+ 3,"Hex");
+ mvwprintw(output->win,offsy+1,offsx+22,"Dec");
+ mvwprintw(output->win,offsy+1,offsx+45,"Bin");
+ while (ch!='x' && ch!='X')
+ {
+ setcolor(output,COLOR_TEXT);
+ mvwprintw(output->win,offsy+19,offsx+ 1,"%c",hHexCalc->operators[0]);
+ for (i=0;i<17 && i<hHexCalc->valuenum;i++)
+ {
+ setcolor(output,COLOR_TEXT);
+ mvwprintw(output->win,offsy+18-i,offsx+ 1,"%c",hHexCalc->operators[i+1]);
+ x=hHexCalc->values[i];
+ setcolor(output,(field==FIELDHEX && cursorline==i)?COLOR_INPUT:COLOR_TEXT);
+ mvwprintw(output->win,offsy+18-i,offsx+ 3,"%16llx",x);
+ setcolor(output,(field==FIELDDEC && cursorline==i)?COLOR_INPUT:COLOR_TEXT);
+ mvwprintw(output->win,offsy+18-i,offsx+22,"%20lli",(tInt64)x);
+ setcolor(output,(field==FIELDBIN && cursorline==i)?COLOR_INPUT:COLOR_TEXT);
+ for (j=0;j<32;j++)
+ {
+ if (x || !j) mvwprintw(output->win,offsy+18-i,offsx+76-j,"%i",(x&1));
+ else mvwprintw(output->win,offsy+18-i,offsx+76-j," ");
+ x>>=1;
+ }
+ }
+ if (cursorline==-1) x=newval; else x=hHexCalc->values[cursorline];
+ setcolor(output,(field==FIELDHEX && cursorline==-1)?COLOR_INPUT:COLOR_TEXT);
+ mvwprintw(output->win,offsy+19,offsx+ 3,"%16llx",x);
+ setcolor(output,(field==FIELDDEC && cursorline==-1)?COLOR_INPUT:COLOR_TEXT);
+ if (x || !neg) mvwprintw(output->win,offsy+19,offsx+22,"%20lli",(tInt64)x);
+ else if (neg) mvwprintw(output->win,offsy+19,offsx+22," -");
+ setcolor(output,(field==FIELDBIN && cursorline==-1)?COLOR_INPUT:COLOR_TEXT);
+ for (j=0;j<32;j++)
+ {
+ if (x || !j) mvwprintw(output->win,offsy+19,offsx+76-j,"%i",(x&1));
+ else mvwprintw(output->win,offsy+19,offsx+76-j," ");
+ x>>=1;
+ }
+ ch=getkey((tKeyTab*)output->pKeyTab,1);
+ switch (ch)
+ {
+ case KEYUP: if (cursorline<(hHexCalc->valuenum-1)) cursorline++;break;
+ case KEYDOWN: if (cursorline>-1) cursorline--;break;
+ case KEYLEFT: if (field!=FIELDHEX) field--;break;
+ case KEYRIGHT: if (field!=FIELDBIN) field++;break;
+ case KEYTAB: field=(field!=FIELDBIN)?field+1:FIELDHEX;break;
+ case '+':
+ case '-':
+ case '*':
+ case '/':
+ case '%':
+ case '&':
+ case '|':
+ case '^':
+ case '>':
+ case '<':
+ case KEYENTER:
+
+ if (cursorline!=-1) newval=hHexCalc->values[cursorline];
+ cursorline=-1;
+ if (hHexCalc->valuenum)
+ {
+ switch(hHexCalc->operators[0])
+ {
+ case '=': akkumulator=newval;break;
+ case '+': akkumulator=akkumulator+newval;break;
+ case '-': akkumulator=akkumulator-newval;break;
+ case '*': akkumulator=akkumulator*newval;break;
+ case '/': akkumulator=akkumulator/newval;break;
+ case '%': akkumulator=akkumulator%newval;break;
+ case '&': akkumulator=akkumulator&newval;break;
+ case '|': akkumulator=akkumulator|newval;break;
+ case '^': akkumulator=akkumulator^newval;break;
+ case '>': akkumulator=akkumulator>>newval;break;
+ case '<': akkumulator=akkumulator<<newval;break;
+ }
+ }
+ else
+ {
+ akkumulator=newval;
+ }
+ if (ch==KEYENTER) ch='=';
+ if (cursorline!=-1) newval=hHexCalc->values[cursorline];
+ for (i=31;i>0;i--)
+ {
+ hHexCalc->values[i]=hHexCalc->values[i-1];
+ hHexCalc->operators[i]=hHexCalc->operators[i-1];
+ }
+ hHexCalc->operators[0]=ch;
+ hHexCalc->values[0]=newval;
+ if (ch=='=') newval=akkumulator; else newval=0;
+ hHexCalc->valuenum++;
+ break;
+
+
+ default:
+ if (cursorline!=-1) cursorline=-1;
+ dig=17;
+ if (field==FIELDBIN) g=2;
+ else if (field==FIELDDEC) g=10;
+ else if (field==FIELDHEX) g=16;
+
+ if (ch>='a' && ch<='f') ch-=32;
+ if (field==FIELDBIN && ch>='0' && ch<='1') dig=(ch-'0');
+ else if (field==FIELDDEC && ch>='0' && ch<='9') dig=(ch-'0');
+ else if (field==FIELDHEX && ch>='0' && ch<='9') dig=(ch-'0');
+ else if (field==FIELDHEX && ch>='A' && ch<='F') dig=(ch-'A'+10);
+ else if (field==FIELDDEC && ch=='-') neg=1;
+ if (ch==KEYBACKSPACE)
+ {
+ if (newval) newval=newval/g;
+ else neg=0;
+ } else if (dig!=17) {
+ newval=newval*g;
+ newval=newval+(neg?-dig:dig);
+ }
+ break;
+ }
+ }
+}
+
generated by cgit v1.2.3 (git 2.25.1) at 2024-12-12 13:05:05 +0000