<Comment>;********************************************************************</Comment><br/>
<Comment>;* LED flasher: LED will flash with a X on/off ratio at PD6</Comment><br/>
<Comment>;*</Comment><br/>
<Comment>;* NOTE: delay depends in the value of X, 1 is fast, 255 is slow</Comment><br/>
<Comment>;*</Comment><br/>
<Comment>;* No copyright ©1998 RES® * FREEWARE *</Comment><br/>
<Comment>;*</Comment><br/>
<Comment>;* NOTE: Connect a low current LED with a 1k resistor in serie from </Comment><br/>
<Comment>;*	 Vdd to pin 11 of the MCU. (Or a normal LED with a 330ohm)</Comment><br/>
<Comment>;*									   </Comment><br/>
<Comment>;* RES® can be reached by email: digitalaudio@mail.com		   </Comment><br/>
<Comment>;* or visit the website: http://home.wanadoo.nl/electro1/avr</Comment><br/>
<Comment>;*</Comment><br/>
<Comment>;* Version           :1.0 					   </Comment><br/>
<Comment>;* Date		     :12/26/98</Comment><br/>
<Comment>;* Author	     :Rob's ElectroSoft®</Comment><br/>
<Comment>;* Target MCU        :AT90S1200-12PI@4MHz					   </Comment><br/>
<Comment>;********************************************************************</Comment><br/>
<dsNormal></dsNormal><br/>
<Normal Text>.include </Normal Text><String>"1200def.inc"</String><br/>
<dsNormal></dsNormal><br/>
<Normal Text>	</Normal Text><Keyword>rjmp</Keyword><Normal Text>	RESET		</Normal Text><Comment>;reset handle</Comment><br/>
<dsNormal></dsNormal><br/>
<dsNormal></dsNormal><br/>
<Comment>;* Long delay </Comment><br/>
<dsNormal></dsNormal><br/>
<Comment>;* Register variables</Comment><br/>
<dsNormal></dsNormal><br/>
<Normal Text>	.def  T1      </Normal Text><Symbol>=</Symbol><Normal Text> r1</Normal Text><br/>
<Normal Text>	.def  T2      </Normal Text><Symbol>=</Symbol><Normal Text> r2</Normal Text><br/>
<Normal Text>	.def  temp    </Normal Text><Symbol>=</Symbol><Normal Text> r19</Normal Text><br/>
<dsNormal></dsNormal><br/>
<Comment>;* Code</Comment><br/>
<Normal Text>	    </Normal Text><br/>
<Label>longDelay:</Label><Normal Text>      </Normal Text><br/>
<Normal Text>	</Normal Text><Keyword>clr</Keyword><Normal Text>   T1		</Normal Text><Comment>;T1 used as delay 2nd count</Comment><br/>
<Normal Text>	</Normal Text><Keyword>clr</Keyword><Normal Text>   T2		</Normal Text><Comment>;T2 used as delay 3d count</Comment><br/>
<Label>delay_1:</Label><Normal Text>    </Normal Text><br/>
<Normal Text>	</Normal Text><Keyword>dec</Keyword><Normal Text>   T2</Normal Text><br/>
<Normal Text>	</Normal Text><Keyword>brne</Keyword><Normal Text>  delay_1            </Normal Text><br/>
<Normal Text>	</Normal Text><Keyword>dec</Keyword><Normal Text>   T1</Normal Text><br/>
<Normal Text>	</Normal Text><Keyword>brne</Keyword><Normal Text>  delay_1           </Normal Text><br/>
<Normal Text>	</Normal Text><Keyword>dec</Keyword><Normal Text>   temp		</Normal Text><Comment>;temp must be preset as </Comment><br/>
<Normal Text>	</Normal Text><Keyword>brne</Keyword><Normal Text>  delay_1		</Normal Text><Comment>; delay master count</Comment><br/>
<Normal Text>	</Normal Text><Keyword>ret</Keyword><Normal Text>                     </Normal Text><br/>
<dsNormal></dsNormal><br/>
<dsNormal></dsNormal><br/>
<Comment>;* Resets the data direction register D</Comment><br/>
<dsNormal></dsNormal><br/>
<Comment>;* Defines</Comment><br/>
<dsNormal></dsNormal><br/>
<Normal Text>	.equ  led   </Normal Text><Symbol>=</Symbol><Normal Text> </Normal Text><Decimal>6</Decimal><Normal Text>		</Normal Text><Comment>;LED at PD6</Comment><br/>
<dsNormal></dsNormal><br/>
<Comment>;* Code</Comment><br/>
<dsNormal></dsNormal><br/>
<Label>RESET:</Label><br/>
<Normal Text>	</Normal Text><Keyword>sbi</Keyword><Normal Text>   DDRD</Normal Text><Symbol>,</Symbol><Normal Text> led		</Normal Text><Comment>;connect LED to PORTD pin 6</Comment><br/>
<Normal Text>	    </Normal Text><br/>
<dsNormal></dsNormal><br/>
<Comment>;* Main program</Comment><br/>
<dsNormal></dsNormal><br/>
<Comment>;* This part will let the LED go on and off by X</Comment><br/>
<dsNormal></dsNormal><br/>
<Comment>;* Register variables</Comment><br/>
<dsNormal></dsNormal><br/>
<Normal Text>	.equ  X   </Normal Text><Symbol>=</Symbol><Normal Text>  </Normal Text><Decimal>10</Decimal><Normal Text> 	</Normal Text><Comment>;enter delaytime X</Comment><br/>
<dsNormal></dsNormal><br/>
<Label>flash:</Label><Normal Text> </Normal Text><br/>
<Normal Text>	</Normal Text><Keyword>sbi</Keyword><Normal Text>   PORTD</Normal Text><Symbol>,</Symbol><Normal Text> led	</Normal Text><Comment>;LED on</Comment><br/>
<Normal Text>	</Normal Text><Keyword>ldi</Keyword><Normal Text>   temp</Normal Text><Symbol>,</Symbol><Normal Text> X		</Normal Text><Comment>;X sec delay           </Comment><br/>
<Normal Text>	</Normal Text><Keyword>rcall</Keyword><Normal Text> longDelay             </Normal Text><br/>
<Normal Text>	</Normal Text><Keyword>cbi</Keyword><Normal Text>   PORTD</Normal Text><Symbol>,</Symbol><Normal Text> led	</Normal Text><Comment>;LED off            </Comment><br/>
<Normal Text>	</Normal Text><Keyword>ldi</Keyword><Normal Text>   temp</Normal Text><Symbol>,</Symbol><Normal Text> X		</Normal Text><Comment>;X sec delay</Comment><br/>
<Normal Text>	</Normal Text><Keyword>rcall</Keyword><Normal Text> longDelay</Normal Text><br/>
<Normal Text>	</Normal Text><Keyword>rjmp</Keyword><Normal Text>  flash		</Normal Text><Comment>;another run</Comment><br/>
