[ mikikg @ 16.07.2018. 07:46 ] @
Pozdrav drustvo,

da li neko slucajno ima nekakvu dokumentaciju za ovaj Interfejs Mess+System technik gmbh MDP 82?
Shema, korisnicko upustvo ili spisak komandi?

Interfejs je u sklopu regulacione tehnike za Ipsen-ove peci za kaljenje, interfejs je veza izmedju mernih sondi i PC racunara (RS-232) ...
On nesto buguje, ne vraca mi izmerene vrednosti i ako dolaze signali sa sondi do njega.



[ DSL @ 16.07.2018. 09:18 ] @
Kako divan rostilj...

Daj foto s leđa... sa koliko sondi dobija merenje i da li ikakav rezultat dalje..? Tj, da li obradjuje bar jednu sondu korektno? KOliko je to star uredjaj...meni miriše na osamdesete... + jos 18 godina, to mu dođe 30-35 godina eksploatacije. Znači, odmah elektroliti na tapetu...
[ mikikg @ 16.07.2018. 10:24 ] @
U toku dana trebaju da mi donesu tu kutiju pa cu da ga raskupusam.

Problem je sto tamo na PC programu imaju ispisane pogresne vrednosti (kriticne su temperatura i nivo ugljenika), i te vrednosti se ne mrdaju, stoje zakucane, otkacim sonde sa konektora i dalje iste vrednosti.
Kada iskljucim taj uredjaj onda PC program nece da se uopste pokrene, trazi da nesto prica sa tim uredjajem i ispricaju se oni lepo, samo sto ne vraca izmerene vrednosti kako treba.

Zato pokusavam da nadjem dokumentaciju o komandama pa da ga poteram rucno da vidim sta se desava ...

Posotoji jedan vrlo nezgodan detalj u celoj prici, moguce da nisu upareni PC software i sam uredjaj, PC XT ima Floppy sa koga se pokrece program (nema HD), originalnu disketu su zagubili, uzeli su disketu od slicne Ipsen-ove masine sa druge lokacije i sumljam da je oko toga mozda problem.
Upravljacki orman se sad prvi put pusta u rad, pec je kupljena polovna i sad je pustaju ...
[ goran_68 @ 16.07.2018. 11:07 ] @
Miki, jedino da snimiš to što "pričaju" pa da pokušaš da provališ šte se dešava. Pošto nije sigurno da li je uparen softver sa uređajem moguće je da je raspored informacija u odgovoru drugačiji. Ovo pretpostavljam zato što imaš zakucane vrednosti za to što meriš.
[ mikikg @ 16.07.2018. 11:16 ] @
Na terenu sam uspeo nesto sa skope/dekoder da vidim, u jednom trenutku sam video da je slao gomulu karaktera “0” sto se u jednom trenutku manifestovalo sa pucanjem PC programa i greske u fazonu buffer overflow.

Nesto taj uredjaj brljavi ...

[ goran_68 @ 16.07.2018. 11:40 ] @
Izmenjaj onda elektrolite u napajanju pa teraj dalje.
[ mikikg @ 16.07.2018. 13:08 ] @
Kolega elektrtricar sa lokacije koji je povezivao orman mi je rekao da su mu prvo pukli elektroliti u nekom unutra UPS-u, zamenio to i proradi orman.
Posle malo puknu elektroliti u Siemens kontrolerima, zameni ih i to proradi ...
To je stara oprema koja je ko zna koliko dugo stojala neukljucena.
Po mehanickim delovima se vidi da nije mnogo radila cela sprava i verovatno su zato "pazarili" pec, ima jos jedna ista takva pored i kade sa uljem, cela Ipsen-ova linija.

Stigao mi je interfejs, pogledacu to detaljnije ...
[ mikikg @ 17.07.2018. 08:46 ] @
Za pocetak sam ovo izmenjao, svi elkosi su otisli, ostalo mi jos dva veca Frako horizontalna da zamenim ali mogu da posluze jos malkice dok ne nabavim ...

[ mikikg @ 17.07.2018. 08:59 ] @
Ah da, da dodam i ovo, deklasifikovane informacije :D
Morao je da "strada" program sa Floppy-a :D
Hehe, skontao sam sve iz programa kako radi, i XON/XOFF za flow kontrolu, i kad prima i kad salje komande ...

Code:

| grep "#2"
1030 PRINT#2,E$;"do 6 v1":GOSUB 42130:IF IERR% THEN 1030
1080 PRINT#2,E$;"ai 1 ot00":GOSUB 42130
1150 PRINT #2,E$;"ai 14 ot00":GOSUB 42130
1400 PRINT#2,E$;"do 10 v"+MG$:GOSUB 42130:IF IERR% THEN 1400
1410 PRINT#2,E$;"do 11 v"+MG2$:GOSUB 42130:IF IERR% THEN 1410
1420 PRINT#2,E$;"do 12 v"+ML$:GOSUB 42130:IF IERR% THEN 1420
1430 PRINT#2,E$;"do 13 v"+MA$:GOSUB 42130:IF IERR% THEN 1430
1460 PRINT#2,E$;"do 9 v"+SR$:GOSUB 42130:IF IERR% THEN 1460
1510 PRINT#2,E$;"ao 0 v";CR$:GOSUB 42130:IF IERR% THEN 1510
1540 PRINT#2,E$;"ao 1 v";AS$:GOSUB 42130:IF IERR% THEN 1540
2030 PRINT#2,E$;"do 8 v"+OT$:GOSUB 42130:IF IERR% THEN 2030
2050 PRINT#2,E$;"ai 0 ot00":GOSUB 42130
2150 PRINT#2,E$;"do 5 v";SP$:GOSUB 42130:IF IERR% THEN 2150
2160 PRINT#2,E$;"di 0":GOSUB 42130
2450 PRINT#2,E$;"do 7 v"+ANLY$:GOSUB 42130:IF IERR% THEN 2450
3320 PRINT#2,E$;"ao 2 v";DW$:GOSUB 42130:IF IERR% THEN 3320
3340 PRINT#2,E$;"do 2 v";M3$:GOSUB 42130:IF IERR% THEN 3340
6151 PRINT#2,E$;"do 0-3 v0":GOSUB 42130:IF IERR% THEN 6151
6152 PRINT#2,E$;"do 13 v0":GOSUB 42130:MR=0:IF IERR% THEN 6152
6167 M5=0:PRINT#2,E$;"do 6 v0":GOSUB 42130:IF IERR% THEN 6167
10210 PRINT#2,E$;"do 4 v1":GOSUB 42130:IF IERR% THEN 10210
10258 PRINT#2,E$;"do 0-2 v0":GOSUB 42130:IF IERR% THEN 10258
10259 PRINT#2,E$;"do 7 v0":GOSUB 42130:IF IERR% THEN 10259
10265 PRINT#2,E$;"do 3 v1":GOSUB 42130:IF IERR% THEN 10265
10266 PRINT#2,E$;"di 0":GOSUB 42130:IF NOT IERR% THEN E2=-1*VAL(MID$(WERT$,13,1))
10268 PRINT#2,E$;"do 3-4 v0":GOSUB 42130:IF IERR% THEN 10268
10275 AP=0:PRINT#2,E$;"ao 1 v0":GOSUB 42130:IF IERR% THEN 10268
15055 PRINT#2,E$;"do 12 v0":GOSUB 42130:IF IERR% THEN 15055
15250 PX=2:IF NOT KI THEN PRINT#2,E$;"do 0 v1":GOSUB 42130:IF IERR% THEN 15250
15361 PRINT#2,E$;"do 1 v1":GOSUB 42130:IF IERR% THEN 15361
42010 OPEN "com1:9600,n,8,2,CS,DS,CD" AS #2                       <<<<< ;-)
42020 PRINT#2,E$;"00@";:FOR A=1 TO 1000: NEXT A
42030 PRINT#2,E$;"00rs":FOR A=1 TO 2000: NEXT A
42040 PRINT#2,E$;"00 se m2";E$;"xoc1":FOR A=1 TO 750:NEXT A
42050 PRINT#2,E$;"ot00 a1 d1":GOSUB 42130:IF IERR% THEN 42050
42060 PRINT#2,E$;"ad 1 r13"    :GOSUB 42130:IF IERR% THEN 42060:' Sonde in mV 13
42065 PRINT#2,E$;"ad 14 r13"    :GOSUB 42130:IF IERR% THEN 42065:'CO-Dynam. 11
42070 PRINT#2,E$;"ad 0 r11t1c1":GOSUB 42130:IF IERR% THEN 42070:'Theroelement NiCr/Ni 11
42080 PRINT#2,E$;"ds 0 m0 o0":GOSUB 42130:IF IERR% THEN 42080  :'init "DI"
42110 PRINT#2,E$;"do 0-14 v0":GOSUB 42130:IF IERR% THEN 42110:'Relais "0"
42135 PRINT#2,CHR$(19);
42140 PRINT#2,E$;"#";
42160 S=ASC(INPUT$(1,#2))
42240 PRINT#2,CHR$(17);
42250 INPUT#2,WERT$
[ DSL @ 17.07.2018. 10:03 ] @
Uuuu...bas me interesuje kako si dosao do ovog listinga...!?!?!?!?!
I...gde je ta famozna linija 42130??

Ja, brate, ne znam ni gde bi iskop'o floppy drive da mi treba...
[ mikikg @ 17.07.2018. 17:08 ] @
Stari dobri GW/PC-BASIC na modernim platformama ;)
https://robhagemans.github.io/pcbasic/doc/
[ mikikg @ 17.07.2018. 21:37 ] @
Code:

6140 REM **** IF CHR$(DEL)<>"G" THEN GOSUB 25040:GOTO 6151 ELSE KILL"ipsen.bas"
6141 NEW


A vidi ovo, sta se tih godina radilo!
Ne znam odakle skace na tu liniju ali ta linija radi, probao sam, REM sam ja stavio!
I zamisli posle te linije sta se desava sa masinom!!!!
[ DSL @ 19.07.2018. 10:15 ] @
I., jesi li oporavio interfejs?
Na stranu nepostojeca disketa...
[ mikikg @ 19.07.2018. 10:25 ] @
Izmenjao sam samo te kondenzatore, trebaju da probaju, ne znam sta ce da se desi jer nisam stigao da probam preko RS-232 sa mog PC.
Idem off-line sutra, pa kada se vratim pogledacu to sve ponovo i sa povezanim programom i sa osciloskopom ...