ORG 0000H
SETB P0.0 
CLR P2.0 
AGAIN:JNB P0.0 ,NEXT
SETB P2.0
SJMP AGAIN
NEXT:CLR P2.0 
SJMP AGAIN
END