+#if 1
+ /*
+ * User interface
+ */
+ if(state == 0) {
+ /* Display temperature */
+ if(ktok) {
+ ktok = 0;
+ if((tempk >= 273) && (tempk <= 372)) {
+ display(tempk - 273);
+ } else {
+ dsp[0] = dsp[1] = SEGG;
+ }
+ }
+ if(pval != 0)
+ state = 1;
+ if(sstate == 2) {
+ sstate = 0;
+ if(stime > 10)
+ state = 2;
+ else
+ run = !run;
+ }
+ if(run)
+ dsp[1] |= SEGP;
+ else
+ dsp[1] &= ~SEGP;
+ } else if(state == 1) {
+ /* Temp setting */
+ if(pval != 0) {
+ cur += pval;
+ pval = 0;
+ if(cur < 0)
+ cur = 0;
+ if(cur > 100)
+ cur = 100;
+ if(cur < 100)
+ display(cur);
+ else
+ dsp[0] = dsp[1] = SEGG;
+ utime = mnow;
+ }
+ if(mnow - utime > 1000000)
+ state = 0;
+ if(sstate == 2) {
+ run = !run;
+ sstate = 0;
+ }
+ } else if(state == 2) {
+ /* Display raw temp time reading */
+ if(ttimea < 20000) {
+ display((ttimea / 100) % 100);
+ dsp[0] |= SEGP;
+ if(ttimea >= 10000)
+ dsp[1] |= SEGP;
+ } else {
+ display(ttimea / 1000);
+ }
+ if(sstate == 2) {
+ state = 0;
+ sstate = 0;
+ }
+ }
+ /*
+ * Set Triac to match temperature
+ */
+ if(run) {
+ if(tempk - 273 < cur) {
+ tron = 1;
+ if(cur - (tempk - 273) > 5) {
+ /* For some reason, the Triac currently doesn't
+ * trigger on one of the AC half-cycles below 0.7
+ * ms. */
+ trdelay = 7;
+ } else if(cur - (tempk - 273) >= 3) {
+ trdelay = 20;
+ } else if(cur - (tempk - 273) >= 2) {
+ trdelay = 40;
+ } else {
+ trdelay = 70;
+ }
+ } else {
+ tron = 0;
+ }
+ } else {
+ tron = 0;
+ }
+#endif