快速判断数值文本是否为负数

.子程序 文本_判断负数, 整数型, , 负数返回1 其他返回0
.参数 参_数值文本, 文本型, , 这里我没有对文本是否是数值型文本进行判断 需要自行添加

置入代码 ({ 139, 85, 8, 139, 18, 49, 192, 138, 2, 60, 45, 15, 148, 192, 201, 194, 4, 0 })