<root>
<document schema='101' license='1,Andrew Meikle,0YFDH2' title='' description='' target='PIC.18F.18F25K20' >
	<config data='!0,ff!8,f8!10,ff!18,fe!20,ff!28,7f!30,bb!38,ff!40,ff!48,ff!50,ff!58,ff!60,ff!68,ff%8,8%e,1%f,1%10,1%11,3%13,3%18,0%19,f%28,1%29,1%2a,1%2f,0%30,1%32,0%36,0%37,1%40,1%41,1%42,1%43,1%4f,1%4e,1' clkspd='64000000' simspd='1' usewdt='0' constif='0' />
	<plugins >
		<dll_dbg_icd enabled='0' >
			<data name='debug' value='1' />
			<data name='userpins' value='0' />
			<data name='speed' value='0' />
			<data name='usev9' value='0' />
			<data name='breaks' value='8' />
			<data name='stacks' value='8' />
			<data name='clkport' value='1' />
			<data name='clkbit' value='6' />
			<data name='dataport' value='1' />
			<data name='databit' value='7' />
			<data name='ghostype' value='0' />
			<data name='monitor' value='1' />
			<data name='ictloop' value='0' />
			<data name='ictrate' value='20000' />
			<data name='ictmask' value='0' />
			<data name='anlpres' value='255' />
			<data name='digmask1' value='-1' />
			<data name='digmask2' value='-1' />
		</dll_dbg_icd>
		<dll_models enabled='1' />
		<dll_upgrader enabled='1' />
		<dll_webhelp enabled='1' />
	</plugins>
	<supplement use='0' head='' body='' />
	<debug />
	<components >
		<settings autoimg='1' center='1' unitscale='0' fixedscale='0' fixedx='1' fixedy='1' fixedz='1' headcode='0' />
		<definition guid='e213e73b-c919-434e-b355-8f60593f6b36' vstate='40' vmin='0' vmaj='1' srcleaf='' visiblename='' description='' category='' catenable='1' author='' manuname='' manucode='' sysinfo='0' keywords='' dynamic='0' iconpath='' />
		<component class_type='root' codename='panel' x='0' y='0' z='0' xsz='1' ysz='1' zsz='1' xang='0' yang='0' zang='0' xquat='0' yquat='0' zquat='0' wquat='1' visible='1' interactive='1' solid='1' layer='1' poslock='0' >
			<resources />
			<properties />
			<values />
			<events />
			<apis />
			<variables >
				<variable public='0' >
					<def class_type='variable' name='MODULE_VERSION' type='u8' description='' isconst='0' isinit='0' usrinit='0' setinit='' />
				</variable>
				<variable public='0' >
					<def class_type='variable' name='false' type='b1' description='' isconst='1' isinit='1' usrinit='0' setinit='0' />
				</variable>
				<variable public='0' >
					<def class_type='variable' name='DataPointer' type='u16' description='' isconst='0' isinit='0' usrinit='0' setinit='' />
				</variable>
				<variable public='0' >
					<def class_type='variable' name='RetVal' type='u8' description='' isconst='0' isinit='0' usrinit='0' setinit='' />
				</variable>
				<variable public='0' >
					<def class_type='variable' name='CompareString' type='T8' description='' isconst='0' isinit='0' usrinit='&quot;&quot;' setinit='' >
						<array size='20' />
					</def>
				</variable>
				<variable public='0' >
					<def class_type='variable' name='DataLength' type='u16' description='' isconst='0' isinit='0' usrinit='0' setinit='' />
				</variable>
				<variable public='0' >
					<def class_type='variable' name='true' type='b1' description='' isconst='1' isinit='1' usrinit='1' setinit='1' />
				</variable>
			</variables>
			<macros >
				<macro >
					<flowline name='LCD_INIT' description='' >
						<command class_type='output' title='R/W' mode='1' port='1048578' mask='128' exp='0' />
						<command class_type='output' title='LCD Power' mode='1' port='1048578' mask='2' exp='1' />
						<command class_type='output' title='dim display' mode='1' port='1048576' mask='16' exp='1' />
						<command class_type='call' title='Call Component Macro' component='lcd_eb005' macro='Start' />
						<command class_type='call' title='2l display' component='lcd_eb005' macro='Command' >
							<argument exp='40' />
						</command>
					</flowline>
				</macro>
				<macro >
					<flowline name='Main' description='' >
						<command class_type='native' title='Clock' ccode='osccon = 0x70; //16mhz
osctune = 0x40; //PLL on' language='C' />
						<command class_type='delay' title='Delay' exp='1' type='2' />
						<command class_type='calculation' title='Calculation' >
							<exp exp='MODULE_VERSION = 0' />
						</command>
						<command class_type='call' title='Call Macro' macro='LCD_INIT' />
						<command class_type='call' title='Call Component Macro' component='lcd_eb005' macro='PrintString' >
							<argument exp='&quot;Lan Test &quot;' />
						</command>
						<command class_type='call' title='Call Component Macro' component='TCPIP_ENC28J60' macro='Initialise' />
						<command class_type='call' title='Call Component Macro' component='TCPIP_ENC28J60' macro='GetModuleRevision' >
							<return exp='MODULE_VERSION' />
						</command>
						<command class_type='call' title='Call Component Macro' component='lcd_eb005' macro='PrintNumber' >
							<argument exp='MODULE_VERSION' />
						</command>
						<command class_type='delay' title='Delay' exp='1' type='2' />
						<command class_type='call' title='Call Component Macro' component='lcd_eb005' macro='Clear' />
						<command class_type='loop' title='Loop' type='0' exp='1' >
							<flowline >
								<command class_type='call' title='Check For Incoming Data' component='TCPIP_ENC28J60' macro='PacketReceive' >
									<return exp='DataLength' />
								</command>
								<command class_type='decision' title='Data Available?' exp='DataLength &gt; 0' swap='0' >
									<flowline >
										<command class_type='call' title='Check For ARP Request' component='TCPIP_ENC28J60' macro='CheckForARP' >
											<return exp='RetVal' />
											<argument exp='DataLength' />
										</command>
										<command class_type='decision' title='Decision' exp='RetVal' swap='0' >
											<flowline >
												<command class_type='call' title='ARP Reply' component='TCPIP_ENC28J60' macro='MakeArpAnswerFromRequest' />
												<command class_type='goto' title='Goto Connection Point' labelid='0' labelname='' />
											</flowline>
											<flowline />
										</command>
										<command class_type='call' title='Check For IP Request' component='TCPIP_ENC28J60' macro='CheckForIp' >
											<return exp='RetVal' />
											<argument exp='DataLength' />
										</command>
										<command class_type='decision' title='Decision' exp='RetVal' swap='0' >
											<flowline >
												<command class_type='call' title='Check for Ping request' component='TCPIP_ENC28J60' macro='CheckForPing' >
													<return exp='RetVal' />
												</command>
												<command class_type='decision' title='Decision' exp='RetVal' swap='0' >
													<flowline >
														<command class_type='call' title='Send Ping Response' component='TCPIP_ENC28J60' macro='MakeEchoReplyFromRequest' >
															<argument exp='DataLength' />
														</command>
														<command class_type='call' title='Call Component Macro' component='lcd_eb005' macro='PrintString' >
															<argument exp='&quot;PING&quot;' />
														</command>
														<command class_type='goto' title='Goto Connection Point' labelid='0' labelname='' />
													</flowline>
													<flowline />
												</command>
												<command class_type='call' title='Check the request is destined for our server port' component='TCPIP_ENC28J60' macro='CheckForTCPPort' >
													<return exp='RetVal' />
												</command>
												<command class_type='decision' title='Decision' exp='RetVal' swap='0' >
													<flowline >
														<command class_type='call' title='Check for the TCP type of request' component='TCPIP_ENC28J60' macro='CheckForTCPType' >
															<return exp='RetVal' />
														</command>
														<command class_type='decision' title='Synchronise?' exp='RetVal &amp; 0x02' swap='0' >
															<flowline >
																<command class_type='call' title='Service Acknowledge' component='TCPIP_ENC28J60' macro='MakeTcpSynackFromSyn' />
																<command class_type='goto' title='Goto Connection Point' labelid='0' labelname='' />
															</flowline>
															<flowline />
														</command>
														<command class_type='decision' title='Ack?' exp='RetVal &amp; 0x10' swap='0' >
															<flowline >
																<command class_type='call' title='Check incoming data length after headers' component='TCPIP_ENC28J60' macro='InitialiseDataLengthInfo' />
																<command class_type='call' title='Get Current Data Pointer' component='TCPIP_ENC28J60' macro='GetTcpDataPointer' >
																	<return exp='DataPointer' />
																</command>
																<command class_type='decision' title='If there is no inbound data' exp='DataPointer = 0' swap='0' >
																	<flowline >
																		<command class_type='decision' title='Ack with no data' exp='RetVal &amp; 0x01' swap='0' >
																			<flowline >
																				<command class_type='call' title='Call Component Macro' component='TCPIP_ENC28J60' macro='MakeTcpAckFromAny' />
																			</flowline>
																			<flowline />
																		</command>
																		<command class_type='goto' title='Goto Connection Point' labelid='0' labelname='' />
																	</flowline>
																	<flowline />
																</command>
																<command class_type='call' title='Read TCP Command - &quot;GET&quot;' component='TCPIP_ENC28J60' macro='ReadStringFromBuffer' >
																	<return exp='CompareString' />
																	<argument exp='DataPointer' />
																	<argument exp='4' />
																</command>
																<command class_type='decision' title='Is data is equal to &quot;GET&quot;' exp='Compare$ (CompareString,&quot;GET&quot;,0) == 0' swap='0' >
																	<flowline >
																		<command class_type='call' title='Temp Marker' disable='1' component='lcd_eb005' macro='PrintString' >
																			<argument exp='&quot;1&quot;' />
																		</command>
																		<command class_type='call' title='Read TCP document request' component='TCPIP_ENC28J60' macro='ReadStringFromBuffer' >
																			<return exp='CompareString' />
																			<argument exp='DataPointer' />
																			<argument exp='10' />
																		</command>
																		<command class_type='decision' title='Check for IP root' exp='Compare$ (CompareString,&quot;/&quot;,0) = 0' swap='0' >
																			<flowline >
																				<command class_type='call' title='Temp Marker' component='lcd_eb005' macro='PrintString' >
																					<argument exp='&quot;2&quot;' />
																				</command>
																				<command class_type='call' title='Call Macro' component='TCPIP_ENC28J60' macro='FillTcpData' >
																					<return exp='DataLength' />
																					<argument exp='0' />
																					<argument exp='&quot;HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n&quot;' />
																				</command>
																				<command class_type='call' title='Call Macro' component='TCPIP_ENC28J60' macro='FillTcpData' >
																					<return exp='DataLength' />
																					<argument exp='DataLength' />
																					<argument exp='&quot;&lt;center&gt;&lt;p&gt;&lt;h1&gt;Flowcode MCP28J60 Demo Webserver&lt;/h1&gt;&lt;/p&gt;&quot;' />
																				</command>
																				<command class_type='call' title='Call Macro' component='TCPIP_ENC28J60' macro='FillTcpData' >
																					<return exp='DataLength' />
																					<argument exp='DataLength' />
																					<argument exp='&quot;&lt;br/&gt;Root Page Request&lt;br/&gt;&quot;' />
																				</command>
																				<command class_type='call' title='Call Macro' component='TCPIP_ENC28J60' macro='FillTcpData' >
																					<return exp='DataLength' />
																					<argument exp='DataLength' />
																					<argument exp='&quot;&lt;br/&gt;&lt;a href=\&quot;page2.htm\&quot;&gt;Click Here for Page 2&lt;/a&gt;&lt;br/&gt;&quot;' />
																				</command>
																				<command class_type='call' title='Call Macro' component='TCPIP_ENC28J60' macro='FillTcpData' >
																					<return exp='DataLength' />
																					<argument exp='DataLength' />
																					<argument exp='&quot;&lt;hr&gt;V1.0 &lt;a href=\&quot;http://www.matrixtsl.com\&quot;&gt;www.MatrixTSL.com&lt;a&gt;&quot;' />
																				</command>
																			</flowline>
																			<flowline >
																				<command class_type='decision' title='Check for page 2' exp='Compare$ (CompareString,&quot;/page2.htm&quot;,0) = 0' swap='0' >
																					<flowline >
																						<command class_type='call' title='Temp Marker' component='lcd_eb005' macro='PrintString' >
																							<argument exp='&quot;3&quot;' />
																						</command>
																						<command class_type='call' title='Call Macro' component='TCPIP_ENC28J60' macro='FillTcpData' >
																							<return exp='DataLength' />
																							<argument exp='0' />
																							<argument exp='&quot;HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n&quot;' />
																						</command>
																						<command class_type='call' title='Call Macro' component='TCPIP_ENC28J60' macro='FillTcpData' >
																							<return exp='DataLength' />
																							<argument exp='DataLength' />
																							<argument exp='&quot;&lt;center&gt;&lt;p&gt;&lt;h1&gt;Flowcode MCP28J60 Demo Webserver&lt;/h1&gt;&lt;/p&gt;&quot;' />
																						</command>
																						<command class_type='call' title='Call Macro' component='TCPIP_ENC28J60' macro='FillTcpData' >
																							<return exp='DataLength' />
																							<argument exp='DataLength' />
																							<argument exp='&quot;&lt;br/&gt;Page 2 Request&lt;br/&gt;&quot;' />
																						</command>
																						<command class_type='call' title='Call Macro' component='TCPIP_ENC28J60' macro='FillTcpData' >
																							<return exp='DataLength' />
																							<argument exp='DataLength' />
																							<argument exp='&quot;&lt;br/&gt;&lt;a href=\&quot;\&quot;&gt;Click Here for Page 1&lt;/a&gt;&lt;br/&gt;&quot;' />
																						</command>
																						<command class_type='call' title='Call Macro' component='TCPIP_ENC28J60' macro='FillTcpData' >
																							<return exp='DataLength' />
																							<argument exp='DataLength' />
																							<argument exp='&quot;&lt;hr&gt;V1.0 &lt;a href=\&quot;http://www.matrixtsl.com\&quot;&gt;www.MatrixTSL.com&lt;a&gt;&quot;' />
																						</command>
																					</flowline>
																					<flowline >
																						<command class_type='call' title='Temp Marker' component='lcd_eb005' macro='PrintString' >
																							<argument exp='&quot;4&quot;' />
																						</command>
																						<command class_type='call' title='Call Macro' component='TCPIP_ENC28J60' macro='FillTcpData' >
																							<return exp='DataLength' />
																							<argument exp='0' />
																							<argument exp='&quot;HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n&quot;' />
																						</command>
																						<command class_type='call' title='Call Macro' component='TCPIP_ENC28J60' macro='FillTcpData' >
																							<return exp='DataLength' />
																							<argument exp='DataLength' />
																							<argument exp='&quot;&lt;center&gt;&lt;p&gt;&lt;h1&gt;Flowcode MCP28J60 Demo Webserver&lt;/h1&gt;&lt;/p&gt;&quot;' />
																						</command>
																						<command class_type='call' title='Call Macro' component='TCPIP_ENC28J60' macro='FillTcpData' >
																							<return exp='DataLength' />
																							<argument exp='DataLength' />
																							<argument exp='&quot;&lt;br/&gt;Page x Request&lt;br/&gt;&quot;' />
																						</command>
																						<command class_type='call' title='Call Macro' component='TCPIP_ENC28J60' macro='FillTcpData' >
																							<return exp='DataLength' />
																							<argument exp='DataLength' />
																							<argument exp='&quot;&lt;br/&gt;&lt;a href=\&quot;\&quot;&gt;Click Here for Page 1&lt;/a&gt;&lt;br/&gt;&quot;' />
																						</command>
																						<command class_type='call' title='Call Macro' component='TCPIP_ENC28J60' macro='FillTcpData' >
																							<return exp='DataLength' />
																							<argument exp='DataLength' />
																							<argument exp='&quot;&lt;hr&gt;V1.0 &lt;a href=\&quot;http://www.matrixtsl.com\&quot;&gt;www.MatrixTSL.com&lt;a&gt;&quot;' />
																						</command>
																					</flowline>
																				</command>
																			</flowline>
																		</command>
																	</flowline>
																	<flowline >
																		<command class_type='comment' title='' comment='Other requests may appear here
Post etc
' textarea='12,0,12,0' />
																		<command class_type='call' title='Send Generic Ack' component='TCPIP_ENC28J60' macro='FillTcpData' >
																			<return exp='DataLength' />
																			<argument exp='0' />
																			<argument exp='&quot;HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n&lt;h1&gt;200 OK&lt;/h1&gt;&quot;' />
																		</command>
																	</flowline>
																</command>
																<command class_type='call' title='Assemble TCP Ack Header' ccode='// Assemble TCP Ack Header
// Call Component Macro: TCPIP_ENC28J60::MakeTcpAckFromAny()
FCD_0f5c1_TCPIP_ENC28J60__MakeTcpAckFromAny();
' component='TCPIP_ENC28J60' macro='MakeTcpAckFromAny' />
																<command class_type='call' title='Add data to the buffer' component='TCPIP_ENC28J60' macro='MakeTcpAckWithData' >
																	<argument exp='DataLength' />
																</command>
															</flowline>
															<flowline />
														</command>
													</flowline>
													<flowline />
												</command>
											</flowline>
											<flowline />
										</command>
									</flowline>
									<flowline />
								</command>
								<command class_type='label' title='Connection Point' labelid='0' labelname='RxDone' />
							</flowline>
						</command>
					</flowline>
				</macro>
			</macros>
			<component class_type='ref' guid='d29dda88-17de-4008-991a-c881890d4c57' vmin='1' vmaj='1' codename='lcd_eb005' x='0' y='0' z='3.575' xsz='1' ysz='1' zsz='1' xang='0' yang='0' zang='0' xquat='0' yquat='0' zquat='0' wquat='1' visible='1' interactive='1' solid='1' layer='1' poslock='0' >
				<resources />
				<properties />
				<values >
					<value target='Pin_Data_0' data='$PORTB.0' />
					<value target='Pin_Data_1' data='$PORTB.1' />
					<value target='Pin_Data_2' data='$PORTB.2' />
					<value target='Pin_Data_3' data='$PORTB.3' />
					<value target='Pin_RS' data='$PORTB.5' />
					<value target='Pin_E' data='$PORTB.6' />
				</values>
				<events />
				<apis />
				<variables />
				<macros />
			</component>
			<component class_type='ref' guid='8aab4b54-a912-449c-b11a-7c1a5db8d591' vmin='0' vmaj='1' codename='TCPIP_ENC28J60' x='-64' y='0' z='0' xsz='25' ysz='25' zsz='25' xang='0' yang='0' zang='0' xquat='0' yquat='0' zquat='0' wquat='1' visible='1' interactive='1' solid='1' layer='1' poslock='0' >
				<resources />
				<properties />
				<values >
					<value target='Port' data='80' />
					<value target='BufferSize' data='255' />
					<value target='CHANNEL' data='001' />
					<value target='PR_SCALE' data='016' />
					<value target='ResetPin' data='$PORTC.2' />
					<value target='cs_pin' data='$PORTA.5' />
					<value target='MOSI' data='$PORTC.5' />
					<value target='MISO' data='$PORTC.4' />
					<value target='CLK' data='$PORTC.3' />
					<value target='MosiRemap' data='013' />
					<value target='MisoRemap' data='065' />
					<value target='ClkRemap' data='009' />
					<value target='MAC0' data='100' />
					<value target='MAC1' data='101' />
					<value target='MAC2' data='102' />
					<value target='MAC3' data='103' />
					<value target='MAC4' data='104' />
					<value target='MAC5' data='105' />
					<value target='IP0' data='192' />
					<value target='IP1' data='168' />
					<value target='IP2' data='1' />
					<value target='IP3' data='90' />
				</values>
				<events />
				<apis />
				<variables />
				<macros />
			</component>
		</component>
	</components>
	<keymap />
	<panel2d shadows='0' lighting='2' brightness='0' perspective='0' >
		<background rgb='16777120' img='' style='0' />
		<camera xe='0' ye='0' ze='300' xt='0' yt='0' zt='0' xquat='0' yquat='0' zquat='0' wquat='1' />
	</panel2d>
	<panel3d shadows='0' lighting='2' brightness='0' perspective='0' >
		<background rgb='8409120' img='' style='0' />
		<table rgb='7360576' img='' style='0' size='25' />
		<camera xe='0' ye='0' ze='300' xt='0' yt='0' zt='0' xquat='0' yquat='0' zquat='0' wquat='1' />
	</panel3d>
	<layout >
		<view type='0' name='Main' mode='0' placement='LAAAAAAAAAABAAAA---------------------wAAAAAUAAAAXAUAAH8DAAA' zoom='75' scrollx='0' scrolly='45' flags='0' />
		<view type='0' name='LCD_INIT' mode='0' placement='LAAAAAAAAAABAAAA---------------------wAAAAAUAAAAXAUAAH8DAAA' zoom='75' scrollx='0' scrolly='0' flags='0' />
	</layout>
</document>
</root>
