PIC Basic Pro ve konfigürasyon

Başlatan ilker_32, 22 Temmuz 2008, 08:10:48

Teğmen

Proton derleyicide picbasic programını deniyorum.
@device pic18f46k22
gibi birşey yazamıyorum pic seçimi gibi bir olay var mı c deki gibi project wizard
"Girdim ilim meclisine kıldım eyledim talep,   Dediler ilim geride kaldı illa Edep illa Edep" Hz.Yunus Emre K.S.

ferit06

Device = 18F46K22

şeklide yazabilirsin.

Maxim


Teğmen

'****************************************************************
'*  Name    : basic__first_project.BAS                          *
'*  Author  : [Emre]                                            *
'*  Notice  : Copyright (c) 2017 [select VIEW...EDITOR OPTIONS] *
'*          : All Rights Reserved                               *
'*  Date    : 27.09.2017                                        *
'*  Version : 1.0                                               *
'*  Notes   :                                                   *
'*          :                                                   *
'****************************************************************



Device 18F46K22
Declare Xtal=8

 

DEFINE LCD_DREG		PORTB	    'LCD data bacakları PortB de bağlı
DEFINE LCD_DBIT			4		'LCD data bacakları 4. bitten başlıyor
DEFINE LCD_EREG		PORTB	    'LCD Enable Bacağı PortB de bağlı
DEFINE LCD_EBIT			3		'LCD Enable Bacağı 3. bite bağlı	
DEFINE LCD_RWREG    PORTB	    'LCD RW Bacağı PortB de bağlı
DEFINE LCD_RWBIT     	2		'LCD RW Bacağı  2. bite bağlı
DEFINE LCD_RSREG	PORTB	    'LCD RS Bacağı PortB de bağlı
DEFINE LCD_RSBIT		1		'LCD RS bacağı 1. Bite bağlı		
DEFINE LCD_BITS			4		'LCD 4 bit  olarak bağlı
DEFINE LCD_Lines		2		'LCD 2 sıra olarak çalışıyor.

TRISA=0  'A portu çıkış olarak ayarlandı.
TRISB=0  'B portu çıkış olarak ayarlandı.

'Low PORTB.2     		'RW bacağı ekrana yazmaya imkan vermek için LOW yapıldı.

'PAUSE 200                    	' LCD nin kullanıma hazır hale gelebilmesi için gerekli süre

LCDOUT $FE,1             	'Önce Ekranı siliyoruz.
LCDOUT "BASIC DERSLERI"  'ilk sıra baştan itibaren yazdırıyoruz. Aslında bu komutu başka bir şekilde de yazabiliriz, şöyle
'      LCDOUT $FE,2,"BASIC DERSLERI"

LCDOUT $FE,$C0,"DERS No: 3"		'ikinci satıra yazdırıldı.

End 						'Program sonu
hiçbirşey değitirmedim ama lcd de okuyamıyorum
"Girdim ilim meclisine kıldım eyledim talep,   Dediler ilim geride kaldı illa Edep illa Edep" Hz.Yunus Emre K.S.

MC_Skywalker

birde böyle denermisin
DEFINE LCD_DREG        PORTB        'LCD data bacakları PortB de bağlı
DEFINE LCD_DBIT            4        'LCD data bacakları 4. bitten başlıyor
DEFINE LCD_EREG        PORTB        'LCD Enable Bacağı PortB de bağlı
DEFINE LCD_EBIT            3        'LCD Enable Bacağı 3. bite bağlı    
DEFINE LCD_RWREG    PORTB        'LCD RW Bacağı PortB de bağlı
DEFINE LCD_RWBIT         2        'LCD RW Bacağı  2. bite bağlı
DEFINE LCD_RSREG    PORTB        'LCD RS Bacağı PortB de bağlı
DEFINE LCD_RSBIT        1        'LCD RS bacağı 1. Bite bağlı        
DEFINE LCD_BITS            4        'LCD 4 bit  olarak bağlı
DEFINE LCD_Lines        2        'LCD 2 sıra olarak çalışıyor.

TRISA=0  'A portu çıkış olarak ayarlandı.
TRISB=0  'B portu çıkış olarak ayarlandı.

Low PORTB.2             'RW bacağı ekrana yazmaya imkan vermek için LOW yapıldı.

PAUSE 200                        ' LCD nin kullanıma hazır hale gelebilmesi için gerekli süre

LCDOUT $FE,1                 'Önce Ekranı siliyoruz.
LCDOUT "BASIC DERSLERI"  'ilk sıra baştan itibaren yazdırıyoruz. Aslında bu komutu başka bir şekilde de yazabiliriz, şöyle
'      LCDOUT $FE,2,"BASIC DERSLERI"

LCDOUT $FE,$C0,"DERS No: 3"        'ikinci satıra yazdırıldı.

End                         'Program sonu

Maxim

@Teğmen hocam ne yaptığınızı anlamadım
öncelikle picbasic mi yoksa proton derleyicimi kullanıyorsunuz?
ikisi aynıdır diyenler olsada farklı şeyler ve farklı tanımlamaları var.
eğer, picbasic ise buradan, yok proton ise forumdaki proton bölümünden devam etmenizi tavsiye ederim

Teğmen

@Maxim hocam var ikiside derleyicilerin ama basicte 1.günüm yani anlamaya çalışıyoırum
"Girdim ilim meclisine kıldım eyledim talep,   Dediler ilim geride kaldı illa Edep illa Edep" Hz.Yunus Emre K.S.

Maxim

eğer picbasicten devam edecekseniz
ete ustanın forumu en doğru yerdir
http://www.etepic.com/

cetin1990