OWIS Dipcoater: Difference between revisions
mNo edit summary |
|||
| Line 113: | Line 113: | ||
<pre> |
<pre> |
||
Proc ProcGoHome %%Erschaffe eine Prozedur mit dem Namen 'ProcGoHome' |
Proc ProcGoHome %%Erschaffe eine Prozedur mit dem Namen 'ProcGoHome'. |
||
%%Die Procedur muss später noch aufgerufen ('Call') werden, damit ihr Code ausgeführt wird! |
|||
SetVel A1=100 %%Setze die Geschwindigkeit auf 100 (Umrechnung Tabelle oben!) |
SetVel A1=100 %%Setze die Geschwindigkeit auf 100 (Umrechnung Tabelle oben!) |
||
Var ZielHome 1 %%Erzeuge Variable mit Namen 'ZielHome' und weise ihr den Wert '1' zu |
Var ZielHome 1 %%Erzeuge Variable mit Namen 'ZielHome' und weise ihr den Wert '1' zu |
||
SetTarget A1=ZielHome %%Setze das Ziel, also den Haltepunkt, der Achse 'A1' auf den Wert der Variable 'ZielHome' |
SetTarget A1=ZielHome %%Setze das Ziel, also den Haltepunkt, der Achse 'A1' auf den Wert der Variable 'ZielHome' |
||
MoveAbs A1 %%Start der Bewegung Achse |
MoveAbs A1 %%Start der Bewegung Achse |
||
MessageBoxDelay 2 'Take me Home, to the place...' %%Zeige für '2' Sekunden eine Nachrichtenbox mit dem Text 'Take me Home, to the place...' an. |
MessageBoxDelay 2 'Take me Home, to the place...' %%Zeige für '2' Sekunden eine Nachrichtenbox mit dem Text 'Take me Home, to the place...' an. |
||
%%Das Programm hält solange an, bis die Box geschlossen wird oder sich selbst schließt nach 2 Sekunden. |
|||
Beep %%Gibt ein "Piep" Signal aus |
Beep %%Gibt ein "Piep" Signal aus |
||
WaitForAxisStop A1 %%Das Programm wartet solange, bis die Achse 'A1' sich nicht mehr bewegt. |
WaitForAxisStop A1 %%Das Programm wartet solange, bis die Achse 'A1' sich nicht mehr bewegt. |
||
EndWait %%steht IMMER nach dieser vorherigen Zeile 'WaitForAxisStop ??' |
EndWait %%steht IMMER nach dieser vorherigen Zeile 'WaitForAxisStop ??' |
||
Delay 1000 %%Das Programm wartet '1000' ms. |
|||
Beep |
Beep |
||
EndProc %%Ende des Codes der Procedure 'ProcGoHome' |
EndProc %%Ende des Codes der Procedure 'ProcGoHome' |
||
| Line 163: | Line 166: | ||
EndProc |
EndProc |
||
Call ProcGoHome %%Ruft die Procedure 'ProcGoHome' auf und führt ihren Code aus. |
|||
Call ProcGoHome |
|||
Call ProcGoChangeSubstrate |
Call ProcGoChangeSubstrate |
||
Call ProcGoFish |
Call ProcGoFish |
||
Revision as of 17:23, 18 August 2015
250px|thumb|right|<Bildunterschrift>
Gerätebezeichnung: OWIS Dipcoater
Geräteverantwortliche/Operateure: Hendrik Hölscher und Untergebene
Standort: Labor 107.4
Prüfmittel-/Fertigungsmittelnummer: XXXX
Spezifikations-Nummer: SP-XXXX
Kurzbeschreibung
Wie der Name schon sagt handelt es sich um einen Dipcoater: Es ist ein 1-Achsen Lineartisch, der per PC-Software gesteuert wird. Lineare Geschwindigkeiten und Beschleunigungen sind einfach vor Ort einzustellen, komplexere Dip-Geschwindigkeits-Kurven sollten zuvor (numerisch) geplant werden.
Alternativen
Es gibt einen Dipcoater in Gebäude 321, ich glaube in Bastian Rapps Gruppe. Aber die 107er Labore sind "reinräumiger".
Spezifikationen des Geräts
Maximaler Hub: 70 mm
Etablierte Prozesse
Er funktioniert...
Einschränkungen
Welche Prozesse lassen sich mit dem Gerät nicht durchführen oder würden die Funktion des Gerätes beeinträchtigen?
Eingewiesene Nutzer
Lutz, Christian von der Ecken, Sebastian
Bedienung
Die Bedienungsanleitung könnt ihr hier finden: - klick mich - Im folgenden gibts den wesendlich praktischeren Schnelleinstieg für euch.
Gerät einrichten
OWIS Dipcoater instruction:
1. Start computer under Microsoft Windows XP
2. Login
3. Plug in the power cable, the USB-port and switch on the controller
4. Run OWISoft program
5. Datei -> Steuerung -> Neu
RS-232: Port: Com7 Steuergerät Typ: PS10
-> Verbinden
6. “Schritt 1” -> Dialog anzeigen -> Ja -> Schließen -> Eingabe A1 -> OK
-> LTM80-75-HSM -> Automatisch konfigurieren -> Schließen
“Schritt 5“ -> Initialisieren -> Schließen
7. “Freie Positionierung“ e.g. A1 -2 -> stage drive 2 mm up
e.g. A1 10 -> stage drive 10 mm down
8. “Programm” -> Datei -> Öffnen -> C -> Programme -> OWISoft -> Application -> data -> ‘dipcoating1.owp’ -> select and open
9. Choose dipcoating parameters in the program:
Velocity: first velocity ‘positive’ -> drive down
second velocity ‘negative’ -> drive up
v_program = 0.8264∙v_real
| Desired velocity [mm/min]: | Input: |
| 1 | 0.8264 |
| 5 | 4.132 |
| 10 | 8.264 |
| 20 | 16.528 |
| 30 | 24.792 |
| 40 | 33.06 |
| 50 | 41.32 |
| 60 | 49.58 |
| 70 | 57.85 |
| 80 | 66.11 |
Programmbeispiel
Proc ProcGoHome %%Erschaffe eine Prozedur mit dem Namen 'ProcGoHome'.
%%Die Procedur muss später noch aufgerufen ('Call') werden, damit ihr Code ausgeführt wird!
SetVel A1=100 %%Setze die Geschwindigkeit auf 100 (Umrechnung Tabelle oben!)
Var ZielHome 1 %%Erzeuge Variable mit Namen 'ZielHome' und weise ihr den Wert '1' zu
SetTarget A1=ZielHome %%Setze das Ziel, also den Haltepunkt, der Achse 'A1' auf den Wert der Variable 'ZielHome'
MoveAbs A1 %%Start der Bewegung Achse
MessageBoxDelay 2 'Take me Home, to the place...' %%Zeige für '2' Sekunden eine Nachrichtenbox mit dem Text 'Take me Home, to the place...' an.
%%Das Programm hält solange an, bis die Box geschlossen wird oder sich selbst schließt nach 2 Sekunden.
Beep %%Gibt ein "Piep" Signal aus
WaitForAxisStop A1 %%Das Programm wartet solange, bis die Achse 'A1' sich nicht mehr bewegt.
EndWait %%steht IMMER nach dieser vorherigen Zeile 'WaitForAxisStop ??'
Delay 1000 %%Das Programm wartet '1000' ms.
Beep
EndProc %%Ende des Codes der Procedure 'ProcGoHome'
Proc ProcGoChangeSubstrate
SetVel A1=100
Var ZielChangeSubstrate 5
SetTarget A1=ZielChangeSubstrate
MoveAbs A1
MessageBoxDelay 2 'zzzZZZzzz'
Beep
WaitForAxisStop A1
EndWait
Beep
MessageBox 'Du hast unendlich Sekunden zum Substratwechsel'
Beep
EndProc
Proc ProcGoFish
SetVel A1=100
Var ZielFish 60
SetTarget A1=ZielFish
MoveAbs A1
MessageBoxDelay 2 'Das taucht was!'
Beep
WaitForAxisStop A1
EndWait
Beep
EndProc
Proc ProcGoDipCoating
SetVel A1=49.58
Var ZielDipCoating 10
SetTarget A1=ZielDipCoating
MoveAbs A1
MessageBoxDelay 2 'Nanu, da beist was!'
Beep
WaitForAxisStop A1
EndWait
Beep
EndProc
Call ProcGoHome %%Ruft die Procedure 'ProcGoHome' auf und führt ihren Code aus.
Call ProcGoChangeSubstrate
Call ProcGoFish
Call ProcGoDipCoating
Call ProcGoChangeSubstrate
Call ProcGoHome