Christoph/nx_post_support
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects 1 Releases 25 Wiki Activity

implement tcl

Browse Source
This commit is contained in:
Christoph Brandau
2025-01-10 16:44:50 +01:00
parent 3ce2ad902b
commit 5c41b8fa0a
5 changed files with 945 additions and 5333 deletions
Download Patch File Download Diff File Expand all files Collapse all files
test/file.cdl
+16 -16
View File
@@ -282,11 +282,11 @@ EVENT lib_event_cycle_60
{
# <english>
#Engraving - CYCLE60
#CYCLE60(STRING[200] _TEXT, REAL _RTP, REAL _RFP, REAL _SDIS, REAL _DP, REAL _DPR, REAL _PA, REAL _PO, REAL _STA, REAL _CP1, REAL _CP2,REAL _WID, REAL _DF, REAL _FFD, REAL _FFP1, INT _VARI, INT _CODEP,INT _UMODE, INT _GMODE, INT _DMODE, INT _AMODE)
# Engraving - CYCLE60
# CYCLE60(STRING[200] _TEXT, REAL _RTP, REAL _RFP, REAL _SDIS, REAL _DP, REAL _DPR, REAL _PA, REAL _PO, REAL _STA, REAL _CP1, REAL _CP2,REAL _WID, REAL _DF, REAL _FFD, REAL _FFP1, INT _VARI, INT _CODEP,INT _UMODE, INT _GMODE, INT _DMODE, INT _AMODE)
# <german>
#Gravurzyklus - CYCLE60
#CYCLE60(STRING[200] _TEXT, REAL _RTP, REAL _RFP, REAL _SDIS, REAL _DP, REAL _DPR, REAL _PA, REAL _PO, REAL _STA, REAL _CP1, REAL _CP2,REAL _WID, REAL _DF, REAL _FFD, REAL _FFP1, INT _VARI, INT _CODEP,INT _UMODE, INT _GMODE, INT _DMODE, INT _AMODE)
# Gravurzyklus - CYCLE60
# CYCLE60(STRING[200] _TEXT, REAL _RTP, REAL _RFP, REAL _SDIS, REAL _DP, REAL _DPR, REAL _PA, REAL _PO, REAL _STA, REAL _CP1, REAL _CP2,REAL _WID, REAL _DF, REAL _FFD, REAL _FFP1, INT _VARI, INT _CODEP,INT _UMODE, INT _GMODE, INT _DMODE, INT _AMODE)
UI_LABEL "SAMSON: Gravieren (CYCLE60)"
UI_HELP "Detailierte Zyklus Beschrieb" "file://${POST_LIB_CURRENT_BMP_DIR}/CYCL60_DE.pdf"
@@ -364,18 +364,18 @@ EVENT lib_event_cycle_60
UI_LABEL "Zeichenabstand, Breite, Winkel _DF"
}
# # <english>
# # Text direction
# # <german>
# # Textrichtung
#
# PARAM cycle60_engraving_text_direction
# {
# TYPE o
# DEFVAL "1-Normal"
# OPTIONS "0-Spiegel","1-Normal"
# UI_LABEL "Text direction"
# }
# # <english>
# # Text direction
# # <german>
# # Textrichtung
#
# PARAM cycle60_engraving_text_direction
# {
# TYPE o
# DEFVAL "1-Normal"
# OPTIONS "0-Spiegel","1-Normal"
# UI_LABEL "Text direction"
# }
# <english>
# Text orientation
test/test.tcl
+3
View File
@@ -0,0 +1,3 @@
proc myProc {arg {opt 1}} {
}