From: Benjamin Linnik <blinnik@jspc28.x-matter.uni-frankfurt.de>
Date: Tue, 13 Aug 2013 12:32:06 +0000 (+0200)
Subject: Deleted old code
X-Git-Url: https://jspc29.x-matter.uni-frankfurt.de/git/?a=commitdiff_plain;h=5be37b7d136c3b44f4dbb42844d42277f1e3ccfb;p=radhard.git

Deleted old code
---

diff --git a/bot/I2C_control_Mim32.au3 b/bot/I2C_control_Mim32.au3
deleted file mode 100755
index 055634a..0000000
--- a/bot/I2C_control_Mim32.au3
+++ /dev/null
@@ -1,49 +0,0 @@
-#include-once
-Global $chipsoftware[3] = ["I2C control Software for Mimosa32", "TTabSheet1", "TPageControl1"]
-
-Func CheckWindowExist() ; Check if Mimosa window exists
-	If WinExists($chipsoftware[0]) = False Then
-		Run("C:\CCMOS_SCTRL\MIMOSA34\I2C_ms_gui_labo_Debug.bat", "C:\CCMOS_SCTRL\MIMOSA34\")
-		WinWait($chipsoftware[0])
-	EndIf
-	WinWait("I2C control Software for Mimosa32")
-EndFunc
-
-Func CheckIfBoardOK()
-	ControlClick($chipsoftware[0], "", "[TEXT:Inactive;CLASS:TButton]") ; Activate Polling
-	Local $i = 0
-	While (ControlGetText($chipsoftware[0], "", "TEdit6") <> "Target Board OK")
-		If ($i > 20) Then
-			MsgBox(16, "Message", "Mimosa board could not be polled, please check if board is connected properly.")
-			Exit
-		EndIf
-		$i = $i + 1
-		Sleep(500)
-	WEnd
-	ControlClick($chipsoftware[0], "", "[TEXT:Active;CLASS:TButton]")
-EndFunc
-
-Func GotoDebugTab()
-	Local $i = 0
-	While (ControlGetText($chipsoftware[0], "", $chipsoftware[1]) <> "Debug")
-		If ($i > 20) Then
-			MsgBox(16, "Message", "Debug tab not found in I2C Control software!")
-			Exit
-		EndIf
-		ControlCommand($chipsoftware[0], "", $chipsoftware[2], "TabRight")
-		$i = $i + 1
-		Sleep(100)
-	WEnd
-EndFunc
-
-Func GotoFirstTab()
-	For $i = 0 To 20
-		ControlCommand($chipsoftware[0], "", $chipsoftware[2], "TabLeft")
-	Next
-EndFunc
-
-Func ProgramMi()
-	ControlClick($chipsoftware[0], "", "[TEXT:Prog All Analog;CLASS:TButton]") ; Program!
-	Sleep(1000)
-EndFunc
-
diff --git a/bot/Mimosa32.au3 b/bot/Mimosa32.au3
deleted file mode 100755
index 35994ec..0000000
--- a/bot/Mimosa32.au3
+++ /dev/null
@@ -1,50 +0,0 @@
-#include <I2C_control_Mim32.au3>
-Global $Mi32_buttons[3] = ["Edit2", "TCSpinEdit4", "TEdit15"]
-
-Func Mi32_GotoMiTab()
-	GotoFirstTab()
-	$i = 0
-	While (ControlGetText($chipsoftware[0], "", $chipsoftware[1]) <> "Mi32 A")
-		If ($i > 20) Then
-			MsgBox(0, "Message", "Mi32 A tab not found in I2C Control software!")
-			Exit
-		EndIf
-		ControlCommand($chipsoftware[0], "", $chipsoftware[2], "TabRight")
-		$i = $i + 1
-		Sleep(100)
-	WEnd
-EndFunc
-
-Func Mi32_SelectBoard()
-	GotoFirstTab()
-	ControlCommand($chipsoftware[0], "", "[TEXT:Mimosa32]", "Check")
-EndFunc
-
-Func Mi32_GetVref()
-	return ControlGetText($chipsoftware[0], "", $Mi32_buttons[2])
-EndFunc
-
-Func Mi32_SetVref($vref)
-	ControlSetText($chipsoftware[0], "", $Mi32_buttons[2], $vref)
-EndFunc
-
-Func Mi32_SetMiParameter($matrix, $vref)
-	ControlFocus($chipsoftware[0], "", $Mi32_buttons[0])
-	ControlSetText($chipsoftware[0], "",  $Mi32_buttons[0], "")
-	Sleep(100)
-	ControlSend($chipsoftware[0], "", $Mi32_buttons[0], $matrix)
-	Sleep(100)
-	;Send($matrix)
-	ControlCommand($chipsoftware[0], "", "[TEXT:Clamp Enabled]", "Uncheck")
-	ControlCommand($chipsoftware[0], "", "[TEXT:High (Default)]", "Check")
-	ControlFocus($chipsoftware[0], "", $Mi32_buttons[1])
-	ControlSetText($chipsoftware[0], "",  $Mi32_buttons[1], "")
-	Sleep(100)
-	ControlSetText($chipsoftware[0], "", $Mi32_buttons[1], "1")
-	Sleep(100)
-	ControlFocus($chipsoftware[0], "", $Mi32_buttons[2])
-	ControlSetText($chipsoftware[0], "",  $Mi32_buttons[2], "")
-	Sleep(100)
-	ControlSetText($chipsoftware[0], "",  $Mi32_buttons[2], $vref)
-	Sleep(100)
-EndFunc
diff --git a/bot/Mimosa32Ter.au3 b/bot/Mimosa32Ter.au3
deleted file mode 100755
index c54861e..0000000
--- a/bot/Mimosa32Ter.au3
+++ /dev/null
@@ -1,50 +0,0 @@
-#include <I2C_control_Mim32.au3>
-Global $Mi32Ter_buttons[3] = ["Edit2", "TCSpinEdit4", "TEdit27"]
-
-Func Mi32Ter_GotoMiTab()
-	GotoFirstTab()
-	$i = 0
-	While (ControlGetText($chipsoftware[0], "", $chipsoftware[1]) <> "Mi32 Ter A")
-		If ($i > 20) Then
-			MsgBox(0, "Message", "Mi32 A tab not found in I2C Control software!")
-			Exit
-		EndIf
-		ControlCommand($chipsoftware[0], "", $chipsoftware[2], "TabRight")
-		$i = $i + 1
-		Sleep(100)
-	WEnd
-EndFunc
-
-Func Mi32Ter_SelectBoard()
-	GotoFirstTab()
-	ControlCommand($chipsoftware[0], "", "[TEXT:Mimosa32Ter]", "Check")
-EndFunc
-
-Func Mi32Ter_GetVref()
-	return ControlGetText($chipsoftware[0], "", $Mi32Ter_buttons[2])
-EndFunc
-
-Func Mi32Ter_SetVref($vref)
-	ControlSetText($chipsoftware[0], "", $Mi32Ter_buttons[2], $vref)
-EndFunc
-
-Func Mi32Ter_SetMiParameter($matrix, $vref)
-	ControlFocus($chipsoftware[0], "", $Mi32Ter_buttons[0])
-	ControlSetText($chipsoftware[0], "",  $Mi32Ter_buttons[0], "")
-	Sleep(100)
-	ControlSend($chipsoftware[0], "", $Mi32Ter_buttons[0], $matrix)
-	Sleep(100)
-	;Send($matrix)
-	ControlCommand($chipsoftware[0], "", "[TEXT:Clamp Enabled]", "Uncheck")
-	ControlCommand($chipsoftware[0], "", "[TEXT:High (Default)]", "Check")
-	ControlFocus($chipsoftware[0], "", $Mi32Ter_buttons[1])
-	ControlSetText($chipsoftware[0], "",  $Mi32Ter_buttons[1], "")
-	Sleep(100)
-	ControlSetText($chipsoftware[0], "", $Mi32Ter_buttons[1], "1")
-	Sleep(100)
-	ControlFocus($chipsoftware[0], "", $Mi32Ter_buttons[2])
-	ControlSetText($chipsoftware[0], "",  $Mi32Ter_buttons[2], "")
-	Sleep(100)
-	ControlSetText($chipsoftware[0], "",  $Mi32Ter_buttons[2], $vref)
-	Sleep(100)
-EndFunc
diff --git a/bot/Mimosa34.au3 b/bot/Mimosa34.au3
deleted file mode 100755
index 8adb2ec..0000000
--- a/bot/Mimosa34.au3
+++ /dev/null
@@ -1,50 +0,0 @@
-#include <I2C_control_Mim32.au3>
-Global $Mi34_buttons[3] = ["Edit2", "TCSpinEdit5", "TEdit11"]
-
-Func Mi34_GotoMiTab()
-	GotoFirstTab()
-	$i = 0
-	While (ControlGetText($chipsoftware[0], "", $chipsoftware[1]) <> "Mi34")
-		If ($i > 20) Then
-			MsgBox(0, "Message", "Mi34 tab not found in I2C Control software!")
-			Exit
-		EndIf
-		ControlCommand($chipsoftware[0], "", $chipsoftware[2], "TabRight")
-		$i = $i + 1
-		Sleep(100)
-	WEnd
-EndFunc
-
-Func Mi34_SelectBoard()
-	GotoFirstTab()
-	ControlCommand($chipsoftware[0], "", "[TEXT:Mimosa34]", "Check")
-EndFunc
-
-Func Mi34_GetVref()
-	return ControlGetText($chipsoftware[0], "", $Mi34_buttons[2])
-EndFunc
-
-Func Mi34_SetVref($vref)
-	ControlSetText($chipsoftware[0], "", $Mi34_buttons[2], $vref)
-EndFunc
-
-Func Mi34_SetMiParameter($matrix, $vref)
-	ControlFocus($chipsoftware[0], "", $Mi34_buttons[0])
-	ControlSetText($chipsoftware[0], "",  $Mi34_buttons[0], "")
-	Sleep(100)
-	ControlSend($chipsoftware[0], "", $Mi34_buttons[0], $matrix)
-	Sleep(100)
-	;Send($matrix)
-	;ControlCommand($chipsoftware[0], "", "[TEXT:Clamp Enabled]", "Uncheck")
-	;ControlCommand($chipsoftware[0], "", "[TEXT:High (Default)]", "Check")
-	ControlFocus($chipsoftware[0], "", $Mi34_buttons[1])
-	ControlSetText($chipsoftware[0], "",  $Mi34_buttons[1], "")
-	Sleep(100)
-	ControlSetText($chipsoftware[0], "", $Mi34_buttons[1], "1")
-	Sleep(100)
-	ControlFocus($chipsoftware[0], "", $Mi34_buttons[2])
-	ControlSetText($chipsoftware[0], "",  $Mi34_buttons[2], "")
-	Sleep(100)
-	ControlSetText($chipsoftware[0], "",  $Mi34_buttons[2], $vref)
-	Sleep(100)
-EndFunc
diff --git a/bot/Mimosa_Autorun.au3 b/bot/Mimosa_Autorun.au3
deleted file mode 100755
index 64d3c75..0000000
--- a/bot/Mimosa_Autorun.au3
+++ /dev/null
@@ -1,395 +0,0 @@
-;
-; AutoIt Version: 3.0
-; Language:    English
-; Platform:       Win9x/NT
-; Author:         Benny Linnik (b.linnik@gsi.de)
-;
-; Script Function:
-;   Reads MAPS running data from an Excel file and
-
-
-; set external parameters
-#include <String.au3>
-#include <GUIConstants.au3>
-#include <WindowsConstants.au3>
-#include <StaticConstants.au3>
-#Include <GuiEdit.au3>
-#include <Date.au3>
-#include "Mimosa32.au3"
-#include "Mimosa32Ter.au3"
-#include "Mimosa34.au3"
-
-$programversion = "0.7"
-$FileName = IniRead ( "config.ini", "experimental setup", "ExcelPath", "H:\dennis doering\Arbeitsprogramme\Mimosa34\LaborbuchMi34.xls" ) ; read path to Excel file
-$systemtemp = IniRead ( "config.ini", "experimental setup", "SystemTemperature", "20" )  ; current temperatur of the system
-$chipversion = IniRead ( "config.ini", "experimental setup", "ChipVersion", "Mi34" )  ; current chip generation in the system
-$chipinstalled = IniRead ( "config.ini", "experimental setup", "ChipInstalled", "5" ) ; chip number currently mounted into the system
-$radSource = IniRead ( "config.ini", "experimental setup", "RadSource", "none" )  ; current radioactive source of the system
-
-$excelLineBegin = "46" ; Change this to the range of cells you want to be processed
-$excelLineEnd = "500"
-Global $vref = 650 ; Initial vref, will be adjusted during runtime
-
-;create virtual functions
-Func GotoMiTab()
-    Call ( $chipversion & "_GotoMiTab" )
-EndFunc
-
-Func GetVref()
-    Return Call ( $chipversion & "_GetVref" )
-EndFunc
-
-Func SetVref($vref)
-    Call ( $chipversion & "_SetVref", $vref )
-EndFunc
-
-Func SetMiParameter($matrix, $vref)
-    Call ( $chipversion & "_SetMiParameter", $matrix, $vref )
-EndFunc
-
-Func SelectBoard()
-    Call ( $chipversion & "_SelectBoard" )
-EndFunc
-
-$CellRange = "A" & $excelLineBegin &":N"& $excelLineEnd
-
-; Prompt the user to run the script - use a Yes/No prompt (4 - see help file)
-Local $answer = MsgBox(4, "Run script?", "Preparing to do all runs in range " & $CellRange & @CRLF & _
-		"of file " & $FileName & " with " & @CRLF & _
-		"Temperatur: " & $systemtemp & " °C" & @CRLF & _
-		"Radioactive source: " & $radSource & @CRLF & _
-		"Chip: " & $chipversion & " (" & $chipinstalled & ")"& @CRLF & _
-		"If you run this script, daq.exe will be closed and the current run aborted, proceed?")
-
-
-; Check the user's answer to the prompt (see the help file for MsgBox return values)
-; If "No" was clicked (7) then exit the script
-If $answer = 7 Then
-	Exit
-EndIf
-
-If Not FileExists($FileName) Then ; Just a check to be sure..
-	MsgBox(16, "Excel Data Test", "Error: Can't find file " & $FileName)
-	Exit
-EndIf
-
-$oExcelDoc = ObjGet($FileName) ; Get an Excel Object from an existing filename
-
-If (Not @error) And IsObj($oExcelDoc) Then ; Check again if everything went well
-	; NOTE: $oExcelDoc is a "Workbook Object", not Excel itself!
-	$oDocument = $oExcelDoc.Worksheets(1) ; We use the 'Default' worksheet
-	$aArray = $oDocument.range($CellRange).value ; Retrieve the cell values from given range
-	;$oExcelDoc.Close ; Close the Excel document
-	; The data should now be in the 2-dimensional array: $aArray
-
-	If IsArray($aArray) And UBound($aArray, 0) > 0 Then ; Check if we retrieved any data
-		;Msgbox (0,"Excel Data Test","Debugging information for retrieved cells:" & @CRLF & _
-		;	"Number of dimensions: " & UBound($aArray,0) & @CRLF & _
-		;	"Size of first dimension: " & Ubound($aArray,1) & @CRLF & _
-		;	"Size of second dimension: " & Ubound($aArray,2))
-		;	"Size of second dimension: " & Ubound($aArray,2))
-
-		; The next lines are just for debugging purposes, it puts all cell values into
-		; a string to display in a MsgBox.
-		; Note: you can't use a FOR..IN loop for a multi-dimensional array!
-;~ 	  ; debugging read data
-;~ 	  $string=""
-;~ 	  for $x=0 to ubound($aArray,1)-1
-;~ 		 for $y=0 to ubound ($aArray,2)-1
-;~ 			 $string=$string & "(" & $x & "," & $y & ")=" & $aArray[$x][$y] & @CRLF
-;~ 		 Next
-;~ 	  Next
-;~ 	  Msgbox(0,"Excel Data Test","Debug information: Read Cell contents: " & @CRLF & $string)
-
-	        $totallexcelines=UBound($aArray, 2)
-		$totalruns = 0
-		For $run = 0 To UBound($aArray, 2) - 1
-			If ($aArray[4][$run] == $systemtemp And $aArray[6][$run] == $chipinstalled And "Mi"&$aArray[2][$run] == $chipversion And $aArray[10][$run] == $radSource And $aArray[0][$run] == "") Then
-				$totalruns = $totalruns + 1
-			EndIf
-		Next
-		Local $answer = MsgBox(4, "Total runs", "Number of suitable runs found at the moment: " & $totalruns )
-		If $answer = 7 Then
-			Exit
-		EndIf
-
-		If ProcessExists("daq.exe") = True Then
-			ProcessClose("daq.exe")
-			ProcessWaitClose("daq.exe")
-		EndIf
-
-		If ProcessExists("i2c_ms_gui.exe") = True Then
-			ProcessClose("i2c_ms_gui.exe")
-			ProcessWaitClose("i2c_ms_gui.exe")
-		EndIf
-
-		Run("C:\ccmos_daq\v3.5.10\daq_v3.5.10.bat", "C:\ccmos_daq\v3.5.10\")
-		WinWait("Debug")
-		ControlClick("Debug", "", "[TEXT:Messages Clear]")
-		Sleep(100)
-		ControlClick("Debug", "", "[TEXT:Board Testing]")
-		Sleep(2000)
-		$i = 0
-		Do
-			$text = WinGetText("[CLASS:TDebugFrm]", "")
-			$texthex = _StringToHex($text)
-			If ($texthex == "4D657373616765730A5072696E7420426F6172647320526567730A0D0A3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D0D0A426F6172642049643D302074657374207374617274696E67202E2E2E0D0A3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D0D0A0D0A53746F70206163717569736974696F6E202E2E2E0D0A41445220434F554E54455220412074657374696E67202E2E2E0D0A41445220434F554E54455220412030204572726F72730D0A52414D20412074657374696E67202E2E2E0D0A52414D20412030204572726F72730D0A52414D20422074657374696E67202E2E2E0D0A52414D20422030204572726F72730D0A52414D20432074657374696E67202E2E2E0D0A52414D20432030204572726F72730D0A52414D20442074657374696E67202E2E2E0D0A52414D20442030204572726F72730D0A0D0A3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D0D0A426F6172642049643D312074657374207374617274696E67202E2E2E0D0A3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D0D0A0D0A53746F70206163717569736974696F6E202E2E2E0D0A41445220434F554E54455220412074657374696E67202E2E2E0D0A41445220434F554E54455220412030204572726F72730D0A52414D20412074657374696E67202E2E2E0D0A52414D20412030204572726F72730D0A52414D20422074657374696E67202E2E2E0D0A52414D20422030204572726F72730D0A52414D20432074657374696E67202E2E2E0D0A52414D20432030204572726F72730D0A52414D20442074657374696E67202E2E2E0D0A52414D20442030204572726F72730D0A0A555342322042616E647769647468204D65617375726D656E740A426F6172642054657374696E670A536F66747761726520496E697469616C697A6174696F6E0A4D6573736167657320436C6561720A") Then
-				EndIf
-			Sleep(500)
-			$i = $i + 1
-			If ($i > 20) Then
-				MsgBox(16, "Message", "USB Boards could be not OK! Please check the Debug output.")
-				Exit
-			EndIf
-		Until 1
-		If StringRegExp ( $text, "[1-9]+ Errors" ) Then ; for some reasons the previous check sometimes doesn't work.
-			MsgBox(16, "Message", "USB Boards could be not OK! Please check the Debug output.")
-			Exit
-		EndIf
-
-
-		WinClose("Debug")
-		WinWaitClose("Debug", 1000)
-		$aArray = 0
-		$totalrealruns=0
-
-		For $run = 0 To $totallexcelines-1
-
-			$currentrange="A"& $excelLineBegin+$run & ":N" & $excelLineBegin+$run
-			$oExcelDoc = ObjGet($FileName) ; if doc was closed and object destroyed -> reopen it. A possibility to check if object exists would come handy here....
-			$oDocument = $oExcelDoc.Worksheets(1) ; We use the 'Default' worksheet
-			$currentline=$oDocument.range($currentrange).value
-			If ($currentline[4][0] == $systemtemp And $currentline[6][0] == $chipinstalled And "Mi"&$currentline[2][0] == $chipversion And $currentline[10][0] == $radSource And $currentline[0][0] == "") Then
-				$clock = $currentline[11][0] ; save needed clock
-				If $clock == "" Then
-					$clock = "100"
-					$currentline[11][0] = "100"
-				EndIf
-				$runnum = $currentline[3][0] ; save runnumber
-				$matrix = $currentline[9][0] ; save matrix
-				$eventnum = $currentline[5][0] ; save number of events to save
-				If $eventnum == "" Then
-					$eventnum = 100000
-					$currentline[5][0]  = "100000"
-				EndIf
-
-				CheckWindowExist()
-				SelectBoard()
-				CheckIfBoardOK()
-				GotoDebugTab()
-
-				If ($clock == "100") Then
-					ControlCommand($chipsoftware[0], "", "[TEXT:Intern]", "Check")
-					;If (Not ControlCommand("I2C control Software for Mimosa32", "", "[TEXT:Intern]", "IsChecked")) Then
-					;Msgbox (16,"Message","Could not set clock to intern")
-					;EndIf
-				Else
-					ShellExecuteWait ("C:\Programme\PuTTY\plink.exe", "-ssh cerberus /home/maps/bin/vxi11_cmd 192.168.10.152 'SOURce1:FREQuency:Fixed " & $clock & "Mhz'", "", "", @SW_HIDE)
-					ShellExecuteWait ("C:\Programme\PuTTY\plink.exe", "-ssh cerberus /home/maps/bin/vxi11_cmd 192.168.10.152 'SOURce1:VOLTage:HIGH 3.3'", "", "", @SW_HIDE)
-					ShellExecuteWait ("C:\Programme\PuTTY\plink.exe", "-ssh cerberus /home/maps/bin/vxi11_cmd 192.168.10.152 'SOURce1:VOLTage:LOW 0'", "", "", @SW_HIDE)
-					ShellExecuteWait ("C:\Programme\PuTTY\plink.exe", "-ssh cerberus /home/maps/bin/vxi11_cmd 192.168.10.152 'OUTPut1:STATe ON'", "", "", @SW_HIDE)
-					Sleep(500)
-					ControlCommand("I2C control Software for Mimosa32", "", "[TEXT:Extern]", "Check")
-					;If (Not ControlCommand("I2C control Software for Mimosa32", "", "[TEXT:Extern]", "IsChecked")) Then
-					;Msgbox (16,"Message","Could not set clock to extern")
-					;EndIf
-				EndIf
-
-				GotoMiTab()
-				SetMiParameter($matrix, $vref)
-				ProgramMi()
-
-				If WinExists("CMOS USB DAQ V3.5.10") = True Then
-					;WinActivate("CMOS USB DAQ V3.5.10")
-				Else
-					Run("C:\ccmos_daq\v3.5.10\daq_v3.5.10.bat", "C:\ccmos_daq\v3.5.10\")
-				EndIf
-				WinWait("CMOS USB DAQ V3.5.10")
-
-				For $i = 0 To 20
-					ControlCommand("CMOS USB DAQ V3.5.10", "", "TPageControl1", "TabLeft")
-				Next
-				$i = 0
-				While (ControlGetText("CMOS USB DAQ V3.5.10", "", "TTabSheet1") <> "Run Parameters")
-					If ($i > 20) Then
-						MsgBox(0, "Message", "CMOS USB DAQ V3.5.10 RUN tab not found in DAQ software!")
-						Exit
-					EndIf
-					ControlCommand("CMOS USB DAQ V3.5.10", "", "TPageControl1", "TabRight")
-					$i = $i + 1
-					Sleep(100)
-				WEnd
-
-				ControlSetText("CMOS USB DAQ V3.5.10", "", "TEdit23", "")
-				Sleep(100)
- 				ControlFocus("CMOS USB DAQ V3.5.10", "", "TEdit23")
-				;Send($runnum)
-				ControlSend("CMOS USB DAQ V3.5.10", "", "TEdit23", $runnum)
-
-				ControlSetText("CMOS USB DAQ V3.5.10", "", "TEdit22", "")
-				Sleep(100)
- 				ControlFocus("CMOS USB DAQ V3.5.10", "", "TEdit22")
-;~ 				Send($eventnum)
-				ControlSend("CMOS USB DAQ V3.5.10", "", "TEdit22", $eventnum)
- 				ControlFocus("CMOS USB DAQ V3.5.10", "", "TEdit23")
-
-				Sleep(1000)
-				$starttime = _NowCalc()
-
-				ControlClick("CMOS USB DAQ V3.5.10", "", "[TEXT:Start Run;CLASS:TButton]")
-				;WinWaitActive("Avertissement") ;Force overwrite
-				;ControlClick("Avertissement", "", "TButton2")
-
-				Sleep(500)
-				If (WinExists("Avertissement")) Then
-					MsgBox(16, "Message", "Stopping. Could overwrite data!")
-					Exit
-				EndIf
-
-
-				$i = 0
-				While (ControlGetText("CMOS USB DAQ V3.5.10", "", "TTabSheet1") <> "Local Monitoring")
-					If ($i > 20) Then
-						MsgBox(0, "Message", "CMOS USB DAQ V3.5.10 Local Monitoring tab not found in DAQ software!")
-						Exit
-					EndIf
-					ControlCommand("CMOS USB DAQ V3.5.10", "", "TPageControl1", "TabRight")
-					$i = $i + 1
-					Sleep(100)
-				WEnd
-
-				Sleep(1000)
-
-				$avg = ControlGetText("CMOS USB DAQ V3.5.10", "", "[TEXT:DispAvg;CLASS:TEdit]")
-				For $i = 0 To 20
-					ControlCommand("CMOS USB DAQ V3.5.10", "", "TPageControl1", "TabLeft")
-				Next
-				$i = 0
-				While (ControlGetText("CMOS USB DAQ V3.5.10", "", "TTabSheet1") <> "Run Parameters")
-					If ($i > 20) Then
-						MsgBox(0, "Message", "CMOS USB DAQ V3.5.10 RUN tab not found in DAQ software!")
-						Exit
-					EndIf
-					ControlCommand("CMOS USB DAQ V3.5.10", "", "TPageControl1", "TabRight")
-					$i = $i + 1
-					Sleep(100)
-				WEnd
-				$j = 0
-				If ($avg > 2300 Or $avg < 1700) Then
-					Do
-						ControlClick("CMOS USB DAQ V3.5.10", "", "[TEXT:Stop Run;CLASS:TButton]")
-						;WinActivate("I2C control Software for Mimosa32")
-						$vref = GetVref()
-						;$vref = ControlGetText("I2C control Software for Mimosa32", "", "TEdit11")
-						$diff = $avg - 2000
-						Select
-							Case Abs($diff) > 600
-								$vref = $vref + SGN($diff) * 100
-							Case Else
-								$vref = $vref +SGN($diff) * 50
-						EndSelect
-						If ($vref > 1000 Or $vref < 300) Then
-							MsgBox(0, "Message", "Stopped, vref value needs to be too low (<300) or too high (>1000), please check manually!")
-							Exit
-						EndIf
-
-						;ControlSetText("I2C control Software for Mimosa32", "", "TEdit11", $vref)
-						;ControlClick("I2C control Software for Mimosa32", "", "[TEXT:Prog All Analog;CLASS:TButton]")
-						SetVref($vref)
-						ProgramMi()
-						;WinActivate("CMOS USB DAQ V3.5.10")
-						WinWait("CMOS USB DAQ V3.5.10")
-						Sleep(1000)
-						ControlClick("CMOS USB DAQ V3.5.10", "", "[TEXT:Start Run;CLASS:TButton]")
-						WinWait("Avertissement")
-						ControlClick("Avertissement", "", "TButton2")
-
-
-						$i = 0
-						While (ControlGetText("CMOS USB DAQ V3.5.10", "", "TTabSheet1") <> "Local Monitoring")
-							If ($i > 20) Then
-								MsgBox(0, "Message", "CMOS USB DAQ V3.5.10 Local Monitoring tab not found in DAQ software!")
-								Exit
-							EndIf
-							ControlCommand("CMOS USB DAQ V3.5.10", "", "TPageControl1", "TabRight")
-							$i = $i + 1
-							Sleep(100)
-						WEnd
-
-						Sleep(1000)
-
-						$avg = ControlGetText("CMOS USB DAQ V3.5.10", "", "[TEXT:DispAvg;CLASS:TEdit]")
-						For $i = 0 To 20
-							ControlCommand("CMOS USB DAQ V3.5.10", "", "TPageControl1", "TabLeft")
-						Next
-						$i = 0
-						While (ControlGetText("CMOS USB DAQ V3.5.10", "", "TTabSheet1") <> "Run Parameters")
-							If ($i > 20) Then
-								MsgBox(0, "Message", "CMOS USB DAQ V3.5.10 RUN tab not found in DAQ software!")
-								Exit
-							EndIf
-							ControlCommand("CMOS USB DAQ V3.5.10", "", "TPageControl1", "TabRight")
-							$i = $i + 1
-							Sleep(100)
-						WEnd
-
-						$j = $j + 1
-						If ($j > 7) Then
-							ControlClick("CMOS USB DAQ V3.5.10", "", "[TEXT:Stop Run;CLASS:TButton]")
-							MsgBox(0, "Message", "VRef could not be set properly")
-							Exit
-						EndIf
-
-					Until ($avg < 2300 And $avg > 1700)
-				EndIf
-
-				While (ControlGetText("CMOS USB DAQ V3.5.10", "", "TEdit18") < $eventnum)
-					Sleep(10000)
-					;If EnvGet('SESSIONNAME') <> "Console" Then
-						;ShowWarning()
-					;EndIf
-					;WinWait("CMOS USB DAQ V3.5.10")
-				WEnd
-				WinWait("CMOS USB DAQ V3.5.10")
-				ControlClick("CMOS USB DAQ V3.5.10", "", "[TEXT:Stop Run;CLASS:TButton]")
-				;If ($clock <> "100") Then
-				;   ShellExecuteWait("C:\Programme\PuTTY\plink.exe", "-ssh cerberus /home/maps/bin/vxi11_cmd 192.168.10.152 'OUTPut1:STATe Off'", "", "", @SW_HIDE)
-				;EndIf
-
-				$currentline[0][0] = @MDAY & "." & @MON & "." & @YEAR
-				$currentline[8][0] = $vref
-				$calcmin = _DateDiff('s', $starttime, _NowCalc()) ; n for minites, s for seconds
-				$currentline[13][0] = "Automated run, performed by V." & $programversion & " runtime in minutes: " &  $calcmin
-
-				$oExcelDoc = ObjGet($FileName) ; if doc was closed and object destroyed -> reopen it. A possibility to check if object exists would come handy here....
-				$oDocument = $oExcelDoc.Worksheets(1) ; We use the 'Default' worksheet
-				$oDocument.range($currentrange).value = $currentline
-				$oExcelDoc.Windows(1).Visible = True ; Otherwise the worksheet window will be saved 'hidden'
-				$oExcelDoc.Save ; Save the workbook
-
-				$oExcelDoc.saved = 1
-				$totalrealruns = $totalrealruns + 1
-			EndIf
-		Next
-		ShellExecuteWait("C:\Programme\PuTTY\plink.exe", "-ssh cerberus /home/maps/bin/vxi11_cmd 192.168.10.152 'OUTPut1:STATe Off'", "", "", @SW_HIDE)
-		MsgBox(0, "Sucess!", "All runs (" & $totalrealruns & ") ended without errors." & @CRLF & _
-				"Please check the Excel sheet and the results for errors.")
-
-	Else
-		MsgBox(0, "Excel Data Test", "Error: Could not retrieve data from cell range: " & $CellRange)
-	EndIf
-
-Else
-	MsgBox(0, "Excel Data Test", "Error: Could not open " & $FileName & " as an Excel Object.")
-EndIf
-
-$oExcelDoc = 0
-
-
-Func SGN($i)
-    Return ($i>0)-($i<0)
- EndFunc   ;==>SGN
-
- Func CheckValues($vref, $matrix, $runnum, $eventnum, $clock)
-    Return 0
-EndFunc
diff --git a/bot/config.ini b/bot/config.ini
deleted file mode 100755
index 95ed98b..0000000
--- a/bot/config.ini
+++ /dev/null
@@ -1,10 +0,0 @@
-[experimental setup]
-ChipVersion = Mi32Ter
-; Mi32, Mi32Ter or Mi34
-ChipInstalled= 4C
-; chip currently mounted into the system
-ExcelPath = "H:\dennis doering\Arbeitsprogramme\Mimosa34\LaborbuchMi34.xls"
-SystemTemperature = 40
-; current temperatur of the system, only runs with this temepratur wiull be run
-RadSource = none
-; RadSource for which the runs should be performed