Gast
#138126
$NOMOD51 $include (reg517.inc) mov P3 , #00h mov dptr, #tabelle start: jb P3.0, pruefe ljmp start pruefe: inc a cjne a, #60d, start jb P3.0, weckzeit ljmp start weckzeit: jb P3.1, pruefe2 ljmp start pruefe2: inc r1 cjne r1, #60d, weckzeit jb P3.1, erhoehe ljmp weckzeit erhoehe: mov a,r2 inc a mov r2,a movc a, @a+dptr mov p1, #00001110b mov p2,a ljmp weckzeit tabelle: db 3fh,06h,5bh,4fh,66h,6dh,7dh,07h,7fh,6fh END