Egalware/CMS-MTConn
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Aggiunta lettura feedOverride x asse

Browse Source
This commit is contained in:
Samuele E. Locatelli
2018-02-22 11:00:10 +01:00
parent cb2ace29d7
commit e1c8553825
2 changed files with 11 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files
MTC_Adapter/CMSCncLib/CNC/CNC.SIEMENS/CNC.SIEMENS.vb
+10 -8
View File
@@ -933,6 +933,10 @@ Namespace CNC
''' Feed asse
''' </summary>
Public Feed As Single
''' <summary>
''' Feed Override asse
''' </summary>
Public FeedOver As Single
End Structure
''' <summary>
@@ -974,19 +978,16 @@ Namespace CNC
' RIFERIMENTO:
' txt Giuseppe
ReDim itemRead(4)
ReDim itemRead(5)
itemRead(0) = New Item("DB241.DBD0:[16]") 'Posizione attuale
itemRead(1) = New Item("DB254.DBW140:[20]") 'Speed effettiva
itemRead(2) = New Item("DB254.DBB180:[20]") 'Carico effettivo
itemRead(3) = New Item("/Channel/MachineAxis/toolBaseDistToGo[u1,1, 16]")
itemRead(3) = New Item("/Channel/MachineAxis/toolBaseDistToGo[u1,1,16]")
'itemRead(3) = New Item("DB241.DBD0:[16]") 'Posizione Target !!!FARE!!! è altra variabile?!? AA_IM
itemRead(4) = New Item("/Channel/MachineAxis/actFeedRate[u1, 1, 16]") 'legge la feed... da salvare in valore assolulto...
itemRead(4) = New Item("/Channel/MachineAxis/actFeedRate[u1,1,16]") ' param manual NC, pg21 legge la feed... da salvare in valore assolulto...
itemRead(5) = New Item("/Channel/MachineAxis/feedRateOvr[u1,1,16]") ' param manual NC, pg215 legge la feedOver...
'/Channel/MachineAxis/actFeedRate[u1, 3]
'/ChannelState/actFeedRateIpo[u1,1,16]
'/ChannelState/cmdFeedRateIpo[u1] ??
'/ChannelState/actFeedRateIpo[u1] ??
'/ChannelState/actFeedRateTechIpo[u1] ??
'/Channel/MachineAxis/feedRateOvr[u1, 1,16]
Do
Try
@@ -1007,6 +1008,7 @@ Namespace CNC
datiAssi(i).PosAct = UIntegerToSingle(itemRead(0).Value(i))
datiAssi(i).PosTgt = Convert.ToSingle(itemRead(3).Value(i))
datiAssi(i).Feed = Math.Abs(Convert.ToSingle(itemRead(4).Value(i)))
datiAssi(i).FeedOver = Math.Abs(Convert.ToSingle(itemRead(5).Value(i)))
Next i
For i As Integer = 0 To 19
datiAssi(i).Speed = UIntegerToSingle(itemRead(1).Value(i))
MTC_Adapter/MTC_Adapter/AdapterSiemens.cs
+1 -1
View File
@@ -1072,7 +1072,7 @@ namespace MTC_Adapter
// imposto feed "generale" per asse... si potrebbe usare velocità del singolo asse... !!!FARE!!! verificare
vettAxis[i].mAxFeedAct.Value = ValAssi[i].Feed;// FeedRate;
//vettAxis[i].mAxFeedAct.Value= ValAssi[i].Speed;
vettAxis[i].mAxFeedOver.Value = FeedRateOver;
vettAxis[i].mAxFeedOver.Value = ValAssi[i].FeedOver; // FeedRateOver;
// verifica pos TGT... NON E' orrettamente letta lato area memoria...
vettAxis[i].mAxPosTgt.Value = ValAssi[i].PosTgt;