[HWnews] program pro PIC

[circle@centrum.cz]

Mohu se tedy zeptat, jak upravit prilozeny program?? Jde mi pro zacatek o to, abych rozsvitil led pripojenou na portA.
Dikuji mockrat JK

______________________________________________________________
> Od: "Danhard" <danhard@volny.cz>
> Komu: "[HWnews]" <hw-list@mailman.nethouse.cz>
> CC: 
> Datum: Thu, 1 Apr 2004 00:51:26 +0200
> Předmět: Re: RE:[HWnews] program pro PIC
>
> Nojo, ale i osetrovani veci, ktere jsou uz osetreny resetem (viz tabulka
> registru) nema az tak prakticky vyznam, pokud neni mozne se do te startovaci
> rutiny dostat i jinak (coz je treba pri "preteceni" program citace).
> Takze je zapotrebi osetrit i konec programu (coz ten mladenec nema), jinak
> dela procesor NOPy, resp. ADDLW 0xff az se zase dostane k nejakemu "zradlu".
> PIC zastavit neumi :o)
> 
> Danhard




------------- další část ---------------
 LIST P=16F627, R=DEC			; direktivy prekladace
 include "p16f627.inc"			; definice nazvu registru
 errorlevel -302;
 __CONFIG H'3F12'

#DEFINE	LED	PORTA,1			; priradi vyvodu 17 nazev LED
	ORG	0x0
	GOTO	start			; skoci na zacatek programu

start
	movlw	0x07			; zapise do w hodnotu 7 
	movwf	CMCON			; vypne komparatory
	clrf PORTB			; vynuluje port B
	clrf PORTA			; vynuluje port A		
	BSF	STATUS,RP0		; prepne do banky 1
	MOVLW	B'00000000'		; ulozi do registru w tuto hodnotu
	MOVWF	TRISA			; nastavi vsechny porty jako vystupni
	BCF	STATUS,RP0		; prepne do banky 0
	BSF	LED
	END