Kod: Zaznacz cały
odbior:
home
shift command , left , 3
incr wysylanie
select case wysylanie
case 5:
sonysend &HA91 ' Power 1010 1001 0001
case 10:
sonysend &H4D1 'Play 0100 1101 0001
case 15:
sonysend &H1D1 'Stop 0001 1101 0001
case 20:
sonysend &H9D1 'Pause 1001 1101 0001
case 30:
sonysend &HB91 'Continue 1011 1001 0001
case 35:
sonysend &HAD1 'Shuffle 1010 1101 0001
case 40:
sonysend &HF91 'Program 1111 1001 0001
case 45:
sonysend &H531 'Disc 0101 0011 0001
case 50:
sonysend &H011 '1 0000 0001 0001
case 55:
sonysend &H811 '2 1000 0001 0001
case 60:
sonysend &H411 '3 0100 0001 0001
case 65:
sonysend &HC11 '4 1100 0001 0001
case 70:
sonysend &H211 '5 0010 0001 0001
case 75:
sonysend &HA11 '6 1010 0001 0001
case 80:
sonysend &H611 '7 0110 0001 0001
case 85:
sonysend &HE11 '8 1110 0001 0001
case 90:
sonysend &H111 '9 0001 0001 0001
case 95:
sonysend &H051 '0 0000 0101 0001
case 100:
sonysend &HE51 '>10 1110 0101 0001
case 105:
sonysend &HD11 'Enter 1101 0001 0001
case 110:
sonysend &HF11 'Clear 1111 0001 0001
case 115:
sonysend &H351 'Repeat 0011 0101 0001
case 120:
sonysend &HBD1 'Disc - 1011 1101 0001
case 125:
sonysend &H7D1 'Disc + 0111 1101 0001
case 130:
sonysend &H0D1 '|<< 0000 1101 0001
case 135:
sonysend &H8D1 '>>| 1000 1101 0001
case 140:
sonysend &HCD1 '<< 1100 1101 0001
case 145:
sonysend &H2D1 '>> 0010 1101 0001
end select
return
1 - rozmiar wykorzystywanej pamięci przy takim kodzie to aż 235% procka
2 - wywala masę błędów o nazwie duplitate label sonysend w liniach select case
możecie mi wyjaśnić ocb? przed select case jest tylko deklaracja zmiennych:
- address
- command
- wysylanie
jako zmienne typu byte.