param.inc

TCP/IP stack, web application, CGI function

	.ifndef	PARAMINC
	.set	PARAMINC, 1
;
; CPU options
;
	.equ RD2, 0
;	.equ RD2, 1
	.set BDT2, 1	;if defined use Timer2 for Baud Clock Generator else use Timer1

	.include	"cpu.inc"

; CPUFRQ = CPU clock [100 Hz]
;	.equ	CPUFRQ, 400000
;	.equ	CPUFRQ, 442368
	.equ	CPUFRQ, 221184

	.local	BAUD, FLOWCTRL
	.equ	BAUD,9600
	.equ	FLOWCTRL,0b00000001	;bit 0 - RTS/CTS
					;bit 1 - XON/XOFF
;
; TCP mode
;
;	.set	ACTIVESTACK,1	;if defined Active TCP stack enabled
;	.set	ACTIVEUDP,1	;if defined Active UDP enabled
;	.set	DUALSTACK,1	;if defined 2 TCP stacks else 1 TCP stacks
;	.set	PSHMODE,1	;if defined data z prijateho TCP paketu bez nastaveneho Push flagu se ignoruji
				; else prijaty TCP paket bez nastaveneho Push flagu muze obsahovat data
;	.set	LEDSTACK,1	;if defined LED1 mark open/close connection (valid if 1 TCP stack)
;	.set	NOIDENT,1	;if defined reject IDENT (send RESET)
;
; SERIAL
;
;	.set	SERIAL,1	;if defined include serial line handler
;	.set	LEDSERIAL,1	;if defined - LED0 mark serial out activity
;	.set	RD2SER, 0	;IRAM serial mode = 0
				;RD2 XRAM serial mode
	.set	RD2SER, RD2	;IRAM serial mode = 0
				;RD2 XRAM serial mode

	.local	lngsser, lngrser, MAXCHAR
.if RD2SER
	.equ	lngsser,512	; send buffer (xram version - 512 byte)
	.equ	lngrser,512	; receive buffer (xram version - 512 byte)
.else
 .if 1
;short buffer - standart
	.equ	lngsser,16	; send buffer
	.equ	lngrser,32	; receive buffer (short version - 32 byte)
 .else
;long buffer - extended
	.equ	lngsser,16	; send buffer
	.equ	lngrser,64	; receive buffer (long version - 64 byte)
	.set	RETRY4, 1	; if defined xputchar 4 times retry else 2 times retry
 .endif
.endif

	.equ	MAXCHAR,lngrser - 19 ; handshake limit - max 19 char overrun
;
; HW EQU
;
	.local	RESETBIT, ADDRPORT, LED0, LED1, RTS, CTS
	.equ	RESETBIT,P2.7
.if HW4
	.equ	RTLENABLE,0		;dummy
	.equ	LED0,P3.2
	.equ	LED1,P3.4
	.equ	RTS,P3.5
	.equ	CTS,P3.3
.else
	.equ	RTLENABLE,0		;dummy
	.equ	LED0,P3.4
	.equ	LED1,P3.5
	.equ	RTS,P3.3
	.equ	CTS,P3.2
.endif
	.equ	ADDRPORT,P2
;# I2C data bits #
	.local	SCL, SDA, FADDR
	.equ	SCL,P2.6
	.equ	SDA,P2.5
	.equ	FADDR,0xA0		; fixed address for AT24Cxx EEPROMs
;
; http & tcp buffer
;
	.equ	sizeofbuf,  0x20
	.equ	sizeofebuf, 0x20
;
; TCP and Ethernet timing & definition
;
	.local	slowtiming, ethtiming, shortretry, TCPtick
	.equ	slowtiming,50	;50 ms
	.equ	ethtiming,4	;200 ms
	.equ	shortretry,5	;5 times
	.equ	TCPtick,200	;200 ms - TCP activity timer
;
; filesystem
;
	.set I2Cfilesystem,1	;if defined use I2C filesystem
	.set ROMfilesystem,1	;if defined use FlashROM filesystem
	.set EEfilesystem,1	;if defined use EEPROM filesystem
;
; packet driver
;
	.set MOVXMODE,1		;if defined use MOVX instruction for RTL access
;	.set TESTMODE,1		;if defined print diagnostic messages

;**************************************

	.local	CPUCLOCK, SysTik
	.equ	CPUCLOCK, CPUFRQ / 192
	.equ	EEDLY, CPUFRQ  / 2000
	.equ	SysTik,-((CPUCLOCK*40)/25)+11	;nutno upravit podle poctu
;-((CPUCLOCK * 1000 / 625)+korekce	;instrukci, ktere se vykonaji
					;nez se znovu nalouduje timer

	.local	optrtscts, optxonxoff
	.equ	optrtscts,0
	.equ	optxonxoff,1

	.global	BAUDCLK
	.set	BAUDCLK,0	; Baud Rate
	.macro	bdck _BD_
	    .set	BAUDCLK, BAUDCLK+1
	    .if	(\_BD_ >> 1)
		bdck (\_BD_ >> 1)
	    .endif
	.endm
	    bdck (38400 / BAUD)
	; BAUDCLK		    ; 1-38400 2-19200
			    	    ; 3- 9600 4- 4800
				    ; 5- 2400 6- 1200
				    ; 7-  600
;
; version and option control
;
	.set	VERSION, 0	;bit 7..4 = version 1.3
	.set	MAGIC, VERSION	;bit 7..4 = version 1.3
	.ifdef ACTIVESTACK
		.set	MAGIC, MAGIC+1	;bit 0 = Active stack
	.endif
	.ifdef DUALSTACK
		.set	MAGIC, MAGIC+2	;bit 1 = 1/2 TCP stacks
	.endif
	.ifdef SERIAL
		.set	MAGIC, MAGIC+4	;bit 2 = serial line handler
	.endif
	.endif