当前位置:网站首页>Rationaldmis2022 advanced programming macro program
Rationaldmis2022 advanced programming macro program
2022-07-07 11:49:00 【Mountain stream fruit】
FNAME = OBTAIN/F(@FORMNAME), 1
SELECT/FNAME
CASE/'PLANE'
T(TFLAT_FORM) = TOL/FLAT, TOLFORM
OUTPUT/FA(FORMNAME), TA(TFLAT_FORM)
FORMDATA=value/TA(TFLAT_FORM),ACT
IF/(FORMDATA .GT. TOLFORM)
tempchar=assign/concat(' Current flatness is : ',str(FORMDATA),'>',str(TOLFORM),' Flatness out of tolerance warning !')
TEXT/OPER,tempchar
endif
ENDCAS
CASE/'CIRCLE'
T(TFLAT_FORM) = TOL/CIRLTY, TOLFORM
OUTPUT/FA(FORMNAME), TA(TFLAT_FORM)
FORMDATA=value/TA(TFLAT_FORM),ACT
IF/(FORMDATA .GT. TOLFORM)
tempchar=assign/concat(' The current vector circularity is : ',str(FORMDATA),'>',str(TOLFORM),' Sagittal circularity out of tolerance warning !')
TEXT/OPER,tempchar
endif
ENDCAS
CASE/'ARC'
T(TFLAT_FORM) = TOL/CIRLTY, TOLFORM
OUTPUT/FA(FORMNAME), TA(TFLAT_FORM)
FORMDATA=value/TA(TFLAT_FORM),ACT
IF/(FORMDATA .GT. TOLFORM)
tempchar=assign/concat(' The current vector circularity is : ',str(FORMDATA),'>',str(TOLFORM),' Sagittal circularity out of tolerance warning !')
TEXT/OPER,tempchar
endif
ENDCAS
CASE/'SPHERE'
T(TFLAT_FORM) = TOL/CIRLTY, TOLFORM
OUTPUT/FA(FORMNAME), TA(TFLAT_FORM)
FORMDATA=value/TA(TFLAT_FORM),ACT
IF/(FORMDATA .GT. TOLFORM)
tempchar=assign/concat(' The current vector circularity is : ',str(FORMDATA),'>',str(TOLFORM),' Sagittal circularity out of tolerance warning !')
TEXT/OPER,tempchar
endif
ENDCAS
DFTCAS
ENDSEL
endmac
CALL/M(FORM),(PLN3),0.01
边栏推荐
猜你喜欢
Design intelligent weighing system based on Huawei cloud IOT (STM32)
Reasons for the failure of web side automation test
Flet教程之 19 VerticalDivider 分隔符组件 基础入门(教程含源码)
[shortest circuit] acwing1128 Messenger: Floyd shortest circuit
Flet教程之 15 GridView 基础入门(教程含源码)
聊聊SOC启动(六)uboot启动流程二
Cmu15445 (fall 2019) project 2 - hash table details
Excel公式知多少?
【神经网络】卷积神经网络CNN【含Matlab源码 1932期】
正在運行的Kubernetes集群想要調整Pod的網段地址
随机推荐
R Language Using Image of magick package Mosaic Function and Image La fonction flatten empile plusieurs images ensemble pour former des couches empilées sur chaque autre
Briefly introduce closures and some application scenarios
Audit migration
Excel公式知多少?
What development models did you know during the interview? Just read this one
R language Visual facet chart, hypothesis test, multivariable grouping t-test, visual multivariable grouping faceting boxplot, and add significance levels and jitter points
Flet教程之 17 Card卡片组件 基础入门(教程含源码)
Le Cluster kubernets en cours d'exécution veut ajuster l'adresse du segment réseau du pod
【神经网络】卷积神经网络CNN【含Matlab源码 1932期】
STM32 entry development NEC infrared protocol decoding (ultra low cost wireless transmission scheme)
Poor math students who once dropped out of school won the fields award this year
Network protocol concept
Ask about the version of flinkcdc2.2.0, which supports concurrency. Does this concurrency mean Multiple Parallelism? Now I find that mysqlcdc is full
0.96 inch IIC LCD driver based on stc8g1k08
竟然有一半的人不知道 for 与 foreach 的区别???
超标量处理器设计 姚永斌 第10章 指令提交 摘录
In my limited software testing experience, a full-time summary of automation testing experience
千人规模互联网公司研发效能成功之路
Talk about SOC startup (VII) uboot startup process III
audit 移植