Автомат, адаптивный автомат ... разум
aliens » 13 фев 2005, 03:22
Вот сегодня написал, вроде работает. Прогонял в студии-повторы были редко
Код:
- Код: Выделить всё
.include "m8def.inc"
.def itog = r16
.def mnogitel = r17
.def summa = r18
.equ mn = 3
.equ prib = 5
rjmp Reset
RESET:
ldi r16,0x01
ldi mnogitel,mn
ldi summa,prib
START:
mul itog,mnogitel
mov itog,r0
add itog,summa
rjmp Start
Работает только с мегами
-
aliens
-
- Сообщения: 171
- Зарегистрирован: 26 окт 2004, 14:16
- Откуда: Севастополь сити...
-
Вернуться в Алгоритмы
Кто сейчас на конференции
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 6