├── eec-iv
    ├── .gitignore
    ├── resources
    │   ├── EECIVParameters.csv
    │   └── EECIVFaults.csv
    ├── .settings
    │   ├── org.eclipse.m2e.core.prefs
    │   └── org.eclipse.jdt.core.prefs
    ├── src
    │   └── babroval
    │   │   └── eec_iv
    │   │       ├── dao
    │   │           ├── Dao.java
    │   │           ├── FaultDaoImpl.java
    │   │           └── ParameterDaoImpl.java
    │   │       ├── service
    │   │           ├── Service.java
    │   │           ├── FaultServiceImpl.java
    │   │           └── ParameterServiceImpl.java
    │   │       ├── demo
    │   │           └── EecIVDemo.java
    │   │       ├── util
    │   │           ├── CsvUtil.java
    │   │           └── ConnectionPool.java
    │   │       ├── model
    │   │           ├── Fault.java
    │   │           └── Parameter.java
    │   │       ├── view
    │   │           └── StartView.java
    │   │       └── controller
    │   │           └── StartController.java
    ├── .project
    ├── .classpath
    └── pom.xml
├── Ford_EEC-IV_scanner.png
├── DCL_communication_map.pdf
├── Ford_EEC-IV_scanner_app.png
├── LICENSE
├── README.md
├── EEC-IV.hex
└── EEC-IV_asm


/eec-iv/.gitignore:
--------------------------------------------------------------------------------
1 | /bin/
2 | /target/
3 | 


--------------------------------------------------------------------------------
/Ford_EEC-IV_scanner.png:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/babroval/ford-eec-iv-diagnostic/HEAD/Ford_EEC-IV_scanner.png


--------------------------------------------------------------------------------
/DCL_communication_map.pdf:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/babroval/ford-eec-iv-diagnostic/HEAD/DCL_communication_map.pdf


--------------------------------------------------------------------------------
/Ford_EEC-IV_scanner_app.png:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/babroval/ford-eec-iv-diagnostic/HEAD/Ford_EEC-IV_scanner_app.png


--------------------------------------------------------------------------------
/eec-iv/resources/EECIVParameters.csv:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/babroval/ford-eec-iv-diagnostic/HEAD/eec-iv/resources/EECIVParameters.csv


--------------------------------------------------------------------------------
/eec-iv/.settings/org.eclipse.m2e.core.prefs:
--------------------------------------------------------------------------------
1 | activeProfiles=
2 | eclipse.preferences.version=1
3 | resolveWorkspaceProjects=true
4 | version=1
5 | 


--------------------------------------------------------------------------------
/eec-iv/src/babroval/eec_iv/dao/Dao.java:
--------------------------------------------------------------------------------
 1 | package babroval.eec_iv.dao;
 2 | 
 3 | import java.io.InputStream;
 4 | import java.util.List;
 5 | 
 6 | public interface Dao<T> {
 7 | 
 8 | 	List<T> loadAll(InputStream csvFile);
 9 | }
10 | 


--------------------------------------------------------------------------------
/eec-iv/src/babroval/eec_iv/service/Service.java:
--------------------------------------------------------------------------------
 1 | package babroval.eec_iv.service;
 2 | 
 3 | import java.io.InputStream;
 4 | import java.util.List;
 5 | 
 6 | public interface Service<T> {
 7 | 
 8 | 	List<T> getAll(InputStream csvFile);
 9 | 
10 | 	List<T> updateAll(List<T> list, StringBuffer data);
11 | }
12 | 


--------------------------------------------------------------------------------
/eec-iv/.settings/org.eclipse.jdt.core.prefs:
--------------------------------------------------------------------------------
1 | eclipse.preferences.version=1
2 | org.eclipse.jdt.core.compiler.codegen.targetPlatform=1.8
3 | org.eclipse.jdt.core.compiler.compliance=1.8
4 | org.eclipse.jdt.core.compiler.problem.forbiddenReference=warning
5 | org.eclipse.jdt.core.compiler.release=disabled
6 | org.eclipse.jdt.core.compiler.source=1.8
7 | 


--------------------------------------------------------------------------------
/eec-iv/src/babroval/eec_iv/demo/EecIVDemo.java:
--------------------------------------------------------------------------------
 1 | package babroval.eec_iv.demo;
 2 | 
 3 | import javax.swing.SwingUtilities;
 4 | 
 5 | import babroval.eec_iv.controller.StartController;
 6 | 
 7 | public class EecIVDemo {
 8 | 
 9 | 	public static void main(String[] args) {
10 | 
11 | 		SwingUtilities.invokeLater(new Runnable() {
12 | 			public void run() {
13 | 
14 | 				StartController controller = new StartController();
15 | 				controller.initController();
16 | 			}
17 | 		});
18 | 	}
19 | }
20 | 


--------------------------------------------------------------------------------
/eec-iv/.project:
--------------------------------------------------------------------------------
 1 | <?xml version="1.0" encoding="UTF-8"?>
 2 | <projectDescription>
 3 | 	<name>eec-iv</name>
 4 | 	<comment></comment>
 5 | 	<projects>
 6 | 	</projects>
 7 | 	<buildSpec>
 8 | 		<buildCommand>
 9 | 			<name>org.eclipse.jdt.core.javabuilder</name>
10 | 			<arguments>
11 | 			</arguments>
12 | 		</buildCommand>
13 | 		<buildCommand>
14 | 			<name>org.eclipse.m2e.core.maven2Builder</name>
15 | 			<arguments>
16 | 			</arguments>
17 | 		</buildCommand>
18 | 	</buildSpec>
19 | 	<natures>
20 | 		<nature>org.eclipse.m2e.core.maven2Nature</nature>
21 | 		<nature>org.eclipse.jdt.core.javanature</nature>
22 | 	</natures>
23 | </projectDescription>
24 | 


--------------------------------------------------------------------------------
/eec-iv/src/babroval/eec_iv/service/FaultServiceImpl.java:
--------------------------------------------------------------------------------
 1 | package babroval.eec_iv.service;
 2 | 
 3 | import java.io.InputStream;
 4 | import java.util.List;
 5 | 
 6 | import babroval.eec_iv.dao.Dao;
 7 | import babroval.eec_iv.dao.FaultDaoImpl;
 8 | import babroval.eec_iv.model.Fault;
 9 | 
10 | public class FaultServiceImpl implements Service<Fault> {
11 | 
12 | 	private Dao<Fault> dao = new FaultDaoImpl();
13 | 
14 | 	@Override
15 | 	public List<Fault> getAll(InputStream csvFile) {
16 | 		return dao.loadAll(csvFile);
17 | 	}
18 | 
19 | 	@Override
20 | 	public List<Fault> updateAll(List<Fault> list, StringBuffer data) {
21 | 		throw new UnsupportedOperationException("Method has not implemented yet");
22 | 	}
23 | }
24 | 


--------------------------------------------------------------------------------
/eec-iv/.classpath:
--------------------------------------------------------------------------------
 1 | <?xml version="1.0" encoding="UTF-8"?>
 2 | <classpath>
 3 | 	<classpathentry kind="con" path="org.eclipse.jdt.launching.JRE_CONTAINER/org.eclipse.jdt.internal.debug.ui.launcher.StandardVMType/JavaSE-1.8">
 4 | 		<attributes>
 5 | 			<attribute name="maven.pomderived" value="true"/>
 6 | 		</attributes>
 7 | 	</classpathentry>
 8 | 	<classpathentry kind="src" output="target/classes" path="src">
 9 | 		<attributes>
10 | 			<attribute name="optional" value="true"/>
11 | 			<attribute name="maven.pomderived" value="true"/>
12 | 		</attributes>
13 | 	</classpathentry>
14 | 	<classpathentry kind="src" path="resources"/>
15 | 	<classpathentry kind="con" path="org.eclipse.m2e.MAVEN2_CLASSPATH_CONTAINER">
16 | 		<attributes>
17 | 			<attribute name="maven.pomderived" value="true"/>
18 | 		</attributes>
19 | 	</classpathentry>
20 | 	<classpathentry kind="output" path="target/classes"/>
21 | </classpath>
22 | 


--------------------------------------------------------------------------------
/eec-iv/src/babroval/eec_iv/util/CsvUtil.java:
--------------------------------------------------------------------------------
 1 | package babroval.eec_iv.util;
 2 | 
 3 | import java.io.BufferedReader;
 4 | import java.io.InputStream;
 5 | import java.io.InputStreamReader;
 6 | import java.util.ArrayList;
 7 | import java.util.List;
 8 | 
 9 | public final class CsvUtil {
10 | 
11 | 	public static List<String> loadAllLinesFromCsvFile(InputStream csvFile) {
12 | 
13 | 		List<String> allLines = new ArrayList<>();
14 | 		String line = "";
15 | 
16 | 		try (BufferedReader br = new BufferedReader(new InputStreamReader(csvFile))) {
17 | 
18 | 			if (csvFile.available() < 0) {
19 | 				throw new RuntimeException("CSV file is empty");
20 | 			}
21 | 
22 | 			int id = 0;
23 | 			while ((line = br.readLine()) != null) {
24 | 
25 | 				line = ++id + "," + line;
26 | 				allLines.add(line);
27 | 			}
28 | 			return allLines;
29 | 
30 | 		} catch (Exception e) {
31 | 			throw new RuntimeException(e);
32 | 		}
33 | 	}
34 | }
35 | 


--------------------------------------------------------------------------------
/eec-iv/pom.xml:
--------------------------------------------------------------------------------
 1 | <project xmlns="http://maven.apache.org/POM/4.0.0" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://maven.apache.org/POM/4.0.0 http://maven.apache.org/xsd/maven-4.0.0.xsd">
 2 |   <modelVersion>4.0.0</modelVersion>
 3 |   <groupId>babroval.eec_iv</groupId>
 4 |   <artifactId>eec-iv</artifactId>
 5 |   <version>0.0.1-SNAPSHOT</version>
 6 |   <name>eec-iv</name>
 7 |   
 8 |   <dependencies> 
 9 |     <dependency>
10 |       <groupId>org.scream3r</groupId>
11 |       <artifactId>jssc</artifactId>
12 |       <version>2.8.0</version>
13 |     </dependency>
14 |   </dependencies>
15 |   
16 |   <build>
17 |     <sourceDirectory>src</sourceDirectory>
18 |     <plugins>
19 |       <plugin>
20 |         <artifactId>maven-compiler-plugin</artifactId>
21 |         <version>3.7.0</version>
22 |         <configuration>
23 |           <source>1.8</source>
24 |           <target>1.8</target>
25 |         </configuration>
26 |       </plugin>
27 |     </plugins>
28 |   </build>
29 | </project>


--------------------------------------------------------------------------------
/LICENSE:
--------------------------------------------------------------------------------
 1 | MIT License
 2 | 
 3 | Copyright (c) 2018 Maksim Babrou
 4 | 
 5 | Permission is hereby granted, free of charge, to any person obtaining a copy
 6 | of this software and associated documentation files (the "Software"), to deal
 7 | in the Software without restriction, including without limitation the rights
 8 | to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 9 | copies of the Software, and to permit persons to whom the Software is
10 | furnished to do so, subject to the following conditions:
11 | 
12 | The above copyright notice and this permission notice shall be included in all
13 | copies or substantial portions of the Software.
14 | 
15 | THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 | IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 | FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
18 | AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 | LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
20 | OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
21 | SOFTWARE.
22 | 


--------------------------------------------------------------------------------
/eec-iv/src/babroval/eec_iv/dao/FaultDaoImpl.java:
--------------------------------------------------------------------------------
 1 | package babroval.eec_iv.dao;
 2 | 
 3 | import java.io.InputStream;
 4 | import java.util.ArrayList;
 5 | import java.util.List;
 6 | 
 7 | import babroval.eec_iv.model.Fault;
 8 | import babroval.eec_iv.util.CsvUtil;
 9 | 
10 | public class FaultDaoImpl implements Dao<Fault> {
11 | 
12 | 	@Override
13 | 	public List<Fault> loadAll(InputStream csvFile) {
14 | 
15 | 		String cvsSplitBy = ",";
16 | 		List<String> allLines = CsvUtil.loadAllLinesFromCsvFile(csvFile);
17 | 
18 | 		List<Fault> allEntities = new ArrayList<>();
19 | 
20 | 		for (String line : allLines) {
21 | 
22 | 			String[] csvLine = line.split(cvsSplitBy);
23 | 			Fault entity = createEntity(csvLine);
24 | 			allEntities.add(entity);
25 | 		}
26 | 		return allEntities;
27 | 	}
28 | 
29 | 	private static Fault createEntity(String[] csvLine) {
30 | 
31 | 		try {
32 | 			Integer fault_id = Integer.valueOf(csvLine[0].trim());
33 | 			String faultNumber = csvLine[1].trim();
34 | 			String info = csvLine[2].trim();
35 | 
36 | 			Fault entity = new Fault();
37 | 
38 | 			entity.setFault_id(fault_id);
39 | 			entity.setNumber(faultNumber);
40 | 			entity.setInfo(info);
41 | 
42 | 			return entity;
43 | 
44 | 		} catch (Exception e) {
45 | 			throw new RuntimeException("incorrect data in CSV file", e);
46 | 		}
47 | 	}
48 | }
49 | 


--------------------------------------------------------------------------------
/eec-iv/src/babroval/eec_iv/dao/ParameterDaoImpl.java:
--------------------------------------------------------------------------------
 1 | package babroval.eec_iv.dao;
 2 | 
 3 | import java.io.InputStream;
 4 | import java.util.ArrayList;
 5 | import java.util.List;
 6 | 
 7 | import babroval.eec_iv.model.Parameter;
 8 | import babroval.eec_iv.util.CsvUtil;
 9 | 
10 | public class ParameterDaoImpl implements Dao<Parameter> {
11 | 
12 | 	@Override
13 | 	public List<Parameter> loadAll(InputStream csvFile) {
14 | 
15 | 		String cvsSplitBy = ",";
16 | 		List<String> allLines = CsvUtil.loadAllLinesFromCsvFile(csvFile);
17 | 
18 | 		List<Parameter> allEntities = new ArrayList<>();
19 | 
20 | 		for (String line : allLines) {
21 | 
22 | 			String[] csvLine = line.split(cvsSplitBy);
23 | 			Parameter entity = createEntity(csvLine);
24 | 			allEntities.add(entity);
25 | 		}
26 | 		return allEntities;
27 | 	}
28 | 
29 | 	private static Parameter createEntity(String[] csvLine) {
30 | 
31 | 		try {
32 | 			Integer parameter_id = Integer.valueOf(csvLine[0].trim());
33 | 			String parameterNumber = csvLine[1].trim();
34 | 			String parameterName = csvLine[2].trim();
35 | 			String parameterValue = "";
36 | 
37 | 			Parameter entity = new Parameter();
38 | 
39 | 			entity.setParameter_id(parameter_id);
40 | 			entity.setNumber(parameterNumber);
41 | 			entity.setName(parameterName);
42 | 			entity.setValue(parameterValue);
43 | 
44 | 			return entity;
45 | 
46 | 		} catch (Exception e) {
47 | 			throw new RuntimeException("incorrect data in CSV file", e);
48 | 		}
49 | 	}
50 | }
51 | 


--------------------------------------------------------------------------------
/eec-iv/src/babroval/eec_iv/util/ConnectionPool.java:
--------------------------------------------------------------------------------
 1 | package babroval.eec_iv.util;
 2 | 
 3 | import jssc.SerialPort;
 4 | import jssc.SerialPortEvent;
 5 | import jssc.SerialPortEventListener;
 6 | import jssc.SerialPortList;
 7 | 
 8 | public final class ConnectionPool {
 9 | 
10 | 	private static Boolean isPortDetected = false;
11 | 	private static String portName = "";
12 | 	private static SerialPort serialPort = new SerialPort(portName);
13 | 
14 | 	private ConnectionPool() {
15 | 	}
16 | 
17 | 	private static class PoolHolder {
18 | 		private static final ConnectionPool POOL = new ConnectionPool();
19 | 	}
20 | 
21 | 	public static ConnectionPool getPool() {
22 | 		return PoolHolder.POOL;
23 | 	}
24 | 
25 | 	public SerialPort getPort() {
26 | 		try {
27 | 			String[] portNames = SerialPortList.getPortNames();
28 | 
29 | 			for (int i = 0; i < portNames.length; i++) {
30 | 
31 | 				portName = portNames[i];
32 | //				System.out.println(portName);
33 | 				serialPort = new SerialPort(portName);
34 | 				try {
35 | 					serialPort.openPort();
36 | 				} catch (Exception e) {
37 | 					continue;
38 | 				}
39 | 				serialPort.setParams(SerialPort.BAUDRATE_38400, SerialPort.DATABITS_8, SerialPort.STOPBITS_2,
40 | 						SerialPort.PARITY_NONE);
41 | 				serialPort.addEventListener(new PortReader(), SerialPort.MASK_RXCHAR);
42 | 				Thread.sleep(100);
43 | 				serialPort.writeByte((byte) 7);
44 | 				Thread.sleep(100);
45 | 				if (isPortDetected) {
46 | 					return serialPort;
47 | 				}
48 | 				serialPort.closePort();
49 | 			}
50 | 			throw new RuntimeException();
51 | 
52 | 		} catch (Exception e) {
53 | 			throw new RuntimeException(e);
54 | 		}
55 | 	}
56 | 
57 | 	public SerialPort getConnection() {
58 | 
59 | 		try {
60 | 			serialPort.openPort();
61 | 			serialPort.setParams(SerialPort.BAUDRATE_38400, SerialPort.DATABITS_8, SerialPort.STOPBITS_2,
62 | 					SerialPort.PARITY_NONE);
63 | 
64 | 			return serialPort;
65 | 
66 | 		} catch (Exception e) {
67 | 			throw new RuntimeException(e);
68 | 		}
69 | 	}
70 | 
71 | 	private static class PortReader implements SerialPortEventListener {
72 | 
73 | 		@Override
74 | 		public void serialEvent(SerialPortEvent event) {
75 | 			if (event.isRXCHAR() && event.getEventValue() > 0) {
76 | 				try {
77 | 					String receivedData = serialPort.readHexString(event.getEventValue());
78 | //					System.out.println(receivedData);
79 | 					if (receivedData.equals("0C 0C")) {
80 | 						serialPort.writeByte((byte) 0);
81 | 						isPortDetected = true;
82 | 					}
83 | 				} catch (Exception e) {
84 | 					throw new RuntimeException(e);
85 | 				}
86 | 			}
87 | 		}
88 | 	}
89 | }
90 | 


--------------------------------------------------------------------------------
/eec-iv/src/babroval/eec_iv/model/Fault.java:
--------------------------------------------------------------------------------
  1 | package babroval.eec_iv.model;
  2 | 
  3 | public class Fault {
  4 | 
  5 | 	private Integer fault_id = 0;
  6 | 	private String number = "";
  7 | 	private String info = "";
  8 | 
  9 | 	public Fault() {
 10 | 	}
 11 | 
 12 | 	public Fault(Integer fault_id) {
 13 | 		this.fault_id = fault_id;
 14 | 	}
 15 | 
 16 | 	public Fault(String number) {
 17 | 		this.number = number;
 18 | 	}
 19 | 
 20 | 	public Fault(Integer fault_id, String number) {
 21 | 		this.fault_id = fault_id;
 22 | 		this.number = number;
 23 | 	}
 24 | 
 25 | 	public Fault(String number, String info) {
 26 | 		this.number = number;
 27 | 		this.info = info;
 28 | 	}
 29 | 
 30 | 	public Fault(Integer fault_id, String number, String info) {
 31 | 		this.fault_id = fault_id;
 32 | 		this.number = number;
 33 | 		this.info = info;
 34 | 	}
 35 | 
 36 | 	public Integer getFault_id() {
 37 | 		return fault_id;
 38 | 	}
 39 | 
 40 | 	public void setFault_id(Integer fault_id) {
 41 | 		this.fault_id = fault_id;
 42 | 	}
 43 | 
 44 | 	public String getNumber() {
 45 | 		return number;
 46 | 	}
 47 | 
 48 | 	public void setNumber(String number) {
 49 | 		this.number = number;
 50 | 	}
 51 | 
 52 | 	public String getInfo() {
 53 | 		return info;
 54 | 	}
 55 | 
 56 | 	public void setInfo(String info) {
 57 | 		this.info = info;
 58 | 	}
 59 | 
 60 | 	@Override
 61 | 	public int hashCode() {
 62 | 		final int prime = 31;
 63 | 		int result = 1;
 64 | 		result = prime * result + ((fault_id == null) ? 0 : fault_id.hashCode());
 65 | 		result = prime * result + ((info == null) ? 0 : info.hashCode());
 66 | 		result = prime * result + ((number == null) ? 0 : number.hashCode());
 67 | 		return result;
 68 | 	}
 69 | 
 70 | 	@Override
 71 | 	public boolean equals(Object obj) {
 72 | 		if (this == obj)
 73 | 			return true;
 74 | 		if (obj == null)
 75 | 			return false;
 76 | 		if (!(obj instanceof Fault))
 77 | 			return false;
 78 | 		Fault other = (Fault) obj;
 79 | 		if (fault_id == null) {
 80 | 			if (other.fault_id != null)
 81 | 				return false;
 82 | 		} else if (!fault_id.equals(other.fault_id))
 83 | 			return false;
 84 | 		if (info == null) {
 85 | 			if (other.info != null)
 86 | 				return false;
 87 | 		} else if (!info.equals(other.info))
 88 | 			return false;
 89 | 		if (number == null) {
 90 | 			if (other.number != null)
 91 | 				return false;
 92 | 		} else if (!number.equals(other.number))
 93 | 			return false;
 94 | 		return true;
 95 | 	}
 96 | 
 97 | 	@Override
 98 | 	public String toString() {
 99 | 		return "Fault [fault_id=" + fault_id + ", number=" + number + ", info=" + info + "]";
100 | 	}
101 | }


--------------------------------------------------------------------------------
/README.md:
--------------------------------------------------------------------------------
 1 | ![Alt text](Ford_EEC-IV_scanner_app.png)
 2 | ![Alt text](Ford_EEC-IV_scanner.png)
 3 | 
 4 | FORD EEC-IV diagnostic scanner
 5 | ==============================
 6 | This is Java desktop project for petrol engine diagnostic for cars with
 7 | Ford EEC-IV ECU with DCL communication data bus which goes from ECU pins number 18 and number 19 from total 60.
 8 | Please be aware that many EEC-IV ECU do not have a DCL bus line, such as mono injection, engines with mechanical ignition distributor and diesels.
 9 | 
10 | The principle is, that commands from USB port convert by bridge CP2101 to UART0 port of AVR controller, and instructions from other UART1 port of the controller convert by transceiver 75ALS176 for Ford EEC-IV diagnostic bus with Ford DCL communication standard which is the same as RS-485 standard with minor changes.
11 | Usual USB-RS485 converter can not synchronize with ECU because of losing time for virtual COM port emulation, so the controller, in this case, is like a "cache" or a "buffer". Most of DCL command instructions, which were found experimentally, are in [DCL_communication_map.pdf][commap] file.
12 |  
13 | [![MIT licensed](https://img.shields.io/badge/license-MIT-blue.svg)](https://github.com/babroval/ford-eec-iv-scanner/blob/master/LICENSE)
14 | ```
15 |   <dependency>
16 |     <groupId>org.scream3r</groupId>
17 |     <artifactId>jssc</artifactId>
18 |     <version>2.8.0</version>
19 |   </dependency>
20 | ```
21 | Table of Contents
22 | -----------------
23 |   * [Requirements](#requirements)
24 |   * [Usage](#usage)
25 |   * [Contributing](#contributing)
26 |   * [License](#license)  
27 | 
28 | Requirements
29 | ------------
30 |   The FORD EEC-IV scanner interface board can be made independently or a ready module can be found, for example:
31 |   * [Crumb128 V4 USB RS485 Modul][crumb128] with bootloader and quartz 16.0000MHz on chip45.com
32 |   <br/>The first part of the code for AVR controller was creating in Assembly language. The EEC-IV_asm file is a bit messy, but it works! So  EEC-IV.hex for ATmega128 is included and ready to write flash memory by any cheap analog of AVR programmer:
33 |   * [AVRISP][avrisp]
34 |   <br/>In this part everything can be done with:
35 |   * [AVR Studio 4][avr].14.589 and
36 |   * [JRE][jre] 8
37 | 
38 | 
39 | Usage
40 | -----
41 | The project is easy to manage with [Eclipse IDE][eclipse]:
42 | File -> Import -> Git -> Projects From Git > URI
43 | 
44 | #### Error handling
45 | All exceptions are converted into unchecked type to
46 | keep code clean as possible.
47 | <br/>
48 | <br/>
49 | 
50 | Contributing
51 | ------------
52 | To contribute to FORD EEC-IV scanner project, clone this repo locally and  
53 | commit your code on a separate branch.
54 | <br/>
55 | <br/>
56 | 
57 | License
58 | -------
59 | FORD EEC-IV diagnostic scanner is licensed under the [MIT][mit] license.  
60 | 
61 | [commap]: https://github.com/babroval/ford-eec-iv-diagnostic/blob/master/DCL_communication_map.pdf/
62 | [avrisp]: https://www.microchip.com/developmenttools/ProductDetails/atavrisp2
63 | [crumb128]: https://www.chip45.com/atmega128-usb-rs485-module.html
64 | [avr]: http://www.microchip.com/mplab/avr-support/avr-and-sam-downloads-archive
65 | [jre]: https://www.java.com/en/download/
66 | [eclipse]: https://www.eclipse.org/downloads/
67 | [video]: https://youtu.be/0mJQrj8HoHk/
68 | [mit]: https://github.com/babroval/ford-eec-iv-scanner/blob/master/LICENSE/
69 | 
70 | 


--------------------------------------------------------------------------------
/eec-iv/src/babroval/eec_iv/model/Parameter.java:
--------------------------------------------------------------------------------
  1 | package babroval.eec_iv.model;
  2 | 
  3 | public class Parameter {
  4 | 
  5 | 	private Integer parameter_id = 0;
  6 | 	private String number = "";
  7 | 	private String name = "";
  8 | 	private String value = "";
  9 | 
 10 | 	public Parameter() {
 11 | 	}
 12 | 
 13 | 	public Parameter(Integer parameter_id) {
 14 | 		this.parameter_id = parameter_id;
 15 | 	}
 16 | 
 17 | 	public Parameter(String number) {
 18 | 		this.number = number;
 19 | 	}
 20 | 
 21 | 	public Parameter(Integer parameter_id, String number) {
 22 | 		this.parameter_id = parameter_id;
 23 | 		this.number = number;
 24 | 	}
 25 | 
 26 | 	public Parameter(String number, String name) {
 27 | 		this.number = number;
 28 | 		this.name = name;
 29 | 	}
 30 | 
 31 | 	public Parameter(Integer parameter_id, String number, String name) {
 32 | 		this.parameter_id = parameter_id;
 33 | 		this.number = number;
 34 | 		this.name = name;
 35 | 	}
 36 | 
 37 | 	public Parameter(String number, String name, String value) {
 38 | 		this.number = number;
 39 | 		this.name = name;
 40 | 		this.value = value;
 41 | 	}
 42 | 
 43 | 	public Parameter(Integer parameter_id, String number, String name, String value) {
 44 | 		this.parameter_id = parameter_id;
 45 | 		this.number = number;
 46 | 		this.name = name;
 47 | 		this.value = value;
 48 | 	}
 49 | 
 50 | 	public Integer getParameter_id() {
 51 | 		return parameter_id;
 52 | 	}
 53 | 
 54 | 	public void setParameter_id(Integer parameter_id) {
 55 | 		this.parameter_id = parameter_id;
 56 | 	}
 57 | 
 58 | 	public String getNumber() {
 59 | 		return number;
 60 | 	}
 61 | 
 62 | 	public void setNumber(String number) {
 63 | 		this.number = number;
 64 | 	}
 65 | 
 66 | 	public String getName() {
 67 | 		return name;
 68 | 	}
 69 | 
 70 | 	public void setName(String name) {
 71 | 		this.name = name;
 72 | 	}
 73 | 
 74 | 	public String getValue() {
 75 | 		return value;
 76 | 	}
 77 | 
 78 | 	public void setValue(String value) {
 79 | 		this.value = value;
 80 | 	}
 81 | 
 82 | 	@Override
 83 | 	public int hashCode() {
 84 | 		final int prime = 31;
 85 | 		int result = 1;
 86 | 		result = prime * result + ((name == null) ? 0 : name.hashCode());
 87 | 		result = prime * result + ((number == null) ? 0 : number.hashCode());
 88 | 		result = prime * result + ((parameter_id == null) ? 0 : parameter_id.hashCode());
 89 | 		result = prime * result + ((value == null) ? 0 : value.hashCode());
 90 | 		return result;
 91 | 	}
 92 | 
 93 | 	@Override
 94 | 	public boolean equals(Object obj) {
 95 | 		if (this == obj)
 96 | 			return true;
 97 | 		if (obj == null)
 98 | 			return false;
 99 | 		if (!(obj instanceof Parameter))
100 | 			return false;
101 | 		Parameter other = (Parameter) obj;
102 | 		if (name == null) {
103 | 			if (other.name != null)
104 | 				return false;
105 | 		} else if (!name.equals(other.name))
106 | 			return false;
107 | 		if (number == null) {
108 | 			if (other.number != null)
109 | 				return false;
110 | 		} else if (!number.equals(other.number))
111 | 			return false;
112 | 		if (parameter_id == null) {
113 | 			if (other.parameter_id != null)
114 | 				return false;
115 | 		} else if (!parameter_id.equals(other.parameter_id))
116 | 			return false;
117 | 		if (value == null) {
118 | 			if (other.value != null)
119 | 				return false;
120 | 		} else if (!value.equals(other.value))
121 | 			return false;
122 | 		return true;
123 | 	}
124 | 
125 | 	@Override
126 | 	public String toString() {
127 | 		return "Parameter [parameter_id=" + parameter_id + ", number=" + number + ", name=" + name + ", value=" + value
128 | 				+ "]";
129 | 	}
130 | }
131 | 


--------------------------------------------------------------------------------
/eec-iv/src/babroval/eec_iv/view/StartView.java:
--------------------------------------------------------------------------------
  1 | package babroval.eec_iv.view;
  2 | 
  3 | import javax.swing.DefaultListModel;
  4 | import javax.swing.JButton;
  5 | import javax.swing.JCheckBox;
  6 | import javax.swing.JFrame;
  7 | import javax.swing.JLabel;
  8 | import javax.swing.JList;
  9 | import javax.swing.JPanel;
 10 | 
 11 | public class StartView extends JFrame {
 12 | 
 13 | 	private static final long serialVersionUID = 1L;
 14 | 
 15 | 	private JPanel panel;
 16 | 	private JButton faults, koeo, koer, data, disconnect;
 17 | 	private JCheckBox baud;
 18 | 	private JLabel label;
 19 | 	private JLabel labelConnect;
 20 | 	private DefaultListModel<String> modelParam;
 21 | 	private JList<String> dataList;
 22 | 
 23 | 	{
 24 | 		panel = new JPanel(null);
 25 | 		faults = new JButton("FAULTS");
 26 | 		koeo = new JButton("KOEO");
 27 | 		koer = new JButton("KOER");
 28 | 		data = new JButton("DATA");
 29 | 		disconnect = new JButton("Disconnect");
 30 | 		baud = new JCheckBox("other ECU");
 31 | 		label = new JLabel("");
 32 | 		labelConnect = new JLabel("");
 33 | 		modelParam = new DefaultListModel<>();
 34 | 		dataList = new JList<>(modelParam);
 35 | 
 36 | 		faults.setBounds(20, 20, 160, 40);
 37 | 		koeo.setBounds(200, 20, 80, 40);
 38 | 		koer.setBounds(285, 20, 80, 40);
 39 | 		data.setBounds(385, 20, 160, 40);
 40 | 		disconnect.setBounds(680, 20, 160, 40);
 41 | 		baud.setBounds(860, 20, 160, 20);
 42 | 		label.setBounds(20, 120, 900, 200);
 43 | 		labelConnect.setBounds(20, 470, 990, 20);
 44 | 		dataList.setBounds(240, 100, 400, 310);
 45 | 
 46 | 		panel.add(faults);
 47 | 		panel.add(koeo);
 48 | 		panel.add(koer);
 49 | 		panel.add(data);
 50 | 		panel.add(disconnect);
 51 | 		panel.add(baud);
 52 | 		panel.add(label);
 53 | 		panel.add(labelConnect);
 54 | 		panel.add(dataList);
 55 | 		add(panel);
 56 | 	}
 57 | 
 58 | 	public StartView() {
 59 | 		setSize(995, 550);
 60 | 		setTitle("EEC-IV Diagnostic");
 61 | 		setLocationRelativeTo(null);
 62 | 		setDefaultCloseOperation(EXIT_ON_CLOSE);
 63 | 		setResizable(false);
 64 | 		setVisible(true);
 65 | 	}
 66 | 
 67 | 	public JPanel getPanel() {
 68 | 		return panel;
 69 | 	}
 70 | 
 71 | 	public void setPanel(JPanel panel) {
 72 | 		this.panel = panel;
 73 | 	}
 74 | 
 75 | 	public JButton getFaults() {
 76 | 		return faults;
 77 | 	}
 78 | 
 79 | 	public void setFaults(JButton faults) {
 80 | 		this.faults = faults;
 81 | 	}
 82 | 
 83 | 	public JButton getKoeo() {
 84 | 		return koeo;
 85 | 	}
 86 | 
 87 | 	public void setKoeo(JButton koeo) {
 88 | 		this.koeo = koeo;
 89 | 	}
 90 | 
 91 | 	public JButton getKoer() {
 92 | 		return koer;
 93 | 	}
 94 | 
 95 | 	public void setKoer(JButton koer) {
 96 | 		this.koer = koer;
 97 | 	}
 98 | 
 99 | 	public JButton getData() {
100 | 		return data;
101 | 	}
102 | 
103 | 	public void setData(JButton data) {
104 | 		this.data = data;
105 | 	}
106 | 
107 | 	public JButton getDisconnect() {
108 | 		return disconnect;
109 | 	}
110 | 
111 | 	public void setDisconnect(JButton disconnect) {
112 | 		this.disconnect = disconnect;
113 | 	}
114 | 
115 | 	public JCheckBox getBaud() {
116 | 		return baud;
117 | 	}
118 | 
119 | 	public void setBaud(JCheckBox baud) {
120 | 		this.baud = baud;
121 | 	}
122 | 
123 | 	public JLabel getLabel() {
124 | 		return label;
125 | 	}
126 | 
127 | 	public void setLabel(JLabel label) {
128 | 		this.label = label;
129 | 	}
130 | 
131 | 	public JLabel getLabelConnect() {
132 | 		return labelConnect;
133 | 	}
134 | 
135 | 	public void setLabelConnect(JLabel labelConnect) {
136 | 		this.labelConnect = labelConnect;
137 | 	}
138 | 
139 | 	public DefaultListModel<String> getModelParam() {
140 | 		return modelParam;
141 | 	}
142 | 
143 | 	public void setModelParam(DefaultListModel<String> modelParam) {
144 | 		this.modelParam = modelParam;
145 | 	}
146 | 
147 | 	public JList<String> getDataList() {
148 | 		return dataList;
149 | 	}
150 | 
151 | 	public void setDataList(JList<String> dataList) {
152 | 		this.dataList = dataList;
153 | 	}
154 | }
155 | 


--------------------------------------------------------------------------------
/eec-iv/src/babroval/eec_iv/service/ParameterServiceImpl.java:
--------------------------------------------------------------------------------
  1 | package babroval.eec_iv.service;
  2 | 
  3 | import java.io.InputStream;
  4 | import java.util.List;
  5 | 
  6 | import babroval.eec_iv.dao.Dao;
  7 | import babroval.eec_iv.dao.ParameterDaoImpl;
  8 | import babroval.eec_iv.model.Parameter;
  9 | 
 10 | public class ParameterServiceImpl implements Service<Parameter> {
 11 | 
 12 | 	private Dao<Parameter> dao = new ParameterDaoImpl();
 13 | 
 14 | 	@Override
 15 | 	public List<Parameter> getAll(InputStream csvFile) {
 16 | 		return dao.loadAll(csvFile);
 17 | 	}
 18 | 
 19 | 	@Override
 20 | 	public List<Parameter> updateAll(List<Parameter> list, StringBuffer data) {
 21 | 		for (Parameter entity : list) {
 22 | 			String value = setValue(entity.getNumber(), data);
 23 | 			entity.setValue(value);
 24 | 		}
 25 | 		return list;
 26 | 	}
 27 | 
 28 | 	private static String setValue(String parameterNumber, StringBuffer data) {
 29 | 
 30 | 		String value = "";
 31 | 		String temp = "";
 32 | 		Integer i = 0, j = 0, k = 0;
 33 | 
 34 | 		switch (parameterNumber) {
 35 | 		case "1":
 36 | 			i = Integer.parseInt(data.substring(0, 2), 16);
 37 | 			j = Integer.parseInt("0" + data.substring(3, 4), 16);
 38 | 			i = i * 4 + j * 1024;
 39 | 			i = ((i + 5) / 10) * 10;
 40 | 			value = String.valueOf(i);
 41 | 			break;
 42 | 		case "2":
 43 | 			i = Integer.parseInt("0" + data.substring(16, 17), 16);
 44 | 			j = Integer.parseInt("0" + data.substring(19, 20), 16);
 45 | 			i = 128 - (j * 16 + i);
 46 | 			value = String.valueOf(i);
 47 | 			break;
 48 | 		case "3":
 49 | 			i = Integer.parseInt(data.substring(8, 10), 16);
 50 | 			j = 4 - Integer.parseInt("0" + data.substring(11, 12), 16);
 51 | 			i = (256 * j - i) * 2675 / 1000;
 52 | 			value = String.valueOf(i);
 53 | 			break;
 54 | 		case "4":
 55 | 			temp = data.substring(48, 52);
 56 | 			if (temp.equals("3090")) {
 57 | 				value = "Opened";
 58 | 			} else {
 59 | 				value = "Closed";
 60 | 			}
 61 | 			break;
 62 | 		case "5":
 63 | 			i = Integer.parseInt(data.substring(32, 34), 16);
 64 | 			i = i * 10 / 256;
 65 | 			j = Integer.parseInt("0" + data.substring(35, 36), 16);
 66 | 			if (j.equals(0) && i.equals(0)) {
 67 | 				value = "0";
 68 | 			} else if (j.equals(0) && !i.equals(0)) {
 69 | 				value = String.valueOf(i) + "00";
 70 | 			} else {
 71 | 				value = String.valueOf(j) + String.valueOf(i) + "00";
 72 | 			}
 73 | 			break;
 74 | 		case "6":
 75 | 			i = Integer.parseInt(data.substring(36, 38), 16);
 76 | 			j = Integer.parseInt("0" + data.substring(39, 40), 16);
 77 | 			i = ((256 * j + i) - (256 * j + i) / 24) * 80;
 78 | 			value = String.valueOf(i);
 79 | 			break;
 80 | 		case "7":
 81 | 			i = Integer.parseInt(data.substring(12, 14), 16);
 82 | 			j = Integer.parseInt("0" + data.substring(15, 16), 16);
 83 | 			k = (256 * j + i) * 5 / 200;
 84 | 			i = ((256 * j + i) - k) * 5;
 85 | 			value = String.valueOf(i);
 86 | 			break;
 87 | 		case "8":
 88 | 			temp = data.substring(44, 46);
 89 | 			if (temp.equals("FF")) {
 90 | 				value = "Closed";
 91 | 			} else if (temp.equals("00")) {
 92 | 				value = "Part. Opened";
 93 | 			} else if (temp.equals("01")) {
 94 | 				value = "Fully Opened";
 95 | 			}
 96 | 			break;
 97 | 		case "9":
 98 | 			i = Integer.parseInt(data.substring(40, 42), 16) / 4;
 99 | 			value = String.valueOf(i);
100 | 			break;
101 | 		case "10":
102 | 			i = Integer.parseInt("0" + data.substring(4, 5), 16);
103 | 			j = Integer.parseInt("0" + data.substring(5, 6), 16);
104 | 			j = j * 10 / 16;
105 | 			value = String.valueOf(i) + "." + String.valueOf(j);
106 | 			break;
107 | 		case "11":
108 | 			i = Integer.parseInt(data.substring(20, 22), 16);
109 | 			i = (i - 16) / 10 + i - 15;
110 | 			value = String.valueOf(i);
111 | 			break;
112 | 		case "12":
113 | 			i = Integer.parseInt(data.substring(24, 26), 16);
114 | 			i = (i - 16) / 10 + i - 15;
115 | 			value = String.valueOf(i);
116 | 			break;
117 | 		case "13":
118 | 			i = Integer.parseInt("0" + data.substring(28, 29), 16);
119 | 			j = Integer.parseInt("0" + data.substring(31, 32), 16);
120 | 			i = (((15 * j) + i) * 80 + 45 * j) / 100;
121 | 			value = String.valueOf(i);
122 | 			break;
123 | 		case "14":
124 | 			temp = data.substring(52, 56);
125 | 			if (temp.equals("1380") | temp.equals("1290") | temp.equals("32B0")) {
126 | 				value = "High";
127 | 			} else {
128 | 				value = "Low";
129 | 			}
130 | 			break;
131 | 		case "15":
132 | 			temp = data.substring(56, 60);
133 | 			if (temp.equals("80EC")) {
134 | 				value = "Opened";
135 | 			} else {
136 | 				value = "Closed";
137 | 			}
138 | 			break;
139 | 		case "16":
140 | 			temp = data.substring(56, 60);
141 | 			if (temp.equals("0028") | temp.equals("80A8") | temp.equals("2008") | temp.equals("A088")) {
142 | 				value = "N or P";
143 | 			} else if (temp.equals("4068") | temp.equals("C0E8") | temp.equals("6048") | temp.equals("E0C8")) {
144 | 				value = "D or R";
145 | 			}
146 | 			break;
147 | 		case "17":
148 | 			temp = data.substring(56, 60);
149 | 			if (temp.equals("0028") | temp.equals("80A8") | temp.equals("4068") | temp.equals("C0E8")) {
150 | 				value = "Released";
151 | 			} else if (temp.equals("2008") | temp.equals("A088") | temp.equals("6048") | temp.equals("E0C8")) {
152 | 				value = "Pressed";
153 | 			}
154 | 			break;
155 | 		default:
156 | 			throw new RuntimeException("incorrect data");
157 | 		}
158 | 		return value;
159 | 	}
160 | }
161 | 


--------------------------------------------------------------------------------
/eec-iv/resources/EECIVFaults.csv:
--------------------------------------------------------------------------------
  1 | 010, Separator/command code: Briefly depress accelerator pedal fully
  2 | 020, Command code: Briefly depress brake pedal fully
  3 | 030, Command code: Briefly depress brake pedal fully
  4 | 10, Cylinder 1, low power
  5 | 20, Cylinder 2, low power
  6 | 30,	Cylinder 3, low power
  7 | 40,	Cylinder 4, low power
  8 | 50,	Cylinder 5, low power
  9 | 60, Cylinder 6, low power
 10 | 70, Cylinder 7, low power
 11 | 80,	Cylinder 8, low power
 12 | 90, Cylinder balance test OK 
 13 | 111, All systems work properly
 14 | 112, Intake air temperature (IAT) sensor - voltage low
 15 | 113, Intake air temperature (IAT) sensor - voltage high 
 16 | 114, Intake air temperature (IAT) sensor - range
 17 | 116, Engine coolant temperature (ECT) sensor - range
 18 | 117, Engine coolant temperature (ECT) sensor - voltage low
 19 | 118, Engine coolant temperature (ECT) sensor - voltage high
 20 | 119, There is no connection with the engine control unit (switch on the ignition)
 21 | 121, Throttle position (TP) switch/sensor - range
 22 | 122, Throttle position (TP) switch/sensor - voltage low
 23 | 123, Throttle position (TP) switch/sensor - voltage high
 24 | 124, Throttle position (TP) switch/sensor - voltage high
 25 | 125, Throttle position (TP) switch/sensor - voltage low
 26 | 129, Mass air flow (MAF)sensor / manifold absolute pressure (MAP)sensor - no signal change during throttle 'blip'
 27 | 136, Heated oxygen sensor (HO2S) 2, bank 2 - weak mixture
 28 | 137, Heated oxygen sensor (HO2S) 2, bank 2 - rich mixture
 29 | 139, Heated oxygen sensor (HO2S) 2, bank 2 - weak/rich mixture
 30 | 144, Heated oxygen sensor (HO2S) 1, bank 1 - weak/rich mixture
 31 | 157, Mass air flow (MAF) sensor - voltage low
 32 | 158, Mass air flow (MAF) sensor - voltage high
 33 | 159, Mass air flow (MAF) sensor - range
 34 | 167, Throttle position (TP) switch/sensor - no signal change during throttle 'blip'
 35 | 171, Heated oxygen sensor (HO2S) 1, bank 1 - adaptive limit reached
 36 | 172, Heated oxygen sensor (HO2S) 1, bank 1 - weak mixture
 37 | 173, Heated oxygen sensor (HO2S) 1, bank 1 - rich mixture
 38 | 174, Heated oxygen sensor (HO2S)
 39 | 175, Heated oxygen sensor (HO2S) 2, bank 2 - adaptive limit reached
 40 | 176, Heated oxygen sensor (HO2S) 2, bank 2 - weak mixture
 41 | 177, Heated oxygen sensor (HO2S) 2, bank 2 - rich mixture
 42 | 178, Heated oxygen sensor (HO2S)
 43 | 179, Fuel trim (part throttle) - weak mixture
 44 | 181, Fuel trim (part throttle) - rich mixture
 45 | 182, Fuel trim (idle) - weak mixture
 46 | 183, Fuel trim (idle) - rich mixture
 47 | 184, Mass air flow (MAF) sensor - air flow high
 48 | 185, Mass air flow (MAF) sensor - air flow low
 49 | 186, Injector pulse width - too long
 50 | 187, Injector pulse width - too short
 51 | 188, Heated oxygen sensor (HO2S), bank 2 - weak mixture
 52 | 189, Heated oxygen sensor (HO2S), bank 2 - rich mixture
 53 | 191, Heated oxygen sensor (HO2S), bank 2 - idle mixture weak
 54 | 192, Heated oxygen sensor (HO2S), bank 1 - idle mixture rich
 55 | 194, Heated oxygen sensor (HO2S)
 56 | 195, Heated oxygen sensor (HO2S)
 57 | 211, Profile ignition pick-up (PIP) signal
 58 | 212, Tachometer circuit
 59 | 213, Spark output (SPOUT) signal 
 60 | 214, Camshaft position (CMP) sensor - circuit malfunction
 61 | 215, Ignition coil 1, EDIS
 62 | 216, Ignition coil 2, EDIS
 63 | 217, Ignition coil 3, EDIS
 64 | 218, Tachometer circuit
 65 | 222, Tachometer circuit
 66 | 226, Ignition control (EDIS) module - pulse missing
 67 | 227, Crankshaft position (CKP) sensor/engine speed (RPM) sensor
 68 | 228, Ignition control (EDIS) module/ignition coil 1
 69 | 229, Ignition control (EDIS) module/ignition coil 2
 70 | 231, Ignition control (EDIS) module/ignition coil 3
 71 | 232, Ignition coil primary circuit
 72 | 233, Ignition control (EDIS) module
 73 | 234, Ignition coil
 74 | 235, Ignition coil
 75 | 236, Ignition coil
 76 | 237, Ignition coil
 77 | 238, Ignition control (EDIS) module/ignition coil
 78 | 239, Profile ignition pick-up (PIP) signal - PIP signal occurs when engine cranking
 79 | 241, Engine control module (ECM)/ignition control (EDIS) module - false data
 80 | 243, Ignition coil
 81 | 311, Pulsed secondary air injection (PAIR) system
 82 | 312, Pulsed secondary air injection (PAIR) system
 83 | 313, Pulsed secondary air injection (PAIR) system
 84 | 314, Pulsed secondary air injection (PAIR) system
 85 | 315, Pulsed secondary air injection (PAIR) system
 86 | 316, Pulsed secondary air injection (PAIR) system
 87 | 326, Exhaust pressure (EP) sensor
 88 | 327, Exhaust pressure (EP) sensor/exhaust gas recirculation (EGR) solenoid
 89 | 328, Exhaust gas recirculation (EGR) solenoid
 90 | 332, Exhaust gas recirculation (EGR) solenoid
 91 | 334, Exhaust gas recirculation (EGR) solenoid
 92 | 335, Exhaust pressure (EP) sensor
 93 | 336, Exhaust pressure (EP) - high
 94 | 337, Exhaust pressure (EP) sensor/exhaust gas recirculation (EGR) solenoid
 95 | 338, Engine coolant temperature (ECT) sensor - temperature low
 96 | 339, Engine coolant temperature (ECT) sensor - temperature high
 97 | 341, Octane plug - connected to earth
 98 | 411, Engine rpm too low during self-test
 99 | 412, Engine rpm too high during self-test
100 | 413, Idle air control (IAC) valve
101 | 414, Idle air control (IAC) valve
102 | 415, Idle air control (IAC) valve 
103 | 416, Idle air control (IAC) valve 
104 | 452, Vehicle speed sensor (VSS)
105 | 511, Engine control module (ECM) - ROM error
106 | 512, Engine control module (ECM) - KAM error
107 | 513, Engine control module (ECM) - internal reference voltage
108 | 519, Power steering pressure (PSP) switch - not activated during self-test
109 | 521, Power steering pressure (PSP) switch - not activated
110 | 522, Park/neutral position (PNP) switch - circuit malfunction
111 | 523, Park/neutral position (PNP) switch - circuit malfunction
112 | 528, Clutch pedal position (CPP) switch - circuit malfunction
113 | 536, Brake pedal position (BPP) switch - not activated during self-test
114 | 538, Operator error during self-test
115 | 539, AC switched ON during self-test
116 | 542, Fuel pump - circuit malfunction
117 | 543, Fuel pump - circuit malfunction
118 | 551, Idle air control (IAC) valve - circuit malfunction
119 | 552, Pulsed secondary air injection (PAIR) system - circuit malfunction
120 | 556, Fuel pump - circuit malfunction
121 | 558, Exhaust gas recirculation (EGR) solenoid - circuit malfunction
122 | 563, Engine coolant blower motor relay - circuit malfunction
123 | 564, Engine coolant blower motor relay - circuit malfunction
124 | 565, Evaporative emission (EVAP) canister purge valve - circuit malfunction
125 | 566, 3rd/4th gear shift solenoid
126 | 573, Engine coolant blower motor relay - circuit malfunction
127 | 574, Engine coolant blower motor relay - circuit malfunction
128 | 575, Fuel pump/inertia fuel shut-off (IFS) switch - circuit
129 | 576, Kick-down switch
130 | 577, Kick-down switch - not activated during self-test
131 | 612, Transmission range(TR)switch, 4th/3th gear switch contacts - open circuit
132 | 613, Transmission range(TR)switch, 4th/3th gear switch contacts - open circuit
133 | 614, Transmission range(TR)switch, 3th/2th gear switch contacts - short circuit
134 | 615, Transmission range(TR)switch, 3th/2th gear switch contacts - open circuit
135 | 621, Shift solenoid (SS) 1 - circuit malfunction
136 | 622, Shift solenoid (SS) 2 - circuit malfunction
137 | 624, AT electronic pressure control solenoid
138 | 625, AT electronic pressure control solenoid - circut malfunction
139 | 628, Modulated torque converter clutch (TCC) solenoid
140 | 629, Torque converter clutch (TCC) solenoid
141 | 634, Park/neutral position (PNP) switch
142 | 635, Transmission fluid temperature(TFT) switch - circut malfunction
143 | 636, Transmission fluid temperature(TFT) switch - circut malfunction
144 | 637, Transmission fluid temperature(TFT) switch - circut malfunction
145 | 638, Transmission fluid temperature(TFT) switch - circut malfunction
146 | 639, Turbine shaft speed (TSS) sensor - signal low
147 | 645, 1st gear failure - incorrect ratio
148 | 646, 2nd gear failure - incorrect ratio
149 | 647, 3rd gear failure - incorrect ratio
150 | 648, 4th gear failure - incorrect ratio
151 | 649, Electronic throttle valve - failure
152 | 651, Electronic throttle valve - intermittent failure
153 | 652, Modulated torque converter clutch (TCC) solenoid - circuit malfunction
154 | 653, Transmission control switch - not activated during self-test
155 | 658, Performance/economy switch - not activated during self-test
156 | 998, ECT sensor/IAT sensor/MAF sensor/TP sensor - circuit malfunction


--------------------------------------------------------------------------------
/eec-iv/src/babroval/eec_iv/controller/StartController.java:
--------------------------------------------------------------------------------
  1 | package babroval.eec_iv.controller;
  2 | 
  3 | import java.awt.event.ActionEvent;
  4 | import java.awt.event.ActionListener;
  5 | import java.io.InputStream;
  6 | import java.util.ArrayList;
  7 | import java.util.List;
  8 | import java.util.Timer;
  9 | import java.util.TimerTask;
 10 | 
 11 | import javax.swing.JOptionPane;
 12 | 
 13 | import babroval.eec_iv.model.Fault;
 14 | import babroval.eec_iv.model.Parameter;
 15 | import babroval.eec_iv.service.FaultServiceImpl;
 16 | import babroval.eec_iv.service.ParameterServiceImpl;
 17 | import babroval.eec_iv.service.Service;
 18 | import babroval.eec_iv.util.ConnectionPool;
 19 | import babroval.eec_iv.view.StartView;
 20 | import jssc.SerialPort;
 21 | import jssc.SerialPortEvent;
 22 | import jssc.SerialPortEventListener;
 23 | import jssc.SerialPortException;
 24 | 
 25 | public class StartController extends Thread {
 26 | 
 27 | 	private static final String FILE_FAULTS_PATH = "/EECIVFaults.csv";
 28 | 	private static final String FILE_PARAMETERS_PATH = "/EECIVParameters.csv";
 29 | 	private static SerialPort serialPort;
 30 | 	public static StartView view = new StartView();
 31 | 
 32 | 	private static List<Fault> allFaults = new ArrayList<>();
 33 | 	private static List<Parameter> allParameters = new ArrayList<>();
 34 | 	private static List<String> faults = new ArrayList<>();
 35 | 	private static StringBuffer data = new StringBuffer("");
 36 | 
 37 | 	private static Service<Fault> faultService = new FaultServiceImpl();
 38 | 	private static Service<Parameter> parameterService = new ParameterServiceImpl();
 39 | 
 40 | 	private static Timer timer = new Timer();
 41 | 	{
 42 | 		try {
 43 | 			serialPort = ConnectionPool.getPool().getPort();
 44 | 		} catch (Exception e) {
 45 | 			resetFrame();
 46 | 		}
 47 | 		resetFrame();
 48 | 
 49 | 		try {
 50 | 			InputStream csvFile = getClass().getResourceAsStream(FILE_FAULTS_PATH);
 51 | 			allFaults = faultService.getAll(csvFile);
 52 | 			csvFile = getClass().getResourceAsStream(FILE_PARAMETERS_PATH);
 53 | 			allParameters = parameterService.getAll(csvFile);
 54 | 		} catch (Exception e) {
 55 | 			resetFrame();
 56 | 			JOptionPane.showMessageDialog(view.getPanel(), "CSV file reading fault", "", JOptionPane.ERROR_MESSAGE);
 57 | 		}
 58 | 	}
 59 | 
 60 | 	public StartController() {
 61 | 	}
 62 | 
 63 | 	public void initController() {
 64 | 
 65 | 		view.getDisconnect().addActionListener(new ActionListener() {
 66 | 
 67 | 			@Override
 68 | 			public void actionPerformed(ActionEvent arg0) {
 69 | 				resetFrame();
 70 | 			}
 71 | 		});
 72 | 
 73 | 		view.getFaults().addActionListener(new ActionListener() {
 74 | 			@Override
 75 | 			public void actionPerformed(ActionEvent ae) {
 76 | 				try {
 77 | 					faults.clear();
 78 | 					faults.add("ECU faults:");
 79 | 					view.getFaults().setEnabled(false);
 80 | 					view.getData().setEnabled(false);
 81 | 					view.getDisconnect().setEnabled(false);
 82 | 					view.getBaud().setEnabled(false);
 83 | 					view.getLabelConnect().setText("Connection established. Reading ECU faults...  Wait 30 seconds");
 84 | 
 85 | 					serialPort = ConnectionPool.getPool().getConnection();
 86 | 					serialPort.addEventListener(new PortReader(), SerialPort.MASK_RXCHAR);
 87 | 					Thread.sleep(1000);
 88 | 
 89 | 					if (view.getBaud().isSelected()) {
 90 | 						serialPort.writeByte((byte) 4);
 91 | 					} else {
 92 | 						serialPort.writeByte((byte) 5);
 93 | 					}
 94 | 					Thread.sleep(500);
 95 | 
 96 | 					serialPort.writeByte((byte) 1);
 97 | 
 98 | 					timer = new Timer();
 99 | 					timer.schedule(new TimerTask() {
100 | 						@Override
101 | 						public void run() {
102 | 							try {
103 | 								serialPort.closePort();
104 | 								if (view.getLabel().getText().equals("")) {
105 | 
106 | 									resetFrame();
107 | 									view.getLabelConnect().setText(
108 | 											"ECU connection fault (check the wiring, reconnect USB cable, select or deselect checkbox 'other ECU', switch the ignition OFF and ON");
109 | 									JOptionPane.showMessageDialog(view.getPanel(),
110 | 											"ECU connection fault (check the wiring, reconnect USB cable, select or deselect checkbox 'other ECU', switch the ignition OFF and ON",
111 | 											"", JOptionPane.WARNING_MESSAGE);
112 | 								} else {
113 | 									view.getFaults().setEnabled(false);
114 | 									view.getKoeo().setEnabled(true);
115 | 									view.getDisconnect().setEnabled(true);
116 | 									view.getLabel().setVisible(true);
117 | 									view.getLabelConnect()
118 | 											.setText("Switch the ignition ON, if it is OFF, and press button 'KOEO'");
119 | 								}
120 | 							} catch (SerialPortException e) {
121 | 								resetFrame();
122 | 							}
123 | 						}
124 | 					}, 25000);
125 | 				} catch (Exception e) {
126 | 					resetFrame();
127 | 					JOptionPane.showMessageDialog(view.getPanel(), "COM-port connection fault (check USB wiring)", "",
128 | 							JOptionPane.ERROR_MESSAGE);
129 | 				}
130 | 			}
131 | 		});
132 | 
133 | 		view.getKoeo().addActionListener(new ActionListener() {
134 | 			@Override
135 | 			public void actionPerformed(ActionEvent ae) {
136 | 				try {
137 | 					faults.clear();
138 | 					faults.add("KOEO test result faults:");
139 | 					view.getLabel().setText("");
140 | 					view.getLabel().setVisible(false);
141 | 					view.getFaults().setEnabled(false);
142 | 					view.getKoeo().setEnabled(false);
143 | 					view.getDisconnect().setEnabled(false);
144 | 					view.getBaud().setEnabled(false);
145 | 					view.getLabelConnect().setText("Connection established. Performing KOEO test...  Wait 1 minute");
146 | 
147 | 					serialPort = ConnectionPool.getPool().getConnection();
148 | 					serialPort.addEventListener(new PortReader(), SerialPort.MASK_RXCHAR);
149 | 					Thread.sleep(1000);
150 | 
151 | 					if (view.getBaud().isSelected()) {
152 | 						serialPort.writeByte((byte) 4);
153 | 					} else {
154 | 						serialPort.writeByte((byte) 5);
155 | 					}
156 | 					Thread.sleep(500);
157 | 
158 | 					serialPort.writeByte((byte) 2);
159 | 
160 | 					timer = new Timer();
161 | 					timer.schedule(new TimerTask() {
162 | 						@Override
163 | 						public void run() {
164 | 							try {
165 | 								serialPort.closePort();
166 | 
167 | 								if (view.getLabel().getText().equals("")) {
168 | 									resetFrame();
169 | 									JOptionPane.showMessageDialog(view.getPanel(),
170 | 											"ECU connection fault (check wiring and switch the ignition ON)", "",
171 | 											JOptionPane.ERROR_MESSAGE);
172 | 								} else {
173 | 									view.getKoer().setEnabled(true);
174 | 									view.getDisconnect().setEnabled(true);
175 | 									view.getLabel().setVisible(true);
176 | 									view.getLabelConnect().setText("Start the engine and press button 'KOER'");
177 | 								}
178 | 							} catch (Exception e) {
179 | 								resetFrame();
180 | 							}
181 | 						}
182 | 					}, 60000);
183 | 
184 | 				} catch (Exception e) {
185 | 					resetFrame();
186 | 					JOptionPane.showMessageDialog(view.getPanel(), "COM-port connection fault (check USB wiring)", "",
187 | 							JOptionPane.ERROR_MESSAGE);
188 | 				}
189 | 			}
190 | 		});
191 | 
192 | 		view.getKoer().addActionListener(new ActionListener() {
193 | 			@Override
194 | 			public void actionPerformed(ActionEvent ae) {
195 | 				try {
196 | 					faults.clear();
197 | 					faults.add("KOER test result faults:");
198 | 					view.getLabel().setText("");
199 | 					view.getLabel().setVisible(false);
200 | 					view.getKoer().setEnabled(false);
201 | 					view.getDisconnect().setEnabled(false);
202 | 					view.getBaud().setEnabled(false);
203 | 					view.getLabelConnect().setText("Connection established. Performing KOER test...  Wait 2 minutes");
204 | 
205 | 					serialPort = ConnectionPool.getPool().getConnection();
206 | 					serialPort.addEventListener(new PortReader(), SerialPort.MASK_RXCHAR);
207 | 					Thread.sleep(1000);
208 | 
209 | 					if (view.getBaud().isSelected()) {
210 | 						serialPort.writeByte((byte) 4);
211 | 					} else {
212 | 						serialPort.writeByte((byte) 5);
213 | 					}
214 | 					Thread.sleep(500);
215 | 
216 | 					serialPort.writeByte((byte) 2);
217 | 
218 | 					timer = new Timer();
219 | 					timer.schedule(new TimerTask() {
220 | 						@Override
221 | 						public void run() {
222 | 							view.getLabelConnect().setText("Performing KOER test... Press and release the brake pedal,"
223 | 									+ " turn steering wheel one-half turn,"
224 | 									+ " cycle the Overdrive Cancel Switch On and Off, if equipped and wait 1 minute");
225 | 						}
226 | 					}, 35000);
227 | 
228 | 					timer.schedule(new TimerTask() {
229 | 						@Override
230 | 						public void run() {
231 | 							try {
232 | 								serialPort.closePort();
233 | 
234 | 								if (view.getLabel().getText().equals("")) {
235 | 									resetFrame();
236 | 									JOptionPane.showMessageDialog(view.getPanel(),
237 | 											"ECU connection fault (check the wiring and switch the ignition ON)", "",
238 | 											JOptionPane.ERROR_MESSAGE);
239 | 								} else {
240 | 									view.getDisconnect().setEnabled(true);
241 | 									view.getData().setEnabled(true);
242 | 									view.getLabel().setVisible(true);
243 | 									view.getLabelConnect()
244 | 											.setText("Start the engine, if it is OFF, and press button 'DATA'");
245 | 								}
246 | 							} catch (SerialPortException e) {
247 | 								resetFrame();
248 | 							}
249 | 						}
250 | 					}, 110000);
251 | 
252 | 				} catch (Exception e) {
253 | 					resetFrame();
254 | 					JOptionPane.showMessageDialog(view.getPanel(), "COM-port connection fault (check USB wiring)", "",
255 | 							JOptionPane.ERROR_MESSAGE);
256 | 				}
257 | 			}
258 | 		});
259 | 
260 | 		view.getData().addActionListener(new ActionListener() {
261 | 			@Override
262 | 			public void actionPerformed(ActionEvent ae) {
263 | 				try {
264 | 					faults.clear();
265 | 					data.setLength(0);
266 | 					view.getLabel().setText("Live Data:");
267 | 					view.getLabel().setVisible(false);
268 | 					view.getFaults().setEnabled(false);
269 | 					view.getKoeo().setEnabled(false);
270 | 					view.getKoer().setEnabled(false);
271 | 					view.getData().setEnabled(false);
272 | 					view.getDisconnect().setEnabled(false);
273 | 					view.getBaud().setEnabled(false);
274 | 					view.getDataList().setVisible(false);
275 | 					view.getLabelConnect().setText("Connection established. Waiting for ECU live data...");
276 | 
277 | 					serialPort = ConnectionPool.getPool().getConnection();
278 | 					serialPort.addEventListener(new PortReader(), SerialPort.MASK_RXCHAR);
279 | 					Thread.sleep(1000);
280 | 
281 | 					if (view.getBaud().isSelected()) {
282 | 						serialPort.writeByte((byte) 4);
283 | 					} else {
284 | 						serialPort.writeByte((byte) 5);
285 | 					}
286 | 					Thread.sleep(500);
287 | 
288 | 					serialPort.writeByte((byte) 3);
289 | 
290 | 					timer = new Timer();
291 | 					timer.schedule(new TimerTask() {
292 | 						@Override
293 | 						public void run() {
294 | 
295 | 							if (0 == view.getDataList().getModel().getSize()) {
296 | 								resetFrame();
297 | 								JOptionPane.showMessageDialog(view.getPanel(),
298 | 										"ECU connection fault (check the wiring and switch the ignition ON)", "",
299 | 										JOptionPane.ERROR_MESSAGE);
300 | 							} else {
301 | 								view.getDisconnect().setEnabled(true);
302 | 								view.getLabel().setVisible(true);
303 | 								view.getDataList().setVisible(true);
304 | 								view.getLabelConnect().setText("Connection established. Reading ECU live data...");
305 | 							}
306 | 						}
307 | 					}, 25000);
308 | 
309 | 				} catch (Exception e) {
310 | 					resetFrame();
311 | 					JOptionPane.showMessageDialog(view.getPanel(), "COM-port connection fault (check USB wiring)", "",
312 | 							JOptionPane.ERROR_MESSAGE);
313 | 				}
314 | 			}
315 | 		});
316 | 	}
317 | 
318 | 	private static void resetFrame() {
319 | 		try {
320 | 			if (serialPort.isOpened()) {
321 | 				serialPort.closePort();
322 | 			}
323 | 		} catch (Exception e) {
324 | 			view.dispose();
325 | 			JOptionPane.showMessageDialog(view.getPanel(),
326 | 					"COM-port connection fault (check USB wiring and restart application)", "",
327 | 					JOptionPane.ERROR_MESSAGE);
328 | 
329 | 			System.exit(1);
330 | 		}
331 | 		faults.clear();
332 | 		data.setLength(0);
333 | 		view.getBaud().setEnabled(true);
334 | 		view.getFaults().setEnabled(true);
335 | 		view.getKoeo().setEnabled(false);
336 | 		view.getKoer().setEnabled(false);
337 | 		view.getData().setEnabled(true);
338 | 		view.getDisconnect().setEnabled(false);
339 | 		view.getLabel().setText("");
340 | 		view.getLabel().setVisible(false);
341 | 		view.getDataList().setVisible(false);
342 | 		view.getLabelConnect().setText("Connect scanner, switch the ignition ON and press button 'FAULTS'");
343 | 	}
344 | 
345 | 	private static class PortReader implements SerialPortEventListener {
346 | 		@Override
347 | 		public void serialEvent(SerialPortEvent event) {
348 | 			if (event.isRXCHAR() && event.getEventValue() > 0) {
349 | 				try {
350 | 					String receivedData = serialPort.readHexString(event.getEventValue());
351 | //					System.out.println(receivedData);
352 | 					if (receivedData.equals("19 A1")) {
353 | 						timer.cancel();
354 | 						resetFrame();
355 | 						JOptionPane.showMessageDialog(view.getPanel(),
356 | 								"ECU connection fault (check the wiring and switch the ignition ON)", "",
357 | 								JOptionPane.ERROR_MESSAGE);
358 | 					} else if (faults.isEmpty()) {
359 | 						data.append(receivedData.replaceAll("\\s", ""));
360 | 
361 | 						if (64 == data.length()) {
362 | 							allParameters = parameterService.updateAll(allParameters, data);
363 | 							for (Parameter parameter : allParameters) {
364 | 								view.getModelParam().add(parameter.getParameter_id() - 1,
365 | 										parameter.getName() + parameter.getValue());
366 | 							}
367 | 							data.setLength(0);
368 | 						}
369 | 					} else {
370 | 						String faultNumber = receivedData.substring(4, 5) + receivedData.substring(0, 2);
371 | 
372 | 						for (Fault fault : allFaults) {
373 | 							if (faultNumber.equals(fault.getNumber())) {
374 | 								faults.add(faultNumber + "  " + fault.getInfo());
375 | 							}
376 | 						}
377 | 						String str = "<html>";
378 | 						for (String fault : faults) {
379 | 							str = str + fault + "<br>";
380 | 						}
381 | 						view.getLabel().setText(str);
382 | 					}
383 | 				} catch (Exception e) {
384 | 					resetFrame();
385 | 					JOptionPane.showMessageDialog(view.getPanel(), "COM-port fault (check connection)" + e, "",
386 | 							JOptionPane.ERROR_MESSAGE);
387 | 				}
388 | 			}
389 | 		}
390 | 	}
391 | }
392 | 


--------------------------------------------------------------------------------
/EEC-IV.hex:
--------------------------------------------------------------------------------
  1 | :020000020000FC
  2 | :0200000024C01A
  3 | :100048004FC500E00093900009E10093290008E9FA
  4 | :1000580000932A000EE00093950008E100939A00AF
  5 | :100068000EE000939D008C9A949800E000939A000B
  6 | :1000780008E100939A007894ABC3949800E0009349
  7 | :100088009A0008E100939A000FEF1FEF24E6015051
  8 | :1000980010402040E0F701E00093980000EA009348
  9 | :1000A800990000E000939A0008E100939A000FEF8E
 10 | :1000B80014E601501040E8F70FEF1FEF22E33091EC
 11 | :1000C8009B0037FF03C030919C005AC30150104079
 12 | :1000D8002040A8F7949A00E000939C000FEF14E6E4
 13 | :1000E80001501040E8F700E000939C000FEF14E681
 14 | :1000F80001501040E8F700E000939C000FEF14E671
 15 | :1001080001501040E8F700E000939C000FEF14E660
 16 | :1001180001501040E8F700E000939C000FEF14E650
 17 | :1001280001501040E8F700E000939C000FEF14E640
 18 | :1001380001501040E8F700E000939C000FEF14E630
 19 | :1001480001501040E8F700E000939C000FEF14E620
 20 | :1001580001501040E8F700E000939C000FEF14E610
 21 | :1001680001501040E8F700E000939C000FEF14E600
 22 | :1001780001501040E8F700E000939C000FEF14E6F0
 23 | :1001880001501040E8F700E000939C000FEF14E6E0
 24 | :1001980001501040E8F701E000939C000FEF14E6CF
 25 | :1001A80001501040E8F704E000939C000FEF14E6BC
 26 | :1001B80001501040E8F700E000939C000FEF14E6B0
 27 | :1001C80001501040E8F700E000939C000FEF14E6A0
 28 | :1001D80001501040E8F700E000939C000FEF14E690
 29 | :1001E80001501040E8F705E000939C000FEF14E67B
 30 | :1001F80001501040E8F7949800E000939A0008E155
 31 | :1002080000939A0001E00A1301C05DC100E0009369
 32 | :10021800980007E60093990000E000939A0008E12F
 33 | :1002280000939A000FEF1FEF01501040E8F70FEF0F
 34 | :100238001FEF24E130919B0037FF09C030919C00EB
 35 | :1002480000E000939A0008E100939A000BC0015067
 36 | :100258001040204078F719E121EA10932C002093F0
 37 | :100268002C00B6C243E030919B0037FFFCCF3091A1
 38 | :100278009C00330F330F330F330F32954313F3CFF3
 39 | :1002880030E000919B0007FFFCCF10919C0000918B
 40 | :100298009B0007FFFCCF20919C003113F2CF321353
 41 | :1002A800F0CF00919B0007FFFCCF10919C000091BC
 42 | :1002B8009B0007FFFCCF10919C00110F110F110F2D
 43 | :1002C800110F12953113DDCF0FEF18E001501040D8
 44 | :1002D800E8F7949A31E030939C000FEF1FE001504B
 45 | :1002E8001040E8F700E00093980009E100939900B6
 46 | :1002F80004E60140F0F700E00093980007E6009359
 47 | :10030800990030EB30939C000FEF1FE00150104034
 48 | :10031800E8F7949800E000939A0008E100939A00A7
 49 | :1003280000919B0007FFFCCF10919C0000919B005F
 50 | :1003380007FFFCCF10919C0000919B0007FFFCCFAA
 51 | :1003480010919C0000919B0007FFFCCF10919C002E
 52 | :100358000FEF18E001501040E8F7949A3FEF309300
 53 | :100368009C000FEF1FE001501040E8F700E00093F9
 54 | :10037800980009E10093990004E60140F0F700E0D5
 55 | :100388000093980007E6009399003FE530939C009E
 56 | :100398000FEF1FE001501040E8F7949800E0009339
 57 | :1003A8009A0008E100939A0000919B0007FFFCCF98
 58 | :1003B80010919C0000919B0007FFFCCF10919C00BE
 59 | :1003C80000919B0007FFFCCF10919C0000919B00BF
 60 | :1003D80007FFFCCF10919C000FEF18E00150104070
 61 | :1003E800E8F7949A31E830939C000FEF1FE0015032
 62 | :1003F8001040E8F700E00093980009E100939900A5
 63 | :1004080004E60140F0F700E00093980007E6009347
 64 | :10041800990034E730939C000FEF1FE00150104023
 65 | :10042800E8F7949800E000939A0008E100939A0096
 66 | :1004380000919B0007FFFCCF10919C0000919B004E
 67 | :1004480007FFFCCF10919C0000919B0007FFFCCF99
 68 | :1004580010919C0000919B0007FFFCCF10919C001D
 69 | :100468000FEF18E001501040E8F7949A30E030930D
 70 | :100478009C000FEF1FE001501040E8F700E00093E8
 71 | :10048800980009E10093990004E60140F0F700E0C4
 72 | :100498000093980007E60093990030EA30939C0097
 73 | :1004A8000FEF1FE001501040E8F7949801E0009327
 74 | :1004B800980000EA0093990000E000939A0008E190
 75 | :1004C80000939A005DC100E00093980003E3009355
 76 | :1004D800990000E000939A0008E100939A000FEF5A
 77 | :1004E8001FEF01501040E8F70FEF1FEF2AE030919F
 78 | :1004F8009B0037FF09C030919C0000E000939A00F0
 79 | :1005080008E100939A000BC001501040204078F792
 80 | :1005180019E121EA10932C0020932C0059C143E0E3
 81 | :1005280030919B0037FFFCCF30919C00330F330F85
 82 | :10053800330F330F32954313F3CF30E000919B0014
 83 | :1005480007FFFCCF10919C0000919B0007FFFCCF98
 84 | :1005580020919C003113F2CF3213F0CF00919B0011
 85 | :1005680007FFFCCF10919C0000919B0007FFFCCF78
 86 | :1005780010919C00110F110F110F110F12953113CB
 87 | :10058800DDCF0FEF14E001501040E8F7949A31E006
 88 | :1005980030939C000FEF17E001501040E8F700E09F
 89 | :1005A8000093980009E1009399000FE10140F0F7EA
 90 | :1005B80000E00093980003E30093990030EB309338
 91 | :1005C8009C000FEF17E001501040E8F7949800E006
 92 | :1005D80000939A0008E100939A0000919B0007FF9E
 93 | :1005E800FCCF10919C0000919B0007FFFCCF10915D
 94 | :1005F8009C0000919B0007FFFCCF10919C0000918C
 95 | :100608009B0007FFFCCF10919C000FEF14E00150F6
 96 | :100618001040E8F7949A3FEF30939C000FEF17E0F3
 97 | :1006280001501040E8F700E00093980009E10093BA
 98 | :1006380099000FE10140F0F700E00093980003E310
 99 | :10064800009399003FE530939C000FEF17E00150AD
100 | :100658001040E8F7949800E000939A0008E10093AE
101 | :100668009A0000919B0007FFFCCF10919C0000911D
102 | :100678009B0007FFFCCF10919C0000919B0007FF97
103 | :10068800FCCF10919C0000919B0007FFFCCF1091BC
104 | :100698009C000FEF14E001501040E8F7949A31E8FD
105 | :1006A80030939C000FEF17E001501040E8F700E08E
106 | :1006B8000093980009E1009399000FE10140F0F7D9
107 | :1006C80000E00093980003E30093990034E7309327
108 | :1006D8009C000FEF17E001501040E8F7949800E0F5
109 | :1006E80000939A0008E100939A0000919B0007FF8D
110 | :1006F800FCCF10919C0000919B0007FFFCCF10914C
111 | :100708009C0000919B0007FFFCCF10919C0000917A
112 | :100718009B0007FFFCCF10919C000FEF14E00150E5
113 | :100728001040E8F7949A30E030939C000FEF17E000
114 | :1007380001501040E8F700E00093980009E10093A9
115 | :1007480099000FE10140F0F700E00093980003E3FF
116 | :100758000093990030EA30939C000FEF17E00150A6
117 | :100768001040E8F7949801E00093980000EA00939D
118 | :10077800990000E000939A0008E100939A0000C0F5
119 | :1007880023E00FEF1FEF01501040E8F700919B00A6
120 | :1007980007FFFCCF10919C00110F110F110F110FC3
121 | :1007A80012952113F3CF21E0251304C066E274EA01
122 | :1007B80091E02CC022E0251304C065E274E991E0C1
123 | :1007C80025C023E0251304C061E476E991E01EC04A
124 | :1007D80024E0251305C0A1E025E0251301C0A1E010
125 | :1007E80021E0251301C049CC22E0251301C045CCE6
126 | :1007F80023E0251301C041CC27E02513E9CF1CE0F5
127 | :1008080010932C0010932C0050E0E2CF30E00091C0
128 | :100818009B0007FFFCCF10919C0000919B0007FFF5
129 | :10082800FCCF20919C003113F2CF3213F0CF00910E
130 | :100838009B0007FFFCCF10919C0000919B0007FFD5
131 | :10084800FCCF10919C00110F110F110F110F129571
132 | :100858003113DDCF21E0291332C00FEF1AE1015027
133 | :100868001040E8F7949A31E030939C000FEF1CE3B6
134 | :1008780001501040E8F700E00093980003E300936C
135 | :1008880099000FEF13E001501040E8F701E00093E2
136 | :10089800980000EA0093990030EB30939C000FEF2A
137 | :1008A8001CE301501040E8F7949800E000939A0088
138 | :1008B80008E100939A0023E0251301C029C00091A4
139 | :1008C8009B0007FFFCCF10919C0000919B0007FF45
140 | :1008D800FCCF20919C0030E0311301C025C010935B
141 | :1008E8002C0020932C0090E000919B0007FFFCCF88
142 | :1008F80010919C0000919B0007FFFCCF20919C0069
143 | :10090800311301C011C010932C0020932C0000C09B
144 | :1009180000919B0007FFFCCF10919C0000919B0069
145 | :1009280007FFFCCF10919C0000919B0007FFFCCFB4
146 | :1009380010919C0000919B0007FFFCCF10919C0038
147 | :1009480021E0291332C00FEF1AE101501040E8F7F7
148 | :10095800949A3FEF30939C000FEF1CE30150104036
149 | :10096800E8F700E00093980003E3009399000FEF85
150 | :1009780013E001501040E8F701E00093980000EA06
151 | :10098800009399003FE530939C000FEF11E401506C
152 | :100998001040E8F7949800E000939A0008E100936B
153 | :1009A8009A0023E0251301C028C000919B0007FF8F
154 | :1009B800FCCF10919C0000919B0007FFFCCF209179
155 | :1009C8009C0030E0311301C024C010932C00209308
156 | :1009D8002C0000919B0007FFFCCF10919C00009118
157 | :1009E8009B0007FFFCCF20919C00311301C011C070
158 | :1009F80010932C0020932C0000C000919B0007FF4F
159 | :100A0800FCCF10919C0000919B0007FFFCCF109138
160 | :100A18009C0000919B0007FFFCCF10919C00009167
161 | :100A28009B0007FFFCCF10919C0021E0291330C0E8
162 | :100A38000FEF1AE101501040E8F7949A60939C0078
163 | :100A48000FEF1CE301501040E8F700E00093980016
164 | :100A580003E3009399000FEF13E001501040E8F70B
165 | :100A680001E00093980000EA0093990070939C00BD
166 | :100A78000FEF1CE301501040E8F7949800E0009352
167 | :100A88009A0008E100939A0023E0251301C02AC0C8
168 | :100A980000919B0007FFFCCF10919C0000919B00E8
169 | :100AA80007FFFCCF20919C0030E0311301C026C025
170 | :100AB80010932C0020932C0000919B0007FFFCCF83
171 | :100AC80010919C0000919B0007FFFCCF20919C0097
172 | :100AD800311301C013C010932C0020932C0002C0C6
173 | :100AE8007FC5C2CA00919B0007FFFCCF10919C00F4
174 | :100AF80000919B0007FFFCCF10919C0000919B0088
175 | :100B080007FFFCCF10919C0000919B0007FFFCCFD2
176 | :100B180010919C0021E0291336C00FEF1AE1015013
177 | :100B28001040E8F7949A30E030939C000FEF1CE3F4
178 | :100B380001501040E8F700E00093980003E30093A9
179 | :100B480099000FEF13E001501040E8F701E000931F
180 | :100B5800980000EA0093990030EA30939C000FEF68
181 | :100B68001CE301501040E8F7949800E000939A00C5
182 | :100B780008E100939A0023E0251305C000C021E492
183 | :100B8800261329C02EC500919B0007FFFCCF1091AA
184 | :100B98009C0000919B0007FFFCCF20919C0030E057
185 | :100BA800311301C01EC510932C0020932C00009116
186 | :100BB8009B0007FFFCCF10919C0000919B0007FF52
187 | :100BC800FCCF20919C00311301C011C010932C0060
188 | :100BD80020932C0000C000919B0007FFFCCF1091D0
189 | :100BE8009C0000919B0007FFFCCF10919C00009196
190 | :100BF8009B0007FFFCCF10919C0000919B0007FF12
191 | :100C0800FCCF10919C0000919B0007FFFCCF109136
192 | :100C18009C0000919B0007FFFCCF10919C0021E0F5
193 | :100C2800281392C00FEF1AE101501040E8F7949A88
194 | :100C380031E030939C000FEF1CE301501040E8F7BF
195 | :100C480000E00093980003E3009399000FEF13E08E
196 | :100C580001501040E8F701E00093980000EA009383
197 | :100C6800990038E330939C000FEF1BE501501040CA
198 | :100C7800E8F731E130939C000FEF1CE3015010407E
199 | :100C8800E8F700E00093980003E3009399000FEF62
200 | :100C980013E001501040E8F701E00093980000EAE3
201 | :100CA8000093990038E230939C000FEF1BE5015048
202 | :100CB8001040E8F738E030939C000FEF1CE3015038
203 | :100CC8001040E8F700E00093980003E300939900D0
204 | :100CD8000FEF13E001501040E8F701E0009398008F
205 | :100CE80000EA0093990038EA30939C000FEF1BE567
206 | :100CF80001501040E8F739E030939C000FEF1CE3F7
207 | :100D080001501040E8F700E00093980003E30093D7
208 | :100D180099000FEF13E001501040E8F701E000934D
209 | :100D2800980000EA0093990038EB30939C000FEF8D
210 | :100D380016E401501040E8F7949800E000939A00F8
211 | :100D480008E100939A0061C000919B0007FFFCCF67
212 | :100D580010919C0000919B0007FFFCCF20919C0004
213 | :100D680033E0351335C010932C0020932C000091EC
214 | :100D78009B0007FFFCCF10919C0000919B0007FF90
215 | :100D8800FCCF20919C0010932C0020932C00009104
216 | :100D98009B0007FFFCCF10919C0000919B0007FF70
217 | :100DA800FCCF20919C0010932C0020932C000091E4
218 | :100DB8009B0007FFFCCF10919C0000919B0007FF50
219 | :100DC800FCCF20919C0010932C0020932C001DC078
220 | :100DD80030E0311301C005C410932C0020932C007F
221 | :100DE80000919B0007FFFCCF10919C0000919B0095
222 | :100DF80007FFFCCF20919C00311301C012C0109353
223 | :100E08002C0020932C0001C001CD00919B0007FF0E
224 | :100E1800FCCF10919C0000919B0007FFFCCF109124
225 | :100E28009C0000919B0007FFFCCF10919C00009153
226 | :100E38009B0007FFFCCF10919C0000919B0007FFCF
227 | :100E4800FCCF10919C0000919B0007FFFCCF1091F4
228 | :100E58009C0021E0281392C00FEF1AE101501040C6
229 | :100E6800E8F7949A3DE030939C000FEF1CE30150A3
230 | :100E78001040E8F700E00093980003E3009399001E
231 | :100E88000FEF13E001501040E8F701E000939800DD
232 | :100E980000EA0093990038EF30939C000FEF1BE5B0
233 | :100EA80001501040E8F730E130939C000FEF1CE34D
234 | :100EB80001501040E8F700E00093980003E3009326
235 | :100EC80099000FEF13E001501040E8F701E000939C
236 | :100ED800980000EA0093990038E330939C000FEFE4
237 | :100EE8001BE501501040E8F73FE030939C000FEFFE
238 | :100EF8001CE301501040E8F700E00093980003E37A
239 | :100F0800009399000FEF13E001501040E8F701E05B
240 | :100F18000093980000EA0093990038ED30939C0004
241 | :100F28000FEF1BE501501040E8F735E130939C00C6
242 | :100F38000FEF1CE301501040E8F700E00093980021
243 | :100F480003E3009399000FEF13E001501040E8F716
244 | :100F580001E00093980000EA0093990038E6309386
245 | :100F68009C000FEF16E401501040E8F7949800E059
246 | :100F780000939A0008E100939A0060C000919B00DA
247 | :100F880007FFFCCF10919C0000919B0007FFFCCF4E
248 | :100F980020919C0033E0351335C010932C0020932A
249 | :100FA8002C0000919B0007FFFCCF10919C00009142
250 | :100FB8009B0007FFFCCF20919C0010932C002093EE
251 | :100FC8002C0000919B0007FFFCCF10919C00009122
252 | :100FD8009B0007FFFCCF20919C0010932C002093CE
253 | :100FE8002C0000919B0007FFFCCF10919C00009102
254 | :100FF8009B0007FFFCCF20919C0010932C002093AE
255 | :101008002C001CC030E0311301C0EBC210932C003F
256 | :1010180020932C0000919B0007FFFCCF10919C00AF
257 | :1010280000919B0007FFFCCF20919C00311301C069
258 | :1010380011C010932C0020932C0000C000919B003D
259 | :1010480007FFFCCF10919C0000919B0007FFFCCF8D
260 | :1010580010919C0000919B0007FFFCCF10919C0011
261 | :1010680000919B0007FFFCCF10919C0000919B0012
262 | :1010780007FFFCCF10919C0000919B0007FFFCCF5D
263 | :1010880010919C0021E0281392C00FEF1AE1015043
264 | :101098001040E8F7949A36E230939C000FEF1CE377
265 | :1010A80001501040E8F700E00093980003E3009334
266 | :1010B80099000FEF13E001501040E8F701E00093AA
267 | :1010C800980000EA0093990038E630939C000FEFEF
268 | :1010D8001BE501501040E8F73CE030939C000FEF0F
269 | :1010E8001CE301501040E8F700E00093980003E388
270 | :1010F800009399000FEF13E001501040E8F701E06A
271 | :101108000093980000EA0093990038EE30939C0011
272 | :101118000FEF1BE501501040E8F734E030939C00D6
273 | :101128000FEF1CE301501040E8F700E0009398002F
274 | :1011380003E3009399000FEF13E001501040E8F724
275 | :1011480001E00093980000EA0093990038E6309394
276 | :101158009C000FEF1BE501501040E8F73EE030938C
277 | :101168009C000FEF1CE301501040E8F700E00093EB
278 | :10117800980003E3009399000FEF13E0015010402B
279 | :10118800E8F701E00093980000EA0093990038EC32
280 | :1011980030939C000FEF16E401501040E8F7949844
281 | :1011A80000E000939A0008E100939A0060C0009163
282 | :1011B8009B0007FFFCCF10919C0000919B0007FF4C
283 | :1011C800FCCF20919C0033E0351335C010932C00E0
284 | :1011D80020932C0000919B0007FFFCCF10919C00EE
285 | :1011E80000919B0007FFFCCF20919C0010932C00DE
286 | :1011F80020932C0000919B0007FFFCCF10919C00CE
287 | :1012080000919B0007FFFCCF20919C0010932C00BD
288 | :1012180020932C0000919B0007FFFCCF10919C00AD
289 | :1012280000919B0007FFFCCF20919C0010932C009D
290 | :1012380020932C001CC030E0311301C0D2C11093A0
291 | :101248002C0020932C0000919B0007FFFCCF1091ED
292 | :101258009C0000919B0007FFFCCF20919C0031135C
293 | :1012680001C011C010932C0020932C0000C00091E5
294 | :101278009B0007FFFCCF10919C0000919B0007FF8B
295 | :10128800FCCF10919C0000919B0007FFFCCF1091B0
296 | :101298009C0000919B0007FFFCCF10919C000091DF
297 | :1012A8009B0007FFFCCF10919C0000919B0007FF5B
298 | :1012B800FCCF10919C0021E0281392C00FEF1AE197
299 | :1012C80001501040E8F7949A36E130939C000FEFF4
300 | :1012D8001CE301501040E8F700E00093980003E396
301 | :1012E800009399000FEF13E001501040E8F701E078
302 | :1012F8000093980000EA0093990038E530939C0029
303 | :101308000FEF1BE501501040E8F73BE130939C00DC
304 | :101318000FEF1CE301501040E8F700E0009398003D
305 | :1013280003E3009399000FEF13E001501040E8F732
306 | :1013380001E00093980000EA0093990038E83093A0
307 | :101348009C000FEF1BE501501040E8F73AE130939D
308 | :101358009C000FEF1CE301501040E8F700E00093F9
309 | :10136800980003E3009399000FEF13E00150104039
310 | :10137800E8F701E00093980000EA0093990038E943
311 | :1013880030939C000FEF1BE501501040E8F730E266
312 | :1013980030939C000FEF1CE301501040E8F700E089
313 | :1013A8000093980003E3009399000FEF13E00150B6
314 | :1013B8001040E8F701E00093980000EA00939900D4
315 | :1013C80038E030939C000FEF16E401501040E8F726
316 | :1013D800949800E000939A0008E100939A0060C096
317 | :1013E80000919B0007FFFCCF10919C0000919B008F
318 | :1013F80007FFFCCF20919C0033E0351335C01093D4
319 | :101408002C0020932C0000919B0007FFFCCF10912B
320 | :101418009C0000919B0007FFFCCF20919C0010933B
321 | :101428002C0020932C0000919B0007FFFCCF10910B
322 | :101438009C0000919B0007FFFCCF20919C0010931B
323 | :101448002C0020932C0000919B0007FFFCCF1091EB
324 | :101458009C0000919B0007FFFCCF20919C001093FB
325 | :101468002C0020932C001CC030E0311301C0B9C0FF
326 | :1014780010932C0020932C0000919B0007FFFCCFB9
327 | :1014880010919C0000919B0007FFFCCF20919C00CD
328 | :10149800311301C011C010932C0020932C0000C000
329 | :1014A80000919B0007FFFCCF10919C0000919B00CE
330 | :1014B80007FFFCCF10919C0000919B0007FFFCCF19
331 | :1014C80010919C0000919B0007FFFCCF10919C009D
332 | :1014D80000919B0007FFFCCF10919C0000919B009E
333 | :1014E80007FFFCCF10919C0023E0251301C028C002
334 | :1014F80000919B0007FFFCCF10919C0000919B007E
335 | :1015080007FFFCCF20919C0030E0311301C069C077
336 | :1015180010932C0020932C0000919B0007FFFCCF18
337 | :1015280010919C0000919B0007FFFCCF20919C002C
338 | :10153800311301C011C010932C0020932C0000C05F
339 | :1015480000919B0007FFFCCF10919C0000919B002D
340 | :1015580007FFFCCF10919C0000919B0007FFFCCF78
341 | :1015680010919C0000919B0007FFFCCF10919C00FC
342 | :1015780000919B0007FFFCCF10919C0000919B00FD
343 | :1015880007FFFCCF10919C0023E0251301C02BC05E
344 | :1015980000919B0007FFFCCF10919C0000919B00DD
345 | :1015A80007FFFCCF20919C0030E0311301C019C027
346 | :1015B80010932C0020932C0000919B0007FFFCCF78
347 | :1015C80010919C0000919B0007FFFCCF20919C008C
348 | :1015D800311301C014C010932C0020932C0003C0B9
349 | :1015E8008AC47EC47ECA00919B0007FFFCCF10917D
350 | :1015F8009C0000919B0007FFFCCF10919C0000917C
351 | :101608009B0007FFFCCF10919C0000919B0007FFF7
352 | :10161800FCCF10919C0000919B0007FFFCCF10911C
353 | :101628009C0000919B0007FFFCCF10919C0023E0D9
354 | :10163800251301C029C000919B0007FFFCCF109122
355 | :101648009C0000919B0007FFFCCF20919C0030E09C
356 | :10165800311301C045C410932C0020932C00009135
357 | :101668009B0007FFFCCF10919C0000919B0007FF97
358 | :10167800FCCF20919C00311301C012C010932C00A4
359 | :1016880020932C0001C0C0CB00919B0007FFFCCF2A
360 | :1016980010919C0000919B0007FFFCCF10919C00CB
361 | :1016A80000919B0007FFFCCF10919C0000919B00CC
362 | :1016B80007FFFCCF10919C0000919B0007FFFCCF17
363 | :1016C80010919C0000919B0007FFFCCF10919C009B
364 | :1016D80023E0251301C028C000919B0007FFFCCF21
365 | :1016E80010919C0000919B0007FFFCCF20919C006B
366 | :1016F80030E0311301C0F4C310932C0020932C0068
367 | :1017080000919B0007FFFCCF10919C0000919B006B
368 | :1017180007FFFCCF20919C00311301C011C010932A
369 | :101728002C0020932C0000C000919B0007FFFCCFE9
370 | :1017380010919C0000919B0007FFFCCF10919C002A
371 | :1017480000919B0007FFFCCF10919C0000919B002B
372 | :1017580007FFFCCF10919C0021E0281392C00FEFE7
373 | :1017680018EB01501040E8F7949A31E030939C0050
374 | :101778000FEF1CE301501040E8F700E000939800D9
375 | :1017880003E3009399000FEF13E001501040E8F7CE
376 | :1017980001E00093980000EA0093990038E3309341
377 | :1017A8009C000FEF1BE501501040E8F731E1309342
378 | :1017B8009C000FEF1CE301501040E8F700E0009395
379 | :1017C800980003E3009399000FEF13E001501040D5
380 | :1017D800E8F701E00093980000EA0093990038E2E6
381 | :1017E80030939C000FEF1BE501501040E8F738E0FC
382 | :1017F80030939C000FEF1CE301501040E8F700E025
383 | :101808000093980003E3009399000FEF13E0015051
384 | :101818001040E8F701E00093980000EA009399006F
385 | :1018280038EA30939C000FEF1BE501501040E8F7B1
386 | :1018380039E030939C000FEF1CE301501040E8F7AB
387 | :1018480000E00093980003E3009399000FEF13E082
388 | :1018580001501040E8F701E00093980000EA009377
389 | :10186800990038EB30939C000FEF16E401501040BC
390 | :10187800E8F7949800E000939A0008E100939A0032
391 | :101888004DC000919B0007FFFCCF10919C00009178
392 | :101898009B0007FFFCCF20919C0033E0351335C037
393 | :1018A80010932C0020932C0000919B0007FFFCCF85
394 | :1018B80010919C0000919B0007FFFCCF20919C0099
395 | :1018C80010932C0020932C0000919B0007FFFCCF65
396 | :1018D80010919C0000919B0007FFFCCF20919C0079
397 | :1018E80010932C0020932C0000919B0007FFFCCF45
398 | :1018F80010919C0000919B0007FFFCCF20919C0059
399 | :1019080010932C0020932C0009C030E0311301C043
400 | :10191800E7C210932C0020932C0000C000919B007C
401 | :1019280007FFFCCF10919C0000919B0007FFFCCFA4
402 | :1019380010919C0000919B0007FFFCCF10919C0028
403 | :1019480000919B0007FFFCCF10919C0021E0281319
404 | :1019580092C00FEF18EB01501040E8F7949A3DE061
405 | :1019680030939C000FEF1CE301501040E8F700E0B3
406 | :101978000093980003E3009399000FEF13E00150E0
407 | :101988001040E8F701E00093980000EA00939900FE
408 | :1019980038EF30939C000FEF1BE501501040E8F73B
409 | :1019A80030E130939C000FEF1CE301501040E8F742
410 | :1019B80000E00093980003E3009399000FEF13E011
411 | :1019C80001501040E8F701E00093980000EA009306
412 | :1019D800990038E330939C000FEF1BE5015010404D
413 | :1019E800E8F73FE030939C000FEF1CE301501040F4
414 | :1019F800E8F700E00093980003E3009399000FEFE5
415 | :101A080013E001501040E8F701E00093980000EA65
416 | :101A18000093990038ED30939C000FEF1BE50150BF
417 | :101A28001040E8F735E130939C000FEF1CE30150BC
418 | :101A38001040E8F700E00093980003E30093990052
419 | :101A48000FEF13E001501040E8F701E00093980011
420 | :101A580000EA0093990038E630939C000FEF16E4F3
421 | :101A680001501040E8F7949800E000939A0008E1CC
422 | :101A780000939A004DC000919B0007FFFCCF109186
423 | :101A88009C0000919B0007FFFCCF20919C0033E055
424 | :101A9800351335C010932C0020932C0000919B0027
425 | :101AA80007FFFCCF10919C0000919B0007FFFCCF23
426 | :101AB80020919C0010932C0020932C0000919B00F7
427 | :101AC80007FFFCCF10919C0000919B0007FFFCCF03
428 | :101AD80020919C0010932C0020932C0000919B00D7
429 | :101AE80007FFFCCF10919C0000919B0007FFFCCFE3
430 | :101AF80020919C0010932C0020932C0009C030E00A
431 | :101B0800311301C0EDC110932C0020932C0000C0AC
432 | :101B180000919B0007FFFCCF10919C0000919B0057
433 | :101B280007FFFCCF10919C0000919B0007FFFCCFA2
434 | :101B380010919C0000919B0007FFFCCF10919C0026
435 | :101B480021E0281392C00FEF18EB01501040E8F77E
436 | :101B5800949A36E230939C000FEF1CE3015010403A
437 | :101B6800E8F700E00093980003E3009399000FEF73
438 | :101B780013E001501040E8F701E00093980000EAF4
439 | :101B88000093990038E630939C000FEF1BE5015055
440 | :101B98001040E8F73CE030939C000FEF1CE3015045
441 | :101BA8001040E8F700E00093980003E300939900E1
442 | :101BB8000FEF13E001501040E8F701E000939800A0
443 | :101BC80000EA0093990038EE30939C000FEF1BE574
444 | :101BD80001501040E8F734E030939C000FEF1CE30D
445 | :101BE80001501040E8F700E00093980003E30093E9
446 | :101BF80099000FEF13E001501040E8F701E000935F
447 | :101C0800980000EA0093990038E630939C000FEFA3
448 | :101C18001BE501501040E8F73EE030939C000FEFC1
449 | :101C28001CE301501040E8F700E00093980003E33C
450 | :101C3800009399000FEF13E001501040E8F701E01E
451 | :101C48000093980000EA0093990038EC30939C00C8
452 | :101C58000FEF16E401501040E8F7949800E0009365
453 | :101C68009A0008E100939A004DC000919B0007FF7D
454 | :101C7800FCCF10919C0000919B0007FFFCCF2091A6
455 | :101C88009C0033E0351335C010932C0020932C00B2
456 | :101C980000919B0007FFFCCF10919C0000919B00D6
457 | :101CA80007FFFCCF20919C0010932C0020932C0060
458 | :101CB80000919B0007FFFCCF10919C0000919B00B6
459 | :101CC80007FFFCCF20919C0010932C0020932C0040
460 | :101CD80000919B0007FFFCCF10919C0000919B0096
461 | :101CE80007FFFCCF20919C0010932C0020932C0020
462 | :101CF80009C030E0311301C0F3C010932C002093C9
463 | :101D08002C00EEC000919B0007FFFCCF10919C00B7
464 | :101D180000919B0007FFFCCF10919C0000919B0055
465 | :101D280007FFFCCF10919C0000919B0007FFFCCFA0
466 | :101D380010919C0021E0281392C00FEF18EB01507E
467 | :101D48001040E8F7949A36E130939C000FEF1CE3BB
468 | :101D580001501040E8F700E00093980003E3009377
469 | :101D680099000FEF13E001501040E8F701E00093ED
470 | :101D7800980000EA0093990038E530939C000FEF33
471 | :101D88001BE501501040E8F73BE130939C000FEF52
472 | :101D98001CE301501040E8F700E00093980003E3CB
473 | :101DA800009399000FEF13E001501040E8F701E0AD
474 | :101DB8000093980000EA0093990038E830939C005B
475 | :101DC8000FEF1BE501501040E8F73AE130939C0013
476 | :101DD8000FEF1CE301501040E8F700E00093980073
477 | :101DE80003E3009399000FEF13E001501040E8F768
478 | :101DF80001E00093980000EA0093990038E93093D5
479 | :101E08009C000FEF1BE501501040E8F730E23093DB
480 | :101E18009C000FEF1CE301501040E8F700E000932E
481 | :101E2800980003E3009399000FEF13E0015010406E
482 | :101E3800E8F701E00093980000EA0093990038E081
483 | :101E480030939C000FEF16E401501040E8F7949887
484 | :101E580000E000939A0008E100939A0041C00091C5
485 | :101E68009B0007FFFCCF10919C0000919B0007FF8F
486 | :101E7800FCCF20919C0010932C0020932C00009103
487 | :101E88009B0007FFFCCF10919C0000919B0007FF6F
488 | :101E9800FCCF20919C0010932C0020932C000091E3
489 | :101EA8009B0007FFFCCF10919C0000919B0007FF4F
490 | :101EB800FCCF20919C0010932C0020932C000091C3
491 | :101EC8009B0007FFFCCF10919C0000919B0007FF2F
492 | :101ED800FCCF20919C0010932C0020932C0000C074
493 | :101EE80080E023E02513CFCB21E42613CCCB61E29D
494 | :0C1EF80076EF81E0C8CB50912C0074CB39
495 | :00000001FF
496 | 


--------------------------------------------------------------------------------
/EEC-IV_asm:
--------------------------------------------------------------------------------
   1 |   ;
   2 |   ; EEC-IV.asm
   3 |   ;
   4 |   ; Created: 11-Sept-2012 9:00:11 PM
   5 |   ; Author : Maksim Babrou
   6 |   ;
   7 | 
   8 | 
   9 | .include "m128def.inc"
  10 | .org 0            ;Set start address
  11 | rjmp USART0_Init     ;go to label USART0_Init
  12 | .org 0x24       ;Set an Interrupt address to USART0, Rx(Receive) Complete
  13 | rjmp UART0_CMD ;go to label Receive_Complete 
  14 | 
  15 | 
  16 | USART0_Init:
  17 |   ; Set baud rate
  18 | ldi r16,0 ; 38400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
  19 | sts UBRR0H,r16 
  20 | ldi r16,25 ; 38400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
  21 | sts 0x29,r16  ;UBRR0L
  22 |   ; Enable receiver and transmitter
  23 | ldi r16,(1<<RXCIE0)|(1<<RXEN0)|(1<<TXEN0)
  24 | sts 0x2A,r16  ;UCSR0B
  25 |   ; Set frame format: 8data, 2stop bit
  26 | ldi r16, (1<<USBS0)|(1<<UCSZ00)|(1<<UCSZ01)
  27 | sts UCSR0C,r16
  28 | 
  29 | ;USART1_Init:
  30 |   ; Enable receiver and transmitter
  31 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
  32 | sts UCSR1B,r16
  33 |   ; Set frame format: 8data, 2stop bit
  34 | ldi r16, (1<<USBS1)|(1<<UCSZ10)|(1<<UCSZ11)
  35 | sts UCSR1C,r16
  36 | 
  37 | 
  38 | sbi DDRD,4  ;switch to output
  39 | 
  40 | USART_Start:
  41 | 
  42 | cbi PORTD,4 ;switch to Receive
  43 | 
  44 |    ; Flush Recever
  45 | ldi r16,(0<<RXEN1)
  46 | sts UCSR1B,r16
  47 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
  48 | sts UCSR1B,r16
  49 | 
  50 | sei            ;Global interrupt permission
  51 | 
  52 | 
  53 | rjmp Idle
  54 | 
  55 | 
  56 | USART_Go:
  57 | 
  58 | cbi PORTD,4 ;Switch to receive
  59 | 
  60 |  ; Flush Recever
  61 | ldi r16,(0<<RXEN1)
  62 | sts UCSR1B,r16
  63 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
  64 | sts UCSR1B,r16
  65 | 
  66 | 
  67 | ldi r16, 255      ;Load value to the register r16
  68 | ldi r17, 255      ;Load value to the register r17
  69 | ldi r18, 100       ;Load value to the register r18
  70 | delayMain:             ;Delay cycle
  71 | subi r16, 1       ;Subtract 1 from register r16
  72 | sbci r17, 0       ;Subtract with transfer from the register r17
  73 | sbci r18, 0       ;ubtract with transfer from the register r18
  74 | brcc delayMain       ;If there was no transfer back to the label delay
  75 | 
  76 |   ; Set baud rate
  77 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
  78 | sts UBRR1H,r16 
  79 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
  80 | sts UBRR1L,r16
  81 | 
  82 |  ; Flush Recever
  83 | ldi r16,(0<<RXEN1)
  84 | sts UCSR1B,r16
  85 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
  86 | sts UCSR1B,r16
  87 | 
  88 | ldi r16, 255      
  89 | ldi r17, 100      
  90 | d22:            ;Delay cycle
  91 | subi r16, 1       
  92 | sbci r17, 0      
  93 | brcc d22
  94 | 
  95 | 
  96 | 
  97 | 
  98 | 
  99 | ldi r16, 255      ;Load value to the register r16
 100 | ldi r17, 255      ;Load value to the register r17
 101 | ldi r18, 50       ;Load value to the register r18
 102 | d:             ;Delay cycle
 103 | 
 104 |    ; Wait for data to be received
 105 | lds r19,UCSR1A
 106 | sbrs r19,RXC1 ;Skip the next line if a data has been unread  in UDR
 107 | rjmp dd
 108 |   ; Get and return received data from buffer
 109 | lds r19,UDR1 
 110 | 
 111 | rjmp USART_24
 112 | 
 113 | dd:
 114 | subi r16, 1       ;Subtract 1 from register r16
 115 | sbci r17, 0       ;Subtract with transfer from the register r17
 116 | sbci r18, 0       ;Subtract with transfer from the register r18
 117 | brcc d       ;If there was no transfer back to the label delay
 118 | 
 119 | 
 120 | 
 121 | 
 122 | 
 123 | 
 124 | sbi PORTD,4  ;Switch to transfer
 125 | 
 126 |   ; Put data (r16) into buffer, sends the data
 127 | ldi r16,0 ;send $00
 128 | sts UDR1,r16
 129 | 
 130 | ldi r16, 255     
 131 | ldi r17, 100     
 132 | d0:             ;Delay cycle
 133 | subi r16, 1     
 134 | sbci r17, 0     
 135 | brcc d0        
 136 | 
 137 | ldi r16,0 ;send $00
 138 | sts UDR1,r16
 139 | 
 140 | ldi r16, 255      
 141 | ldi r17, 100      
 142 | d1:             ;Delay cycle
 143 | subi r16, 1       
 144 | sbci r17, 0      
 145 | brcc d1        
 146 | 
 147 | ldi r16,0 ;send $00
 148 | sts UDR1,r16
 149 | 
 150 | ldi r16, 255      
 151 | ldi r17, 100      
 152 | d2:             ;Delay cycle
 153 | subi r16, 1       
 154 | sbci r17, 0       
 155 | brcc d2        
 156 | 
 157 | ldi r16,0 ;send $00
 158 | sts UDR1,r16
 159 | 
 160 | ldi r16, 255      
 161 | ldi r17, 100      
 162 | d3:             ;Delay cycle
 163 | subi r16, 1       
 164 | sbci r17, 0       
 165 | brcc d3        
 166 | 
 167 | ldi r16,0 ;send $00
 168 | sts UDR1,r16
 169 | 
 170 | ldi r16, 255      
 171 | ldi r17, 100     
 172 | d4:             ;Delay cycle
 173 | subi r16, 1       
 174 | sbci r17, 0       
 175 | brcc d4        
 176 | 
 177 | ldi r16,0 ;send $00
 178 | sts UDR1,r16
 179 | 
 180 | ldi r16, 255      
 181 | ldi r17, 100      
 182 | d5:             ;Delay cycle
 183 | subi r16, 1       
 184 | sbci r17, 0       
 185 | brcc d5        
 186 | 
 187 | ldi r16,0 ;send $00
 188 | sts UDR1,r16
 189 | 
 190 | ldi r16, 255      
 191 | ldi r17, 100      
 192 | d6:             ;Delay cycle
 193 | subi r16, 1       
 194 | sbci r17, 0       
 195 | brcc d6        
 196 | 
 197 | ldi r16,0 ;send $00
 198 | sts UDR1,r16
 199 | 
 200 | ldi r16, 255      
 201 | ldi r17, 100      
 202 | d7:             ;Delay cycle
 203 | subi r16, 1       
 204 | sbci r17, 0       
 205 | brcc d7       
 206 | 
 207 | ldi r16,0 ;send $00
 208 | sts UDR1,r16
 209 | 
 210 | ldi r16, 255      
 211 | ldi r17, 100      
 212 | d8:             ;Delay cycle
 213 | subi r16, 1       
 214 | sbci r17, 0       
 215 | brcc d8        
 216 | 
 217 | ldi r16,0 ;send $00
 218 | sts UDR1,r16
 219 | 
 220 | ldi r16, 255      
 221 | ldi r17, 100      
 222 | d9:             ;Delay cycle
 223 | subi r16, 1       
 224 | sbci r17, 0       
 225 | brcc d9        
 226 | 
 227 | ldi r16,0 ;send $00
 228 | sts UDR1,r16
 229 | 
 230 | ldi r16, 255
 231 | ldi r17, 100     
 232 | d10:            ;Delay cycle
 233 | subi r16, 1      
 234 | sbci r17, 0       
 235 | brcc d10        
 236 | 
 237 | ldi r16,0 ;send $00
 238 | sts UDR1,r16
 239 | 
 240 | ldi r16, 255      
 241 | ldi r17, 100      
 242 | d11:            ;Delay cycle
 243 | subi r16, 1       
 244 | sbci r17, 0       
 245 | brcc d11        
 246 | 
 247 | ldi r16,1 ;send $01
 248 | sts UDR1,r16
 249 | 
 250 | ldi r16, 255      
 251 | ldi r17, 100      
 252 | d12:            ;Delay cycle
 253 | subi r16, 1      
 254 | sbci r17, 0       
 255 | brcc d12        
 256 | 
 257 | ldi r16,4 ;send $04
 258 | sts UDR1,r16
 259 | 
 260 | ldi r16, 255      
 261 | ldi r17, 100      
 262 | d14:            ;Delay cycle
 263 | subi r16, 1       
 264 | sbci r17, 0       
 265 | brcc d14        
 266 | 
 267 | ldi r16,0 ;send $00
 268 | sts UDR1,r16
 269 | 
 270 | ldi r16, 255      
 271 | ldi r17, 100      
 272 | d15:            ;Delay cycle
 273 | subi r16, 1       
 274 | sbci r17, 0       
 275 | brcc d15        
 276 | 
 277 | ldi r16,0 ;send $00
 278 | sts UDR1,r16
 279 | 
 280 | ldi r16, 255      
 281 | ldi r17, 100      
 282 | d17:            ;Delay cycle
 283 | subi r16, 1       
 284 | sbci r17, 0      
 285 | brcc d17       
 286 | 
 287 | ldi r16,0 ;send $00
 288 | sts UDR1,r16
 289 | 
 290 | ldi r16, 255     
 291 | ldi r17, 100     
 292 | d18:            ;Delay cycle
 293 | subi r16, 1      
 294 | sbci r17, 0      
 295 | brcc d18       
 296 | 
 297 | ldi r16,5 ;send $05
 298 | sts UDR1,r16
 299 | 
 300 | ldi r16, 255      
 301 | ldi r17, 100      
 302 | d19:            ;Delay cycle
 303 | subi r16, 1       
 304 | sbci r17, 0      
 305 | brcc d19
 306 | 
 307 | cbi PORTD,4 ;Switch to receive 
 308 | 
 309 |  ; Flush Recever
 310 | ldi r16,(0<<RXEN1)
 311 | sts UCSR1B,r16
 312 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
 313 | sts UCSR1B,r16
 314 | 
 315 | ldi r16,1
 316 | cpse r16,r26 ;Skip the next line if $01
 317 | rjmp  USART_9600
 318 | rjmp  USART_19200
 319 | 
 320 | 
 321 | USART_9600:
 322 | 
 323 | ; Set baud rate
 324 | ldi r16,0 ; 9600 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 325 | sts UBRR1H,r16 
 326 | ldi r16,103 ; 9600 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 327 | sts UBRR1L,r16
 328 |  
 329 |  ; Flush Recever
 330 | ldi r16,(0<<RXEN1)
 331 | sts UCSR1B,r16
 332 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
 333 | sts UCSR1B,r16
 334 | 
 335 | ldi r16, 255      
 336 | ldi r17, 255      
 337 | d20:            ;Delay cycle
 338 | subi r16, 1       
 339 | sbci r17, 0      
 340 | brcc d20  
 341 | 
 342 | 
 343 | 
 344 | 
 345 | 
 346 | 
 347 | ldi r16, 255      ;Load value to the register r16
 348 | ldi r17, 255      ;Load value to the register r17
 349 | ldi r18, 20       ;Load value to the register r18
 350 | dz:             ;Delay cycle
 351 | 
 352 |    ; Wait for data to be received
 353 | lds r19,UCSR1A
 354 | sbrs r19,RXC1 ;Skip the next line if a data has been unread  in UDR
 355 | rjmp dz1
 356 |   ; Get and return received data from buffer
 357 | lds r19,UDR1
 358 |  ; Flush Recever
 359 | ldi r16,(0<<RXEN1)
 360 | sts UCSR1B,r16
 361 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
 362 | sts UCSR1B,r16 
 363 | 
 364 | rjmp A96
 365 | 
 366 | dz1:
 367 | subi r16, 1       ;Subtract 1 from register r16
 368 | sbci r17, 0       ;Subtract with transfer from the register r17
 369 | sbci r18, 0       ;Subtract with transfer from the register r18
 370 | brcc dz       ;If there was no transfer back to the label delay
 371 | 
 372 | ldi r17,25
 373 | ldi r18,161
 374 | sts 0x2C,r17   ;send usart0 UDR0 No connection
 375 | sts 0x2C,r18   ;send usart0 UDR0 No connection
 376 | 
 377 | rjmp Idle
 378 | 
 379 | 
 380 | 
 381 | 
 382 | 
 383 | A96:
 384 | 
 385 | ldi r20,3; $03
 386 | 
 387 | S_CA01:
 388 |   ; Wait for data to be received
 389 | lds r19,UCSR1A
 390 | sbrs r19,RXC1 ;Skip the next line if a data has been unread  in UDR
 391 | rjmp S_CA01
 392 |   ; Get and return received data from buffer
 393 | lds r19,UDR1
 394 | 
 395 | lsl r19
 396 | lsl r19
 397 | lsl r19
 398 | lsl r19
 399 | swap r19
 400 | 
 401 | cpse r20,r19 ;Skip the next line if $03
 402 | rjmp S_CA01
 403 | 
 404 | USART_96:
 405 | 
 406 | ldi r19,0 ; $00
 407 | 
 408 | AR_CA0:
 409 |   ; Wait for data to be received
 410 | lds r16,UCSR1A
 411 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 412 | rjmp AR_CA0
 413 |   ; Get and return received data from buffer
 414 | lds r17,UDR1 
 415 | 
 416 | AR_CA02:
 417 |   ; Wait for data to be received
 418 | lds r16,UCSR1A
 419 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 420 | rjmp AR_CA02
 421 |   ; Get and return received data from buffer
 422 | lds r18,UDR1 
 423 | 
 424 | cpse r19,r17 ;Skip the next line if $00
 425 | rjmp AR_CA0
 426 | cpse r19,r18 ;Skip the next line if $00
 427 | rjmp AR_CA0
 428 | 
 429 | 
 430 | AR_CA03:
 431 |   ; Wait for data to be received
 432 | lds r16,UCSR1A
 433 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 434 | rjmp AR_CA03
 435 |   ; Get and return received data from buffer
 436 | lds r17,UDR1 
 437 | 
 438 | AR_CA04:
 439 |   ; Wait for data to be received
 440 | lds r16,UCSR1A
 441 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 442 | rjmp AR_CA04
 443 |   ; Get and return received data from buffer
 444 | lds r17,UDR1
 445 | 
 446 | lsl r17
 447 | lsl r17
 448 | lsl r17
 449 | lsl r17
 450 | swap r17
 451 | 
 452 | cpse r19,r17 ;Skip the next line if $00
 453 | rjmp AR_CA0
 454 | 
 455 | ldi r16, 255      
 456 | ldi r17, 8  
 457 | de90:            ;Delay cycle (256*9*4)/16000000 = 0.000576 seconds
 458 | subi r16, 1      
 459 | sbci r17, 0       
 460 | brcc de90       
 461 | 
 462 | sbi PORTD,4 ;Switch to transfer
 463 | 
 464 |   ; Put data (r16) into buffer, sends the data
 465 | ldi r19,1   ;send $01
 466 | sts UDR1,r19
 467 | 
 468 | ldi r16, 255      
 469 | ldi r17, 15       
 470 | del90:            ;Delay cycle (256*16*4)/16000000 = 0.001024 second
 471 | subi r16, 1       
 472 | sbci r17, 0       
 473 | brcc del90        
 474 | 
 475 | ; Set baud rate
 476 | ldi r16,0 ; 38400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 477 | sts UBRR1H,r16 
 478 | ldi r16,25 ; 38400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 479 | sts UBRR1L,r16
 480 |    ; Put data (r16) into buffer, sends the data
 481 | 
 482 | ldi r16, 100     
 483 | dela90:           ;Delay cycle (101*3)/16000000 = 0.000012 second
 484 | sbci r16, 1      
 485 | brcc dela90 
 486 | 
 487 | ldi r16,0 ; 9600 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 488 | sts UBRR1H,r16 
 489 | ldi r16,103 ; 9600 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 490 | sts UBRR1L,r16
 491 | 
 492 | ldi r19,176 ;send $B0
 493 | sts UDR1,r19
 494 | 
 495 | ldi r16, 255      
 496 | ldi r17, 15    
 497 | delay90:          ;Delay cycle (256*16*4)/16000000 = 0.001024 second
 498 | subi r16, 1       
 499 | sbci r17, 0       
 500 | brcc delay90       
 501 | 
 502 | cbi PORTD,4 ;Switch to receive
 503 |  ; Flush Recever
 504 | ldi r16,(0<<RXEN1)
 505 | sts UCSR1B,r16
 506 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
 507 | sts UCSR1B,r16
 508 | 
 509 | 
 510 | AR_CB1:
 511 |   ; Wait for data to be received
 512 | lds r16,UCSR1A
 513 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 514 | rjmp AR_CB1
 515 |   ; Get and return received data from buffer
 516 | lds r17,UDR1 
 517 | 
 518 | AR_CB02:
 519 |   ; Wait for data to be received
 520 | lds r16,UCSR1A
 521 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 522 | rjmp AR_CB02
 523 |   ; Get and return received data from buffer
 524 | lds r17,UDR1
 525 | 
 526 | AR_CB03:
 527 |   ; Wait for data to be received
 528 | lds r16,UCSR1A
 529 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 530 | rjmp AR_CB03
 531 |   ; Get and return received data from buffer
 532 | lds r17,UDR1
 533 | 
 534 | AR_CB04:
 535 |   ; Wait for data to be received
 536 | lds r16,UCSR1A
 537 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 538 | rjmp AR_CB04
 539 |   ; Get and return received data from buffer
 540 | lds r17,UDR1
 541 | 
 542 | ldi r16, 255     
 543 | ldi r17, 8  
 544 | de91:            ;Delay cycle
 545 | subi r16, 1       
 546 | sbci r17, 0       
 547 | brcc de91      
 548 | 
 549 | sbi PORTD,4 ;Switch to transfer
 550 | 
 551 |   ; Put data (r16) into buffer, sends the data
 552 | ldi r19,255   ;send $FF
 553 | sts UDR1,r19
 554 | 
 555 | ldi r16, 255     
 556 | ldi r17, 15       
 557 | del91:           ;Delay cycle
 558 | subi r16, 1       
 559 | sbci r17, 0       
 560 | brcc del91       
 561 | 
 562 | ; Set baud rate
 563 | ldi r16,0 ; 38400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 564 | sts UBRR1H,r16 
 565 | ldi r16,25 ; 38400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 566 | sts UBRR1L,r16
 567 |    ; Put data (r16) into buffer, sends the data
 568 | 
 569 | ldi r16, 100     
 570 | dela91:           ;Delay cycle
 571 | sbci r16, 1      
 572 | brcc dela91        
 573 | 
 574 | ldi r16,0 ; 9600 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 575 | sts UBRR1H,r16 
 576 | ldi r16,103 ; 9600 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 577 | sts UBRR1L,r16
 578 | 
 579 |   ; Put data (r16) into buffer, sends the data
 580 | ldi r19,95  ;send $5F
 581 | sts UDR1,r19
 582 |  
 583 | ldi r16, 255     
 584 | ldi r17, 15    
 585 | delay91:          ;Delay cycle
 586 | subi r16, 1       
 587 | sbci r17, 0       
 588 | brcc delay91        
 589 | 
 590 | cbi PORTD,4 ;Switch to receive
 591 |  ; Flush Recever
 592 | ldi r16,(0<<RXEN1)
 593 | sts UCSR1B,r16
 594 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
 595 | sts UCSR1B,r16
 596 | 
 597 | 
 598 | AR_C82:
 599 |   ; Wait for data to be received
 600 | lds r16,UCSR1A
 601 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 602 | rjmp AR_C82
 603 |   ; Get and return received data from buffer
 604 | lds r17,UDR1 
 605 | 
 606 | AR_C822:
 607 |   ; Wait for data to be received
 608 | lds r16,UCSR1A
 609 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 610 | rjmp AR_C822
 611 |   ; Get and return received data from buffer
 612 | lds r17,UDR1
 613 | 
 614 | AR_C823:
 615 |   ; Wait for data to be received
 616 | lds r16,UCSR1A
 617 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 618 | rjmp AR_C823
 619 |   ; Get and return received data from buffer
 620 | lds r17,UDR1
 621 | 
 622 | AR_C824:
 623 |   ; Wait for data to be received
 624 | lds r16,UCSR1A
 625 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 626 | rjmp AR_C824
 627 |   ; Get and return received data from buffer
 628 | lds r17,UDR1
 629 | 
 630 | ldi r16, 255     
 631 | ldi r17, 8  
 632 | de92:            ;Delay cycle
 633 | subi r16, 1       
 634 | sbci r17, 0       
 635 | brcc de92      
 636 | 
 637 | sbi PORTD,4 ;Switch to transfer
 638 | 
 639 |   ; Put data (r16) into buffer, sends the data
 640 | ldi r19,129  ;send $81
 641 | sts UDR1,r19
 642 | 
 643 | ldi r16, 255      
 644 | ldi r17, 15       
 645 | del92:            ;Delay cycle
 646 | subi r16, 1       
 647 | sbci r17, 0      
 648 | brcc del92        
 649 | 
 650 | ; Set baud rate
 651 | ldi r16,0 ; 38400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 652 | sts UBRR1H,r16 
 653 | ldi r16,25 ; 38400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 654 | sts UBRR1L,r16
 655 |    ; Put data (r16) into buffer, sends the data
 656 | 
 657 | ldi r16, 100     
 658 | dela92:           ;Delay cycle
 659 | sbci r16, 1      
 660 | brcc dela92   
 661 | 
 662 | ldi r16,0 ; 9600 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 663 | sts UBRR1H,r16 
 664 | ldi r16,103 ; 9600 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 665 | sts UBRR1L,r16
 666 | 
 667 |   ; Put data (r16) into buffer, sends the data
 668 | ldi r19,116   ;send $74
 669 | sts UDR1,r19
 670 | 
 671 | ldi r16, 255      
 672 | ldi r17, 15    
 673 | delay92:          ;Delay cycle
 674 | subi r16, 1      
 675 | sbci r17, 0       
 676 | brcc delay92       
 677 | 
 678 | cbi PORTD,4 ;Switch to receive
 679 |  ; Flush Recever
 680 | ldi r16,(0<<RXEN1)
 681 | sts UCSR1B,r16
 682 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
 683 | sts UCSR1B,r16
 684 | 
 685 | 
 686 | AR_C93:
 687 |   ; Wait for data to be received
 688 | lds r16,UCSR1A
 689 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 690 | rjmp AR_C93
 691 |   ; Get and return received data from buffer
 692 | lds r17,UDR1 
 693 | 
 694 | AR_C932:
 695 |   ; Wait for data to be received
 696 | lds r16,UCSR1A
 697 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 698 | rjmp AR_C932
 699 |   ; Get and return received data from buffer
 700 | lds r17,UDR1 
 701 | 
 702 | AR_C933:
 703 |   ; Wait for data to be received
 704 | lds r16,UCSR1A
 705 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 706 | rjmp AR_C933
 707 |   ; Get and return received data from buffer
 708 | lds r17,UDR1 
 709 | 
 710 | AR_C934:
 711 |   ; Wait for data to be received
 712 | lds r16,UCSR1A
 713 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 714 | rjmp AR_C934
 715 |   ; Get and return received data from buffer
 716 | lds r17,UDR1
 717 | 
 718 | ldi r16, 255      
 719 | ldi r17, 8  
 720 | de93:            ;Delay cycle
 721 | subi r16, 1       
 722 | sbci r17, 0       
 723 | brcc de93      
 724 | 
 725 | sbi PORTD,4 ;Switch to transfer
 726 | 
 727 |   ; Put data (r16) into buffer, sends the data
 728 | ldi r19,0   ;send $00
 729 | sts UDR1,r19
 730 | 
 731 | ldi r16, 255     
 732 | ldi r17, 15      
 733 | del93:           ;Delay cycle
 734 | subi r16, 1      
 735 | sbci r17, 0      
 736 | brcc del93        
 737 | 
 738 | ; Set baud rate
 739 | ldi r16,0 ; 38400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 740 | sts UBRR1H,r16 
 741 | ldi r16,25 ; 38400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 742 | sts UBRR1L,r16
 743 |    ; Put data (r16) into buffer, sends the data
 744 | 
 745 | ldi r16, 100     
 746 | dela93:           ;Delay cycle
 747 | sbci r16, 1      
 748 | brcc dela93   
 749 | 
 750 | ldi r16,0 ; 9600 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 751 | sts UBRR1H,r16 
 752 | ldi r16,103 ; 9600 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 753 | sts UBRR1L,r16
 754 | 
 755 |   ; Put data (r16) into buffer, sends the data
 756 | ldi r19,160   ;send $A0
 757 | sts UDR1,r19
 758 | 
 759 | ldi r16, 255     
 760 | ldi r17, 15   
 761 | delay93:           ;Delay cycle
 762 | subi r16, 1       
 763 | sbci r17, 0      
 764 | brcc delay93        
 765 | 
 766 | cbi PORTD,4 ;Switch to receive
 767 | 
 768 | ; Set baud rate
 769 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 770 | sts UBRR1H,r16 
 771 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 772 | sts UBRR1L,r16
 773 | 
 774 |  ; Flush Recever
 775 | ldi r16,(0<<RXEN1)
 776 | sts UCSR1B,r16
 777 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
 778 | sts UCSR1B,r16
 779 | 
 780 | rjmp USART_24
 781 | 
 782 | 
 783 | 
 784 | 
 785 | 
 786 | 
 787 | 
 788 | 
 789 | 
 790 | 
 791 | 
 792 | 
 793 | 
 794 | 
 795 | 
 796 | 
 797 | 
 798 | 
 799 | 
 800 | USART_19200:
 801 | 
 802 | ; Set baud rate
 803 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 804 | sts UBRR1H,r16 
 805 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 806 | sts UBRR1L,r16
 807 | 
 808 |   ; Flush Recever
 809 | ldi r16,(0<<RXEN1)
 810 | sts UCSR1B,r16
 811 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
 812 | sts UCSR1B,r16
 813 | 
 814 | ldi r16, 255      
 815 | ldi r17, 255      
 816 | d21:            ;Delay cycle
 817 | subi r16, 1       
 818 | sbci r17, 0      
 819 | brcc d21
 820 | 
 821 | 
 822 | 
 823 | 
 824 | 
 825 | 
 826 | ldi r16, 255      ;Load value to the register r16
 827 | ldi r17, 255      ;Load value to the register r17
 828 | ldi r18, 10       ;Load value to the register r18
 829 | dx:             ;Delay cycle
 830 | 
 831 |    ; Wait for data to be received
 832 | lds r19,UCSR1A
 833 | sbrs r19,RXC1 ;Skip the next line if a data has been unread  in UDR
 834 | rjmp dx1
 835 |   ; Get and return received data from buffer
 836 | lds r19,UDR1
 837 | 
 838 |  ; Flush Recever
 839 | ldi r16,(0<<RXEN1)
 840 | sts UCSR1B,r16
 841 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
 842 | sts UCSR1B,r16 
 843 | 
 844 | rjmp A92
 845 | 
 846 | dx1:
 847 | subi r16, 1       ;Subtract 1 from register r16
 848 | sbci r17, 0       ;Subtract with transfer from the register r17
 849 | sbci r18, 0       ;Subtract with transfer from the register r18
 850 | brcc dx       ;If there was no transfer back to the label delay
 851 | 
 852 | ldi r17,25
 853 | ldi r18,161
 854 | sts 0x2C,r17   ;send usart0 UDR0 No connection
 855 | sts 0x2C,r18   ;send usart0 UDR0 No connection
 856 | 
 857 | rjmp Idle
 858 | 
 859 | 
 860 | 
 861 | 
 862 | 
 863 | 
 864 | A92:
 865 | 
 866 | ldi r20,3; $03
 867 | 
 868 | S_CA02:
 869 |   ; Wait for data to be received
 870 | lds r19,UCSR1A
 871 | sbrs r19,RXC1 ;Skip the next line if a data has been unread  in UDR
 872 | rjmp S_CA02
 873 |   ; Get and return received data from buffer
 874 | lds r19,UDR1
 875 | 
 876 | lsl r19
 877 | lsl r19
 878 | lsl r19
 879 | lsl r19
 880 | swap r19
 881 | 
 882 | cpse r20,r19 ;Skip the next line if $03
 883 | rjmp S_CA02
 884 | 
 885 | USART_19:
 886 | 
 887 | 
 888 | ldi r19,0 ; $00
 889 | 
 890 | SAR_CA0:
 891 |   ; Wait for data to be received
 892 | lds r16,UCSR1A
 893 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 894 | rjmp SAR_CA0
 895 |   ; Get and return received data from buffer
 896 | lds r17,UDR1 
 897 | 
 898 | SAR_CA02:
 899 |   ; Wait for data to be received
 900 | lds r16,UCSR1A
 901 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 902 | rjmp SAR_CA02
 903 |   ; Get and return received data from buffer
 904 | lds r18,UDR1 
 905 | 
 906 | cpse r19,r17 ;Skip the next line if $00
 907 | rjmp SAR_CA0
 908 | cpse r19,r18 ;Skip the next line if $00
 909 | rjmp SAR_CA0
 910 | 
 911 | 
 912 | SAR_CA03:
 913 |   ; Wait for data to be received
 914 | lds r16,UCSR1A
 915 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 916 | rjmp SAR_CA03
 917 |   ; Get and return received data from buffer
 918 | lds r17,UDR1 
 919 | 
 920 | SAR_CA04:
 921 |   ; Wait for data to be received
 922 | lds r16,UCSR1A
 923 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 924 | rjmp SAR_CA04
 925 |   ; Get and return received data from buffer
 926 | lds r17,UDR1
 927 | 
 928 | lsl r17
 929 | lsl r17
 930 | lsl r17
 931 | lsl r17
 932 | swap r17
 933 | 
 934 | cpse r19,r17 ;Skip the next line if $00
 935 | rjmp SAR_CA0
 936 | 
 937 | ldi r16, 255      
 938 | ldi r17, 4  
 939 | de0:            ;Delay cycle
 940 | subi r16, 1      
 941 | sbci r17, 0       
 942 | brcc de0       
 943 | 
 944 | sbi PORTD,4 ;Switch to transfer
 945 | 
 946 |   ; Put data (r16) into buffer, sends the data
 947 | ldi r19,1   ;send $01
 948 | sts UDR1,r19
 949 | 
 950 | ldi r16, 255      
 951 | ldi r17, 7       
 952 | del0:            ;Delay cycle
 953 | subi r16, 1       
 954 | sbci r17, 0       
 955 | brcc del0        
 956 | 
 957 | ; Set baud rate
 958 | ldi r16,0 ; 38400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 959 | sts UBRR1H,r16 
 960 | ldi r16,25 ; 38400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 961 | sts UBRR1L,r16
 962 |    ; Put data (r16) into buffer, sends the data
 963 | 
 964 | ldi r16, 31     
 965 | dela0:           ;Delay cycle
 966 | sbci r16, 1      
 967 | brcc dela0       
 968 | 
 969 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 970 | sts UBRR1H,r16 
 971 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
 972 | sts UBRR1L,r16
 973 | 
 974 | ldi r19,176 ;send $B0
 975 | sts UDR1,r19
 976 | 
 977 | ldi r16, 255      
 978 | ldi r17, 7    
 979 | delay0:          ;Delay cycle
 980 | subi r16, 1       
 981 | sbci r17, 0       
 982 | brcc delay0       
 983 | 
 984 | cbi PORTD,4 ;Switch to receive
 985 |    ; Flush Recever
 986 | ldi r16,(0<<RXEN1)
 987 | sts UCSR1B,r16
 988 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
 989 | sts UCSR1B,r16
 990 | 
 991 | 
 992 | SAR_CB1:
 993 |   ; Wait for data to be received
 994 | lds r16,UCSR1A
 995 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
 996 | rjmp SAR_CB1
 997 |   ; Get and return received data from buffer
 998 | lds r17,UDR1 
 999 | 
1000 | SAR_CB02:
1001 |   ; Wait for data to be received
1002 | lds r16,UCSR1A
1003 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1004 | rjmp SAR_CB02
1005 |   ; Get and return received data from buffer
1006 | lds r17,UDR1
1007 | 
1008 | SAR_CB03:
1009 |   ; Wait for data to be received
1010 | lds r16,UCSR1A
1011 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1012 | rjmp SAR_CB03
1013 |   ; Get and return received data from buffer
1014 | lds r17,UDR1
1015 | 
1016 | SAR_CB04:
1017 |   ; Wait for data to be received
1018 | lds r16,UCSR1A
1019 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1020 | rjmp SAR_CB04
1021 |   ; Get and return received data from buffer
1022 | lds r17,UDR1
1023 | 
1024 | ldi r16, 255     
1025 | ldi r17, 4  
1026 | de1:            ;Delay cycle
1027 | subi r16, 1       
1028 | sbci r17, 0       
1029 | brcc de1      
1030 | 
1031 | sbi PORTD,4 ;Switch to transfer
1032 | 
1033 |   ; Put data (r16) into buffer, sends the data
1034 | ldi r19,255   ;send $FF
1035 | sts UDR1,r19
1036 | 
1037 | ldi r16, 255     
1038 | ldi r17, 7       
1039 | del1:           ;Delay cycle
1040 | subi r16, 1       
1041 | sbci r17, 0       
1042 | brcc del1       
1043 | 
1044 | ; Set baud rate
1045 | ldi r16,0 ; 38400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1046 | sts UBRR1H,r16 
1047 | ldi r16,25 ; 38400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1048 | sts UBRR1L,r16
1049 |    ; Put data (r16) into buffer, sends the data
1050 | 
1051 | ldi r16, 31     
1052 | dela1:           ;Delay cycle
1053 | sbci r16, 1      
1054 | brcc dela1       
1055 | 
1056 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1057 | sts UBRR1H,r16 
1058 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1059 | sts UBRR1L,r16
1060 | 
1061 |   ; Put data (r16) into buffer, sends the data
1062 | ldi r19,95  ;send $5F
1063 | sts UDR1,r19
1064 |  
1065 | ldi r16, 255     
1066 | ldi r17, 7    
1067 | delay1:          ;Delay cycle
1068 | subi r16, 1       
1069 | sbci r17, 0       
1070 | brcc delay1        
1071 | 
1072 | cbi PORTD,4 ;Switch to receive
1073 |    ; Flush Recever
1074 | ldi r16,(0<<RXEN1)
1075 | sts UCSR1B,r16
1076 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
1077 | sts UCSR1B,r16
1078 | 
1079 | 
1080 | SAR_C82:
1081 |   ; Wait for data to be received
1082 | lds r16,UCSR1A
1083 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1084 | rjmp SAR_C82
1085 |   ; Get and return received data from buffer
1086 | lds r17,UDR1 
1087 | 
1088 | SAR_C822:
1089 |   ; Wait for data to be received
1090 | lds r16,UCSR1A
1091 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1092 | rjmp SAR_C822
1093 |   ; Get and return received data from buffer
1094 | lds r17,UDR1
1095 | 
1096 | SAR_C823:
1097 |   ; Wait for data to be received
1098 | lds r16,UCSR1A
1099 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1100 | rjmp SAR_C823
1101 |   ; Get and return received data from buffer
1102 | lds r17,UDR1
1103 | 
1104 | SAR_C824:
1105 |   ; Wait for data to be received
1106 | lds r16,UCSR1A
1107 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1108 | rjmp SAR_C824
1109 |   ; Get and return received data from buffer
1110 | lds r17,UDR1
1111 | 
1112 | ldi r16, 255     
1113 | ldi r17, 4  
1114 | de2:            ;Delay cycle
1115 | subi r16, 1       
1116 | sbci r17, 0       
1117 | brcc de2      
1118 | 
1119 | sbi PORTD,4 ;Switch to transfer
1120 | 
1121 |   ; Put data (r16) into buffer, sends the data
1122 | ldi r19,129  ;send $81
1123 | sts UDR1,r19
1124 | 
1125 | ldi r16, 255      
1126 | ldi r17, 7       
1127 | del2:            ;Delay cycle
1128 | subi r16, 1       
1129 | sbci r17, 0      
1130 | brcc del2        
1131 | 
1132 | ; Set baud rate
1133 | ldi r16,0 ; 38400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1134 | sts UBRR1H,r16 
1135 | ldi r16,25 ; 38400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1136 | sts UBRR1L,r16
1137 |    ; Put data (r16) into buffer, sends the data
1138 | 
1139 | ldi r16, 31     
1140 | dela2:           ;Delay cycle
1141 | sbci r16, 1      
1142 | brcc dela2       
1143 | 
1144 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1145 | sts UBRR1H,r16 
1146 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1147 | sts UBRR1L,r16
1148 | 
1149 |   ; Put data (r16) into buffer, sends the data
1150 | ldi r19,116   ;send $74
1151 | sts UDR1,r19
1152 | 
1153 | ldi r16, 255      
1154 | ldi r17, 7    
1155 | delay2:          ;Delay cycle
1156 | subi r16, 1      
1157 | sbci r17, 0       
1158 | brcc delay2       
1159 | 
1160 | cbi PORTD,4 ;Switch to receive
1161 |    ; Flush Recever
1162 | ldi r16,(0<<RXEN1)
1163 | sts UCSR1B,r16
1164 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
1165 | sts UCSR1B,r16
1166 | 
1167 | 
1168 | SAR_C93:
1169 |   ; Wait for data to be received
1170 | lds r16,UCSR1A
1171 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1172 | rjmp SAR_C93
1173 |   ; Get and return received data from buffer
1174 | lds r17,UDR1 
1175 | 
1176 | SAR_C932:
1177 |   ; Wait for data to be received
1178 | lds r16,UCSR1A
1179 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1180 | rjmp SAR_C932
1181 |   ; Get and return received data from buffer
1182 | lds r17,UDR1 
1183 | 
1184 | SAR_C933:
1185 |   ; Wait for data to be received
1186 | lds r16,UCSR1A
1187 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1188 | rjmp SAR_C933
1189 |   ; Get and return received data from buffer
1190 | lds r17,UDR1 
1191 | 
1192 | SAR_C934:
1193 |   ; Wait for data to be received
1194 | lds r16,UCSR1A
1195 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1196 | rjmp SAR_C934
1197 |   ; Get and return received data from buffer
1198 | lds r17,UDR1
1199 | 
1200 | ldi r16, 255      
1201 | ldi r17, 4  
1202 | de3:            ;Delay cycle
1203 | subi r16, 1       
1204 | sbci r17, 0       
1205 | brcc de3      
1206 | 
1207 | sbi PORTD,4 ;Switch to transfer
1208 | 
1209 |   ; Put data (r16) into buffer, sends the data
1210 | ldi r19,0   ;send $00
1211 | sts UDR1,r19
1212 | 
1213 | ldi r16, 255     
1214 | ldi r17, 7      
1215 | del3:           ;Delay cycle
1216 | subi r16, 1      
1217 | sbci r17, 0      
1218 | brcc del3        
1219 | 
1220 | ; Set baud rate
1221 | ldi r16,0 ; 38400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1222 | sts UBRR1H,r16 
1223 | ldi r16,25 ; 38400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1224 | sts UBRR1L,r16
1225 |    ; Put data (r16) into buffer, sends the data
1226 | 
1227 | ldi r16, 31    
1228 | dela3:          ;Delay cycle
1229 | sbci r16, 1       
1230 | brcc dela3       
1231 | 
1232 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1233 | sts UBRR1H,r16 
1234 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1235 | sts UBRR1L,r16
1236 | 
1237 |   ; Put data (r16) into buffer, sends the data
1238 | ldi r19,160   ;send $A0
1239 | sts UDR1,r19
1240 | 
1241 | ldi r16, 255     
1242 | ldi r17, 7   
1243 | delay3:           ;Delay cycle
1244 | subi r16, 1       
1245 | sbci r17, 0      
1246 | brcc delay3        
1247 | 
1248 | cbi PORTD,4 ;Switch to receive
1249 |  ; Set baud rate
1250 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1251 | sts UBRR1H,r16 
1252 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1253 | sts UBRR1L,r16
1254 | 
1255 |   ; Flush Recever
1256 | ldi r16,(0<<RXEN1)
1257 | sts UCSR1B,r16
1258 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
1259 | sts UCSR1B,r16
1260 | 
1261 | rjmp USART_24
1262 | 
1263 | 
1264 | 
1265 | 
1266 | 
1267 | 
1268 | 
1269 | 
1270 | 
1271 | 
1272 | 
1273 | 
1274 | 
1275 | 
1276 | USART_24:
1277 | 
1278 | ldi r18,3 ; $03
1279 | 
1280 | ldi r16, 255      
1281 | ldi r17, 255      
1282 | d24:            ;Delay cycle
1283 | subi r16, 1       
1284 | sbci r17, 0      
1285 | brcc d24
1286 | 
1287 | R_CA04:
1288 |   ; Wait for data to be received
1289 | lds r16,UCSR1A
1290 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1291 | rjmp R_CA04
1292 |   ; Get and return received data from buffer
1293 | lds r17,UDR1
1294 | 
1295 | lsl r17
1296 | lsl r17
1297 | lsl r17
1298 | lsl r17
1299 | swap r17
1300 | 
1301 | cpse r18,r17 ;Skip the next line if $03
1302 | rjmp R_CA04
1303 | 
1304 | 
1305 | 
1306 | 
1307 | 
1308 | 
1309 | 
1310 | 
1311 | 
1312 | 
1313 | 
1314 | 
1315 | 
1316 | 
1317 | 
1318 | 
1319 | 
1320 | 
1321 | 
1322 | 
1323 | 
1324 | 
1325 | 
1326 | 
1327 | 
1328 | 
1329 | 
1330 | ldi r18,1 ; $01
1331 | cpse r18,r21 ;Skip the next line if $01
1332 | rjmp USART_CRun
1333 | ldi r22,38  ; $26
1334 | ldi r23,164   ; $A4
1335 | ldi r25,1   ; $01
1336 | rjmp USART_C
1337 | 
1338 | USART_CRun:
1339 | ldi r18,2 ; $02
1340 | cpse r18,r21 ;Skip the next line if $02
1341 | rjmp USART_Data
1342 | ldi r22,37  ; $25
1343 | ldi r23,148   ; $94
1344 | ldi r25,1   ; $01
1345 | rjmp USART_C
1346 | 
1347 | USART_Data:
1348 | ldi r18,3 ; $03
1349 | cpse r18,r21 ;Skip the next line if $03
1350 | rjmp Idle
1351 | ldi r22,65  ; $41
1352 | ldi r23,150   ; $96
1353 | ldi r25,1   ; $01
1354 | rjmp USART_C
1355 | 
1356 | 
1357 | 
1358 | Idle:
1359 | 
1360 | ldi r18,4 ; $04
1361 | cpse r18,r21 ;Skip the next line if $04
1362 | rjmp USART_Err0
1363 | ldi r26,1 ; $01
1364 | 
1365 | ldi r18,5 ; $05
1366 | cpse r18,r21 ;Skip the next line if $05
1367 | rjmp USART_Err0
1368 | ldi r26,1 ; $00
1369 | 
1370 | USART_Err0:
1371 | ldi r18,1 ; $01
1372 | cpse r18,r21 ;Skip the next line if $01
1373 | rjmp USART_CRun0
1374 | rjmp USART_Go
1375 | 
1376 | USART_CRun0:
1377 | ldi r18,2 ; $02
1378 | cpse r18,r21 ;Skip the next line if $02
1379 | rjmp USART_Data0
1380 | rjmp USART_Go
1381 | 
1382 | USART_Data0:
1383 | ldi r18,3 ; $03
1384 | cpse r18,r21 ;Skip the next line if $03
1385 | rjmp USART_Detect
1386 | rjmp USART_Go
1387 | 
1388 | USART_Detect:
1389 | ldi r18,7 ; $07
1390 | cpse r18,r21 ;Skip the next line if $07
1391 | rjmp Idle
1392 | ldi r17,12
1393 | sts 0x2C,r17   ;send usart0 Connection OK
1394 | sts 0x2C,r17   ;send usart0 Connection OK
1395 | ldi r21,0      ;reset usart0
1396 | rjmp Idle
1397 | 
1398 | 
1399 | 
1400 | 
1401 | 
1402 | 
1403 | 
1404 | 
1405 | 
1406 | 
1407 | 
1408 | 
1409 | 
1410 | 
1411 | 
1412 | 
1413 | 
1414 | 
1415 | 
1416 | 
1417 | 
1418 | 
1419 | 
1420 | 
1421 | 
1422 | 
1423 | 
1424 | 
1425 | 
1426 | 
1427 | 
1428 | 
1429 | 
1430 | 
1431 | 
1432 | 
1433 | 
1434 | 
1435 | 
1436 | 
1437 | 
1438 | 
1439 | 
1440 | 
1441 | 
1442 | 
1443 | 
1444 | 
1445 | 
1446 | USART_C:
1447 | 
1448 | ldi r19,0 ; $00
1449 | 
1450 | USAR_CA0:
1451 |   ; Wait for data to be received
1452 | lds r16,UCSR1A
1453 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1454 | rjmp USAR_CA0
1455 |   ; Get and return received data from buffer
1456 | lds r17,UDR1 
1457 | 
1458 | USAR_CA02:
1459 |   ; Wait for data to be received
1460 | lds r16,UCSR1A
1461 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1462 | rjmp USAR_CA02
1463 |   ; Get and return received data from buffer
1464 | lds r18,UDR1 
1465 | 
1466 | cpse r19,r17 ;Skip the next line if $00
1467 | rjmp USAR_CA0
1468 | cpse r19,r18 ;Skip the next line if $00
1469 | rjmp USAR_CA0
1470 | 
1471 | 
1472 | USAR_CA03:
1473 |   ; Wait for data to be received
1474 | lds r16,UCSR1A
1475 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1476 | rjmp USAR_CA03
1477 |   ; Get and return received data from buffer
1478 | lds r17,UDR1 
1479 | 
1480 | USAR_CA04:
1481 |   ; Wait for data to be received
1482 | lds r16,UCSR1A
1483 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1484 | rjmp USAR_CA04
1485 |   ; Get and return received data from buffer
1486 | lds r17,UDR1
1487 | 
1488 | lsl r17
1489 | lsl r17
1490 | lsl r17
1491 | lsl r17
1492 | swap r17
1493 | 
1494 | cpse r19,r17 ;Skip the next line if $00
1495 | rjmp USAR_CA0
1496 | 
1497 | ldi r18,1 ; $01
1498 | cpse r18,r25 ;Skip the next line if $01
1499 | rjmp USART_CR1A0
1500 | 
1501 | ldi r16, 255     
1502 | ldi r17, 26   
1503 | C1A0:             ;Delay cycle
1504 | subi r16, 1      
1505 | sbci r17, 0      
1506 | brcc C1A0       
1507 | 
1508 | sbi PORTD,4 ;Switch to transfer
1509 | 
1510 |   ; Put data (r16) into buffer, sends the data
1511 | ldi r19,1   ;send $01
1512 | sts UDR1,r19
1513 | 
1514 | ldi r16, 255     
1515 | ldi r17, 60     
1516 | C2A0:            ;Delay cycle
1517 | subi r16, 1      
1518 | sbci r17, 0      
1519 | brcc C2A0       
1520 | 
1521 | ; Set baud rate
1522 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1523 | sts UBRR1H,r16 
1524 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1525 | sts UBRR1L,r16
1526 | 
1527 | ldi r16, 255      
1528 | ldi r17, 3      
1529 | C3A0:            ;Delay cycle
1530 | subi r16, 1       
1531 | sbci r17, 0      
1532 | brcc C3A0     
1533 | 
1534 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1535 | sts UBRR1H,r16 
1536 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1537 | sts UBRR1L,r16
1538 | 
1539 |    ; Put data (r16) into buffer, sends the data
1540 | ldi r19,176 ;send $B0
1541 | sts UDR1,r19
1542 | 
1543 | ldi r16, 255      
1544 | ldi r17, 60    
1545 | C4A0:           ;Delay cycle
1546 | subi r16, 1       
1547 | sbci r17, 0       
1548 | brcc C4A0
1549 | 
1550 | cbi PORTD,4 ;Switch to receive
1551 |    ; Flush Recever
1552 | ldi r16,(0<<RXEN1)
1553 | sts UCSR1B,r16
1554 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
1555 | sts UCSR1B,r16
1556 | 
1557 | 
1558 | ldi r18,3  ; $03
1559 | cpse r18,r21 ;Skip the next line if $03
1560 | rjmp USART_CR1A0
1561 | rjmp CB1
1562 | ;----------------------------------------------------------------------
1563 | ;----------------------------------------------------------------------
1564 | USART_CR1A0:
1565 |   ; Wait for data to be received
1566 | lds r16,UCSR1A
1567 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1568 | rjmp USART_CR1A0
1569 |   ; Get and return received data from buffer
1570 | lds r17,UDR1
1571 | 
1572 | USART_CR11A0:
1573 |   ; Wait for data to be received
1574 | lds r16,UCSR1A
1575 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1576 | rjmp USART_CR11A0
1577 |   ; Get and return received data from buffer
1578 | lds r18,UDR1
1579 | 
1580 | ldi r19,0 ;$00
1581 | 
1582 | cpse r19,r17 ;Skip the next line if $00
1583 | rjmp USART_1or2sA0
1584 | rjmp USAR_CB03
1585 | USART_1or2sA0:
1586 | sts 0x2C,r17   ;send usart0 UDR0
1587 | sts 0x2C,r18   ;send usart0 UDR0
1588 | 
1589 | ldi r25,0  ; $00
1590 | 
1591 | USART_CR0A0:
1592 |   ; Wait for data to be received
1593 | lds r16,UCSR1A
1594 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1595 | rjmp USART_CR0A0
1596 |   ; Get and return received data from buffer
1597 | lds r17,UDR1
1598 | 
1599 | USART_CR00A0:
1600 |   ; Wait for data to be received
1601 | lds r16,UCSR1A
1602 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1603 | rjmp USART_CR00A0
1604 |   ; Get and return received data from buffer
1605 | lds r18,UDR1 
1606 | 
1607 | cpse r19,r17 ;Skip the next line if $00
1608 | rjmp USART_1or0sA0
1609 | rjmp USAR_CB03
1610 | USART_1or0sA0:
1611 | sts 0x2C,r17   ;send usart0 UDR0
1612 | sts 0x2C,r18   ;send usart0 UDR0
1613 | rjmp CB1
1614 | 
1615 | 
1616 | 
1617 | 
1618 | 
1619 | 
1620 | 
1621 | 
1622 | 
1623 | 
1624 | 
1625 | 
1626 | 
1627 | 
1628 | 
1629 | 
1630 | 
1631 | 
1632 | 
1633 | CB1:
1634 | 
1635 | 
1636 | USAR_CB1:
1637 |   ; Wait for data to be received
1638 | lds r16,UCSR1A
1639 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1640 | rjmp USAR_CB1
1641 |   ; Get and return received data from buffer
1642 | lds r17,UDR1 
1643 | 
1644 | USAR_CB02:
1645 |   ; Wait for data to be received
1646 | lds r16,UCSR1A
1647 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1648 | rjmp USAR_CB02
1649 |   ; Get and return received data from buffer
1650 | lds r17,UDR1
1651 | 
1652 | USAR_CB03:
1653 |   ; Wait for data to be received
1654 | lds r16,UCSR1A
1655 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1656 | rjmp USAR_CB03
1657 |   ; Get and return received data from buffer
1658 | lds r17,UDR1
1659 | 
1660 | USAR_CB04:
1661 |   ; Wait for data to be received
1662 | lds r16,UCSR1A
1663 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1664 | rjmp USAR_CB04
1665 |   ; Get and return received data from buffer
1666 | lds r17,UDR1
1667 | 
1668 | ldi r18,1 ; $01
1669 | cpse r18,r25 ;Skip the next line if $01
1670 | rjmp USART_CR1B1
1671 | 
1672 | ldi r16, 255     
1673 | ldi r17, 26    
1674 | C1B1:             ;Delay cycle
1675 | subi r16, 1       
1676 | sbci r17, 0      
1677 | brcc C1B1       
1678 | 
1679 | sbi PORTD,4 ;Switch to transfer
1680 | 
1681 |   ; Put data (r16) into buffer, sends the data
1682 | ldi r19,255   ;send $FF
1683 | sts UDR1,r19
1684 | 
1685 | ldi r16, 255     
1686 | ldi r17,  60   
1687 | C2B1:            ;Delay cycle
1688 | subi r16, 1      
1689 | sbci r17, 0      
1690 | brcc C2B1       
1691 | 
1692 | ; Set baud rate
1693 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1694 | sts UBRR1H,r16 
1695 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1696 | sts UBRR1L,r16
1697 | 
1698 | ldi r16, 255     
1699 | ldi r17, 3     
1700 | C3B1:            ;Delay cycle
1701 | subi r16, 1       
1702 | sbci r17, 0       
1703 | brcc C3B1       
1704 | 
1705 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1706 | sts UBRR1H,r16 
1707 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1708 | sts UBRR1L,r16
1709 | 
1710 |   ; Put data (r16) into buffer, sends the data
1711 | ldi r19,95  ;send $5F
1712 | sts UDR1,r19
1713 | 
1714 | ldi r16, 255   
1715 | ldi r17, 65     
1716 | C4B1:           ;Delay cycle
1717 | subi r16, 1       
1718 | sbci r17, 0      
1719 | brcc C4B1
1720 | 
1721 | cbi PORTD,4 ;Switch to receive
1722 |    ; Flush Recever
1723 | ldi r16,(0<<RXEN1)
1724 | sts UCSR1B,r16
1725 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
1726 | sts UCSR1B,r16
1727 | 
1728 | 
1729 | ldi r18,3  ; $03
1730 | cpse r18,r21 ;Skip the next line if $03
1731 | rjmp USART_CR1B1
1732 | rjmp C82
1733 | ;----------------------------------------------------------------------
1734 | ;----------------------------------------------------------------------
1735 | USART_CR1B1:
1736 |   ; Wait for data to be received
1737 | lds r16,UCSR1A
1738 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1739 | rjmp USART_CR1B1
1740 |   ; Get and return received data from buffer
1741 | lds r17,UDR1 
1742 |  
1743 | USART_CR11B1:
1744 |   ; Wait for data to be received
1745 | lds r16,UCSR1A
1746 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1747 | rjmp USART_CR11B1
1748 |   ; Get and return received data from buffer
1749 | lds r18,UDR1 
1750 | 
1751 | ldi r19,0 ;$00
1752 | 
1753 | cpse r19,r17 ;Skip the next line if $00
1754 | rjmp USART_1or2sB1
1755 | rjmp USAR_C823
1756 | USART_1or2sB1:
1757 | sts 0x2C,r17   ;send usart0 UDR0
1758 | sts 0x2C,r18   ;send usart0 UDR0
1759 | 
1760 | USART_CR0B1:
1761 |   ; Wait for data to be received
1762 | lds r16,UCSR1A
1763 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1764 | rjmp USART_CR0B1
1765 |   ; Get and return received data from buffer
1766 | lds r17,UDR1
1767 | 
1768 | USART_CR00B1:
1769 |   ; Wait for data to be received
1770 | lds r16,UCSR1A
1771 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1772 | rjmp USART_CR00B1
1773 |   ; Get and return received data from buffer
1774 | lds r18,UDR1 
1775 | 
1776 | cpse r19,r17 ;Skip the next line if $00
1777 | rjmp USART_1or0sB1
1778 | rjmp USAR_C823
1779 | USART_1or0sB1:
1780 | sts 0x2C,r17   ;send usart0 UDR0
1781 | sts 0x2C,r18   ;send usart0 UDR0
1782 | rjmp C82
1783 | 
1784 | 
1785 | 
1786 | 
1787 | 
1788 | 
1789 | 
1790 | 
1791 | 
1792 | 
1793 | 
1794 | 
1795 | 
1796 | 
1797 | 
1798 | 
1799 | 
1800 | 
1801 | 
1802 | C82:
1803 | 
1804 | 
1805 | USAR_C82:
1806 |   ; Wait for data to be received
1807 | lds r16,UCSR1A
1808 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1809 | rjmp USAR_C82
1810 |   ; Get and return received data from buffer
1811 | lds r17,UDR1 
1812 | 
1813 | USAR_C822:
1814 |   ; Wait for data to be received
1815 | lds r16,UCSR1A
1816 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1817 | rjmp USAR_C822
1818 |   ; Get and return received data from buffer
1819 | lds r17,UDR1
1820 | 
1821 | USAR_C823:
1822 |   ; Wait for data to be received
1823 | lds r16,UCSR1A
1824 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1825 | rjmp USAR_C823
1826 |   ; Get and return received data from buffer
1827 | lds r17,UDR1
1828 | 
1829 | USAR_C824:
1830 |   ; Wait for data to be received
1831 | lds r16,UCSR1A
1832 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1833 | rjmp USAR_C824
1834 |   ; Get and return received data from buffer
1835 | lds r17,UDR1
1836 | 
1837 | ldi r18,1 ; $01
1838 | cpse r18,r25 ;Skip the next line if $01
1839 | rjmp USART_CR182
1840 | 
1841 | ldi r16, 255     
1842 | ldi r17, 26    
1843 | C182:             ;Delay cycle
1844 | subi r16, 1      
1845 | sbci r17, 0       
1846 | brcc C182      
1847 | 
1848 | sbi PORTD,4 ;Switch to transfer
1849 | 
1850 |   ; Put data (r16) into buffer, sends the data
1851 | sts UDR1,r22
1852 | 
1853 | ldi r16, 255
1854 | ldi r17,  60 
1855 | C282:             ;Delay cycle
1856 | subi r16, 1    
1857 | sbci r17, 0    
1858 | brcc C282    
1859 | 
1860 | ; Set baud rate
1861 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1862 | sts UBRR1H,r16 
1863 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1864 | sts UBRR1L,r16
1865 | 
1866 | ldi r16, 255   
1867 | ldi r17, 3    
1868 | C382:            ;Delay cycle
1869 | subi r16, 1      
1870 | sbci r17, 0      
1871 | brcc C382     
1872 | 
1873 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1874 | sts UBRR1H,r16 
1875 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
1876 | sts UBRR1L,r16
1877 | 
1878 |   ; Put data (r16) into buffer, sends the data
1879 | sts UDR1,r23
1880 | 
1881 | ldi r16, 255    
1882 | ldi r17, 60
1883 | C482:          ;Delay cycle
1884 | subi r16, 1     
1885 | sbci r17, 0      
1886 | brcc C482
1887 | 
1888 | cbi PORTD,4 ;Switch to receive
1889 |    ; Flush Recever
1890 | ldi r16,(0<<RXEN1)
1891 | sts UCSR1B,r16
1892 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
1893 | sts UCSR1B,r16
1894 | 
1895 | 
1896 | ldi r18,3  ; $03
1897 | cpse r18,r21 ;Skip the next line if $03
1898 | rjmp USART_CR182
1899 | rjmp C93
1900 | ;----------------------------------------------------------------------
1901 | ;----------------------------------------------------------------------
1902 | USART_CR182:
1903 |   ; Wait for data to be received
1904 | lds r16,UCSR1A
1905 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1906 | rjmp USART_CR182
1907 |   ; Get and return received data from buffer
1908 | lds r17,UDR1 
1909 |  
1910 | USART_CR1182:
1911 |   ; Wait for data to be received
1912 | lds r16,UCSR1A
1913 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1914 | rjmp USART_CR1182
1915 |   ; Get and return received data from buffer
1916 | lds r18,UDR1
1917 | 
1918 | ldi r19,0 ;$00
1919 | 
1920 | cpse r19,r17 ;Skip the next line if $00
1921 | rjmp USART_1or2s82
1922 | rjmp USAR_C933
1923 | USART_1or2s82:
1924 | sts 0x2C,r17   ;send usart0 UDR0
1925 | sts 0x2C,r18   ;send usart0 UDR0
1926 | 
1927 | USART_CR082:
1928 |   ; Wait for data to be received
1929 | lds r16,UCSR1A
1930 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1931 | rjmp USART_CR082
1932 |   ; Get and return received data from buffer
1933 | lds r17,UDR1
1934 | 
1935 | USART_CR0082:
1936 |   ; Wait for data to be received
1937 | lds r16,UCSR1A
1938 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1939 | rjmp USART_CR0082
1940 |   ; Get and return received data from buffer
1941 | lds r18,UDR1 
1942 | 
1943 | cpse r19,r17 ;Skip the next line if $00
1944 | rjmp USART_1or0s82
1945 | rjmp USAR_C933
1946 | USART_1or0s82:
1947 | sts 0x2C,r17   ;send usart0 UDR0
1948 | sts 0x2C,r18   ;send usart0 UDR0
1949 | rjmp C93
1950 | 
1951 | 
1952 | 
1953 | 
1954 | 
1955 | 
1956 | 
1957 | 
1958 | 
1959 | 
1960 | 
1961 | 
1962 | 
1963 | 
1964 | UART0_CMD:
1965 | rjmp UART00_CMD
1966 | 
1967 | USART00_Start:
1968 | rjmp USART_Start
1969 | 
1970 | 
1971 | 
1972 | 
1973 | 
1974 | 
1975 | 
1976 | 
1977 | 
1978 | 
1979 | 
1980 | 
1981 | 
1982 | 
1983 | C93:
1984 | 
1985 | 
1986 | USAR_C93:
1987 |   ; Wait for data to be received
1988 | lds r16,UCSR1A
1989 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1990 | rjmp USAR_C93
1991 |   ; Get and return received data from buffer
1992 | lds r17,UDR1 
1993 | 
1994 | USAR_C932:
1995 |   ; Wait for data to be received
1996 | lds r16,UCSR1A
1997 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
1998 | rjmp USAR_C932
1999 |   ; Get and return received data from buffer
2000 | lds r17,UDR1 
2001 | 
2002 | USAR_C933:
2003 |   ; Wait for data to be received
2004 | lds r16,UCSR1A
2005 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2006 | rjmp USAR_C933
2007 |   ; Get and return received data from buffer
2008 | lds r17,UDR1 
2009 | 
2010 | USAR_C934:
2011 |   ; Wait for data to be received
2012 | lds r16,UCSR1A
2013 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2014 | rjmp USAR_C934
2015 |   ; Get and return received data from buffer
2016 | lds r17,UDR1
2017 | 
2018 | ldi r18,1 ; $01
2019 | cpse r18,r25 ;Skip the next line if $01
2020 | rjmp USART_CR193
2021 | 
2022 | ldi r16, 255     
2023 | ldi r17, 26    
2024 | C193:             ;Delay cycle
2025 | subi r16, 1      
2026 | sbci r17, 0       
2027 | brcc C193      
2028 | 
2029 | sbi PORTD,4 ;Switch to transfer
2030 | 
2031 |   ; Put data (r16) into buffer, sends the data
2032 | ldi r19,0  ;send $00
2033 | sts UDR1,r19
2034 | 
2035 | ldi r16, 255
2036 | ldi r17,  60 
2037 | C293:             ;Delay cycle
2038 | subi r16, 1    
2039 | sbci r17, 0    
2040 | brcc C293    
2041 | 
2042 | ; Set baud rate
2043 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2044 | sts UBRR1H,r16 
2045 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2046 | sts UBRR1L,r16
2047 | 
2048 | ldi r16, 255   
2049 | ldi r17, 3    
2050 | C393:            ;Delay cycle
2051 | subi r16, 1      
2052 | sbci r17, 0      
2053 | brcc C393     
2054 | 
2055 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2056 | sts UBRR1H,r16 
2057 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2058 | sts UBRR1L,r16
2059 | 
2060 |   ; Put data (r16) into buffer, sends the data
2061 | ldi r19,160   ;send $A0
2062 | sts UDR1,r19
2063 | 
2064 | ldi r16, 255    
2065 | ldi r17, 60    
2066 | C493:          ;Delay cycle
2067 | subi r16, 1     
2068 | sbci r17, 0      
2069 | brcc C493
2070 | 
2071 | cbi PORTD,4 ;Switch to receive
2072 |    ; Flush Recever
2073 | ldi r16,(0<<RXEN1)
2074 | sts UCSR1B,r16
2075 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
2076 | sts UCSR1B,r16
2077 | 
2078 | 
2079 | ldi r18,3  ; $03
2080 | cpse r18,r21 ;Skip the next line if $03
2081 | rjmp USART_CR193
2082 | rjmp USART_Dt93
2083 | 
2084 | USART_Dt93:
2085 | ldi r18,65 ; $41
2086 | cpse r18,r22 ;Skip the next line if $41
2087 | rjmp CE4
2088 | rjmp USART0_End
2089 | ;----------------------------------------------------------------------
2090 | ;----------------------------------------------------------------------
2091 | USART_CR193:
2092 |   ; Wait for data to be received
2093 | lds r16,UCSR1A
2094 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2095 | rjmp USART_CR193
2096 |   ; Get and return received data from buffer
2097 | lds r17,UDR1 
2098 |  
2099 | USART_CR1193:
2100 |   ; Wait for data to be received
2101 | lds r16,UCSR1A
2102 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2103 | rjmp USART_CR1193
2104 |   ; Get and return received data from buffer
2105 | lds r18,UDR1
2106 | 
2107 | ldi r19,0 ;$00
2108 | 
2109 | cpse r19,r17 ;Skip the next line if $00
2110 | rjmp USART_1or2s93
2111 | rjmp USART0_End
2112 | USART_1or2s93:
2113 | sts 0x2C,r17   ;send usart0 UDR0
2114 | sts 0x2C,r18   ;send usart0 UDR0
2115 | 
2116 | USART_CR093:
2117 |   ; Wait for data to be received
2118 | lds r16,UCSR1A
2119 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2120 | rjmp USART_CR093
2121 |   ; Get and return received data from buffer
2122 | lds r17,UDR1
2123 | 
2124 | USART_CR0093:
2125 |   ; Wait for data to be received
2126 | lds r16,UCSR1A
2127 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2128 | rjmp USART_CR0093
2129 |   ; Get and return received data from buffer
2130 | lds r18,UDR1 
2131 | 
2132 | cpse r19,r17 ;Skip the next line if $00
2133 | rjmp USART_1or0s93
2134 | rjmp USAR_CE43
2135 | USART_1or0s93:
2136 | sts 0x2C,r17   ;send usart0 UDR0
2137 | sts 0x2C,r18   ;send usart0 UDR0
2138 | rjmp CE4
2139 | 
2140 | 
2141 | 
2142 | 
2143 | 
2144 | 
2145 | 
2146 | 
2147 | 
2148 | 
2149 | 
2150 | 
2151 | 
2152 | 
2153 | 
2154 | 
2155 | 
2156 | 
2157 | 
2158 | CE4:
2159 | 
2160 | 
2161 | USAR_CE4:
2162 |   ; Wait for data to be received
2163 | lds r16,UCSR1A
2164 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2165 | rjmp USAR_CE4
2166 |   ; Get and return received data from buffer
2167 | lds r17,UDR1 
2168 | 
2169 | USAR_CE42:
2170 |   ; Wait for data to be received
2171 | lds r16,UCSR1A
2172 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2173 | rjmp USAR_CE42
2174 |   ; Get and return received data from buffer
2175 | lds r17,UDR1 
2176 | 
2177 | USAR_CE43:
2178 |   ; Wait for data to be received
2179 | lds r16,UCSR1A
2180 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2181 | rjmp USAR_CE43
2182 |   ; Get and return received data from buffer
2183 | lds r17,UDR1
2184 | 
2185 | USAR_CE44:
2186 |   ; Wait for data to be received
2187 | lds r16,UCSR1A
2188 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2189 | rjmp USAR_CE44
2190 |   ; Get and return received data from buffer
2191 | lds r17,UDR1
2192 | 
2193 | USAR_CE45:
2194 |   ; Wait for data to be received
2195 | lds r16,UCSR1A
2196 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2197 | rjmp USAR_CE45
2198 |   ; Get and return received data from buffer
2199 | lds r17,UDR1
2200 | 
2201 | USAR_CE46:
2202 |   ; Wait for data to be received
2203 | lds r16,UCSR1A
2204 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2205 | rjmp USAR_CE46
2206 |   ; Get and return received data from buffer
2207 | lds r17,UDR1
2208 | 
2209 | 
2210 | ldi r18,1 ; $01
2211 | cpse r18,r24 ;Skip the next line if $01
2212 | rjmp USART_CR1E4 
2213 | 
2214 | ldi r16, 255     
2215 | ldi r17, 26    
2216 | C1E40:             ;Delay cycle
2217 | subi r16, 1     
2218 | sbci r17, 0     
2219 | brcc C1E40       
2220 | 
2221 | sbi PORTD,4 ;Switch to transfer
2222 | ;----------------------------------------------------------------------
2223 |   ; Put data (r16) into buffer, sends the data
2224 | ldi r19,1   ;send $01
2225 | sts UDR1,r19
2226 | 
2227 | ldi r16, 255     
2228 | ldi r17, 60     
2229 | C2E41:            ;Delay cycle
2230 | subi r16, 1      
2231 | sbci r17, 0      
2232 | brcc C2E41       
2233 | 
2234 | ; Set baud rate
2235 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2236 | sts UBRR1H,r16 
2237 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2238 | sts UBRR1L,r16
2239 | 
2240 | ldi r16, 255      
2241 | ldi r17, 3      
2242 | C3E42:            ;Delay cycle
2243 | subi r16, 1       
2244 | sbci r17, 0      
2245 | brcc C3E42     
2246 | 
2247 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2248 | sts UBRR1H,r16 
2249 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2250 | sts UBRR1L,r16
2251 | 
2252 |    ; Put data (r16) into buffer, sends the data
2253 | ldi r19,56 ;send $38
2254 | sts UDR1,r19
2255 | 
2256 | ldi r16, 255      
2257 | ldi r17, 91    
2258 | C4E43:           ;Delay cycle
2259 | subi r16, 1       
2260 | sbci r17, 0       
2261 | brcc C4E43   
2262 | ;----------------------------------------------------------------------
2263 |   ; Put data (r16) into buffer, sends the data
2264 | ldi r19,17   ;send $11
2265 | sts UDR1,r19
2266 | 
2267 | ldi r16, 255     
2268 | ldi r17, 60     
2269 | C2E411:            ;Delay cycle
2270 | subi r16, 1      
2271 | sbci r17, 0      
2272 | brcc C2E411       
2273 | 
2274 | ; Set baud rate
2275 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2276 | sts UBRR1H,r16 
2277 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2278 | sts UBRR1L,r16
2279 | 
2280 | ldi r16, 255      
2281 | ldi r17, 3      
2282 | C3E422:            ;Delay cycle
2283 | subi r16, 1       
2284 | sbci r17, 0      
2285 | brcc C3E422     
2286 | 
2287 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2288 | sts UBRR1H,r16 
2289 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2290 | sts UBRR1L,r16
2291 | 
2292 |    ; Put data (r16) into buffer, sends the data
2293 | ldi r19,40 ;send $28
2294 | sts UDR1,r19
2295 | 
2296 | ldi r16, 255      
2297 | ldi r17, 91    
2298 | C4E433:           ;Delay cycle
2299 | subi r16, 1       
2300 | sbci r17, 0       
2301 | brcc C4E433   
2302 | ;----------------------------------------------------------------------
2303 |   ; Put data (r16) into buffer, sends the data
2304 | ldi r19,8   ;send $08
2305 | sts UDR1,r19
2306 | 
2307 | ldi r16, 255     
2308 | ldi r17, 60     
2309 | C2E4111:            ;Delay cycle
2310 | subi r16, 1      
2311 | sbci r17, 0      
2312 | brcc C2E4111       
2313 | 
2314 | ; Set baud rate
2315 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2316 | sts UBRR1H,r16 
2317 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2318 | sts UBRR1L,r16
2319 | 
2320 | ldi r16, 255      
2321 | ldi r17, 3      
2322 | C3E4222:            ;Delay cycle
2323 | subi r16, 1       
2324 | sbci r17, 0      
2325 | brcc C3E4222     
2326 | 
2327 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2328 | sts UBRR1H,r16 
2329 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2330 | sts UBRR1L,r16
2331 | 
2332 |    ; Put data (r16) into buffer, sends the data
2333 | ldi r19,168 ;send $A8
2334 | sts UDR1,r19
2335 | 
2336 | ldi r16, 255      
2337 | ldi r17, 91    
2338 | C4E4333:           ;Delay cycle
2339 | subi r16, 1       
2340 | sbci r17, 0       
2341 | brcc C4E4333 
2342 | ;----------------------------------------------------------------------
2343 |   ; Put data (r16) into buffer, sends the data
2344 | ldi r19,9   ;send $09
2345 | sts UDR1,r19
2346 | 
2347 | ldi r16, 255     
2348 | ldi r17, 60     
2349 | C2E41111:            ;Delay cycle
2350 | subi r16, 1      
2351 | sbci r17, 0      
2352 | brcc C2E41111       
2353 | 
2354 | ; Set baud rate
2355 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2356 | sts UBRR1H,r16 
2357 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2358 | sts UBRR1L,r16
2359 | 
2360 | ldi r16, 255      
2361 | ldi r17, 3      
2362 | C3E42222:            ;Delay cycle
2363 | subi r16, 1       
2364 | sbci r17, 0      
2365 | brcc C3E42222     
2366 | 
2367 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2368 | sts UBRR1H,r16 
2369 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2370 | sts UBRR1L,r16
2371 | 
2372 |    ; Put data (r16) into buffer, sends the data
2373 | ldi r19,184 ;send $B8
2374 | sts UDR1,r19
2375 | 
2376 | ldi r16, 255      
2377 | ldi r17, 70    
2378 | C4E43333:           ;Delay cycle
2379 | subi r16, 1       
2380 | sbci r17, 0       
2381 | brcc C4E43333
2382 | 
2383 | cbi PORTD,4 ;Switch to receive
2384 |    ; Flush Recever
2385 | ldi r16,(0<<RXEN1)
2386 | sts UCSR1B,r16
2387 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
2388 | sts UCSR1B,r16
2389 | 
2390 | rjmp CF5
2391 | ;----------------------------------------------------------------------
2392 | ;----------------------------------------------------------------------
2393 | USART_CR1E4:
2394 |   ; Wait for data to be received
2395 | lds r16,UCSR1A
2396 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2397 | rjmp USART_CR1E4
2398 |   ; Get and return received data from buffer
2399 | lds r17,UDR1 
2400 |  
2401 | USART_CR11E4:
2402 |   ; Wait for data to be received
2403 | lds r16,UCSR1A
2404 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2405 | rjmp USART_CR11E4
2406 |   ; Get and return received data from buffer
2407 | lds r18,UDR1 
2408 | 
2409 | ldi r19,3  ; $03
2410 | cpse r19,r21 ;Skip the next line if $03
2411 | rjmp USART_1or2E4
2412 | 
2413 | sts 0x2C,r17   ;send usart0 UDR0
2414 | sts 0x2C,r18   ;send usart0 UDR0
2415 | 
2416 | USART_CR2E4:
2417 |   ; Wait for data to be received
2418 | lds r16,UCSR1A
2419 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2420 | rjmp USART_CR2E4
2421 |   ; Get and return received data from buffer
2422 | lds r17,UDR1 
2423 |  
2424 | USART_CR22E4:
2425 |   ; Wait for data to be received
2426 | lds r16,UCSR1A
2427 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2428 | rjmp USART_CR22E4
2429 |   ; Get and return received data from buffer
2430 | lds r18,UDR1 
2431 |  
2432 | sts 0x2C,r17   ;send usart0 UDR0
2433 | sts 0x2C,r18   ;send usart0 UDR0
2434 | 
2435 | USART_CR3E4:
2436 |   ; Wait for data to be received
2437 | lds r16,UCSR1A
2438 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2439 | rjmp USART_CR3E4
2440 |   ; Get and return received data from buffer
2441 | lds r17,UDR1 
2442 |  
2443 | USART_CR33E4:
2444 |   ; Wait for data to be received
2445 | lds r16,UCSR1A
2446 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2447 | rjmp USART_CR33E4
2448 |   ; Get and return received data from buffer
2449 | lds r18,UDR1 
2450 |  
2451 | sts 0x2C,r17   ;send usart0 UDR0
2452 | sts 0x2C,r18   ;send usart0 UDR0
2453 | 
2454 | USART_CR4E4:
2455 |   ; Wait for data to be received
2456 | lds r16,UCSR1A
2457 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2458 | rjmp USART_CR4E4
2459 |   ; Get and return received data from buffer
2460 | lds r17,UDR1 
2461 |  
2462 | USART_CR44E4:
2463 |   ; Wait for data to be received
2464 | lds r16,UCSR1A
2465 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2466 | rjmp USART_CR44E4
2467 |   ; Get and return received data from buffer
2468 | lds r18,UDR1 
2469 |  
2470 | sts 0x2C,r17   ;send usart0 UDR0
2471 | sts 0x2C,r18   ;send usart0 UDR0
2472 | 
2473 | rjmp CF5
2474 | 
2475 | 
2476 | 
2477 | 
2478 | USART_1or2E4:
2479 | 
2480 | ldi r19,0 ;$00
2481 | 
2482 | cpse r19,r17 ;Skip the next line if $00
2483 | rjmp USART_1or2sE4
2484 | rjmp USART0_End
2485 | USART_1or2sE4:
2486 | sts 0x2C,r17   ;send usart0 UDR0
2487 | sts 0x2C,r18   ;send usart0 UDR0
2488 | 
2489 | USART_CR0E4:
2490 |   ; Wait for data to be received
2491 | lds r16,UCSR1A
2492 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2493 | rjmp USART_CR0E4
2494 |   ; Get and return received data from buffer
2495 | lds r17,UDR1
2496 | 
2497 | USART_CR00E4:
2498 |   ; Wait for data to be received
2499 | lds r16,UCSR1A
2500 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2501 | rjmp USART_CR00E4
2502 |   ; Get and return received data from buffer
2503 | lds r18,UDR1 
2504 | 
2505 | cpse r19,r17 ;Skip the next line if $00
2506 | rjmp USART_1or0sE4
2507 | rjmp USAR_CF53
2508 | USART_1or0sE4:
2509 | sts 0x2C,r17   ;send usart0 UDR0
2510 | sts 0x2C,r18   ;send usart0 UDR0
2511 | rjmp CF5
2512 | 
2513 | 
2514 | 
2515 | 
2516 | 
2517 | 
2518 | 
2519 | 
2520 | 
2521 | 
2522 | 
2523 | 
2524 | 
2525 | 
2526 | USART_CC:
2527 | rjmp USART_C
2528 | 
2529 | 
2530 | 
2531 | 
2532 | 
2533 | 
2534 | 
2535 | 
2536 | 
2537 | 
2538 | 
2539 | 
2540 | 
2541 | 
2542 | CF5:
2543 | 
2544 | USAR_CF5:
2545 |   ; Wait for data to be received
2546 | lds r16,UCSR1A
2547 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2548 | rjmp USAR_CF5
2549 |   ; Get and return received data from buffer
2550 | lds r17,UDR1 
2551 | 
2552 | USAR_CF52:
2553 |   ; Wait for data to be received
2554 | lds r16,UCSR1A
2555 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2556 | rjmp USAR_CF52
2557 |   ; Get and return received data from buffer
2558 | lds r17,UDR1 
2559 | 
2560 | USAR_CF53:
2561 |   ; Wait for data to be received
2562 | lds r16,UCSR1A
2563 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2564 | rjmp USAR_CF53
2565 |   ; Get and return received data from buffer
2566 | lds r17,UDR1 
2567 | 
2568 | USAR_CF54:
2569 |   ; Wait for data to be received
2570 | lds r16,UCSR1A
2571 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2572 | rjmp USAR_CF54
2573 |   ; Get and return received data from buffer
2574 | lds r17,UDR1 
2575 | 
2576 | USAR_CF55:
2577 |   ; Wait for data to be received
2578 | lds r16,UCSR1A
2579 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2580 | rjmp USAR_CF55
2581 |   ; Get and return received data from buffer
2582 | lds r17,UDR1 
2583 | 
2584 | USAR_CF56:
2585 |   ; Wait for data to be received
2586 | lds r16,UCSR1A
2587 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2588 | rjmp USAR_CF56
2589 |   ; Get and return received data from buffer
2590 | lds r17,UDR1 
2591 | 
2592 | 
2593 | ldi r18,1 ; $01
2594 | cpse r18,r24 ;Skip the next line if $01
2595 | rjmp USART_CR1F5
2596 | 
2597 | ldi r16, 255     
2598 | ldi r17, 26    
2599 | C1F50:             ;Delay cycle
2600 | subi r16, 1     
2601 | sbci r17, 0     
2602 | brcc C1F50       
2603 | 
2604 | sbi PORTD,4 ;Switch to transfer
2605 | ;----------------------------------------------------------------------
2606 |   ; Put data (r16) into buffer, sends the data
2607 | ldi r19,13   ;send $0D
2608 | sts UDR1,r19
2609 | 
2610 | ldi r16, 255     
2611 | ldi r17, 60     
2612 | C2F51:            ;Delay cycle
2613 | subi r16, 1      
2614 | sbci r17, 0      
2615 | brcc C2F51       
2616 | 
2617 | ; Set baud rate
2618 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2619 | sts UBRR1H,r16 
2620 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2621 | sts UBRR1L,r16
2622 | 
2623 | ldi r16, 255      
2624 | ldi r17, 3      
2625 | C3F52:            ;Delay cycle
2626 | subi r16, 1       
2627 | sbci r17, 0      
2628 | brcc C3F52     
2629 | 
2630 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2631 | sts UBRR1H,r16 
2632 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2633 | sts UBRR1L,r16
2634 | 
2635 |    ; Put data (r16) into buffer, sends the data
2636 | ldi r19,248 ;send $F8
2637 | sts UDR1,r19
2638 | 
2639 | ldi r16, 255      
2640 | ldi r17, 91    
2641 | C4F53:           ;Delay cycle
2642 | subi r16, 1       
2643 | sbci r17, 0       
2644 | brcc C4F53   
2645 | ;----------------------------------------------------------------------
2646 |   ; Put data (r16) into buffer, sends the data
2647 | ldi r19,16   ;send $10
2648 | sts UDR1,r19
2649 | 
2650 | ldi r16, 255     
2651 | ldi r17, 60     
2652 | C2F511:            ;Delay cycle
2653 | subi r16, 1      
2654 | sbci r17, 0      
2655 | brcc C2F511       
2656 | 
2657 | ; Set baud rate
2658 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2659 | sts UBRR1H,r16 
2660 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2661 | sts UBRR1L,r16
2662 | 
2663 | ldi r16, 255      
2664 | ldi r17, 3      
2665 | C3F522:            ;Delay cycle
2666 | subi r16, 1       
2667 | sbci r17, 0      
2668 | brcc C3F522     
2669 | 
2670 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2671 | sts UBRR1H,r16 
2672 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2673 | sts UBRR1L,r16
2674 | 
2675 |    ; Put data (r16) into buffer, sends the data
2676 | ldi r19,56 ;send $38
2677 | sts UDR1,r19
2678 | 
2679 | ldi r16, 255      
2680 | ldi r17, 91    
2681 | C4F533:           ;Delay cycle
2682 | subi r16, 1       
2683 | sbci r17, 0       
2684 | brcc C4F533   
2685 | ;----------------------------------------------------------------------
2686 |   ; Put data (r16) into buffer, sends the data
2687 | ldi r19,15   ;send $0F
2688 | sts UDR1,r19
2689 | 
2690 | ldi r16, 255     
2691 | ldi r17, 60     
2692 | C2F5111:            ;Delay cycle
2693 | subi r16, 1      
2694 | sbci r17, 0      
2695 | brcc C2F5111       
2696 | 
2697 | ; Set baud rate
2698 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2699 | sts UBRR1H,r16 
2700 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2701 | sts UBRR1L,r16
2702 | 
2703 | ldi r16, 255      
2704 | ldi r17, 3      
2705 | C3F5222:            ;Delay cycle
2706 | subi r16, 1       
2707 | sbci r17, 0      
2708 | brcc C3F5222     
2709 | 
2710 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2711 | sts UBRR1H,r16 
2712 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2713 | sts UBRR1L,r16
2714 | 
2715 |    ; Put data (r16) into buffer, sends the data
2716 | ldi r19,216 ;send $D8
2717 | sts UDR1,r19
2718 | 
2719 | ldi r16, 255      
2720 | ldi r17, 91    
2721 | C4F5333:           ;Delay cycle
2722 | subi r16, 1       
2723 | sbci r17, 0       
2724 | brcc C4F5333 
2725 | ;----------------------------------------------------------------------
2726 |   ; Put data (r16) into buffer, sends the data
2727 | ldi r19,21   ;send $15
2728 | sts UDR1,r19
2729 | 
2730 | ldi r16, 255     
2731 | ldi r17, 60     
2732 | C2F51111:            ;Delay cycle
2733 | subi r16, 1      
2734 | sbci r17, 0      
2735 | brcc C2F51111       
2736 | 
2737 | ; Set baud rate
2738 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2739 | sts UBRR1H,r16 
2740 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2741 | sts UBRR1L,r16
2742 | 
2743 | ldi r16, 255      
2744 | ldi r17, 3      
2745 | C3F52222:            ;Delay cycle
2746 | subi r16, 1       
2747 | sbci r17, 0      
2748 | brcc C3F52222     
2749 | 
2750 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2751 | sts UBRR1H,r16 
2752 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2753 | sts UBRR1L,r16
2754 | 
2755 |    ; Put data (r16) into buffer, sends the data
2756 | ldi r19,104 ;send $68
2757 | sts UDR1,r19
2758 | 
2759 | ldi r16, 255      
2760 | ldi r17, 70    
2761 | C4F53333:           ;Delay cycle
2762 | subi r16, 1       
2763 | sbci r17, 0       
2764 | brcc C4F53333
2765 | 
2766 | cbi PORTD,4 ;Switch to receive
2767 |    ; Flush Recever
2768 | ldi r16,(0<<RXEN1)
2769 | sts UCSR1B,r16
2770 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
2771 | sts UCSR1B,r16
2772 | 
2773 | rjmp CC6
2774 | ;----------------------------------------------------------------------
2775 | ;----------------------------------------------------------------------
2776 | USART_CR1F5:
2777 |   ; Wait for data to be received
2778 | lds r16,UCSR1A
2779 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2780 | rjmp USART_CR1F5
2781 |   ; Get and return received data from buffer
2782 | lds r17,UDR1 
2783 |  
2784 | USART_CR11F5:
2785 |   ; Wait for data to be received
2786 | lds r16,UCSR1A
2787 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2788 | rjmp USART_CR11F5
2789 |   ; Get and return received data from buffer
2790 | lds r18,UDR1 
2791 | 
2792 | ldi r19,3  ; $03
2793 | cpse r19,r21 ;Skip the next line if $03
2794 | rjmp USART_1or2F5
2795 | 
2796 | sts 0x2C,r17   ;send usart0 UDR0
2797 | sts 0x2C,r18   ;send usart0 UDR0
2798 | 
2799 | USART_CR2F5:
2800 |   ; Wait for data to be received
2801 | lds r16,UCSR1A
2802 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2803 | rjmp USART_CR2F5
2804 |   ; Get and return received data from buffer
2805 | lds r17,UDR1 
2806 |  
2807 | USART_CR22F5:
2808 |   ; Wait for data to be received
2809 | lds r16,UCSR1A
2810 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2811 | rjmp USART_CR22F5
2812 |   ; Get and return received data from buffer
2813 | lds r18,UDR1 
2814 |  
2815 | sts 0x2C,r17   ;send usart0 UDR0
2816 | sts 0x2C,r18   ;send usart0 UDR0
2817 | 
2818 | USART_CR3F5:
2819 |   ; Wait for data to be received
2820 | lds r16,UCSR1A
2821 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2822 | rjmp USART_CR3F5
2823 |   ; Get and return received data from buffer
2824 | lds r17,UDR1 
2825 |  
2826 | USART_CR33F5:
2827 |   ; Wait for data to be received
2828 | lds r16,UCSR1A
2829 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2830 | rjmp USART_CR33F5
2831 |   ; Get and return received data from buffer
2832 | lds r18,UDR1 
2833 |  
2834 | sts 0x2C,r17   ;send usart0 UDR0
2835 | sts 0x2C,r18   ;send usart0 UDR0
2836 | 
2837 | USART_CR4F5:
2838 |   ; Wait for data to be received
2839 | lds r16,UCSR1A
2840 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2841 | rjmp USART_CR4F5
2842 |   ; Get and return received data from buffer
2843 | lds r17,UDR1 
2844 |  
2845 | USART_CR44F5:
2846 |   ; Wait for data to be received
2847 | lds r16,UCSR1A
2848 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2849 | rjmp USART_CR44F5
2850 |   ; Get and return received data from buffer
2851 | lds r18,UDR1 
2852 |  
2853 | sts 0x2C,r17   ;send usart0 UDR0
2854 | sts 0x2C,r18   ;send usart0 UDR0
2855 | 
2856 | rjmp CC6
2857 | 
2858 | 
2859 | 
2860 | 
2861 | USART_1or2F5:
2862 | 
2863 | ldi r19,0 ;$00
2864 | 
2865 | cpse r19,r17 ;Skip the next line if $00
2866 | rjmp USART_1or2sF5
2867 | rjmp USART0_End
2868 | USART_1or2sF5:
2869 | sts 0x2C,r17   ;send usart0 UDR0
2870 | sts 0x2C,r18   ;send usart0 UDR0
2871 | 
2872 | USART_CR0F5:
2873 |   ; Wait for data to be received
2874 | lds r16,UCSR1A
2875 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2876 | rjmp USART_CR0F5
2877 |   ; Get and return received data from buffer
2878 | lds r17,UDR1
2879 | 
2880 | USART_CR00F5:
2881 |   ; Wait for data to be received
2882 | lds r16,UCSR1A
2883 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2884 | rjmp USART_CR00F5
2885 |   ; Get and return received data from buffer
2886 | lds r18,UDR1 
2887 | 
2888 | cpse r19,r17 ;Skip the next line if $00
2889 | rjmp USART_1or0sF5
2890 | rjmp USAR_CC63
2891 | USART_1or0sF5:
2892 | sts 0x2C,r17   ;send usart0 UDR0
2893 | sts 0x2C,r18   ;send usart0 UDR0
2894 | rjmp CC6
2895 | 
2896 | 
2897 | 
2898 | 
2899 | 
2900 | 
2901 | 
2902 | 
2903 | 
2904 | 
2905 | 
2906 | 
2907 | 
2908 | 
2909 | 
2910 | 
2911 | 
2912 | 
2913 | 
2914 | CC6:
2915 | 
2916 | 
2917 | 
2918 | USAR_CC6:
2919 |   ; Wait for data to be received
2920 | lds r16,UCSR1A
2921 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2922 | rjmp USAR_CC6
2923 |   ; Get and return received data from buffer
2924 | lds r17,UDR1 
2925 | 
2926 | USAR_CC62:
2927 |   ; Wait for data to be received
2928 | lds r16,UCSR1A
2929 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2930 | rjmp USAR_CC62
2931 |   ; Get and return received data from buffer
2932 | lds r17,UDR1 
2933 | 
2934 | USAR_CC63:
2935 |   ; Wait for data to be received
2936 | lds r16,UCSR1A
2937 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2938 | rjmp USAR_CC63
2939 |   ; Get and return received data from buffer
2940 | lds r17,UDR1 
2941 | 
2942 | USAR_CC64:
2943 |   ; Wait for data to be received
2944 | lds r16,UCSR1A
2945 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2946 | rjmp USAR_CC64
2947 |   ; Get and return received data from buffer
2948 | lds r17,UDR1 
2949 | 
2950 | USAR_CC65:
2951 |   ; Wait for data to be received
2952 | lds r16,UCSR1A
2953 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2954 | rjmp USAR_CC65
2955 |   ; Get and return received data from buffer
2956 | lds r17,UDR1 
2957 | 
2958 | USAR_CC66:
2959 |   ; Wait for data to be received
2960 | lds r16,UCSR1A
2961 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
2962 | rjmp USAR_CC66
2963 |   ; Get and return received data from buffer
2964 | lds r17,UDR1 
2965 | 
2966 | 
2967 | ldi r18,1 ; $01
2968 | cpse r18,r24 ;Skip the next line if $01
2969 | rjmp USART_CR1C6
2970 | 
2971 | ldi r16, 255     
2972 | ldi r17, 26    
2973 | C1C60:             ;Delay cycle
2974 | subi r16, 1     
2975 | sbci r17, 0     
2976 | brcc C1C60       
2977 | 
2978 | sbi PORTD,4 ;Switch to transfer
2979 | ;----------------------------------------------------------------------
2980 |   ; Put data (r16) into buffer, sends the data
2981 | ldi r19,38   ;send $26
2982 | sts UDR1,r19
2983 | 
2984 | ldi r16, 255     
2985 | ldi r17, 60     
2986 | C2C61:            ;Delay cycle
2987 | subi r16, 1      
2988 | sbci r17, 0      
2989 | brcc C2C61       
2990 | 
2991 | ; Set baud rate
2992 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2993 | sts UBRR1H,r16 
2994 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
2995 | sts UBRR1L,r16
2996 | 
2997 | ldi r16, 255      
2998 | ldi r17, 3      
2999 | C3C62:            ;Delay cycle
3000 | subi r16, 1       
3001 | sbci r17, 0      
3002 | brcc C3C62     
3003 | 
3004 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3005 | sts UBRR1H,r16 
3006 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3007 | sts UBRR1L,r16
3008 | 
3009 |    ; Put data (r16) into buffer, sends the data
3010 | ldi r19,104 ;send $68
3011 | sts UDR1,r19
3012 | 
3013 | ldi r16, 255      
3014 | ldi r17, 91    
3015 | C4C63:           ;Delay cycle
3016 | subi r16, 1       
3017 | sbci r17, 0       
3018 | brcc C4C63   
3019 | ;----------------------------------------------------------------------
3020 |   ; Put data (r16) into buffer, sends the data
3021 | ldi r19,12   ;send $0C
3022 | sts UDR1,r19
3023 | 
3024 | ldi r16, 255     
3025 | ldi r17, 60     
3026 | C2C611:            ;Delay cycle
3027 | subi r16, 1      
3028 | sbci r17, 0      
3029 | brcc C2C611       
3030 | 
3031 | ; Set baud rate
3032 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3033 | sts UBRR1H,r16 
3034 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3035 | sts UBRR1L,r16
3036 | 
3037 | ldi r16, 255      
3038 | ldi r17, 3      
3039 | C3C622:            ;Delay cycle
3040 | subi r16, 1       
3041 | sbci r17, 0      
3042 | brcc C3C622     
3043 | 
3044 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3045 | sts UBRR1H,r16 
3046 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3047 | sts UBRR1L,r16
3048 | 
3049 |    ; Put data (r16) into buffer, sends the data
3050 | ldi r19,232 ;send $E8
3051 | sts UDR1,r19
3052 | 
3053 | ldi r16, 255      
3054 | ldi r17, 91    
3055 | C4C633:           ;Delay cycle
3056 | subi r16, 1       
3057 | sbci r17, 0       
3058 | brcc C4C633   
3059 | ;----------------------------------------------------------------------
3060 |   ; Put data (r16) into buffer, sends the data
3061 | ldi r19,4   ;send $04
3062 | sts UDR1,r19
3063 | 
3064 | ldi r16, 255     
3065 | ldi r17, 60     
3066 | C2C6111:            ;Delay cycle
3067 | subi r16, 1      
3068 | sbci r17, 0      
3069 | brcc C2C6111       
3070 | 
3071 | ; Set baud rate
3072 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3073 | sts UBRR1H,r16 
3074 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3075 | sts UBRR1L,r16
3076 | 
3077 | ldi r16, 255      
3078 | ldi r17, 3      
3079 | C3C6222:            ;Delay cycle
3080 | subi r16, 1       
3081 | sbci r17, 0      
3082 | brcc C3C6222     
3083 | 
3084 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3085 | sts UBRR1H,r16 
3086 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3087 | sts UBRR1L,r16
3088 | 
3089 |    ; Put data (r16) into buffer, sends the data
3090 | ldi r19,104 ;send $68
3091 | sts UDR1,r19
3092 | 
3093 | ldi r16, 255      
3094 | ldi r17, 91    
3095 | C4C6333:           ;Delay cycle
3096 | subi r16, 1       
3097 | sbci r17, 0       
3098 | brcc C4C6333 
3099 | ;----------------------------------------------------------------------
3100 |   ; Put data (r16) into buffer, sends the data
3101 | ldi r19,14   ;send $0E
3102 | sts UDR1,r19
3103 | 
3104 | ldi r16, 255     
3105 | ldi r17, 60     
3106 | C2C61111:            ;Delay cycle
3107 | subi r16, 1      
3108 | sbci r17, 0      
3109 | brcc C2C61111       
3110 | 
3111 | ; Set baud rate
3112 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3113 | sts UBRR1H,r16 
3114 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3115 | sts UBRR1L,r16
3116 | 
3117 | ldi r16, 255      
3118 | ldi r17, 3      
3119 | C3C62222:            ;Delay cycle
3120 | subi r16, 1       
3121 | sbci r17, 0      
3122 | brcc C3C62222     
3123 | 
3124 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3125 | sts UBRR1H,r16 
3126 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3127 | sts UBRR1L,r16
3128 | 
3129 |    ; Put data (r16) into buffer, sends the data
3130 | ldi r19,200 ;send $C8
3131 | sts UDR1,r19
3132 | 
3133 | ldi r16, 255      
3134 | ldi r17, 70    
3135 | C4C63333:           ;Delay cycle
3136 | subi r16, 1       
3137 | sbci r17, 0       
3138 | brcc C4C63333
3139 | 
3140 | cbi PORTD,4 ;Switch to receive
3141 |    ; Flush Recever
3142 | ldi r16,(0<<RXEN1)
3143 | sts UCSR1B,r16
3144 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
3145 | sts UCSR1B,r16
3146 | 
3147 | rjmp CD7
3148 | ;----------------------------------------------------------------------
3149 | ;----------------------------------------------------------------------
3150 | USART_CR1C6:
3151 |   ; Wait for data to be received
3152 | lds r16,UCSR1A
3153 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3154 | rjmp USART_CR1C6
3155 |   ; Get and return received data from buffer
3156 | lds r17,UDR1 
3157 |  
3158 | USART_CR11C6:
3159 |   ; Wait for data to be received
3160 | lds r16,UCSR1A
3161 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3162 | rjmp USART_CR11C6
3163 |   ; Get and return received data from buffer
3164 | lds r18,UDR1 
3165 | 
3166 | ldi r19,3  ; $03
3167 | cpse r19,r21 ;Skip the next line if $03
3168 | rjmp USART_1or2C6
3169 | 
3170 | sts 0x2C,r17   ;send usart0 UDR0
3171 | sts 0x2C,r18   ;send usart0 UDR0
3172 | 
3173 | USART_CR2C6:
3174 |   ; Wait for data to be received
3175 | lds r16,UCSR1A
3176 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3177 | rjmp USART_CR2C6
3178 |   ; Get and return received data from buffer
3179 | lds r17,UDR1 
3180 |  
3181 | USART_CR22C6:
3182 |   ; Wait for data to be received
3183 | lds r16,UCSR1A
3184 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3185 | rjmp USART_CR22C6
3186 |   ; Get and return received data from buffer
3187 | lds r18,UDR1 
3188 |  
3189 | sts 0x2C,r17   ;send usart0 UDR0
3190 | sts 0x2C,r18   ;send usart0 UDR0
3191 | 
3192 | USART_CR3C6:
3193 |   ; Wait for data to be received
3194 | lds r16,UCSR1A
3195 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3196 | rjmp USART_CR3C6
3197 |   ; Get and return received data from buffer
3198 | lds r17,UDR1 
3199 |  
3200 | USART_CR33C6:
3201 |   ; Wait for data to be received
3202 | lds r16,UCSR1A
3203 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3204 | rjmp USART_CR33C6
3205 |   ; Get and return received data from buffer
3206 | lds r18,UDR1 
3207 |  
3208 | sts 0x2C,r17   ;send usart0 UDR0
3209 | sts 0x2C,r18   ;send usart0 UDR0
3210 | 
3211 | USART_CR4C6:
3212 |   ; Wait for data to be received
3213 | lds r16,UCSR1A
3214 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3215 | rjmp USART_CR4C6
3216 |   ; Get and return received data from buffer
3217 | lds r17,UDR1 
3218 |  
3219 | USART_CR44C6:
3220 |   ; Wait for data to be received
3221 | lds r16,UCSR1A
3222 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3223 | rjmp USART_CR44C6
3224 |   ; Get and return received data from buffer
3225 | lds r18,UDR1 
3226 |  
3227 | sts 0x2C,r17   ;send usart0 UDR0
3228 | sts 0x2C,r18   ;send usart0 UDR0
3229 | 
3230 | rjmp CD7
3231 | 
3232 | 
3233 | 
3234 | 
3235 | 
3236 | USART_1or2C6:
3237 | 
3238 | ldi r19,0 ;$00
3239 | 
3240 | cpse r19,r17 ;Skip the next line if $00
3241 | rjmp USART_1or2sC6
3242 | rjmp USART0_End
3243 | USART_1or2sC6:
3244 | sts 0x2C,r17   ;send usart0 UDR0
3245 | sts 0x2C,r18   ;send usart0 UDR0
3246 | 
3247 | USART_CR0C6:
3248 |   ; Wait for data to be received
3249 | lds r16,UCSR1A
3250 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3251 | rjmp USART_CR0C6
3252 |   ; Get and return received data from buffer
3253 | lds r17,UDR1
3254 | 
3255 | USART_CR00C6:
3256 |   ; Wait for data to be received
3257 | lds r16,UCSR1A
3258 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3259 | rjmp USART_CR00C6
3260 |   ; Get and return received data from buffer
3261 | lds r18,UDR1 
3262 | 
3263 | cpse r19,r17 ;Skip the next line if $00
3264 | rjmp USART_1or0sC6
3265 | rjmp USAR_CD73
3266 | USART_1or0sC6:
3267 | sts 0x2C,r17   ;send usart0 UDR0
3268 | sts 0x2C,r18   ;send usart0 UDR0
3269 | rjmp CD7
3270 | 
3271 | 
3272 | 
3273 | 
3274 | 
3275 | 
3276 | 
3277 | 
3278 | 
3279 | 
3280 | 
3281 | 
3282 | 
3283 | 
3284 | 
3285 | 
3286 | 
3287 | 
3288 | 
3289 | CD7:
3290 | 
3291 | 
3292 | USAR_CD7:
3293 |   ; Wait for data to be received
3294 | lds r16,UCSR1A
3295 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3296 | rjmp USAR_CD7
3297 |   ; Get and return received data from buffer
3298 | lds r17,UDR1 
3299 | 
3300 | USAR_CD72:
3301 |   ; Wait for data to be received
3302 | lds r16,UCSR1A
3303 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3304 | rjmp USAR_CD72
3305 |   ; Get and return received data from buffer
3306 | lds r17,UDR1  
3307 | 
3308 | USAR_CD73:
3309 |   ; Wait for data to be received
3310 | lds r16,UCSR1A
3311 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3312 | rjmp USAR_CD73
3313 |   ; Get and return received data from buffer
3314 | lds r17,UDR1 
3315 | 
3316 | USAR_CD74:
3317 |   ; Wait for data to be received
3318 | lds r16,UCSR1A
3319 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3320 | rjmp USAR_CD74
3321 |   ; Get and return received data from buffer
3322 | lds r17,UDR1 
3323 | 
3324 | USAR_CD75:
3325 |   ; Wait for data to be received
3326 | lds r16,UCSR1A
3327 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3328 | rjmp USAR_CD75
3329 |   ; Get and return received data from buffer
3330 | lds r17,UDR1 
3331 | 
3332 | USAR_CD76:
3333 |   ; Wait for data to be received
3334 | lds r16,UCSR1A
3335 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3336 | rjmp USAR_CD76
3337 |   ; Get and return received data from buffer
3338 | lds r17,UDR1 
3339 | 
3340 | 
3341 | ldi r18,1 ; $01
3342 | cpse r18,r24 ;Skip the next line if $01
3343 | rjmp USART_CR1D7
3344 | 
3345 | ldi r16, 255     
3346 | ldi r17, 26    
3347 | C1D70:             ;Delay cycle
3348 | subi r16, 1     
3349 | sbci r17, 0     
3350 | brcc C1D70       
3351 | 
3352 | sbi PORTD,4 ;Switch to transfer
3353 | ;----------------------------------------------------------------------
3354 |   ; Put data (r16) into buffer, sends the data
3355 | ldi r19,22   ;send $16
3356 | sts UDR1,r19
3357 | 
3358 | ldi r16, 255     
3359 | ldi r17, 60     
3360 | C2D71:            ;Delay cycle
3361 | subi r16, 1      
3362 | sbci r17, 0      
3363 | brcc C2D71       
3364 | 
3365 | ; Set baud rate
3366 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3367 | sts UBRR1H,r16 
3368 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3369 | sts UBRR1L,r16
3370 | 
3371 | ldi r16, 255      
3372 | ldi r17, 3      
3373 | C3D72:            ;Delay cycle
3374 | subi r16, 1       
3375 | sbci r17, 0      
3376 | brcc C3D72     
3377 | 
3378 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3379 | sts UBRR1H,r16 
3380 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3381 | sts UBRR1L,r16
3382 | 
3383 |    ; Put data (r16) into buffer, sends the data
3384 | ldi r19,88 ;send $58
3385 | sts UDR1,r19
3386 | 
3387 | ldi r16, 255      
3388 | ldi r17, 91    
3389 | C4D73:           ;Delay cycle
3390 | subi r16, 1       
3391 | sbci r17, 0       
3392 | brcc C4D73   
3393 | ;----------------------------------------------------------------------
3394 |   ; Put data (r16) into buffer, sends the data
3395 | ldi r19,27   ;send $1B
3396 | sts UDR1,r19
3397 | 
3398 | ldi r16, 255     
3399 | ldi r17, 60     
3400 | C2D711:            ;Delay cycle
3401 | subi r16, 1      
3402 | sbci r17, 0      
3403 | brcc C2D711       
3404 | 
3405 | ; Set baud rate
3406 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3407 | sts UBRR1H,r16 
3408 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3409 | sts UBRR1L,r16
3410 | 
3411 | ldi r16, 255      
3412 | ldi r17, 3      
3413 | C3D722:            ;Delay cycle
3414 | subi r16, 1       
3415 | sbci r17, 0      
3416 | brcc C3D722     
3417 | 
3418 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3419 | sts UBRR1H,r16 
3420 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3421 | sts UBRR1L,r16
3422 | 
3423 |    ; Put data (r16) into buffer, sends the data
3424 | ldi r19,136 ;send $88
3425 | sts UDR1,r19
3426 | 
3427 | ldi r16, 255      
3428 | ldi r17, 91    
3429 | C4D733:           ;Delay cycle
3430 | subi r16, 1       
3431 | sbci r17, 0       
3432 | brcc C4D733   
3433 | ;----------------------------------------------------------------------
3434 |   ; Put data (r16) into buffer, sends the data
3435 | ldi r19,26   ;send $1A
3436 | sts UDR1,r19
3437 | 
3438 | ldi r16, 255     
3439 | ldi r17, 60     
3440 | C2D7111:            ;Delay cycle
3441 | subi r16, 1      
3442 | sbci r17, 0      
3443 | brcc C2D7111       
3444 | 
3445 | ; Set baud rate
3446 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3447 | sts UBRR1H,r16 
3448 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3449 | sts UBRR1L,r16
3450 | 
3451 | ldi r16, 255      
3452 | ldi r17, 3      
3453 | C3D7222:            ;Delay cycle
3454 | subi r16, 1       
3455 | sbci r17, 0      
3456 | brcc C3D7222     
3457 | 
3458 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3459 | sts UBRR1H,r16 
3460 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3461 | sts UBRR1L,r16
3462 | 
3463 |    ; Put data (r16) into buffer, sends the data
3464 | ldi r19,152 ;send $98
3465 | sts UDR1,r19
3466 | 
3467 | ldi r16, 255      
3468 | ldi r17, 91    
3469 | C4D7333:           ;Delay cycle
3470 | subi r16, 1       
3471 | sbci r17, 0       
3472 | brcc C4D7333 
3473 | ;----------------------------------------------------------------------
3474 |   ; Put data (r16) into buffer, sends the data
3475 | ldi r19,32   ;send $20
3476 | sts UDR1,r19
3477 | 
3478 | ldi r16, 255     
3479 | ldi r17, 60     
3480 | C2D71111:            ;Delay cycle
3481 | subi r16, 1      
3482 | sbci r17, 0      
3483 | brcc C2D71111       
3484 | 
3485 | ; Set baud rate
3486 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3487 | sts UBRR1H,r16 
3488 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3489 | sts UBRR1L,r16
3490 | 
3491 | ldi r16, 255      
3492 | ldi r17, 3      
3493 | C3D72222:            ;Delay cycle
3494 | subi r16, 1       
3495 | sbci r17, 0      
3496 | brcc C3D72222     
3497 | 
3498 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3499 | sts UBRR1H,r16 
3500 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
3501 | sts UBRR1L,r16
3502 | 
3503 |    ; Put data (r16) into buffer, sends the data
3504 | ldi r19,8 ;send $08
3505 | sts UDR1,r19
3506 | 
3507 | ldi r16, 255      
3508 | ldi r17, 70    
3509 | C4D73333:           ;Delay cycle
3510 | subi r16, 1       
3511 | sbci r17, 0       
3512 | brcc C4D73333
3513 | 
3514 | cbi PORTD,4 ;Switch to receive
3515 |    ; Flush Recever
3516 | ldi r16,(0<<RXEN1)
3517 | sts UCSR1B,r16
3518 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
3519 | sts UCSR1B,r16
3520 | 
3521 | rjmp C28
3522 | ;----------------------------------------------------------------------
3523 | ;----------------------------------------------------------------------
3524 | USART_CR1D7:
3525 |   ; Wait for data to be received
3526 | lds r16,UCSR1A
3527 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3528 | rjmp USART_CR1D7
3529 |   ; Get and return received data from buffer
3530 | lds r17,UDR1 
3531 |  
3532 | USART_CR11D7:
3533 |   ; Wait for data to be received
3534 | lds r16,UCSR1A
3535 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3536 | rjmp USART_CR11D7
3537 |   ; Get and return received data from buffer
3538 | lds r18,UDR1 
3539 | 
3540 | ldi r19,3  ; $03
3541 | cpse r19,r21 ;Skip the next line if $03
3542 | rjmp USART_1or2D7
3543 | 
3544 | sts 0x2C,r17   ;send usart0 UDR0
3545 | sts 0x2C,r18   ;send usart0 UDR0
3546 | 
3547 | USART_CR2D7:
3548 |   ; Wait for data to be received
3549 | lds r16,UCSR1A
3550 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3551 | rjmp USART_CR2D7
3552 |   ; Get and return received data from buffer
3553 | lds r17,UDR1 
3554 |  
3555 | USART_CR22D7:
3556 |   ; Wait for data to be received
3557 | lds r16,UCSR1A
3558 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3559 | rjmp USART_CR22D7
3560 |   ; Get and return received data from buffer
3561 | lds r18,UDR1 
3562 |  
3563 | sts 0x2C,r17   ;send usart0 UDR0
3564 | sts 0x2C,r18   ;send usart0 UDR0
3565 | 
3566 | USART_CR3D7:
3567 |   ; Wait for data to be received
3568 | lds r16,UCSR1A
3569 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3570 | rjmp USART_CR3D7
3571 |   ; Get and return received data from buffer
3572 | lds r17,UDR1 
3573 |  
3574 | USART_CR33D7:
3575 |   ; Wait for data to be received
3576 | lds r16,UCSR1A
3577 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3578 | rjmp USART_CR33D7
3579 |   ; Get and return received data from buffer
3580 | lds r18,UDR1 
3581 |  
3582 | sts 0x2C,r17   ;send usart0 UDR0
3583 | sts 0x2C,r18   ;send usart0 UDR0
3584 | 
3585 | USART_CR4D7:
3586 |   ; Wait for data to be received
3587 | lds r16,UCSR1A
3588 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3589 | rjmp USART_CR4D7
3590 |   ; Get and return received data from buffer
3591 | lds r17,UDR1 
3592 |  
3593 | USART_CR44D7:
3594 |   ; Wait for data to be received
3595 | lds r16,UCSR1A
3596 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3597 | rjmp USART_CR44D7
3598 |   ; Get and return received data from buffer
3599 | lds r18,UDR1 
3600 |  
3601 | sts 0x2C,r17   ;send usart0 UDR0
3602 | sts 0x2C,r18   ;send usart0 UDR0
3603 | 
3604 | rjmp C28
3605 | 
3606 | 
3607 | 
3608 | 
3609 | USART_1or2D7:
3610 | 
3611 | ldi r19,0 ;$00
3612 | 
3613 | cpse r19,r17 ;Skip the next line if $00
3614 | rjmp USART_1or2sD7
3615 | rjmp USART0_End
3616 | USART_1or2sD7:
3617 | sts 0x2C,r17   ;send usart0 UDR0
3618 | sts 0x2C,r18   ;send usart0 UDR0
3619 | 
3620 | USART_CR0D7:
3621 |   ; Wait for data to be received
3622 | lds r16,UCSR1A
3623 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3624 | rjmp USART_CR0D7
3625 |   ; Get and return received data from buffer
3626 | lds r17,UDR1
3627 | 
3628 | USART_CR00D7:
3629 |   ; Wait for data to be received
3630 | lds r16,UCSR1A
3631 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3632 | rjmp USART_CR00D7
3633 |   ; Get and return received data from buffer
3634 | lds r18,UDR1 
3635 | 
3636 | cpse r19,r17 ;Skip the next line if $00
3637 | rjmp USART_1or0sD7
3638 | rjmp USAR_C283
3639 | USART_1or0sD7:
3640 | sts 0x2C,r17   ;send usart0 UDR0
3641 | sts 0x2C,r18   ;send usart0 UDR0
3642 | rjmp C28
3643 | 
3644 | 
3645 | 
3646 | 
3647 | 
3648 | 
3649 | 
3650 | 
3651 | 
3652 | 
3653 | 
3654 | 
3655 | 
3656 | 
3657 | 
3658 | 
3659 | 
3660 | 
3661 | 
3662 | C28:
3663 | 
3664 | 
3665 | USAR_C28:
3666 |   ; Wait for data to be received
3667 | lds r16,UCSR1A
3668 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3669 | rjmp USAR_C28
3670 |   ; Get and return received data from buffer
3671 | lds r17,UDR1 
3672 | 
3673 | USAR_C282:
3674 |   ; Wait for data to be received
3675 | lds r16,UCSR1A
3676 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3677 | rjmp USAR_C282
3678 |   ; Get and return received data from buffer
3679 | lds r17,UDR1 
3680 | 
3681 | USAR_C283:
3682 |   ; Wait for data to be received
3683 | lds r16,UCSR1A
3684 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3685 | rjmp USAR_C283
3686 |   ; Get and return received data from buffer
3687 | lds r17,UDR1 
3688 | 
3689 | USAR_C284:
3690 |   ; Wait for data to be received
3691 | lds r16,UCSR1A
3692 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3693 | rjmp USAR_C284
3694 |   ; Get and return received data from buffer
3695 | lds r17,UDR1 
3696 | 
3697 | USAR_C285:
3698 |   ; Wait for data to be received
3699 | lds r16,UCSR1A
3700 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3701 | rjmp USAR_C285
3702 |   ; Get and return received data from buffer
3703 | lds r17,UDR1 
3704 | 
3705 | USAR_C286:
3706 |   ; Wait for data to be received
3707 | lds r16,UCSR1A
3708 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3709 | rjmp USAR_C286
3710 |   ; Get and return received data from buffer
3711 | lds r17,UDR1 
3712 | 
3713 | ldi r18,3 ; $03
3714 | cpse r18,r21 ;Skip the next line if $03
3715 | rjmp USART_CR128
3716 | rjmp C39
3717 | ;----------------------------------------------------------------------
3718 | ;----------------------------------------------------------------------
3719 | USART_CR128:
3720 |   ; Wait for data to be received
3721 | lds r16,UCSR1A
3722 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3723 | rjmp USART_CR128
3724 |   ; Get and return received data from buffer
3725 | lds r17,UDR1 
3726 |  
3727 | USART_CR1128:
3728 |   ; Wait for data to be received
3729 | lds r16,UCSR1A
3730 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3731 | rjmp USART_CR1128
3732 |   ; Get and return received data from buffer
3733 | lds r18,UDR1
3734 | 
3735 | ldi r19,0 ;$00
3736 | 
3737 | cpse r19,r17 ;Skip the next line if $00
3738 | rjmp USART_1or2s28
3739 | rjmp USART0_End
3740 | USART_1or2s28:
3741 | sts 0x2C,r17   ;send usart0 UDR0
3742 | sts 0x2C,r18   ;send usart0 UDR0
3743 | 
3744 | USART_CR028:
3745 |   ; Wait for data to be received
3746 | lds r16,UCSR1A
3747 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3748 | rjmp USART_CR028
3749 |   ; Get and return received data from buffer
3750 | lds r17,UDR1
3751 | 
3752 | USART_CR0028:
3753 |   ; Wait for data to be received
3754 | lds r16,UCSR1A
3755 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3756 | rjmp USART_CR0028
3757 |   ; Get and return received data from buffer
3758 | lds r18,UDR1 
3759 | 
3760 | cpse r19,r17 ;Skip the next line if $00
3761 | rjmp USART_1or0s28
3762 | rjmp USAR_C393
3763 | USART_1or0s28:
3764 | sts 0x2C,r17   ;send usart0 UDR0
3765 | sts 0x2C,r18   ;send usart0 UDR0
3766 | rjmp C39
3767 | 
3768 | 
3769 | 
3770 | 
3771 | 
3772 | 
3773 | 
3774 | 
3775 | 
3776 | 
3777 | 
3778 | 
3779 | 
3780 | 
3781 | 
3782 | 
3783 | 
3784 | 
3785 | 
3786 | C39:
3787 | 
3788 | 
3789 | USAR_C39:
3790 |   ; Wait for data to be received
3791 | lds r16,UCSR1A
3792 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3793 | rjmp USAR_C39
3794 |   ; Get and return received data from buffer
3795 | lds r17,UDR1 
3796 | 
3797 | USAR_C392:
3798 |   ; Wait for data to be received
3799 | lds r16,UCSR1A
3800 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3801 | rjmp USAR_C392
3802 |   ; Get and return received data from buffer
3803 | lds r17,UDR1 
3804 | 
3805 | USAR_C393:
3806 |   ; Wait for data to be received
3807 | lds r16,UCSR1A
3808 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3809 | rjmp USAR_C393
3810 |   ; Get and return received data from buffer
3811 | lds r17,UDR1 
3812 | 
3813 | USAR_C394:
3814 |   ; Wait for data to be received
3815 | lds r16,UCSR1A
3816 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3817 | rjmp USAR_C394
3818 |   ; Get and return received data from buffer
3819 | lds r17,UDR1
3820 | 
3821 | USAR_C395:
3822 |   ; Wait for data to be received
3823 | lds r16,UCSR1A
3824 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3825 | rjmp USAR_C395
3826 |   ; Get and return received data from buffer
3827 | lds r17,UDR1 
3828 | 
3829 | USAR_C396:
3830 |   ; Wait for data to be received
3831 | lds r16,UCSR1A
3832 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3833 | rjmp USAR_C396
3834 |   ; Get and return received data from buffer
3835 | lds r17,UDR1  
3836 | 
3837 | ldi r18,3 ; $03
3838 | cpse r18,r21 ;Skip the next line if $03
3839 | rjmp USART_CR139
3840 | rjmp C0A
3841 | ;----------------------------------------------------------------------
3842 | ;----------------------------------------------------------------------
3843 | USART_CR139:
3844 |   ; Wait for data to be received
3845 | lds r16,UCSR1A
3846 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3847 | rjmp USART_CR139
3848 |   ; Get and return received data from buffer
3849 | lds r17,UDR1 
3850 |  
3851 | USART_CR1139:
3852 |   ; Wait for data to be received
3853 | lds r16,UCSR1A
3854 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3855 | rjmp USART_CR1139
3856 |   ; Get and return received data from buffer
3857 | lds r18,UDR1
3858 | 
3859 | ldi r19,0 ;$00
3860 | 
3861 | cpse r19,r17 ;Skip the next line if $00
3862 | rjmp USART_1or2s39
3863 | rjmp USART0_End
3864 | USART_1or2s39:
3865 | sts 0x2C,r17   ;send usart0 UDR0
3866 | sts 0x2C,r18   ;send usart0 UDR0
3867 | 
3868 | USART_CR039:
3869 |   ; Wait for data to be received
3870 | lds r16,UCSR1A
3871 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3872 | rjmp USART_CR039
3873 |   ; Get and return received data from buffer
3874 | lds r17,UDR1
3875 | 
3876 | USART_CR0039:
3877 |   ; Wait for data to be received
3878 | lds r16,UCSR1A
3879 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3880 | rjmp USART_CR0039
3881 |   ; Get and return received data from buffer
3882 | lds r18,UDR1 
3883 | 
3884 | cpse r19,r17 ;Skip the next line if $00
3885 | rjmp USART_1or0s39
3886 | rjmp USAR_C0A3
3887 | USART_1or0s39:
3888 | sts 0x2C,r17   ;send usart0 UDR0
3889 | sts 0x2C,r18   ;send usart0 UDR0
3890 | rjmp C0A
3891 | 
3892 | 
3893 | 
3894 | 
3895 | 
3896 | 
3897 | 
3898 | 
3899 | 
3900 | 
3901 | 
3902 | 
3903 | 
3904 | 
3905 | UART00_CMD:
3906 | rjmp UART000_CMD
3907 | 
3908 | USART0_End:
3909 | rjmp USART_End
3910 | 
3911 | USART000_Start:
3912 | rjmp USART00_Start
3913 | 
3914 | 
3915 | 
3916 | 
3917 | 
3918 | 
3919 | 
3920 | 
3921 | 
3922 | 
3923 | 
3924 | 
3925 | 
3926 | 
3927 | C0A:
3928 | 
3929 | 
3930 | USAR_C0A:
3931 |   ; Wait for data to be received
3932 | lds r16,UCSR1A
3933 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3934 | rjmp USAR_C0A
3935 |   ; Get and return received data from buffer
3936 | lds r17,UDR1 
3937 | 
3938 | USAR_C0A2:
3939 |   ; Wait for data to be received
3940 | lds r16,UCSR1A
3941 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3942 | rjmp USAR_C0A2
3943 |   ; Get and return received data from buffer
3944 | lds r17,UDR1
3945 | 
3946 | USAR_C0A3:
3947 |   ; Wait for data to be received
3948 | lds r16,UCSR1A
3949 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3950 | rjmp USAR_C0A3
3951 |   ; Get and return received data from buffer
3952 | lds r17,UDR1
3953 | 
3954 | USAR_C0A4:
3955 |   ; Wait for data to be received
3956 | lds r16,UCSR1A
3957 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3958 | rjmp USAR_C0A4
3959 |   ; Get and return received data from buffer
3960 | lds r17,UDR1
3961 | 
3962 | USAR_C0A5:
3963 |   ; Wait for data to be received
3964 | lds r16,UCSR1A
3965 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3966 | rjmp USAR_C0A5
3967 |   ; Get and return received data from buffer
3968 | lds r17,UDR1
3969 | 
3970 | USAR_C0A6:
3971 |   ; Wait for data to be received
3972 | lds r16,UCSR1A
3973 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3974 | rjmp USAR_C0A6
3975 |   ; Get and return received data from buffer
3976 | lds r17,UDR1
3977 | 
3978 | ldi r18,3 ; $03
3979 | cpse r18,r21 ;Skip the next line if $03
3980 | rjmp USART_CR10A
3981 | rjmp C1B
3982 | ;----------------------------------------------------------------------
3983 | ;----------------------------------------------------------------------
3984 | USART_CR10A:
3985 |   ; Wait for data to be received
3986 | lds r16,UCSR1A
3987 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3988 | rjmp USART_CR10A
3989 |   ; Get and return received data from buffer
3990 | lds r17,UDR1 
3991 |  
3992 | USART_CR110A:
3993 |   ; Wait for data to be received
3994 | lds r16,UCSR1A
3995 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
3996 | rjmp USART_CR110A
3997 |   ; Get and return received data from buffer
3998 | lds r18,UDR1
3999 | 
4000 | ldi r19,0 ;$00
4001 | 
4002 | cpse r19,r17 ;Skip the next line if $00
4003 | rjmp USART_1or2s0A
4004 | rjmp USART_End
4005 | USART_1or2s0A:
4006 | sts 0x2C,r17   ;send usart0 UDR0
4007 | sts 0x2C,r18   ;send usart0 UDR0
4008 | 
4009 | USART_CR00A:
4010 |   ; Wait for data to be received
4011 | lds r16,UCSR1A
4012 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4013 | rjmp USART_CR00A
4014 |   ; Get and return received data from buffer
4015 | lds r17,UDR1
4016 | 
4017 | USART_CR000A:
4018 |   ; Wait for data to be received
4019 | lds r16,UCSR1A
4020 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4021 | rjmp USART_CR000A
4022 |   ; Get and return received data from buffer
4023 | lds r18,UDR1 
4024 | 
4025 | cpse r19,r17 ;Skip the next line if $00
4026 | rjmp USART_1or0s0A
4027 | rjmp USAR_C1B3
4028 | USART_1or0s0A:
4029 | sts 0x2C,r17   ;send usart0 UDR0
4030 | sts 0x2C,r18   ;send usart0 UDR0
4031 | rjmp C1B
4032 | 
4033 | 
4034 | 
4035 | 
4036 | 
4037 | 
4038 | 
4039 | 
4040 | 
4041 | 
4042 | 
4043 | 
4044 | 
4045 | 
4046 | USART_CCC:
4047 | rjmp USART_CC
4048 | 
4049 | 
4050 | 
4051 | 
4052 | 
4053 | 
4054 | 
4055 | 
4056 | 
4057 | 
4058 | 
4059 | 
4060 | 
4061 | 
4062 | C1B:
4063 | 
4064 | 
4065 | USAR_C1B:
4066 |   ; Wait for data to be received
4067 | lds r16,UCSR1A
4068 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4069 | rjmp USAR_C1B
4070 |   ; Get and return received data from buffer
4071 | lds r17,UDR1 
4072 | 
4073 | USAR_C1B2:
4074 |   ; Wait for data to be received
4075 | lds r16,UCSR1A
4076 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4077 | rjmp USAR_C1B2
4078 |   ; Get and return received data from buffer
4079 | lds r17,UDR1  
4080 | 
4081 | USAR_C1B3:
4082 |   ; Wait for data to be received
4083 | lds r16,UCSR1A
4084 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4085 | rjmp USAR_C1B3
4086 |   ; Get and return received data from buffer
4087 | lds r17,UDR1 
4088 | 
4089 | USAR_C1B4:
4090 |   ; Wait for data to be received
4091 | lds r16,UCSR1A
4092 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4093 | rjmp USAR_C1B4
4094 |   ; Get and return received data from buffer
4095 | lds r17,UDR1 
4096 | 
4097 | USAR_C1B5:
4098 |   ; Wait for data to be received
4099 | lds r16,UCSR1A
4100 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4101 | rjmp USAR_C1B5
4102 |   ; Get and return received data from buffer
4103 | lds r17,UDR1 
4104 | 
4105 | USAR_C1B6:
4106 |   ; Wait for data to be received
4107 | lds r16,UCSR1A
4108 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4109 | rjmp USAR_C1B6
4110 |   ; Get and return received data from buffer
4111 | lds r17,UDR1 
4112 | 
4113 | ldi r18,3 ; $03
4114 | cpse r18,r21 ;Skip the next line if $03
4115 | rjmp USART_CR11B
4116 | rjmp C6C
4117 | ;----------------------------------------------------------------------
4118 | ;----------------------------------------------------------------------
4119 | USART_CR11B:
4120 |   ; Wait for data to be received
4121 | lds r16,UCSR1A
4122 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4123 | rjmp USART_CR11B
4124 |   ; Get and return received data from buffer
4125 | lds r17,UDR1 
4126 |  
4127 | USART_CR111B:
4128 |   ; Wait for data to be received
4129 | lds r16,UCSR1A
4130 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4131 | rjmp USART_CR111B
4132 |   ; Get and return received data from buffer
4133 | lds r18,UDR1
4134 | 
4135 | ldi r19,0 ;$00
4136 | 
4137 | cpse r19,r17 ;Skip the next line if $00
4138 | rjmp USART_1or2s1B
4139 | rjmp USART_End
4140 | USART_1or2s1B:
4141 | sts 0x2C,r17   ;send usart0 UDR0
4142 | sts 0x2C,r18   ;send usart0 UDR0
4143 | 
4144 | USART_CR01B:
4145 |   ; Wait for data to be received
4146 | lds r16,UCSR1A
4147 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4148 | rjmp USART_CR01B
4149 |   ; Get and return received data from buffer
4150 | lds r17,UDR1
4151 | 
4152 | USART_CR001B:
4153 |   ; Wait for data to be received
4154 | lds r16,UCSR1A
4155 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4156 | rjmp USART_CR001B
4157 |   ; Get and return received data from buffer
4158 | lds r18,UDR1 
4159 | 
4160 | cpse r19,r17 ;Skip the next line if $00
4161 | rjmp USART_1or0s1B
4162 | rjmp USAR_C6C3
4163 | USART_1or0s1B:
4164 | sts 0x2C,r17   ;send usart0 UDR0
4165 | sts 0x2C,r18   ;send usart0 UDR0
4166 | rjmp C6C
4167 | 
4168 | 
4169 | 
4170 | 
4171 | 
4172 | 
4173 | 
4174 | 
4175 | 
4176 | 
4177 | 
4178 | 
4179 | 
4180 | 
4181 | 
4182 | 
4183 | 
4184 | 
4185 | 
4186 | C6C:
4187 | 
4188 | 
4189 | USAR_C6C:
4190 |   ; Wait for data to be received
4191 | lds r16,UCSR1A
4192 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4193 | rjmp USAR_C6C
4194 |   ; Get and return received data from buffer
4195 | lds r17,UDR1
4196 | 
4197 | USAR_C6C2:
4198 |   ; Wait for data to be received
4199 | lds r16,UCSR1A
4200 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4201 | rjmp USAR_C6C2
4202 |   ; Get and return received data from buffer
4203 | lds r17,UDR1
4204 | 
4205 | USAR_C6C3:
4206 |   ; Wait for data to be received
4207 | lds r16,UCSR1A
4208 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4209 | rjmp USAR_C6C3
4210 |   ; Get and return received data from buffer
4211 | lds r17,UDR1
4212 | 
4213 | USAR_C6C4:
4214 |   ; Wait for data to be received
4215 | lds r16,UCSR1A
4216 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4217 | rjmp USAR_C6C4
4218 |   ; Get and return received data from buffer
4219 | lds r17,UDR1
4220 | 
4221 | ldi r18,1 ; $01
4222 | cpse r18,r24 ;Skip the next line if $01
4223 | rjmp USART_CR16C
4224 | 
4225 | ldi r16, 255     
4226 | ldi r17, 184    
4227 | C16C:             ;Delay cycle
4228 | subi r16, 1       
4229 | sbci r17, 0      
4230 | brcc C16C       
4231 | 
4232 | sbi PORTD,4 ;Switch to transfer
4233 | ;----------------------------------------------------------------------
4234 |   ; Put data (r16) into buffer, sends the data
4235 | ldi r19,1 ;send $01
4236 | sts UDR1,r19
4237 | 
4238 | ldi r16, 255     
4239 | ldi r17, 60     
4240 | C26C1:            ;Delay cycle
4241 | subi r16, 1      
4242 | sbci r17, 0      
4243 | brcc C26C1       
4244 | 
4245 | ; Set baud rate
4246 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4247 | sts UBRR1H,r16 
4248 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4249 | sts UBRR1L,r16
4250 | 
4251 | ldi r16, 255      
4252 | ldi r17, 3      
4253 | C36C2:            ;Delay cycle
4254 | subi r16, 1       
4255 | sbci r17, 0      
4256 | brcc C36C2     
4257 | 
4258 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4259 | sts UBRR1H,r16 
4260 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4261 | sts UBRR1L,r16
4262 | 
4263 |    ; Put data (r16) into buffer, sends the data
4264 | ldi r19,56 ;send $38
4265 | sts UDR1,r19
4266 | 
4267 | ldi r16, 255      
4268 | ldi r17, 91    
4269 | C46C3:           ;Delay cycle
4270 | subi r16, 1       
4271 | sbci r17, 0       
4272 | brcc C46C3    
4273 | ;-------------------------------------------------------------------
4274 |   ; Put data (r16) into buffer, sends the data
4275 | ldi r19,17   ;send $11
4276 | sts UDR1,r19
4277 | 
4278 | ldi r16, 255     
4279 | ldi r17, 60     
4280 | C26C11:            ;Delay cycle
4281 | subi r16, 1      
4282 | sbci r17, 0      
4283 | brcc C26C11       
4284 | 
4285 | ; Set baud rate
4286 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4287 | sts UBRR1H,r16 
4288 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4289 | sts UBRR1L,r16
4290 | 
4291 | ldi r16, 255      
4292 | ldi r17, 3      
4293 | C36C22:            ;Delay cycle
4294 | subi r16, 1       
4295 | sbci r17, 0      
4296 | brcc C36C22     
4297 | 
4298 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4299 | sts UBRR1H,r16 
4300 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4301 | sts UBRR1L,r16
4302 | 
4303 |    ; Put data (r16) into buffer, sends the data
4304 | ldi r19,40 ;send $28
4305 | sts UDR1,r19
4306 | 
4307 | ldi r16, 255      
4308 | ldi r17, 91    
4309 | C46C33:           ;Delay cycle
4310 | subi r16, 1       
4311 | sbci r17, 0       
4312 | brcc C46C33
4313 | ;-------------------------------------------------------------------
4314 |   ; Put data (r16) into buffer, sends the data
4315 | ldi r19,8   ;send $08
4316 | sts UDR1,r19
4317 | 
4318 | ldi r16, 255     
4319 | ldi r17, 60     
4320 | C26C111:            ;Delay cycle
4321 | subi r16, 1      
4322 | sbci r17, 0      
4323 | brcc C26C111       
4324 | 
4325 | ; Set baud rate
4326 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4327 | sts UBRR1H,r16 
4328 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4329 | sts UBRR1L,r16
4330 | 
4331 | ldi r16, 255      
4332 | ldi r17, 3      
4333 | C36C222:            ;Delay cycle
4334 | subi r16, 1       
4335 | sbci r17, 0      
4336 | brcc C36C222     
4337 | 
4338 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4339 | sts UBRR1H,r16 
4340 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4341 | sts UBRR1L,r16
4342 | 
4343 |    ; Put data (r16) into buffer, sends the data
4344 | ldi r19,168 ;send $A8
4345 | sts UDR1,r19
4346 | 
4347 | ldi r16, 255      
4348 | ldi r17, 91    
4349 | C46C333:           ;Delay cycle
4350 | subi r16, 1       
4351 | sbci r17, 0       
4352 | brcc C46C333
4353 | ;-------------------------------------------------------------------
4354 |   ; Put data (r16) into buffer, sends the data
4355 | ldi r19,9   ;send $09
4356 | sts UDR1,r19
4357 | 
4358 | ldi r16, 255     
4359 | ldi r17, 60     
4360 | C26C1111:            ;Delay cycle
4361 | subi r16, 1      
4362 | sbci r17, 0      
4363 | brcc C26C1111       
4364 | 
4365 | ; Set baud rate
4366 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4367 | sts UBRR1H,r16 
4368 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4369 | sts UBRR1L,r16
4370 | 
4371 | ldi r16, 255      
4372 | ldi r17, 3      
4373 | C36C2222:            ;Delay cycle
4374 | subi r16, 1       
4375 | sbci r17, 0      
4376 | brcc C36C2222     
4377 | 
4378 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4379 | sts UBRR1H,r16 
4380 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4381 | sts UBRR1L,r16
4382 | 
4383 |    ; Put data (r16) into buffer, sends the data
4384 | ldi r19,184 ;send $B8
4385 | sts UDR1,r19
4386 | 
4387 | ldi r16, 255      
4388 | ldi r17, 70    
4389 | C46C3333:           ;Delay cycle
4390 | subi r16, 1       
4391 | sbci r17, 0       
4392 | brcc C46C3333
4393 | 
4394 | cbi PORTD,4 ;Switch to receive
4395 |    ; Flush Recever
4396 | ldi r16,(0<<RXEN1)
4397 | sts UCSR1B,r16
4398 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
4399 | sts UCSR1B,r16
4400 | 
4401 | rjmp C7D
4402 | ;-------------------------------------------------------------------
4403 | ;-------------------------------------------------------------------
4404 | USART_CR16C:
4405 |   ; Wait for data to be received
4406 | lds r16,UCSR1A
4407 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4408 | rjmp USART_CR16C
4409 |   ; Get and return received data from buffer
4410 | lds r17,UDR1 
4411 |  
4412 | USART_CR116C:
4413 |   ; Wait for data to be received
4414 | lds r16,UCSR1A
4415 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4416 | rjmp USART_CR116C
4417 |   ; Get and return received data from buffer
4418 | lds r18,UDR1 
4419 | 
4420 | ldi r19,3  ; $03
4421 | cpse r19,r21 ;Skip the next line if $03
4422 | rjmp USART_1or26C
4423 | 
4424 | sts 0x2C,r17   ;send usart0 UDR0
4425 | sts 0x2C,r18   ;send usart0 UDR0
4426 | 
4427 | USART_CR26C:
4428 |   ; Wait for data to be received
4429 | lds r16,UCSR1A
4430 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4431 | rjmp USART_CR26C
4432 |   ; Get and return received data from buffer
4433 | lds r17,UDR1 
4434 |  
4435 | USART_CR226C:
4436 |   ; Wait for data to be received
4437 | lds r16,UCSR1A
4438 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4439 | rjmp USART_CR226C
4440 |   ; Get and return received data from buffer
4441 | lds r18,UDR1 
4442 |  
4443 | sts 0x2C,r17   ;send usart0 UDR0
4444 | sts 0x2C,r18   ;send usart0 UDR0
4445 | 
4446 | USART_CR36C:
4447 |   ; Wait for data to be received
4448 | lds r16,UCSR1A
4449 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4450 | rjmp USART_CR36C
4451 |   ; Get and return received data from buffer
4452 | lds r17,UDR1 
4453 |  
4454 | USART_CR336C:
4455 |   ; Wait for data to be received
4456 | lds r16,UCSR1A
4457 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4458 | rjmp USART_CR336C
4459 |   ; Get and return received data from buffer
4460 | lds r18,UDR1 
4461 |  
4462 | sts 0x2C,r17   ;send usart0 UDR0
4463 | sts 0x2C,r18   ;send usart0 UDR0
4464 | 
4465 | USART_CR46C:
4466 |   ; Wait for data to be received
4467 | lds r16,UCSR1A
4468 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4469 | rjmp USART_CR46C
4470 |   ; Get and return received data from buffer
4471 | lds r17,UDR1 
4472 |  
4473 | USART_CR446C:
4474 |   ; Wait for data to be received
4475 | lds r16,UCSR1A
4476 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4477 | rjmp USART_CR446C
4478 |   ; Get and return received data from buffer
4479 | lds r18,UDR1 
4480 |  
4481 | sts 0x2C,r17   ;send usart0 UDR0
4482 | sts 0x2C,r18   ;send usart0 UDR0
4483 | 
4484 | rjmp C7D
4485 | 
4486 | 
4487 | 
4488 | 
4489 | USART_1or26C:
4490 | 
4491 | ldi r19,0 ;$00
4492 | 
4493 | cpse r19,r17 ;Skip the next line if $00
4494 | rjmp USART_1or2s6C
4495 | rjmp USART_End
4496 | USART_1or2s6C:
4497 | sts 0x2C,r17   ;send usart0 UDR0
4498 | sts 0x2C,r18   ;send usart0 UDR0
4499 | rjmp C7D
4500 | 
4501 | 
4502 | 
4503 | 
4504 | 
4505 | 
4506 | 
4507 | 
4508 | 
4509 | 
4510 | 
4511 | 
4512 | 
4513 | 
4514 | 
4515 | 
4516 | 
4517 | 
4518 | 
4519 | C7D:
4520 | 
4521 | 
4522 | USAR_C7D:
4523 |   ; Wait for data to be received
4524 | lds r16,UCSR1A
4525 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4526 | rjmp USAR_C7D
4527 |   ; Get and return received data from buffer
4528 | lds r17,UDR1 
4529 | 
4530 | USAR_C7D2:
4531 |   ; Wait for data to be received
4532 | lds r16,UCSR1A
4533 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4534 | rjmp USAR_C7D2
4535 |   ; Get and return received data from buffer
4536 | lds r17,UDR1 
4537 | 
4538 | USAR_C7D3:
4539 |   ; Wait for data to be received
4540 | lds r16,UCSR1A
4541 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4542 | rjmp USAR_C7D3
4543 |   ; Get and return received data from buffer
4544 | lds r17,UDR1 
4545 | 
4546 | USAR_C7D4:
4547 |   ; Wait for data to be received
4548 | lds r16,UCSR1A
4549 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4550 | rjmp USAR_C7D4
4551 |   ; Get and return received data from buffer
4552 | lds r17,UDR1 
4553 | 
4554 | 
4555 | ldi r18,1 ; $01
4556 | cpse r18,r24 ;Skip the next line if $01
4557 | rjmp USART_CR17D
4558 | 
4559 | ldi r16, 255     
4560 | ldi r17, 184    
4561 | C17D:             ;Delay cycle
4562 | subi r16, 1       
4563 | sbci r17, 0      
4564 | brcc C17D       
4565 | 
4566 | sbi PORTD,4 ;Switch to transfer
4567 | ;----------------------------------------------------------------------
4568 |   ; Put data (r16) into buffer, sends the data
4569 | ldi r19,13   ;send $0D
4570 | sts UDR1,r19
4571 | 
4572 | ldi r16, 255     
4573 | ldi r17, 60     
4574 | C27D1:            ;Delay cycle
4575 | subi r16, 1      
4576 | sbci r17, 0      
4577 | brcc C27D1       
4578 | 
4579 | ; Set baud rate
4580 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4581 | sts UBRR1H,r16 
4582 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4583 | sts UBRR1L,r16
4584 | 
4585 | ldi r16, 255      
4586 | ldi r17, 3      
4587 | C37D2:            ;Delay cycle
4588 | subi r16, 1       
4589 | sbci r17, 0      
4590 | brcc C37D2     
4591 | 
4592 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4593 | sts UBRR1H,r16 
4594 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4595 | sts UBRR1L,r16
4596 | 
4597 |    ; Put data (r16) into buffer, sends the data
4598 | ldi r19,248 ;send $F8
4599 | sts UDR1,r19
4600 | 
4601 | ldi r16, 255      
4602 | ldi r17, 91    
4603 | C47D3:           ;Delay cycle
4604 | subi r16, 1       
4605 | sbci r17, 0       
4606 | brcc C47D3    
4607 | ;-------------------------------------------------------------------
4608 |   ; Put data (r16) into buffer, sends the data
4609 | ldi r19,16   ;send $10
4610 | sts UDR1,r19
4611 | 
4612 | ldi r16, 255     
4613 | ldi r17, 60     
4614 | C27D11:            ;Delay cycle
4615 | subi r16, 1      
4616 | sbci r17, 0      
4617 | brcc C27D11       
4618 | 
4619 | ; Set baud rate
4620 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4621 | sts UBRR1H,r16 
4622 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4623 | sts UBRR1L,r16
4624 | 
4625 | ldi r16, 255      
4626 | ldi r17, 3      
4627 | C37D22:            ;Delay cycle
4628 | subi r16, 1       
4629 | sbci r17, 0      
4630 | brcc C37D22     
4631 | 
4632 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4633 | sts UBRR1H,r16 
4634 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4635 | sts UBRR1L,r16
4636 | 
4637 |    ; Put data (r16) into buffer, sends the data
4638 | ldi r19,56 ;send $38
4639 | sts UDR1,r19
4640 | 
4641 | ldi r16, 255      
4642 | ldi r17, 91    
4643 | C47D33:           ;Delay cycle
4644 | subi r16, 1       
4645 | sbci r17, 0       
4646 | brcc C47D33
4647 | ;-------------------------------------------------------------------
4648 |   ; Put data (r16) into buffer, sends the data
4649 | ldi r19,15   ;send $0F
4650 | sts UDR1,r19
4651 | 
4652 | ldi r16, 255     
4653 | ldi r17, 60     
4654 | C27D111:            ;Delay cycle
4655 | subi r16, 1      
4656 | sbci r17, 0      
4657 | brcc C27D111       
4658 | 
4659 | ; Set baud rate
4660 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4661 | sts UBRR1H,r16 
4662 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4663 | sts UBRR1L,r16
4664 | 
4665 | ldi r16, 255      
4666 | ldi r17, 3      
4667 | C37D222:            ;Delay cycle
4668 | subi r16, 1       
4669 | sbci r17, 0      
4670 | brcc C37D222     
4671 | 
4672 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4673 | sts UBRR1H,r16 
4674 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4675 | sts UBRR1L,r16
4676 | 
4677 |    ; Put data (r16) into buffer, sends the data
4678 | ldi r19,216 ;send $D8
4679 | sts UDR1,r19
4680 | 
4681 | ldi r16, 255      
4682 | ldi r17, 91    
4683 | C47D333:           ;Delay cycle
4684 | subi r16, 1       
4685 | sbci r17, 0       
4686 | brcc C47D333
4687 | ;-------------------------------------------------------------------
4688 |   ; Put data (r16) into buffer, sends the data
4689 | ldi r19,21   ;send $15
4690 | sts UDR1,r19
4691 | 
4692 | ldi r16, 255     
4693 | ldi r17, 60     
4694 | C27D1111:            ;Delay cycle
4695 | subi r16, 1      
4696 | sbci r17, 0      
4697 | brcc C27D1111       
4698 | 
4699 | ; Set baud rate
4700 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4701 | sts UBRR1H,r16 
4702 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4703 | sts UBRR1L,r16
4704 | 
4705 | ldi r16, 255      
4706 | ldi r17, 3      
4707 | C37D2222:            ;Delay cycle
4708 | subi r16, 1       
4709 | sbci r17, 0      
4710 | brcc C37D2222     
4711 | 
4712 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4713 | sts UBRR1H,r16 
4714 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4715 | sts UBRR1L,r16
4716 | 
4717 |    ; Put data (r16) into buffer, sends the data
4718 | ldi r19,104 ;send $68
4719 | sts UDR1,r19
4720 | 
4721 | ldi r16, 255      
4722 | ldi r17, 70    
4723 | C47D3333:           ;Delay cycle
4724 | subi r16, 1       
4725 | sbci r17, 0       
4726 | brcc C47D3333
4727 | 
4728 | cbi PORTD,4 ;Switch to receive
4729 |    ; Flush Recever
4730 | ldi r16,(0<<RXEN1)
4731 | sts UCSR1B,r16
4732 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
4733 | sts UCSR1B,r16
4734 | 
4735 | rjmp C4E
4736 | ;-------------------------------------------------------------------
4737 | ;-------------------------------------------------------------------
4738 | USART_CR17D:
4739 |   ; Wait for data to be received
4740 | lds r16,UCSR1A
4741 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4742 | rjmp USART_CR17D
4743 |   ; Get and return received data from buffer
4744 | lds r17,UDR1 
4745 |  
4746 | USART_CR117D:
4747 |   ; Wait for data to be received
4748 | lds r16,UCSR1A
4749 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4750 | rjmp USART_CR117D
4751 |   ; Get and return received data from buffer
4752 | lds r18,UDR1 
4753 | 
4754 | ldi r19,3  ; $03
4755 | cpse r19,r21 ;Skip the next line if $03
4756 | rjmp USART_1or27D
4757 | 
4758 | sts 0x2C,r17   ;send usart0 UDR0
4759 | sts 0x2C,r18   ;send usart0 UDR0
4760 | 
4761 | USART_CR27D:
4762 |   ; Wait for data to be received
4763 | lds r16,UCSR1A
4764 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4765 | rjmp USART_CR27D
4766 |   ; Get and return received data from buffer
4767 | lds r17,UDR1 
4768 |  
4769 | USART_CR227D:
4770 |   ; Wait for data to be received
4771 | lds r16,UCSR1A
4772 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4773 | rjmp USART_CR227D
4774 |   ; Get and return received data from buffer
4775 | lds r18,UDR1 
4776 |  
4777 | sts 0x2C,r17   ;send usart0 UDR0
4778 | sts 0x2C,r18   ;send usart0 UDR0
4779 | 
4780 | USART_CR37D:
4781 |   ; Wait for data to be received
4782 | lds r16,UCSR1A
4783 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4784 | rjmp USART_CR37D
4785 |   ; Get and return received data from buffer
4786 | lds r17,UDR1 
4787 |  
4788 | USART_CR337D:
4789 |   ; Wait for data to be received
4790 | lds r16,UCSR1A
4791 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4792 | rjmp USART_CR337D
4793 |   ; Get and return received data from buffer
4794 | lds r18,UDR1 
4795 |  
4796 | sts 0x2C,r17   ;send usart0 UDR0
4797 | sts 0x2C,r18   ;send usart0 UDR0
4798 | 
4799 | USART_CR47D:
4800 |   ; Wait for data to be received
4801 | lds r16,UCSR1A
4802 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4803 | rjmp USART_CR47D
4804 |   ; Get and return received data from buffer
4805 | lds r17,UDR1 
4806 |  
4807 | USART_CR447D:
4808 |   ; Wait for data to be received
4809 | lds r16,UCSR1A
4810 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4811 | rjmp USART_CR447D
4812 |   ; Get and return received data from buffer
4813 | lds r18,UDR1 
4814 |  
4815 | sts 0x2C,r17   ;send usart0 UDR0
4816 | sts 0x2C,r18   ;send usart0 UDR0
4817 | 
4818 | rjmp C4E
4819 | 
4820 | 
4821 | 
4822 | 
4823 | USART_1or27D:
4824 | 
4825 | ldi r19,0 ;$00
4826 | 
4827 | cpse r19,r17 ;Skip the next line if $00
4828 | rjmp USART_1or2s7D
4829 | rjmp USART_End
4830 | USART_1or2s7D:
4831 | sts 0x2C,r17   ;send usart0 UDR0
4832 | sts 0x2C,r18   ;send usart0 UDR0
4833 | rjmp C4E
4834 | 
4835 | 
4836 | 
4837 | 
4838 | 
4839 | 
4840 | 
4841 | 
4842 | 
4843 | 
4844 | 
4845 | 
4846 | 
4847 | 
4848 | 
4849 | 
4850 | 
4851 | 
4852 | 
4853 | C4E:
4854 | 
4855 | 
4856 | USAR_C4E:
4857 |   ; Wait for data to be received
4858 | lds r16,UCSR1A
4859 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4860 | rjmp USAR_C4E
4861 |   ; Get and return received data from buffer
4862 | lds r17,UDR1
4863 | 
4864 | USAR_C4E2:
4865 |   ; Wait for data to be received
4866 | lds r16,UCSR1A
4867 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4868 | rjmp USAR_C4E2
4869 |   ; Get and return received data from buffer
4870 | lds r17,UDR1
4871 | 
4872 | USAR_C4E3:
4873 |   ; Wait for data to be received
4874 | lds r16,UCSR1A
4875 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4876 | rjmp USAR_C4E3
4877 |   ; Get and return received data from buffer
4878 | lds r17,UDR1
4879 | 
4880 | USAR_C4E4:
4881 |   ; Wait for data to be received
4882 | lds r16,UCSR1A
4883 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
4884 | rjmp USAR_C4E4
4885 |   ; Get and return received data from buffer
4886 | lds r17,UDR1 
4887 | 
4888 | ldi r18,1 ; $01
4889 | cpse r18,r24 ;Skip the next line if $01
4890 | rjmp USART_CR14E
4891 | 
4892 | ldi r16, 255     
4893 | ldi r17, 184    
4894 | C14E:             ;Delay cycle
4895 | subi r16, 1       
4896 | sbci r17, 0      
4897 | brcc C14E       
4898 | 
4899 | sbi PORTD,4 ;Switch to transfer
4900 | ;----------------------------------------------------------------------
4901 |   ; Put data (r16) into buffer, sends the data
4902 | ldi r19,38   ;send $26
4903 | sts UDR1,r19
4904 | 
4905 | ldi r16, 255     
4906 | ldi r17, 60     
4907 | C24E1:            ;Delay cycle
4908 | subi r16, 1      
4909 | sbci r17, 0      
4910 | brcc C24E1       
4911 | 
4912 | ; Set baud rate
4913 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4914 | sts UBRR1H,r16 
4915 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4916 | sts UBRR1L,r16
4917 | 
4918 | ldi r16, 255      
4919 | ldi r17, 3      
4920 | C34E2:            ;Delay cycle
4921 | subi r16, 1       
4922 | sbci r17, 0      
4923 | brcc C34E2     
4924 | 
4925 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4926 | sts UBRR1H,r16 
4927 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4928 | sts UBRR1L,r16
4929 | 
4930 |    ; Put data (r16) into buffer, sends the data
4931 | ldi r19,104 ;send $68
4932 | sts UDR1,r19
4933 | 
4934 | ldi r16, 255      
4935 | ldi r17, 91    
4936 | C44E3:           ;Delay cycle
4937 | subi r16, 1       
4938 | sbci r17, 0       
4939 | brcc C44E3    
4940 | ;-------------------------------------------------------------------
4941 |   ; Put data (r16) into buffer, sends the data
4942 | ldi r19,12   ;send $0C
4943 | sts UDR1,r19
4944 | 
4945 | ldi r16, 255     
4946 | ldi r17, 60     
4947 | C24E11:            ;Delay cycle
4948 | subi r16, 1      
4949 | sbci r17, 0      
4950 | brcc C24E11       
4951 | 
4952 | ; Set baud rate
4953 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4954 | sts UBRR1H,r16 
4955 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4956 | sts UBRR1L,r16
4957 | 
4958 | ldi r16, 255      
4959 | ldi r17, 3      
4960 | C34E22:            ;Delay cycle
4961 | subi r16, 1       
4962 | sbci r17, 0      
4963 | brcc C34E22     
4964 | 
4965 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4966 | sts UBRR1H,r16 
4967 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4968 | sts UBRR1L,r16
4969 | 
4970 |    ; Put data (r16) into buffer, sends the data
4971 | ldi r19,232 ;send $E8
4972 | sts UDR1,r19
4973 | 
4974 | ldi r16, 255      
4975 | ldi r17, 91    
4976 | C44E33:           ;Delay cycle
4977 | subi r16, 1       
4978 | sbci r17, 0       
4979 | brcc C44E33
4980 | ;-------------------------------------------------------------------
4981 |   ; Put data (r16) into buffer, sends the data
4982 | ldi r19,4   ;send $04
4983 | sts UDR1,r19
4984 | 
4985 | ldi r16, 255     
4986 | ldi r17, 60     
4987 | C24E111:            ;Delay cycle
4988 | subi r16, 1      
4989 | sbci r17, 0      
4990 | brcc C24E111       
4991 | 
4992 | ; Set baud rate
4993 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4994 | sts UBRR1H,r16 
4995 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
4996 | sts UBRR1L,r16
4997 | 
4998 | ldi r16, 255      
4999 | ldi r17, 3      
5000 | C34E222:            ;Delay cycle
5001 | subi r16, 1       
5002 | sbci r17, 0      
5003 | brcc C34E222     
5004 | 
5005 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5006 | sts UBRR1H,r16 
5007 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5008 | sts UBRR1L,r16
5009 | 
5010 |    ; Put data (r16) into buffer, sends the data
5011 | ldi r19,104 ;send $68
5012 | sts UDR1,r19
5013 | 
5014 | ldi r16, 255      
5015 | ldi r17, 91    
5016 | C44E333:           ;Delay cycle
5017 | subi r16, 1       
5018 | sbci r17, 0       
5019 | brcc C44E333
5020 | ;-------------------------------------------------------------------
5021 |   ; Put data (r16) into buffer, sends the data
5022 | ldi r19,14   ;send $0E
5023 | sts UDR1,r19
5024 | 
5025 | ldi r16, 255     
5026 | ldi r17, 60     
5027 | C24E1111:            ;Delay cycle
5028 | subi r16, 1      
5029 | sbci r17, 0      
5030 | brcc C24E1111       
5031 | 
5032 | ; Set baud rate
5033 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5034 | sts UBRR1H,r16 
5035 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5036 | sts UBRR1L,r16
5037 | 
5038 | ldi r16, 255      
5039 | ldi r17, 3      
5040 | C34E2222:            ;Delay cycle
5041 | subi r16, 1       
5042 | sbci r17, 0      
5043 | brcc C34E2222     
5044 | 
5045 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5046 | sts UBRR1H,r16 
5047 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5048 | sts UBRR1L,r16
5049 | 
5050 |    ; Put data (r16) into buffer, sends the data
5051 | ldi r19,200 ;send $C8
5052 | sts UDR1,r19
5053 | 
5054 | ldi r16, 255      
5055 | ldi r17, 70    
5056 | C44E3333:           ;Delay cycle
5057 | subi r16, 1       
5058 | sbci r17, 0       
5059 | brcc C44E3333
5060 | 
5061 | cbi PORTD,4 ;Switch to receive
5062 |    ; Flush Recever
5063 | ldi r16,(0<<RXEN1)
5064 | sts UCSR1B,r16
5065 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
5066 | sts UCSR1B,r16
5067 | 
5068 | rjmp C5F
5069 | ;-------------------------------------------------------------------
5070 | ;-------------------------------------------------------------------
5071 | USART_CR14E:
5072 |   ; Wait for data to be received
5073 | lds r16,UCSR1A
5074 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5075 | rjmp USART_CR14E
5076 |   ; Get and return received data from buffer
5077 | lds r17,UDR1 
5078 |  
5079 | USART_CR114E:
5080 |   ; Wait for data to be received
5081 | lds r16,UCSR1A
5082 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5083 | rjmp USART_CR114E
5084 |   ; Get and return received data from buffer
5085 | lds r18,UDR1 
5086 | 
5087 | ldi r19,3  ; $03
5088 | cpse r19,r21 ;Skip the next line if $03
5089 | rjmp USART_1or24E
5090 | 
5091 | sts 0x2C,r17   ;send usart0 UDR0
5092 | sts 0x2C,r18   ;send usart0 UDR0
5093 | 
5094 | USART_CR24E:
5095 |   ; Wait for data to be received
5096 | lds r16,UCSR1A
5097 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5098 | rjmp USART_CR24E
5099 |   ; Get and return received data from buffer
5100 | lds r17,UDR1 
5101 |  
5102 | USART_CR224E:
5103 |   ; Wait for data to be received
5104 | lds r16,UCSR1A
5105 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5106 | rjmp USART_CR224E
5107 |   ; Get and return received data from buffer
5108 | lds r18,UDR1 
5109 |  
5110 | sts 0x2C,r17   ;send usart0 UDR0
5111 | sts 0x2C,r18   ;send usart0 UDR0
5112 | 
5113 | USART_CR34E:
5114 |   ; Wait for data to be received
5115 | lds r16,UCSR1A
5116 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5117 | rjmp USART_CR34E
5118 |   ; Get and return received data from buffer
5119 | lds r17,UDR1 
5120 |  
5121 | USART_CR334E:
5122 |   ; Wait for data to be received
5123 | lds r16,UCSR1A
5124 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5125 | rjmp USART_CR334E
5126 |   ; Get and return received data from buffer
5127 | lds r18,UDR1 
5128 |  
5129 | sts 0x2C,r17   ;send usart0 UDR0
5130 | sts 0x2C,r18   ;send usart0 UDR0
5131 | 
5132 | USART_CR44E:
5133 |   ; Wait for data to be received
5134 | lds r16,UCSR1A
5135 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5136 | rjmp USART_CR44E
5137 |   ; Get and return received data from buffer
5138 | lds r17,UDR1 
5139 |  
5140 | USART_CR444E:
5141 |   ; Wait for data to be received
5142 | lds r16,UCSR1A
5143 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5144 | rjmp USART_CR444E
5145 |   ; Get and return received data from buffer
5146 | lds r18,UDR1 
5147 |  
5148 | sts 0x2C,r17   ;send usart0 UDR0
5149 | sts 0x2C,r18   ;send usart0 UDR0
5150 | 
5151 | rjmp C5F
5152 | 
5153 | 
5154 | 
5155 | 
5156 | USART_1or24E:
5157 | 
5158 | ldi r19,0 ;$00
5159 | 
5160 | cpse r19,r17 ;Skip the next line if $00
5161 | rjmp USART_1or2s4E
5162 | rjmp USART_End
5163 | USART_1or2s4E:
5164 | sts 0x2C,r17   ;send usart0 UDR0
5165 | sts 0x2C,r18   ;send usart0 UDR0
5166 | rjmp USART_End
5167 | 
5168 | 
5169 | 
5170 | 
5171 | 
5172 | 
5173 | 
5174 | 
5175 | 
5176 | 
5177 | 
5178 | 
5179 | 
5180 | 
5181 | 
5182 | 
5183 | 
5184 | 
5185 | 
5186 | C5F:
5187 | 
5188 | 
5189 | USAR_C5F:
5190 |   ; Wait for data to be received
5191 | lds r16,UCSR1A
5192 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5193 | rjmp USAR_C5F
5194 |   ; Get and return received data from buffer
5195 | lds r17,UDR1 
5196 | 
5197 | USAR_C5F2:
5198 |   ; Wait for data to be received
5199 | lds r16,UCSR1A
5200 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5201 | rjmp USAR_C5F2
5202 |   ; Get and return received data from buffer
5203 | lds r17,UDR1 
5204 | 
5205 | USAR_C5F3:
5206 |   ; Wait for data to be received
5207 | lds r16,UCSR1A
5208 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5209 | rjmp USAR_C5F3
5210 |   ; Get and return received data from buffer
5211 | lds r17,UDR1 
5212 | 
5213 | USAR_C5F4:
5214 |   ; Wait for data to be received
5215 | lds r16,UCSR1A
5216 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5217 | rjmp USAR_C5F4
5218 |   ; Get and return received data from buffer
5219 | lds r17,UDR1
5220 | 
5221 | 
5222 | ldi r18,1 ; $01
5223 | cpse r18,r24 ;Skip the next line if $01
5224 | rjmp USART_CR15F
5225 | 
5226 | ldi r16, 255     
5227 | ldi r17, 184    
5228 | C15F:             ;Delay cycle
5229 | subi r16, 1       
5230 | sbci r17, 0      
5231 | brcc C15F       
5232 | 
5233 | sbi PORTD,4 ;Switch to transfer
5234 | ;----------------------------------------------------------------------
5235 |   ; Put data (r16) into buffer, sends the data
5236 | ldi r19,22   ;send $16
5237 | sts UDR1,r19
5238 | 
5239 | ldi r16, 255     
5240 | ldi r17, 60     
5241 | C25F1:            ;Delay cycle
5242 | subi r16, 1      
5243 | sbci r17, 0      
5244 | brcc C25F1       
5245 | 
5246 | ; Set baud rate
5247 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5248 | sts UBRR1H,r16 
5249 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5250 | sts UBRR1L,r16
5251 | 
5252 | ldi r16, 255      
5253 | ldi r17, 3      
5254 | C35F2:            ;Delay cycle
5255 | subi r16, 1       
5256 | sbci r17, 0      
5257 | brcc C35F2     
5258 | 
5259 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5260 | sts UBRR1H,r16 
5261 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5262 | sts UBRR1L,r16
5263 | 
5264 |    ; Put data (r16) into buffer, sends the data
5265 | ldi r19,88 ;send $58
5266 | sts UDR1,r19
5267 | 
5268 | ldi r16, 255      
5269 | ldi r17, 91    
5270 | C45F3:           ;Delay cycle
5271 | subi r16, 1       
5272 | sbci r17, 0       
5273 | brcc C45F3    
5274 | ;-------------------------------------------------------------------
5275 |   ; Put data (r16) into buffer, sends the data
5276 | ldi r19,27   ;send $1B
5277 | sts UDR1,r19
5278 | 
5279 | ldi r16, 255     
5280 | ldi r17, 60     
5281 | C25F11:            ;Delay cycle
5282 | subi r16, 1      
5283 | sbci r17, 0      
5284 | brcc C25F11       
5285 | 
5286 | ; Set baud rate
5287 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5288 | sts UBRR1H,r16 
5289 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5290 | sts UBRR1L,r16
5291 | 
5292 | ldi r16, 255      
5293 | ldi r17, 3      
5294 | C35F22:            ;Delay cycle
5295 | subi r16, 1       
5296 | sbci r17, 0      
5297 | brcc C35F22     
5298 | 
5299 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5300 | sts UBRR1H,r16 
5301 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5302 | sts UBRR1L,r16
5303 | 
5304 |    ; Put data (r16) into buffer, sends the data
5305 | ldi r19,136 ;send $88
5306 | sts UDR1,r19
5307 | 
5308 | ldi r16, 255      
5309 | ldi r17, 91    
5310 | C45F33:           ;Delay cycle
5311 | subi r16, 1       
5312 | sbci r17, 0       
5313 | brcc C45F33
5314 | ;-------------------------------------------------------------------
5315 |   ; Put data (r16) into buffer, sends the data
5316 | ldi r19,26   ;send $1A
5317 | sts UDR1,r19
5318 | 
5319 | ldi r16, 255     
5320 | ldi r17, 60     
5321 | C25F111:            ;Delay cycle
5322 | subi r16, 1      
5323 | sbci r17, 0      
5324 | brcc C25F111       
5325 | 
5326 | ; Set baud rate
5327 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5328 | sts UBRR1H,r16 
5329 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5330 | sts UBRR1L,r16
5331 | 
5332 | ldi r16, 255      
5333 | ldi r17, 3      
5334 | C35F222:            ;Delay cycle
5335 | subi r16, 1       
5336 | sbci r17, 0      
5337 | brcc C35F222     
5338 | 
5339 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5340 | sts UBRR1H,r16 
5341 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5342 | sts UBRR1L,r16
5343 | 
5344 |    ; Put data (r16) into buffer, sends the data
5345 | ldi r19,152 ;send $98
5346 | sts UDR1,r19
5347 | 
5348 | ldi r16, 255      
5349 | ldi r17, 91    
5350 | C45F333:           ;Delay cycle
5351 | subi r16, 1       
5352 | sbci r17, 0       
5353 | brcc C45F333
5354 | ;-------------------------------------------------------------------
5355 |   ; Put data (r16) into buffer, sends the data
5356 | ldi r19,32   ;send $20
5357 | sts UDR1,r19
5358 | 
5359 | ldi r16, 255     
5360 | ldi r17, 60     
5361 | C25F1111:            ;Delay cycle
5362 | subi r16, 1      
5363 | sbci r17, 0      
5364 | brcc C25F1111       
5365 | 
5366 | ; Set baud rate
5367 | ldi r16,0 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5368 | sts UBRR1H,r16 
5369 | ldi r16,51 ; 19200 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5370 | sts UBRR1L,r16
5371 | 
5372 | ldi r16, 255      
5373 | ldi r17, 3      
5374 | C35F2222:            ;Delay cycle
5375 | subi r16, 1       
5376 | sbci r17, 0      
5377 | brcc C35F2222     
5378 | 
5379 | ldi r16,1 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5380 | sts UBRR1H,r16 
5381 | ldi r16,160 ; 2400 for 16 000 000 Hz Asynch Mode:((fosc/16BAUD)-1)
5382 | sts UBRR1L,r16
5383 | 
5384 |    ; Put data (r16) into buffer, sends the data
5385 | ldi r19,8 ;send $08
5386 | sts UDR1,r19
5387 | 
5388 | ldi r16, 255      
5389 | ldi r17, 70    
5390 | C45F3333:           ;Delay cycle
5391 | subi r16, 1       
5392 | sbci r17, 0       
5393 | brcc C45F3333
5394 | 
5395 | cbi PORTD,4 ;Switch to receive
5396 |    ; Flush Recever
5397 | ldi r16,(0<<RXEN1)
5398 | sts UCSR1B,r16
5399 | ldi r16,(1<<RXEN1)|(1<<TXEN1)
5400 | sts UCSR1B,r16
5401 | 
5402 | rjmp USART_End
5403 | ;-------------------------------------------------------------------
5404 | ;-------------------------------------------------------------------
5405 | USART_CR15F:
5406 |   ; Wait for data to be received
5407 | lds r16,UCSR1A
5408 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5409 | rjmp USART_CR15F
5410 |   ; Get and return received data from buffer
5411 | lds r17,UDR1 
5412 |  
5413 | USART_CR115F:
5414 |   ; Wait for data to be received
5415 | lds r16,UCSR1A
5416 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5417 | rjmp USART_CR115F
5418 |   ; Get and return received data from buffer
5419 | lds r18,UDR1 
5420 | 
5421 | sts 0x2C,r17   ;send usart0 UDR0
5422 | sts 0x2C,r18   ;send usart0 UDR0
5423 | 
5424 | USART_CR25F:
5425 |   ; Wait for data to be received
5426 | lds r16,UCSR1A
5427 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5428 | rjmp USART_CR25F
5429 |   ; Get and return received data from buffer
5430 | lds r17,UDR1 
5431 |  
5432 | USART_CR225F:
5433 |   ; Wait for data to be received
5434 | lds r16,UCSR1A
5435 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5436 | rjmp USART_CR225F
5437 |   ; Get and return received data from buffer
5438 | lds r18,UDR1 
5439 |  
5440 | sts 0x2C,r17   ;send usart0 UDR0
5441 | sts 0x2C,r18   ;send usart0 UDR0
5442 | 
5443 | USART_CR35F:
5444 |   ; Wait for data to be received
5445 | lds r16,UCSR1A
5446 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5447 | rjmp USART_CR35F
5448 |   ; Get and return received data from buffer
5449 | lds r17,UDR1 
5450 |  
5451 | USART_CR335F:
5452 |   ; Wait for data to be received
5453 | lds r16,UCSR1A
5454 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5455 | rjmp USART_CR335F
5456 |   ; Get and return received data from buffer
5457 | lds r18,UDR1 
5458 |  
5459 | sts 0x2C,r17   ;send usart0 UDR0
5460 | sts 0x2C,r18   ;send usart0 UDR0
5461 | 
5462 | USART_CR45F:
5463 |   ; Wait for data to be received
5464 | lds r16,UCSR1A
5465 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5466 | rjmp USART_CR45F
5467 |   ; Get and return received data from buffer
5468 | lds r17,UDR1 
5469 |  
5470 | USART_CR445F:
5471 |   ; Wait for data to be received
5472 | lds r16,UCSR1A
5473 | sbrs r16,RXC1 ;Skip the next line if a data has been unread  in UDR
5474 | rjmp USART_CR445F
5475 |   ; Get and return received data from buffer
5476 | lds r18,UDR1 
5477 |  
5478 | sts 0x2C,r17   ;send usart0 UDR0
5479 | sts 0x2C,r18   ;send usart0 UDR0
5480 | 
5481 | rjmp USART_End
5482 | 
5483 | 
5484 | 
5485 | 
5486 | 
5487 | 
5488 | 
5489 | 
5490 | 
5491 | USART_End:
5492 | 
5493 | ldi r24,0  ; $00
5494 | 
5495 | ldi r18,3  ; $03
5496 | cpse r18,r21 ;Skip the next line if $03
5497 | rjmp USART_CCC
5498 | 
5499 | USART_En3:
5500 | ldi r18,65  ; $41
5501 | cpse r18,r22 ;Skip the next line if $41
5502 | rjmp USART_CCC
5503 | ldi r22,33  ; $21
5504 | ldi r23, 246  ; $F6
5505 | ldi r24,01  ; $01
5506 | rjmp USART_CCC
5507 | 	
5508 | UART000_CMD:  ; Intrrupt Get and return received data from buffer
5509 | lds r21,0x2C ;UDR0 
5510 | rjmp USART000_Start
5511 | 


--------------------------------------------------------------------------------