Tyto stránky již nejsou udržovány. Obsah je postupně přesouván/aktualizován na adrese chytrosti.marrek.cz.
4/4
Na této stránce jsou k dispozici zdrojové soubory, které jsem vytvářel při výkladu během výuky. Nejsou to ukázkové a bezchybné zdrojové soubory. Ba naopak, jsou to pracovní neučesané verze, které vznikaly interaktivně ve výuce, často s cílem ukázat, že "takto se to nemá".
1 ; Program pro generování náhodného čísla 1 až 6
2 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
3
4 ; počáteční nastavení
5 mov R0, #2
6
7
8 ; havní programová smyčka
9 zac:
10 JNB P1.0 , stisknuto ; skočí pokud tlačítko je stiknuté
11 jmp nestisknuto
12
13 stisknuto:
14 call cykluj
15 mov P2, #0FFH
16 jmp zac
17
18 nestisknuto:
19 call zobrazuj
20 jmp zac
21
22
23
24 zobrazuj:
25 mov DPTR, #segment
26 mov A,R0
27 movc A,@A+DPTR
28 mov P2, A
29 RET
30
31 cykluj:
32
33 RET
34
35 segment:
36 db 11000000b ; 0
37 db 11111001b ; 1
38 db 10100100b ; 2
39 db 10110000b ; 3
40 db 10011001b ; 4
41 db 10010010b ; 5
42 db 10000010b ; 6
43 db 11111000b ; 7
44 db 10000000b ; 8
45 db 10010000b ; 9
46
47
48 END