segdisplay:
         mov dptr,#lookup              
         ANL A,#0x0F                     ; ADDED to clear upper nibble before used to index
         movc a,@a+dptr
         cpl a
         mov p1,a
         call delay1ms
         mov p1,#0ffh
         ret