Arsip: Nanya Volt di paralel Port !

more 18 years ago
umarbakri
Apakah benar arus keluar dari port paralel semuanya 5 volt atau bervariasi. Informasi dari buku katanya 5 volt tapi sumber lain katanya masing2 memiliki volt yang berbeda2.
1. Mana yang benar ya ?
2. Kalau dia kurang dari 5 volt kira2 gimana cara menaikkannya supaya pas jadi 5 volt.
saya masalah rangkaian kurang mengetahui.
kasih infonya dong !
trim's

more 18 years ago
jetz
setau saya kalo logika satu itu volt nya diatas 2,5 trus kalo untuk logika nol voltnya dibawah 2,5
maap kalo salah, soalnya udah lama saya gak maen yang paralel port....
btw ente mau buat apa nih?

more 18 years ago
umarbakri
aku mau coba buat program untuk mengecek ic 7408.
Katanya ic ini hanya bisa menerima arus 5 volt.
ilustrasinya begini :
Misalkan aku ingin mencoba salah satu gerbang yang ada di ic tersebut.
lalu aku berikan arus dari port paralelnya ke dua kaki di salah satu gerbang ( kaki input ) pada icnya .
Masalahnya :
kalau aku berikan logika 1 ---> ke dua kaki di salah satu gerbang ( kaki input )
tentunya keluaran dari gerbang tersebut nantinya berlogika 1 khan ?
Tapi kenyataanya setelah kulakukan itu hasilnya tidak ada, dimana salahnya ya...

more 18 years ago
taruna
:D sedikit koreksi boss,
- mungkin yg dimaksud tegangan (voltage), bukan arus (current/Ampere)
- keluaran LPT/paralel port bervariasi untuk logika high (1), tergantung chip & mobo yg digunakan. Sebagian pakai +5V, ada yg +3,5V dll, tapi yg terukur dg voltmeter mungkin hanya +4,8V atau +3,3V tergantung beban
- tidak masalah logika high (1) tidak pas +5V, karena +2,xx volt sudah dikenali sebagai logika high(1), sedangkan logika low(0) dibawah +2V
- 7408 adalah chip TTL Quad AND gate, jadi jika kedua input high harusnya output gate-nya high (1 and 1 = 1), selain itu (jk salah satu inputnya low) output gate pasti 0.
Masalahnya kemungkinan :
1. arus yg keluar dari pin LPT kurang kuat untuk men-drive input gate (beberapa chip u/ LPT mengeluarkan arus sangat kecil meski tegangannya tetap sekitar +5V untuk logika high). Solusi : pasangkan komponen resistor sekitar 4,7KOhm dari pin out LPT ke +Vsupply(+5V) untuk membantu menambah arus (dinamakan resistor pull up)
2. ground LPT (pin 18-25) belum tersambung dg ground 7408 (pin 7). Solusi : sambung aja lage..
3. pakai 74HCT08 atau tipe lain yg pakai teknologi CMOS. Tipe ini rentan terhadap listrik statis, jika ada gate lain yg tidak dipakai (nganggur), input2nya harus diground atau disambung ke +5V.
4. IC 7408 rusak atau malah LPTnya yg rusak (coba dulu ke printer lawas)
5. SW untuk ngeluarkan out ke LPT ada yg masalah (boleh tau listingnya gak??..)
gitu...
semoga membantu.

more 18 years ago
umarbakri
<< Taruna >>
- mungkin yg dimaksud tegangan (voltage), bukan arus (current/Ampere) <<-- maklum aku bukan orang exac sich ( tapi aku mulai tertarik di hal2 semacam ini )
Penjelasannya sangat menarik sekali nich, gimana ya aku bisa bertanya ttg topik diatas dengan mu.
Sekalian kasih tau dong cara menampilkan gambar di forom ini, biar aku bisa kasih gbr. rangkaian yang kubuat biar bisa dikoreksi.

more 18 years ago
umarbakri
Ini salah satu contoh program untuk memberikan tegangan ke salah satu kaki di IC nya :
procedure TForm1.pin1Click(Sender: TObject);
var tmp : byte;
begin
tmp := inp32($378);
if ComboBox1.Text = 'Gerbang A' then
begin
if pin1.Checked then
out32($378,tmp or $1) ---> untuk memberikan teg. ke kaki no. 1 agar bernilai 1
else
out32($378,tmp and $fe); ---> agar tegangan dikaki no. 1 bernilai 0
end else
if ComboBox1.Text = 'Gerbang B' then
begin
if pin1.Checked then
out32($378,tmp or $4)
else
out32($378,tmp and $fb);
end else
if ComboBox1.Text = 'Gerbang C' then
begin
if pin1.Checked then
out32($378,tmp or $10)
else
out32($378,tmp and $ef);
end else
if ComboBox1.Text = 'Gerbang D' then
begin
if pin1.Checked then
out32($378,tmp or $40)
else
out32($378,tmp and $bf);
end;
end;
Ket : pemberian tegangan berdasarkan gerbang yang dipilih di combobox1

more 18 years ago
taruna
wah susah mmg kalo gak ada gbrnya (mungkin boss admin bisa bantu ngasih tau caranya)..
tp dilihat dr sourcecode-nya gak tau pake delphi brapa & component apa, mestinya koneksi pin2-nya adalah sbb :
pin7408 pinLPT
------------------------------
1(in gateA) 2(D0)
2(in gateA) 3(D1)
3(out gateA) -
4(in gateB) 4(D2)
5(in gateB) 5(D3)
6(out gateB) -
7(ground) 18-25(ground)
8(out gateC) -
9(in gateC) 6(D4)
10(in gateC) 7(D5)
11(out gateD) -
12(in gateD) 8(D6)
13(in gateD) 9(D7)
14(+5V) -
dari sourcecode-nya juga kelihatan bahwa ente cuman ngasih logika hanya pada salah satu input gate (D0,D2,D4&D6) sedangkan default dari pinLPT (sebelum dikutak-katik) adalah 0.
So..: 0 AND berapapun = 0, jadinya output selalu 0 apapun yg ente kasih pada pin (D0,D2,D4&D6).
Bikin rutin baru untuk ngasih logika pada (D1,D3,D5&D7) dg cara yg sama dg sudah ente bikin, cuman ganti :
$1 --> $2
$fe --> $fd
$4 --> $8
$fb --> $f7 dst-dst.. bisa kan?
Oh ya, harap hati2 dg tegangan +5V untuk pin14 7408, harus kurang dari +5,6V; lebih dari itu terbakar ICnya. Sebaiknya pake kabel warna merah dari PowerSupply CPU saja, dijamin +5V persis (kalau nggak CPUnya pasti gak jalan hehe..)
semoga membantu...
:D

more 18 years ago
umarbakri
<<Taruna>>
tp dilihat dr sourcecode-nya gak tau pake delphi brapa & component apa
- ane pakai delphi 7 dan menggunakan file fungsi inpout.dll yang ane ambil dari sebuah site. dan aku loetakkan pada direktori C:\windows\system32\ dan pada direktori program yang aku buat.

more 18 years ago
umarbakri
model fungsinya sbb :
procedure Out32(PortAddress:word;Value:byte);stdcall;export;
external 'inpout32.DLL';
function Inp32(PortAddress:word):byte;stdcall;export;
external 'inpout32.DLL';
contoh penggunaannya seperti listing program diatas.

more 18 years ago
Ilustrasinya :
- Jika pin 2 ane beri tegangan (logika 1) dan pin 3 juga ane beri tegangan (logika 1)
- Maka ( Kita anggap gbr. diatas Gerbang A ) keluarannya bernilai (1)
- keluaran dari gerbang tsb diinputkan ke pin 4 dan dicek oleh program, bila di pin4 ada tegangan maka akan muncul pesan 'Gerbang A Baik' dan led menyala.
sourcenya :
[u:b04bc850d8]untuk pin 2[/u:b04bc850d8]
tmp := inp32($378);
if pin2.Checked then
out32($378,tmp or $1) ---> untuk memberikan teg. ke kaki no. 1 agar bernilai 1
else
out32($378,tmp and $fe)
[u:b04bc850d8]untuk pin 3[/u:b04bc850d8]
tmp := inp32($378);
if pin3.Checked then
out32($378,tmp or $2)
else
out32($378,tmp and $fd);
[u:b04bc850d8]untuk pin 4 teg. masuk[/u:b04bc850d8]
x := inp32($379);
if Combobox1.Text = 'Gerbang A' then
Begin
if (x shr 6) mod 2 = 1 then
begin
pin3.Checked := true;
shape1.Brush.Color := clred;
end else
begin
pin3.Checked := false;
shape1.Brush.Color := clgray;
end;
end
umarbakri
more ...
- Pages:
- 1
- 2
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 4 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 4 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 12 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 12 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 12 years ago
Random Topic
- TOLO....ng konfersi dari image ke biner menggunakan delphi..
by sketsa in Multimedia & Graphic Enhancement more 17 years ago - Nanya file exe/pe protection
by yuan_carlos in Hal umum tentang Pascal Indonesia more 16 years ago - Buat Zquery di Program
by goehsatrio in MySQL more 16 years ago - paradox db error?
by mllozz in Bedah Kasus more 18 years ago - Menampilkan stok barang berdasarkan tanggal
by deded in Hal umum tentang Pascal Indonesia more 13 years ago - DELETE data pada 2 tabel.....????
by coacoac in Tip n Trik Pemrograman more 17 years ago - menu print pada MDI application
by m26403131 in Hal umum tentang Pascal Indonesia more 18 years ago - Join Table
by de27de in MySQL more 16 years ago - View Data di DbGrid
by fat_279 in Tip n Trik Pemrograman more 16 years ago - result
by muktaf in Tip n Trik Pemrograman more 17 years ago