typedef enum {Normal_Display, Main_Menu, Wrong_PIN, Change_PIN, Enter_New_PIN, C onfirm_New_PIN, Start_Motor, Stop_Motor, Change_Direction, TEMP_Vs_RPM, Enter_New_RPM} estates; estates state=Normal_Display; char CODE[]="0123"; char ENT[5]; char ENT1[5]; char ENT2[5]; char ENT3[5]; //char ENT4[5]; char ENT5[5]; char char char char char
n=0; stop; direction; clkd; aclkd;
char keys; char timeout; char index=0; char index1=0; int result=0; char char char char char char char char char char char char char char char char char char char char
MSG1[]="Enter PIN"; MSG2[]="Enter Old PIN"; MSG3[]="Enter New PIN"; MSG4[]="Conform New PIN"; MSG5[]="Wrong PIN"; MSG6[]="MENU"; MSG7[]="1. Change PIN Number"; MSG8[]="2. Stop Motor"; MSG9[]="3. Start Motor"; MSG10[]="4. Change Motor Direction"; MSG11[]="5. TEMP Vs RPM Configuration"; MSG12[]="A. Scroll Up"; MSG13[]="D. Scroll Down"; MSG14[]="#. New RPM"; MSG15[]="*. Normal Display"; MSG16[]="--->"; MSG17[]="Enter New RPM"; MSG18[]="00C"; MSG19[]="2000"; MSG20[]="TEMP RPM";
unsigned int OLD_RPM; extern unsigned int RPM; unsigned int SET_RPM=2000; unsigned int reload=16000; signed int error=0; //Look up table to determine temperature from ADC value char Temp[]={0,1,2,2,3,3,4,4,5,5,6,6,7,7,8,8,9,9,10,10,11,11,12,12,13,13,13,14,1 4,14, 15,15,16,16,17,17,17,18,18,19,19,19,19,20,20,20,21,21,21,22,22,2 2,22,23, 23,23,23,24,24,24,24,25,25,25,25,26,26,26,26,27,27,27,27,28,28,2 8,28,29,
29,29,29,29,30,30,30,30,31,31,31,32,32,32,32,32,33,33,33,33,33,3 4,34,34, 34,34,34,35,35,35,35,35,36,36,36,36,36,36,37,37,37,37,37,38,38,3 8,38,38, 38,39,39,39,39,39,39,40}; char RPM_Value[]={2000,2250,2500,2750,3000,3250,3500,3750,4000,4250,4500,4750, 5000,5250,5500,5750,6000,6250,6500,6750,7000}; char TEMP[]={15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35}; //Main Function void main(void) { Initialise(); TA1MR=0xc0; TA1=1000; TA1IC=0x04; TA2MR=0x01; TA2=0xFFFF; TRGSR=0x00; ADCON0=0x87; ADCON1=0x38; ADCON2=0x05; ADCIC=0x05; TA3MR=0x47; TA3=reload; TA4MR=0x47; TA4=reload; P7D_6=1; P8D_0=1; P7D_5=0;
//Need to setup CPU //f32 clock source timer mode //1sec interrupt interval //event counter //underflow TA0 event on TA1
//16 bit PWM, F8 clock source //Approx 25% duty //16 bit PWM, F8 clock source //Approx 25% duty //output for PWM //output for PWM //TA2in pun input
enable_interrupt(); TABSR_1=1; TABSR_2=1; ADST=1;
//Start Timers //Start ADC
keyscan_4x4_init(); GLCD_Initialise(); GLCD_ClearScreen(); for(;;) { index=994-result; MSG18[0]=Temp[index]/10+48; MSG18[1]=Temp[index]%10+48; MSG19[0]=RPM/1000+48; MSG19[1]=(RPM%1000)/100+48; MSG19[2]=(RPM%100)/10+48; MSG19[3]=(RPM%10)+48; if(Temp[index]>=15&&Temp[index]<=35) { SET_RPM=RPM_Value[Temp[index]-15]; }
if(Temp[index]<15) SET_RPM=2000; if(Temp[index]>35) SET_RPM=7000; if((RPM!=OLD_RPM) (RPM==0)) { OLD_RPM=RPM; error=SET_RPM-RPM; if(error>1000) error=1000; if(error<-1000) error=-1000; reload=reload+error; TA3=reload; TA4=reload; } if(stop) { RPM=0; } else { SET_RPM=RPM_Value[Temp[index]-15]; } switch(state) { case Normal_Display: //Displaying temperature , fanspeed and asking for PIN entry to go into Menu GLCD_GoTo(0,5); GLCD_WriteString(MSG20,Font_Syst em5x8); //displaying TEMP RPM GLCD_GoTo(0,5); GLCD_WriteString(MSG18,Font_Syst em5x8); //displaying 00c GLCD_GoTo(0,5); GLCD_WriteString(MSG19,Font_Syst em5x8); //displaying 0000 GLCD_GoTo(0,5); GLCD_WriteString(MSG1,Font_Syste m5x8); //displaying Enter PIN keys=getcommand(); if(keys!='X') { GLCD_GoTo(8*n,2); GLCD_WriteChar('*',Font_ System5x8); ENT[n]=keys; if(++n>3) { ENT[n]='\0'; if(strcmp(ENT,CO DE)==0) { n=0; GLCD_Cle arScreen(); state=Ma in_Menu;
//go to slection menu state } else {
n=0; GLCD_Wri teString(MSG5,Font_System5x8);
//displaying Enter PIN state=No
rmal_Display; timeout= 3; } } } break; case Main_Menu:
//Displaying menu option
s of the application GLCD_GoTo(0,0); GLCD_WriteString(MSG6,Font_System5x8); GLCD_GoTo(3,1); GLCD_WriteString(MSG7,Font_System5x8); GLCD_GoTo(3,2); GLCD_WriteString(MSG8,Font_System5x8); GLCD_GoTo(3,3); GLCD_WriteString(MSG9,Font_System5x8); GLCD_GoTo(3,4); GLCD_WriteString(MSG10,Font_System5x8); GLCD_GoTo(3,5); GLCD_WriteString(MSG11,Font_System5x8); keys=getcommand(); if(keys!='X') { case '1': state=Change_PIN ; GLCD_ClearScreen (); break; case '2': state=Stop_Motor ; GLCD_ClearScreen (); break; case '3': state=Start_Moto r; GLCD_ClearScreen (); break; case '4': state=Change_Dir ection; GLCD_ClearScreen (); break; case '5': state=TEMP_Vs_RP M; GLCD_ClearScreen ();
break; } break; case Change_PIN:
// GLCD_GoTo(0,0); GLCD_WriteString(MSG7,Font_System5x8); GLCD_GoTo(0,1); GLCD_WriteString(MSG2,Font_System5x8); keys=getcommand(); if(keys!='X') { GLCD_GoTo(8*n,2); GLCD_WriteChar('*',Font_System5x
8); ENT1[n]=keys; if(++n>3) { ENT1[n]='\0'; if(strcmp(ENT1,CODE)==0) { n=0; GLCD_ClearScreen (); state=Enter_New_ PIN;
//go to enter new
pin state } else { n=0; GLCD_WriteString
(MSG5,Font_System5x8);
//displaying Enter PIN state=Normal_Dis
play; timeout=3; } } } break; case Enter_New_PIN:
// GLCD_GoTo(0,0); GLCD_WriteString(MSG7,Font_Syste
m5x8);// display massage change pin GLCD_GoTo(0,1); GLCD_WriteString(MSG02,Font_Syst em5x8);
// display massage enter new pin keys=getcommand(); if(keys!='X') { GLCD_GoTo(8*n,2); GLCD_WriteChar('*',Font_
System5x8); ENT2[n]=keys; if(++n>3) { ENT2[n]='\0'; n=0; GLCD_ClearScreen
(); state=Confirm_Ne w_PIN; } } break; case Confirm_New_PIN: GLCD_GoTo(0,0); GLCD_WriteString(MSG7,Font_Syste m5x8);// display massage change pin GLCD_GoTo(0,1); GLCD_WriteString(MSG03,Font_Syst em5x8);//display verify new pin keys=getcommand(); if(keys!='X') { GLCD_GoTo(8*n,2); GLCD_WriteChar('*',Font_ System5x8); ENT3[n]=keys; if(++n>3) { ENT3[n]='\0'; if(strcmp(ENT3,E NT2)==0) { strcpy(C ODE,ENT3); GLCD_Cle arScreen(); n=0; state=No rmal_Display; timeout= 3; } else { GLCD_Wri teString(MSG5,Font_System5x8); state=No rmal_Display; timeout= 3; n=0; } } } break; case Stop_Motor: stop=1; TABSR_3=0; TABSR_4=0; state=Normal_Display; timeout=3; break; case Start_Motor: stop=0;
clkd=1; TABSR_3=1; TABSR_4=0; direction=cwd; state=Normal_Display; timeout=3; break; case Change_Direction: stop=1; if(RPM==0) { } break; case TEMP_Vs_RPM: index_2=1; GLCD_GoTo(4,0); GLCD_WriteString(MSG20,Font_Syst em5x8); GLCD_GoTo(0,index_2); GLCD_WriteString(MSG16,Font_Syst em5x8); for(index_1=1;index_1<=7;index_1 ++) { MSG18[0]=TEMP[index_1-1] /10+48; MSG18[1]=TEMP[index_1-1] %10+48; GLCD_GoTo(4,index_1); GLCD_WriteString(MSG18,F ont_System5x8); RPM=RPM_Value[index_1-1] ; MSG19[0]=RPM/1000+48; MSG19[1]=(RPM%1000)/100+ 48; MSG19[2]=(RPM%100)/10+48 ; MSG19[3]=(RPM%10)+48; GLCD_GoTo(4,index_1); GLCD_WriteString(MSG19,F ont_System5x8); } keys=getcommand(); switch(keys) { case 'D': GLCD_Cle arScreen(); index_2+ +; if(index _2>20) index_2=0; break; case 'A': GLCD_Cle arScreen();
index_2-; if(index _2<0) index_2=20; break; case '#': n=0; GLCD_Cle arScreen(); state=En ter_New_RPM; break; case '*': n=0; GLCD_Cle arScreen(); state=No rmal_Display; break; } if(index_2>7) { MSG18[0]=TEMP[index_2-in dex_1]/10+48; MSG18[1]=TEMP[index_2-in dex_1]%10+48; GLCD_GoTo(4,index_2-inde x_1); GLCD_WriteString(MSG18,F ont_System5x8); RPM=RPM_Value[index_2-in dex_1]; MSG19[0]=RPM/1000+48; MSG19[1]=(RPM%1000)/100+ 48; MSG19[2]=(RPM%100)/10+48 ; MSG19[3]=(RPM%10)+48; GLCD_GoTo(4,index_1); GLCD_WriteString(MSG19,F ont_System5x8); } break; case Enter_New_RPM: GLCD_GoTo(0,1); GLCD_WriteString(MSG17,Font_Syst em5x8);
//diaplay enter new rpm //GLCD_GoTo(0,7); //GLCD_WriteString(MSG15,Font_Sy
stem5x8); keys=getcommand(); if(keys>='0'&&keys<='9') { GLCD_GoTo(8*n,2); GLCD_WriteChar(keys,Font _System5x8); ENT5[n]=keys; if(++n>3)
{ ENT5[n]='\0'; n=0; RPM=(ENT5[0]-48) *1000+ (ENT5[1]-48)*100 + (ENT5[2]-48)*10+ (ENT5[3]-48); RPM_VALUE[index1 ]=RPM; } } if(keys=='*') { n=0; GLCD_ClearScreen(); state=Normal_Display; timeout=1; } break;
