$regfile = "at26def.dat" $crystal = 1000000 Config Lcdpin = Pin , Db4 = Porta.4 , Db5 = Porta.5 Config Lcdpin = Pin , Db6 = Porta.6 , Db7 = Porta.7 Config Lcdpin = Pin , E = Porta.3 , Rs = Porta.2 Config Lcd = 16 * 2 Deflcdchar 0 , 15 , 9 , 15 , 9 , 15 , 9 , 19 , 32 Deflcdchar 1 , 31 , 17 , 17 , 31 , 17 , 17 , 31 , 32 Cursor Off Cls Lcd 1 ; Chr(0) Lcd 1 ; Chr(1) End