Poglej prejšnjo temo :: Poglej naslednjo temo |
Avtor |
Sporočilo |
rok Član


Pridružen-a: Pet 13 Mar 2009 16:31 Prispevkov: 365 Aktiv.: 1.84 Kraj: Dravograd
|
Objavljeno: Pon Jul 06, 2009 9:38 pm Naslov sporočila: Pc program namesto PIC-a |
|
|
Zanima me če obstaja kakšen PC program v katerem bi napisal program v nekem jeziku (naprimer C ali BASIC in potem uporabljal kakšne porte računalnika kot vhodne in izhodne porte? |
|
Nazaj na vrh |
|
 |
psevdonim Član


Pridružen-a: Čet 21 Sep 2006 21:42 Prispevkov: 3406 Aktiv.: 14.92 Kraj: slo
|
|
Nazaj na vrh |
|
 |
rok Član


Pridružen-a: Pet 13 Mar 2009 16:31 Prispevkov: 365 Aktiv.: 1.84 Kraj: Dravograd
|
Objavljeno: Tor Jul 07, 2009 10:44 am Naslov sporočila: |
|
|
S tem bi šlo. Jaz bi raje uporabil porte od tiskalnika. |
|
Nazaj na vrh |
|
 |
aly Član



Pridružen-a: Tor 28 Sep 2004 14:51 Prispevkov: 9407 Aktiv.: 39.67 Kraj: Kranj - struževo
|
Objavljeno: Tor Jul 07, 2009 12:07 pm Naslov sporočila: |
|
|
To se da v vseh jezikih. Vprašanje je IO driverjev.
Raje uporabi kakšno USB napravico. _________________ I'm going to stand outside, so if anyone asks, I'm outstanding  |
|
Nazaj na vrh |
|
 |
Branez Moderator


Pridružen-a: Pon 14 Apr 2003 7:21 Prispevkov: 7831 Aktiv.: 33.03 Kraj: Koprivnica HR
|
|
Nazaj na vrh |
|
 |
digital Član

Pridružen-a: Ned 08 Jun 2008 23:11 Prispevkov: 253 Aktiv.: 1.22 Kraj: Slovenska Bistrica
|
Objavljeno: Sre Jul 08, 2009 12:05 am Naslov sporočila: |
|
|
Točno to kar rabiš - link .
S tem sem se hecal pred dooolgo časa. Predvidevam da C-ja na "razturaš", zato imaš na voljo VBA (Visual Basic for Application) - v excelu, ali pa si naloži Visual studio kjer najdeš tako Visual C++ kakor tudi Visual Basic. Sem previril v Excelu in zadeva preverjeno deluje. Spodaj imaš primer ko vrednost celice A1 pošlješ na LPT. Če je vrednost v A1 napr. 12 =>> dvojiško je to 00001100, pomeni da si pravkar prižgal dve luči, ostalih 6 pa ugasnil. V celice vpisuješ seveda desetiške vrednosti. Rabiš še dodatno knjižnico Inpout32.dll, najdeš jo tukaj , ki jo deklariraš v General - Declarations in sicer takole:
Public Declare Function Inp Lib "inpout32.dll" _
Alias "Inp32" (ByVal PortAddress As Integer) As Integer
Public Declare Sub Out Lib "inpout32.dll" _
Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)
Koda pa zgleda takole:
Private Sub CommandButton1_Click()
a = Range("a1")
Out32 Val("&H378"), a
End Sub
378 je odresa LPT, inpout32.dll pa rabiš, ker Windows ne dovoli direktnega dostopa do periferije. Na list sem torej dodal gumb "CommandButton1" in mu spisal kodo, kaj naj se zgodi (zato pravimo temu dogodkovno proramiranje), ko enkrat kliknem z levo miškino tipko na omenjeni gumb. Lahko izbereš kak drug dogodek, ki ti bo vpisoval (čital) vrednosti na LPT, naprimer sprememba vrednosti v celici, .....
Kot je razvidno iz deklaracije, lahko z inp32 stanje vhodov tudi bereš.
Ne boš verjel, kaj vse se da s pomočjo VBA in malo smisla za oblikovnje sčarat z excelom.
Pa veliko uspehov.
lp |
|
Nazaj na vrh |
|
 |
rok Član


Pridružen-a: Pet 13 Mar 2009 16:31 Prispevkov: 365 Aktiv.: 1.84 Kraj: Dravograd
|
Objavljeno: Pon Jul 13, 2009 9:27 pm Naslov sporočila: |
|
|
To je pa še bol zanimivo....
Bom z pridom uporabil....
Hvala...
 |
|
Nazaj na vrh |
|
 |
rok Član


Pridružen-a: Pet 13 Mar 2009 16:31 Prispevkov: 365 Aktiv.: 1.84 Kraj: Dravograd
|
Objavljeno: Pon Jul 13, 2009 9:56 pm Naslov sporočila: |
|
|
Imam eno težavo....
Tega VBA ne morem naložiti na računalnik.
Vedno mi skočijo ven neki pop-upi in internet browser
mi javi neko napako in ne dovoli download-a.
Pa tudi pravila programiranja mis niso najbolj jasna...
A obstaja kakšen priročnik v slovenščini in v PDF-u? |
|
Nazaj na vrh |
|
 |
digital Član

Pridružen-a: Ned 08 Jun 2008 23:11 Prispevkov: 253 Aktiv.: 1.22 Kraj: Slovenska Bistrica
|
Objavljeno: Pon Jul 13, 2009 10:52 pm Naslov sporočila: |
|
|
Saj VBA ne nalagaš iz interneta. Zagotovo ga že imaš na računalniku, saj je vsebovan v Microsoft office. Ti samo odpri excel in že lahko delaš tudi z VBA.
Tako pa si vklopi orodja za krmilnike (napr. gumb), ki jih uporabiš na listu.
Zadeva je dokaj enostavna, če te bo zanimalo, ti napišem še kaj bolj uporabnega ali pa ti pošljem kako excelovo datoteko "sfrizirano" z Basicom, da boš imal za vzorec.
lp |
|
Nazaj na vrh |
|
 |
. Član

Pridružen-a: Ned 19 Sep 2004 22:04 Prispevkov: 16777193 Aktiv.: 70753.33
|
Objavljeno: Tor Jul 14, 2009 5:54 am Naslov sporočila: |
|
|
Brisana vsebina odstranjenega uporabnika. |
|
Nazaj na vrh |
|
 |
rok Član


Pridružen-a: Pet 13 Mar 2009 16:31 Prispevkov: 365 Aktiv.: 1.84 Kraj: Dravograd
|
Objavljeno: Tor Jul 14, 2009 9:17 am Naslov sporočila: |
|
|
Potem pa lepo prosim za kakšen primer programa da
se bom bolje znašel.
Sicer pa poskušam uporabljati Robotics studio od mikrosofta.
Pa me tudi noče ubogati. |
|
Nazaj na vrh |
|
 |
. Član

Pridružen-a: Ned 19 Sep 2004 22:04 Prispevkov: 16777193 Aktiv.: 70753.33
|
Objavljeno: Tor Jul 14, 2009 9:23 am Naslov sporočila: |
|
|
Brisana vsebina odstranjenega uporabnika. |
|
Nazaj na vrh |
|
 |
NeoTO Član


Pridružen-a: Pon 28 Mar 2005 19:19 Prispevkov: 2752 Aktiv.: 11.61 Kraj: Trzic
|
Objavljeno: Tor Jul 14, 2009 10:38 am Naslov sporočila: |
|
|
rok je napisal/a: |
Potem pa lepo prosim za kakšen primer programa da
se bom bolje znašel.
Sicer pa poskušam uporabljati Robotics studio od mikrosofta.
Pa me tudi noče ubogati. |
Poglej v user manual od PoKeys (pdf). Noter imaš razloženo, kako uporabit priložen dll. _________________ Lp,
Matevž |
|
Nazaj na vrh |
|
 |
aly Član



Pridružen-a: Tor 28 Sep 2004 14:51 Prispevkov: 9407 Aktiv.: 39.67 Kraj: Kranj - struževo
|
Objavljeno: Pet Avg 07, 2009 10:00 am Naslov sporočila: |
|
|
NeoTO je napisal/a: |
Poglej v user manual od PoKeys (pdf). Noter imaš razloženo, kako uporabit priložen dll. |
Ene dva dni smo se matrali, da je zadeva oživela v Delphiju. Pa še to samo z 90% uspehom. Največja težava je pri PWM procedurah s tistimi "SafeArray"-i kot parametri. Pošiljanje PWM sedaj deluje, branje pa še vedno ne. _________________ I'm going to stand outside, so if anyone asks, I'm outstanding  |
|
Nazaj na vrh |
|
 |
|