$regfile = "at26def.dat" $crystal = 1024000 Config Porta = Output Do Porta.0 = 1 Waitms 597 Waitus 60 Porta.0 = 0 Waitms 398 Waitus 32 Loop End