'You must have the d$ with the value of the charicter that you want 'to cut up. After it ends, c has new value. 2 c=0 if mid$(d$,1,1)="1" then c=c+128 if mid$(d$,2,1)="1" then c=c+64 if mid$(d$,3,1)="1" then c=c+32 if mid$(d$,4,1)="1" then c=c+16 if mid$(d$,5,1)="1" then c=c+8 if mid$(d$,6,1)="1" then c=c+4 if mid$(d$,7,1)="1" then c=c+2 if mid$(d$,8,1)="1" then c=c+1 d$="" return