arkadaşım ben cangüler arkadaşımızın yapmış olduğu mobil robotun visual
basic kodlarının hex e dönüştürülmüş halini istiyorum yani şu kodları :
Kste PicBasic Pro Kodu:
'
'-------------------------------------------------------------------------- ---------
'---------------------
INCLUDE "MODEDEFS.BAS"
TRISB=%00000010
TRISA=%00000000
'-----Degiskenler-----
b0 VAR BYTE
b01 VAR BYTE
'-----Define----------
DEFINE HSER_RCSTA 90h
DEFINE HSER_TXSTA 20h
DEFINE HSER_BAUD 2400
DEFINE HSER_CLROERR 1
'-----Program---------
loop:
HSerin [wait ("CKG"), b0,b01]
IF b01="," Then
select case b0
case "i"
Toggle PORTB.4
Toggle PORTB.5
PORTB.3=0
PORTB.6=0
case "g"
Toggle PORTB.3
Toggle PORTB.6
PORTB.4=0
PORTB.5=0
case "r"
Toggle PORTB.4
PORTB.3=0
PORTB.5=0
PORTB.6=0
case "l"
Toggle PORTB.5
PORTB.3=0
PORTB.4=0
PORTB.6=0
case "k"
Toggle PORTB.7
PORTA.6=0
case "j"
Toggle PORTA.6
PORTB.7=0
case "a"
Toggle PORTA.2
case "b"
Toggle PORTA.3
case "c"
Toggle PORTB.0
case "d"
Toggle PORTA.7
case "e"
Toggle PORTA.0
case "f"
Toggle PORTA.1
case "x"
PORTA.0=0
PORTA.1=0
PORTA.2=0
PORTA.3=0
PORTA.6=0
PORTA.7=0
PORTB.0=0
PORTB.3=0
PORTB.4=0
PORTB.5=0
PORTB.6=0
PORTB.7=0
End select
Else
GoTo loop
EndIF
Pause 250
GoTo loop
End
'-------------------------------------------------------------------------- ------------
bu kodların daha iyi görebilmek için canbgüler.net adresinden ckmgr sılver
adlı robota bak hatta ben sana yolluyım ordan en aşağıda işte visual basıc
kodu diye yazılmış kodlamalar var zaten yukarıdada yazdım sana bu kodun hex
e dönüştürülmüş dosyası pıc 16F628A nın içine ata bilmem için
msn adresim :omerdmrky_...@hotmail.com bana burdan ulaşırsan sevinirim.....
21.05.2007 tarihinde salih evrensel <alemsa...@hotmail.com> yazmış:
> Daha açık neistediğni ifade etmen lazım visual basic ne kodlarını
> istiyosun onu anlayamadım
> ------------------------------
> From: mamim...@hotmail.com
> To: robotiktr@googlegroups.com
> Subject: RE: yardım eden varmı burda ?????
> Date: Sat, 19 May 2007 21:58:56 +0300
> kardeş bende 1 senedir bu gruba üyeyim ama hiç bir cevap alamadım kimseden
> ama sana yardımcı olabilirim ben çevirip düzeltmiştim ama
> bulmam lazım cd ye çekmiştim cd yi bula bilirsem sana yollarım programı ve
> visual basic kodlarını.
> bende hex halinde yok sadece düzeltilmiş program(yazı isim felan yok
> üzerinde) ve visual basic kodları.
> ------------------------------
> Live.com <http://live.com/>'u deneyin - hýzlý ve kiþiselleþtirilmiþ giriþ
> sayfanýzla istediðiniz her þey tek bir yerde. Live.com'u deneyin:
> çevrimiçi dünyanýzý bir araya getirin; haberler, spor, hava durumu ve çok
> daha fazlasý. <http://www.live.com/getstarted>