#include <REGX51.

H>

sbit rs=P3^2;

sbit rw=P3^3;

sbit en=P3^4;

sfr datas=0xA0;

void lcdinit(void);

void lcdcmd(unsigned char );

void delay(unsigned int del);

void lcddata(unsigned char ldat);

void del1();

void sms1();

void sendd();

void INITLCD()

lcdinit();

void COMMAND(unsigned char val)

{
 lcdcmd(val);

void DISPLAY(unsigned char val)

lcddata(val);

void lcdinit(void)

lcdcmd(0x38);

lcdcmd(0x38);

lcdcmd(0x38);

lcdcmd(0x06);

lcdcmd(0x0e);

lcdcmd(0x01);

lcdcmd(0x0C);

lcdcmd(0x80);

void lcdcmd(unsigned char lcmd)

datas=lcmd;

rs=0;

rw=0;

en=1;
 delay(100);

en=0;

void delay(unsigned int del)

while(del--);

void lcddata(unsigned char ldat)

datas=ldat;

rs=1;

rw=0;

en=1;

delay(100);

en=0;

char flags=0;

char flagt=0;

char kval=0;

char flagr=0;
char flagtick=0;

void disp(unsigned char dat)

DISPLAY(dat);

void putchar(unsigned char val[16],char len)

char i;

for(i=0;i<len;i++)

disp(val[i]);

void txs(unsigned char val)

int i;

TI=0;

SBUF=val;
 for(i=0;i<600;i++);

//while(TI==0);

unsigned char val[13],value,ct,fg,i=0,j;

int ps;

void serint() interrupt 4 using 1

if(RI==1)

val[j]=SBUF;

j++;

RI=0;

else

TI=0;

void delay()

{
 long i;

for(i=0;i<100000;i++);

unsigned char fl1,fl2,fl3,fl4,kf;

char ff,gg;

int vv=500;

void main()

unsigned int am=0;

SCON=0x50;

TMOD=0x20;

TH1=0xfd;

TR1=1;

EA=1;

ES=1;

INITLCD();

P2=255;

P1=255;

P3=255;

txs('A');

lcdcmd(0x80);

putchar("SHOPPING SYSTEM ",16);

while(1)
 {

if(P0_0==0)

kf=1;

lcdcmd(0x8F);

lcddata(val[10]);

if(P0_1==0)

txs('W');

ff=1;

if(ff==1)

if(P0_2==0)

gg=1;

txs('X');

}
if(P0_3==0)

if(gg==1)

txs('Y');

gg=2;

if(P0_4==0)

if(gg==2)

txs('Z');

gg=3;

lcdcmd(0x80);

putchar("Balance:",8);

vv=vv-am;

lcddata((vv)/1000+0x30);

lcddata((vv%1000)/100+0x30);

lcddata((vv%100)/10+0x30);

lcddata((vv%10)+0x30);

lcdcmd(0xC0);

putchar("Transaction Over",16);
 while(1);

if(j>=11)

lcdcmd(0xC0);

lcddata('I');

lcddata(':');

lcdcmd(0xC4);

putchar("Cost:",5);

lcdcmd(0xCF);

lcddata(val[7]);

if(kf==1)

if(fl1==1)

if(val[10]=='0')

{
lcdcmd(0xC2);

lcddata('1');

lcdcmd(0xC9);

lcddata('1');

lcddata('0');

lcddata('0');

am=am-100;

fl1=2;

txs('B');

txs('1');

txs('B');

txs('1');

txs('B');

txs('1');

txs('B');

txs('1');

txs('B');

txs('1');

txs('B');

txs('1');

txs('B');

txs('1');

txs('B');

txs('1');
txs('B');

txs('1');

if(fl2==1)

if(val[10]=='A')

lcdcmd(0xC2);

lcddata('2');

lcdcmd(0xC9);

lcddata('0');

lcddata('5');

lcddata('0');

am=am-50;

fl2=2;

txs('B');

txs('2');

txs('B');

txs('2');

txs('B');

txs('2');

txs('B');

txs('2');

txs('B');

txs('2');
txs('B');

txs('2');

txs('B');

txs('2');

txs('B');

txs('2');

txs('B');

txs('2');

txs('B');

txs('2');

txs('B');

txs('2');

if(fl3==1)

if(val[10]=='4')

lcdcmd(0xC2);

lcddata('3');

lcdcmd(0xC9);

lcddata('0');

lcddata('7');

lcddata('5');

am=am-75;

fl3=2;

txs('B');
txs('3');

txs('B');

txs('3');

txs('B');

txs('3');

txs('B');

txs('3');

txs('B');

txs('3');

txs('B');

txs('3');

txs('B');

txs('3');

txs('B');

txs('3');

txs('B');

txs('3');

txs('B');

txs('3');

txs('B');

txs('3');

if(fl4==1)

if(val[10]=='8')
 {

lcdcmd(0xC2);

lcddata('4');

lcdcmd(0xC9);

lcddata('2');

lcddata('0');

lcddata('0');

am=am-200;

fl4=2;

txs('B');

txs('4');

txs('B');

txs('4');

txs('B');

txs('4');

txs('B');

txs('4');

txs('B');

txs('4');

txs('B');

txs('4');

txs('B');

txs('4');

txs('B');

txs('4');
txs('B');

txs('4');

txs('B');

txs('4');

txs('B');

txs('4');

kf=0;

if(fl1==0)

if(val[10]=='0')

lcdcmd(0xC2);

lcddata('1');

lcdcmd(0xC9);

lcddata('1');

lcddata('0');

lcddata('0');

am=am+100;

fl1=1;

txs('I');

txs('1');
txs('I');

txs('1');

txs('I');

txs('1');

txs('I');

txs('1');

txs('I');

txs('1');

txs('I');

txs('1');

txs('I');

txs('1');

txs('I');

txs('1');

txs('I');

txs('1');

if(fl2==0)

if(val[10]=='A')

lcdcmd(0xC2);

lcddata('2');

lcdcmd(0xC9);

lcddata('0');
lcddata('5');

lcddata('0');

am=am+50;

fl2=1;

txs('I');

txs('2');

txs('I');

txs('2');

txs('I');

txs('2');

txs('I');

txs('2');

txs('I');

txs('2');

txs('I');

txs('2');

txs('I');

txs('2');

txs('I');

txs('2');

txs('I');

txs('2');

txs('I');

txs('2');
lcdcmd(0x80);

putchar("Expired Product ",16);

P1_1=0;

delay();

P1_1=1;

lcdcmd(0x80);

putchar(" ",16);

if(fl3==0)

if(val[10]=='4')

lcdcmd(0xC2);

lcddata('3');

lcdcmd(0xC9);

lcddata('0');

lcddata('7');

lcddata('5');

am=am+75;

fl3=1;

txs('I');

txs('3');

txs('I');

txs('3');

txs('I');
txs('3');

txs('I');

txs('3');

txs('I');

txs('3');

txs('I');

txs('3');

txs('I');

txs('3');

txs('I');

txs('3');

txs('I');

txs('3');

txs('I');

txs('3');

lcdcmd(0x80);

putchar("Buy 1 Get 1 Free ",16);

P1_0=0;

delay();

P1_0=1;

lcdcmd(0x80);

putchar(" ",16);

if(fl4==0)
if(val[10]=='8')

lcdcmd(0xC2);

lcddata('4');

lcdcmd(0xC9);

lcddata('2');

lcddata('0');

lcddata('0');

am=am+200;

fl4=1;

txs('I');

txs('4');

txs('I');

txs('4');

txs('I');

txs('4');

txs('I');

txs('4');

txs('I');

txs('4');

txs('I');

txs('4');

txs('I');

txs('4');

txs('I');
txs('4');

txs('I');

txs('4');

txs('I');

txs('4');

j=0;

lcdcmd(0x80);

putchar("Amount: ",16);

lcdcmd(0x88);

lcddata((am)/1000+0x30);

lcddata((am%1000)/100+0x30);

lcddata((am%100)/10+0x30);

lcddata((am%10)+0x30);

txs('A');

txs((am)/1000+0x30);

txs((am%1000)/100+0x30);

txs((am%100)/10+0x30);

txs((am%10)+0x30);

}
}