'Abbreviated ALPHANUMERIC 50 Character set for loading into an internal 256k eeprom 'Written in MELabs PicBasicPro(TM) Ver 3.32 ' '================== NOT FOR COMMERICIAL USE ================================= ' ' Author: Ranjit Diol - COMPSys LLC, March 2000 ' (c) Copyright Ranjit Diol, 2001 ' ' DISCLAIMER: This file is being released as non-commericial ' freeware. It is being provided "AS IS", neither the author, ' nor COMPSys LLC shall be held liable for any damages caused ' by its use. ' ' LICENSE: This application may be used in its entirety or ' in parts within some other non-commercial application(s) as long ' as the author is given credit for those parts used. ' ' Contact: rsdiol@compsys1.com for more information ' '********************************************************************* DEFINE ONINT_USED 1 DEFINE OSC 20 i var BYTE dat1 var BYTE dat1 = 0 i = 0 'NOTE CHANGES: '============= ' Write data to EEPROM for i = $0 to $fe 'Room for 50 5-bit chars lookup i,[_ $0, $7F,$41,$41,$0,_ '[ INSTEAD OF ( $0,$0,$41,$41,$7F,_ '] INSTEAD OF ) $2A,$1C,$3E,$1C,$2A,_ '* $8,$8,$3E,$8,$8,_ '+ $0,$2E,$6B,$3A,$0,_ '$ INSTEAD OF comma $8,$8,$8,$8,$8,_ '- $0,$0,$60,$60,$0,_ '. $20,$10,$8,$4,$2,_ '/ $3E,$41,$49,$41,$3E,_ '0 $0,$42,$7F,$40,$0,_ '1 $62,$51,$49,$45,$42,_ '2 $0,$41,$49,$55,$63,_ '3 $18,$14,$12,$11,$7F,_ '4 $67,$49,$49,$49,$31,_ '5 $7F,$49,$49,$49,$70,_ '6 $43,$21,$11,$9,$7,_ '7 $3E,$49,$49,$49,$3E,_ '8 $2E,$49,$49,$49,$3E,_ '9 $0,$0,$12,$0,$0,_ ': $20,$12,$8,$24,$2,_ '% INSTEAD OF semicolon $0,$8,$14,$22,$41,_ '< $14,$14,$14,$14,$14,_ '= $41,$22,$14,$8,$0,_ '> $2,$1,$59,$9,$6,_ '? $0,$2,$5,$2,$0,_ 'degree symbol INSTEAD OF '&' $7e,$11,$11,$11,$7e,_ 'A $7f,$49,$49,$49,$36,_ 'B $3e,$41,$41,$41,$22,_ 'C $7f,$41,$41,$41,$3e,_ 'D $7f,$49,$49,$49,$41,_ 'E $7f,$09,$09,$09,$01,_ 'F $3e,$41,$41,$49,$7a,_ 'G $7F,$8,$8,$8,$7F,_ 'H $0,$41,$7F,$41,$0,_ 'I $30,$41,$41,$3F,$1,_ 'J $7F,$8,$14,$22,$41,_ 'K $7F,$40,$40,$40,$0,_ 'L $7F,$2,$4,$2,$7F,_ 'M $7F,$4,$8,$10,$7F,_ 'N $3E,$41,$41,$41,$3E,_ 'O $7F,$9,$9,$9,$6,_ 'P $3E,$41,$51,$21,$5E,_ 'Q $7E,$9,$19,$29,$46,_ 'R $22,$45,$49,$51,$22,_ 'S $1,$1,$7F,$1,$1,_ 'T $3F,$40,$40,$40,$3F,_ 'U $1F,$20,$40,$20,$1F,_ 'V $7F,$20,$10,$20,$7F,_ 'W $63,$14,$8,$14,$63,_ 'X $7,$8,$78,$8,$7,_ 'Y $63,$51,$49,$45,$63],dat1 'Z write i,dat1 ' Write to EEPROM next end