Arsip: help me if you can......

more 18 years ago
w4rek
ada yg bisa kirimi contoh source codenya
saya menggunakan rs232
jadi program yang saya buat hanya mengirim dan menerima data (mengirim data dari delphi ke AT89c51 untuk menghidupkan 2 buah lampu, dan menerima data dari sensor kedelphi berupa lampu yg menggunakan komponen Shape yang apabila sensor pintu dalam keadaan terbuka maka pada shape (interface delphi) akan berubah warna kuning tandanya ada pintu yg terbuka kalo tertutup maka warnanya hijau. untuk komponen I/O delphinya saya sudah ada yaitu cportlib,kemudian ada juga serial ng.
nah saya ng tau source codenya dan event-2 apa saja yg digunakan. mohon bantuannya.......
saya menggunakan port 1 dan port 2, pada at89c51
bisa bantu ng bagaimana cara delphinya dan asemblernya, meskipun cuma 1 aja yaitu bgmn mengirim data keAT89c51 sehingga bisa menyalakan lampunya.
(asembler seperti apa???? dan perintahnya delphinya seperti apa)
dikirimi source codenya pake notepad juga ng papa boss.....

more 18 years ago
imunk
:)
cara instan emang paling jitu, tapi kayaknya disini gak pake yg instan2 deh...
coba dulu, baca help dulu, tanya mbah google dulu, coba lagi dulu.....
nah kalo dah mentok..tok..tok.., baru tanyain disini apa yg susahnya...
gak terus langsung minta dikirimi source code.....
jika salah maafin daku......:D

more 18 years ago
p2bf
klo diriku pake C, soalnya ASM hese isan :lol:
dan ini jg masih manual untuk nyalain lampu dari delphi.
ini untuk C nya
void main()
{
char z=0;
baudrate(57600);
while(1)
{
z=getce();
if(z=='1') P2=~128;
else if (z=='2') P2=~64;
else if (z=='3') P2=~32;
else if (z=='4') P2=~16;
else if (z=='5') P2=~8;
else if (z=='6') P2=~4;
else if (z=='7') P2=~2;
else if (z=='8') P2=~1;
else if (z=='o') P2=0xff;
else if (z=='n') P2=0x00;
}
}
kan diatas bila kirim data atow mencet 1 maka nyala lampu pasti yang terakhir(klo ga salah itu juga :lol:
jadi untuk delphi nya tinggal kirim string aja apa yang dipake di C nya.
procedure TForm1.SendClick(Sender: TObject);
begin
Comport1.WriteStr(edit1.Text);
end;
mungkin segitu aja dechhh.. tau bener tau ga dech :P
soryy duch masih amatiran,heuheueheuee :lol: :lol: :lol:
more 18 years ago
w4rek
kalo cara membaca (menerima) data dari assemblernya gimana..... yg kemudian diolah menjadi data didelphi!!!

more 18 years ago
NiceDream
@w4rek: kalo cara membaca (menerima) data dari assemblernya gimana..... yg kemudian diolah menjadi data didelphi!!!iya tuh bener kt mas w4rek gw jg msi bngung cara baca dari mikro ke delphi pake comport, ada yg mo berbaik hati ga ksi th source bwt baca data dari mikro ke delphi dgn comport? setahu gw pake edit1.text:=compor1t.readstr; tp kok eror yach
more ...
- Pages:
- 1
reply |
Report Obsolete
AI Forward

🚀 We're thrilled to partner with Alibaba Cloud for "AI Forward - Alibaba Cloud Global Developer Summit 2025" in Jakarta! Join us and explore the future of AI. Register now:
https://int.alibabacloud.com/m/1000400772/
#AlibabaCloud #DeveloperSummit #Jakarta #AIFORWARD
Last Articles
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 5 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 5 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 5 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 5 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 5 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 5 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 5 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 13 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 13 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 13 years ago
Random Topic
- cancel save database
by ImanD in Tip n Trik Pemrograman more 19 years ago - cara instal suipack di delphi gimana?
by 113050251 in Tip n Trik Pemrograman more 17 years ago - Zeos di Turbo Delphi 2006 => Firebird 2.0 embedded
by albertpratama in FireBird more 17 years ago - find karakter in array
by viq_01 in Tip n Trik Pemrograman more 17 years ago - searching database...
by bianchi in Paradox more 17 years ago - Delete Record AdoTabel
by kakaManiez in Reporting more 18 years ago - Cara hide childmdi ??
by purnomo2007 in Hal umum tentang Pascal Indonesia more 15 years ago - operasi tanggal
by jagur in MsSQL more 17 years ago - convert array dari vb ke delphi
by diandewi in Hal umum tentang Pascal Indonesia more 13 years ago - menampilkan detail pada quick report
by yusdi in Reporting more 17 years ago