; tón 1kHz zac: MOV P0,#0FFH CALL zpozdeni MOV P0,#000H CALL zpozdeni JMP zac zpozdeni: MOV R1,#248D traktor: DJNZ R1, traktor nop RET END