Tüm Forumlar

Tüm Forumlar
Web Tasarım - Programlama
Yazılım Geliştirme
Delphi / C++ /Vb
Bu Konuda

Şimdi Ara

Visual Basic Yardım!!

Sıcak Fırsatlarda Tıklananlar

Editörün Seçtiği Fırsatlar

Modica® Konk - Vegan Deri RFID Korumalı Unisex Mekanizmalı Akıllı Cüzdan Kartlık, İnce Modern Minimalist Tasarım : Amazon.com.tr: Moda https://www.amazon.com.tr/dp/B08XQGP92V 2 ay önce paylaşıldı

Amazon.com.tr: 2. Ürün %20 İndirimli promosyon https://www.amazon.com.tr/promotion/psp/AIKQIMNA30ERH 3 gün önce paylaşıldı

LTB Rıgoma Erkek Sweatshirt, Gri, L : Amazon.com.tr: Moda https://www.amazon.com.tr/dp/B0DK7JK6NT 7 sa. önce paylaşıldı

Razer Blade 16 RZ-0483UEJ4-R3E1-B i9-13950HX 32 GB 2 TB SSD RTX4090 16" W11H OLED Dizüstü Bilgisayar Fiyatları ve Özellikleri https://www.n11.com/urun/razer-blade-16-rz-0483uej4-r3e1-b-i9-13950hx-32-gb-2-tb-ssd-rtx4090-16-w11h-oled-dizustu-bilgisayar-51473809 19 sa. önce paylaşıldı

Best of Steam - 2024 https://store.steampowered.com/sale/bestof2024 3 gün önce paylaşıldı

Test your knowledge of the classics! https://gog.app.do/test-your-knowledge-of-the-classics 13 sa. önce paylaşıldı

Apera MT23 Xiaomi ile Uyumlu 67W Turbo Hızlı Şarj Aleti Kablo Dahil Yarım Saatte Doldurur : Amazon.com.tr: Elektronik https://www.amazon.com.tr/dp/B0DBW14ZJV 8 sa. önce paylaşıldı

{{Title}} {{Description}} {{Price}} {{PriceUnit}} {{DiscountInformation}}

Daha Fazla

Bu Konudaki Kullanıcılar: Daha Az

2 Misafir - 2 Masaüstü

5 sn

1
Cevap

0
Favori

335
Tıklama

Daha Fazla
İstatistik

Konu İstatistikleri Yükleniyor

Konudaki Resimler

Mesaj Tarihine Göre En Beğenilen Son Ekleneneler

Seçimimi Hatırla

Mesaj Tarihine Göre

Mesaj Tarihine Göre
En Beğenilenler
Son Eklenenler

Konuya Özel

Favorilerime Ekle
Konuyu Açandan
Popüler Mesajlar
Linkli Mesajlar
Yazdır
E-Posta Aboneliği
Konuyu Gizle

0 oy

Öne Çıkar

x İlgini çekti mi?
Öne çıkar, anasayfada
daha üstte görünsün.
Daha Fazla Bilgi

Cevapla

Tüm Forumlar >> Web Tasarım - Programlama >> Yazılım Geliştirme >> Delphi / C++ /Vb >> Visual Basic Yardım!! | DonanımHaber Forum

Sayfa: 1

Giriş

Mesaj

muhendis91

Çavuş

40 Mesaj

"çavuş": Geleneksel rütbe sistemi koşulları geçerlidir.

Tüm Başarılarını Gör

01 Ocak 2014 20:44:43 Konu Sahibi

Mesaj Linkini Kopyala
Şikayet

@ DEVICE pic16F628A 'işlemci 16F628
@ DEVICE pic16F628A, WDT_on 'Watch Dog timer kapalı
@ DEVICE pic16F628A, PWRT_ON 'Power on timer açık
@ DEVICE pic16F628A, PROTECT_OFF 'Kod Protek kapalı
@ DEVICE pic16F628A, MCLR_off 'MCLR pini kullanılıyor.
@ DEVICE pic16F628A, INTRC_OSC_NOCLKOUT 'Dahili osilatör kullanılacak

include "modedefs.bas" 'SERİN VE SEROUT KOMUTLARININ ÇALIŞMASI İÇİN GEREKLİ KÜTÜPHANE DOSYASI
VERI var byte 'SERİ İLETİŞİMDE VERİLECEK VERİ
TRISB=%11111111 'PORTB TAMAMI GİRİŞ
CMCON=7 'KOMPARATÖR PİNLERİ DİJİTAL GİRİŞ VEYA ÇIKIŞ
OPTION_REG=7 'PULL UP DİREÇLERİ İPTAL
PORTB=0 'PORTB İÇERİĞİ SIFIR NEDENİ İSE İLK ENERJİ VERİLDİĞİNDE GİRİŞ VEYA ÇIKIŞLAR AKTİF OLMAMASI İÇİN
BASLA:
VERI = PORTB 'VERİ=PORTB EŞİTLE
serout PORTA.1,T300,["320VOLT",VERI] 'PORTA.1 320VOLT VERİSİNİ GÖNDER
goto basla 'BASLA ETİKETİNE GİT

?