(voir Avec l'appli CalcUtil, rajoute l'assembleur à ta 82 Advanced )
m'a donné envie de retourner sur ma TI-82 Advanced :
j'ai donc fait mu-muse avec cette LED en assembleur...

Pour les curieux, voici le code-source:
- Code asm-z80 : Select all
.db $bb,$6d
.org $9d95
xor a
;fin d'entête ION
start:
di
ld d,$03 ;orange
call LED_50
call TEMPO
ld d,$02 ;vert
call LED_50
call TEMPO
ld d,$01 ;rouge
call LED_50
call TEMPO
ei
ret
LED_50:
ld hl,5555
ld c,0
ld1:
xor a,a
out (c),d ;ON
out (0),a ;OFF
ld b,33
ld2:
djnz ld2
dec hl
ld a,h
or a,l
jr nz,ld1
out (c),d
ret
TEMPO:
ld hl,999
tp1:
dec hl
tp2:
djnz tp2
ld a,h
or a,l
jr nz,tp1
ret
archives_voir.php?id=2638940
Vous remarquerez l'entête "ION" nécessaire pour que CalcUtil puisse le lancer
