6 Ekim 2013 Pazar

'*  Name    : 16F628a_LCD.BAS                                      *
'*  Author  : [select VIEW...EDITOR OPTIONS]                    *
'*  Notice  : Copyright (c) 2009 [select VIEW...EDITOR OPTIONS] *
'*          : All Rights Reserved                               *
'*  Date    : 17.03.2009                                        *
'*  Version : 1.0                                               *
'*  Notes   :                                                   *
'*          :                                                   *
'****************************************************************
Include "modedefs.bas"
'DEFINE LOADER_USED 1
define osc 4
'@ DEVICE pic16F628a, XT_OSC,PROTECT_OFF,WDT_OFF,PWRT_ON,PROTECT_OFF
    @ DEVICE pic16F628a, INTRC_OSC_NOCLKOUt,MCLR_On
    '@ DEVICE pic16F628a, INTRC_OSC_NOCLKOUt
BAS:
LCDOUT $FE,1, " SINASI YAVUZ "
PAUSE 1000
'LCDOUT $FE,1
LCDOUT $FE,$C0,"WYATTS EKRANI TEST.."
PAUSE 1000
'LCDOUT $FE,1
LCDOUT $FE, $94,"YAZI GORUNUYORSA. "
PAUSE 1000
'LCDOUT $FE,1
LCDOUT $FE, $D4,"SORUN YOKTUR........"
PAUSE 1000
LCDOUT $FE, 1
PAUSE 1000
LCDOUT $FE,1, "MIKROISLEMCI CALISMA"
PAUSE 1000
LCDOUT $FE,$C0,"LARI DEVAM EDIYOR  "
PAUSE 1000
LCDOUT $FE, $94,"YAZAN SINASI YAVUZ "
PAUSE 1000
LCDOUT $FE, 1
PAUSE 1000
GOTO BAS
Return

0 yorum:

Yorum Gönder