michi/KD_FC_Kartusche_BMW
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Workbackup

Browse Source
This commit is contained in:
Michael Rest
2023-12-08 16:24:07 +01:00
parent aaec29fa6b
commit 2be38a9ae2
8 changed files with 24 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
Logical/Communication/ComRob/Main.st
View File

@@ -11,7 +11,7 @@ PROGRAM _CYCLIC
gGlueInterface.In.bHome := usComIn.2;
gGlueInterface.In.bHeatOn := usComIn.3;
gGlueInterface.In.bChangedCartrige := usComIn.4;
gGlueInterface.In.rGlueAmmount := 0.001 * (UINT_TO_REAL (SHL (USINT_TO_UINT (usComInAmmount[0]), 8)) + USINT_TO_REAL (usComInAmmount[1]));
gGlueInterface.In.rGlueAmmount := 0.001 * (UINT_TO_REAL (SHL (USINT_TO_UINT (usComInAmmount[0]), 8)) + USINT_TO_REAL (usComInAmmount[1])); //cm3/s
gGlueInterface.In.rTemperature := USINT_TO_REAL (usComInTemperature MOD 101);
gGlueInterface.In.rTouchForce := ABS (USINT_TO_REAL (usComInForce)) / 100.0 * -1.0;
END_IF
@@ -20,7 +20,8 @@ PROGRAM _CYCLIC
usComOut.2 := gGlueInterface.Out.bHomed;
usComOut.3 := gGlueInterface.Out.bGlueActive;
usComOut.4 := gGlueInterface.Out.bCartrigeEmpty;
uiTemp := REAL_TO_UINT (gGlueInterface.Out.rAppliedGlue * 1000.0);
usComOutTemperature := REAL_TO_USINT (gGlueInterface.Out.rTemperature);
uiTemp := REAL_TO_UINT (gGlueInterface.Out.rAppliedGlue * 100.0); //cm3 /10
usComOutAmmount[1] := UINT_TO_USINT (uiTemp);
usComOutAmmount[0] := UINT_TO_USINT (SHR (uiTemp, 8));
//usComOutAmmount[3] := UDINT_TO_USINT (udTemp);
@@ -28,7 +29,7 @@ PROGRAM _CYCLIC
//usComOutAmmount[1] := UDINT_TO_USINT (SHR (udTemp, 16));
//usComOutAmmount[0] := UDINT_TO_USINT (SHR (udTemp, 24));
usComOutRemain[1] := UINT_TO_USINT (gGlueInterface.Out.uiRemainingGlue);
usComOutRemain[1] := UINT_TO_USINT (gGlueInterface.Out.uiRemainingGlue); //%
usComOutRemain[0] := UINT_TO_USINT (SHR (gGlueInterface.Out.uiRemainingGlue, 8));
uiTemp := REAL_TO_UINT (gGlueInterface.Out.rActPos * 10.0);

1
Logical/Communication/ComRob/Variables.var
View File

@@ -6,6 +6,7 @@ VAR
usComInAmmount : {REDUND_UNREPLICABLE} ARRAY[0..1] OF USINT;
usComOut : USINT;
uiTemp : UINT;
usComOutTemperature : USINT;
usComOutAmmount : {REDUND_UNREPLICABLE} ARRAY[0..1] OF USINT;
usComOutRemain : {REDUND_UNREPLICABLE} ARRAY[0..1] OF USINT;
usComOutPos : {REDUND_UNREPLICABLE} ARRAY[0..1] OF USINT;

1
Logical/Communication/GlobalCom.typ
View File

@@ -18,6 +18,7 @@ TYPE
bNozzleJammed : BOOL; (*D<>se Verstopft*)
bCartrigeEmpty : BOOL; (*Kartusche Leer*)
uiRemainingGlue : UINT; (*Restlicher Kleber in %*)
rTemperature : REAL; (*Temperatur <20>C*)
rAppliedGlue : REAL; (*Ausgetragene Klebermenge in cm3*)
rActPos : REAL; (*Position Spindel*)
END_STRUCT;

2
Logical/MachCtrl/MachCtrl/Cyclic.st
View File

@@ -306,7 +306,7 @@ PROGRAM _CYCLIC
gGlueInterface.Out.bReady := gAxis[0].DriveStatus.bControllerStatus;
gGlueInterface.Out.rActPos := ABS (gAxis[0].rActPosition);
gGlueInterface.Out.rTemperature := INT_TO_REAL (giInTemperatureTool) * 0.1;
//Temperatur
lcrtemp_set.enable_cooling := FALSE;
lcrtemp_set.disable_heating := FALSE;

2
Logical/MachCtrl/MachCtrl/Variables.var
View File

@@ -42,7 +42,7 @@ END_VAR
VAR CONSTANT
rTorqueToForce : REAL := 5026.54824574367; (*Umrechungsfaktor Drehmoment auf Kraft*)
rForceToTorque : REAL := 0.000198943678864869; (*Umrechungsfaktor Krauf auf Drehmoment*)
rArea : REAL := 3218.05; (*Fl<46>che mm2*)
rArea : REAL := 3468.13; (*Fl<46>che mm2*)
END_VAR
(*//Strukturen*)
VAR

2
Physical/Config0/X20CP1485_1/Cpu.pkg
View File

@@ -26,6 +26,6 @@
<Transfer AdditionalUserDir="" AddToUserPart="false" AllowInitialTransfer="false" AllowPartitioning="false" ExecuteInitExitProgram="true" ForceInitialTransfer="false" IdentificationTypeValue="" IgnoreVersion="true" KeepNonVolatileMemory="false" ModuleSystemForPip="" PreserveVariableValues="true" ProjectConsistent="true" RebootDuringTransfer="false" TargetIdentificationType="Always" UserFilesIgnoreDifference="false" />
<Vc FirmwareVersion="V4.34.1" />
<Safety SafetyRelease="0.0" />
<OnlineConfiguration Name="Fritzmeier" DeviceType="TCPIP" DeviceParameters="/IF=tcpip /LOPO=11159 /SA=31" ConnectionParameters="/RT=1000 /AM=* /SDT=5 /DAIP=10.4.18.29 /REPO=11159 /ANSL=1 /PT=11169" Description="" />
<OnlineConfiguration Name="Fritzmeier" DeviceType="TCPIP" DeviceParameters="/IF=tcpip /LOPO=11159 /SA=30" ConnectionParameters="/RT=1000 /AM=* /SDT=5 /DAIP=10.4.18.29 /REPO=11159 /ANSL=1 /PT=11169" Description="" />
</Configuration>
</Cpu>

BIN
Physical/Config0/X20CP1485_1/DTM/X20IF10E3_1/X20IF10E3_1_IF1/X20IF10E3_1_IF1.dtmdri
View File

Binary file not shown.

25
Physical/Config0/X20CP1485_1/IoMap.iom
View File

@@ -22,12 +22,8 @@ VAR_CONFIG
ComRob:usComOutAmmount[1] AT %QB."X20IF10E3_1".Module002_Inputs002;
ComRob:usComOutAmmount[2] AT %QB."X20IF10E3_1".Module002_Inputs003;
ComRob:usComOutAmmount[3] AT %QB."X20IF10E3_1".Module002_Inputs004;
ComRob:usComOutRemain[0] AT %QB."X20IF10E3_1".Module003_Inputs001;
ComRob:usComOutRemain[1] AT %QB."X20IF10E3_1".Module003_Inputs002;
ComRob:usComInTemperature AT %IB."X20IF10E3_1".Module006_Outputs;
ComRob:usComInHeat AT %IB."X20IF10E3_1".Module007_Outputs;
ComRob:usComOutPos[0] AT %QB."X20IF10E3_1".Module004_Inputs001;
ComRob:usComOutPos[1] AT %QB."X20IF10E3_1".Module004_Inputs002;
ComRob:usComIn AT %IB."X20IF10E3_1".Module006_Outputs;
ComRob:usComInTemperature AT %IB."X20IF10E3_1".Module007_Outputs;
ComRob:usComOutPos[2] AT %QB."X20IF10E3_1".Module004_Inputs003;
ComRob:usComOutPos[3] AT %QB."X20IF10E3_1".Module004_Inputs004;
ComRob:usComIn AT %IB."X20IF10E3_1".Module005_Outputs;
@@ -39,9 +35,18 @@ VAR_CONFIG
ComRob:usComOutRemain AT %QW."X20IF10E3_1".Module003_Inputs;
ComRob:usComOutPos AT %QW."X20IF10E3_1".Module004_Inputs;
ComRob:usComInAmmount AT %IW."X20IF10E3_1".Module006_Outputs;
ComRob:usComInTemperature AT %IW."X20IF10E3_1".Module007_Outputs;
ComRob:usComInTemperature AT %IW."X20IF10E3_1".Module007_Outputs;
ComRob:usComInForce AT %IW."X20IF10E3_1".Module008_Outputs;
ComRob:usComInAmmount[0] AT %IB."X20IF10E3_1".Module007_Outputs001;
ComRob:usComInAmmount[1] AT %IB."X20IF10E3_1".Module007_Outputs002;
ComRob:usComInForce AT %IB."X20IF10E3_1".Module008_Outputs001;
ComRob:usComInAmmount[0] AT %IB."X20IF10E3_1".Module007_Outputs001;
ComRob:usComInAmmount[1] AT %IB."X20IF10E3_1".Module007_Outputs002;
ComRob:usComOutPos[1] AT %QB."X20IF10E3_1".Module005_Inputs002;
ComRob:usComOutPos[0] AT %QB."X20IF10E3_1".Module005_Inputs001;
ComRob:usComOutRemain[1] AT %QB."X20IF10E3_1".Module004_Inputs002;
ComRob:usComOutRemain[0] AT %QB."X20IF10E3_1".Module004_Inputs001;
ComRob:usComOutAmmount[1] AT %QB."X20IF10E3_1".Module003_Inputs002;
ComRob:usComOutAmmount[0] AT %QB."X20IF10E3_1".Module003_Inputs001;
ComRob:usComInForce AT %IB."X20IF10E3_1".Module009_Outputs;
ComRob:usComOutTemperature AT %QB."X20IF10E3_1".Module002_Inputs;
ComRob:usComInAmmount[0] AT %IB."X20IF10E3_1".Module008_Outputs001;
ComRob:usComInAmmount[1] AT %IB."X20IF10E3_1".Module008_Outputs002;
END_VAR