Mercurial > public > mk2

diff code_part1/OSTC_code_asm_part1/pled_outputs.asm @ 624:7e2c324aa333

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
2.50 release
author heinrichsweikamp
date Thu, 09 Aug 2012 09:14:45 +0200
parents 85e8e1501fd8
children 8d2dc109ecfc
line wrap: on
line diff
--- a/code_part1/OSTC_code_asm_part1/pled_outputs.asm	Wed Aug 08 13:28:10 2012 +0200
+++ b/code_part1/OSTC_code_asm_part1/pled_outputs.asm	Thu Aug 09 09:14:45 2012 +0200
@@ -1023,6 +1023,25 @@
 	DISPLAYTEXT .10			; Setup...
 	DISPLAYTEXT	.142		; More...
 	DISPLAYTEXT .11			; Exit
+
+; Write OSTC serial in Main Menu
+	WIN_TOP		.215
+	WIN_LEFT	.47
+	GETCUSTOM8	d'64'					; Write header in blue when
+    call    PLED_set_color              ; compiled in DEBUG mode...
+	lfsr	FSR2,letter
+	OUTPUTTEXTH		d'262'              ; "OSTC "
+	clrf	EEADRH
+	clrf	EEADR                       ; Get Serial number LOW
+	call	read_eeprom                 ; read byte
+	movff	EEDATA,lo
+	incf	EEADR,F                     ; Get Serial number HIGH
+	call	read_eeprom                 ; read byte
+	movff	EEDATA,hi
+	bsf		leftbind
+	output_16
+	call	word_processor
+	call	PLED_standard_color
 	return	
 
 PLED_setup_menu_mask: