binbinbin 发表于 2006-10-25 21:04:21

请问,易语言中把十六进制文本转换成10进制文本,怎么做?

请问,易语言中把十六进制文本转换成10进制文本,要怎么操作。是

到数值()

吗?
比如我要把“EE24”转成“60964”命令是甚么?????????

wjmjkd 发表于 2007-11-24 16:43:08

.版本 2

.子程序 十六进制转十进制, 文本型
.参数 十六进制, 文本型
.局部变量 记次变量, 整数型
.局部变量 文本长度, 整数型
.局部变量 十六进制数, 整数型, , "0"
.局部变量 结果, 整数型

文本长度 = 取文本长度 (十六进制)
重定义数组 (十六进制数, 假, 文本长度)
.计次循环首 (取数组成员数 (十六进制数), 记次变量)
    .判断开始 (到大写 (取文本中间 (十六进制, 记次变量, 1)) = “F”)
      十六进制数 [记次变量] = 15
    .判断 (到大写 (取文本中间 (十六进制, 记次变量, 1)) = “E”)
      十六进制数 [记次变量] = 14
    .判断 (到大写 (取文本中间 (十六进制, 记次变量, 1)) = “D”)
      十六进制数 [记次变量] = 13
    .判断 (到大写 (取文本中间 (十六进制, 记次变量, 1)) = “C”)
      十六进制数 [记次变量] = 12
    .判断 (到大写 (取文本中间 (十六进制, 记次变量, 1)) = “B”)
      十六进制数 [记次变量] = 11
    .判断 (到大写 (取文本中间 (十六进制, 记次变量, 1)) = “A”)
      十六进制数 [记次变量] = 10
    .判断 (取文本中间 (十六进制, 记次变量, 1) = “9”)
      十六进制数 [记次变量] = 9
    .判断 (取文本中间 (十六进制, 记次变量, 1) = “8”)
      十六进制数 [记次变量] = 8
    .判断 (取文本中间 (十六进制, 记次变量, 1) = “7”)
      十六进制数 [记次变量] = 7
    .判断 (取文本中间 (十六进制, 记次变量, 1) = “6”)
      十六进制数 [记次变量] = 6
    .判断 (取文本中间 (十六进制, 记次变量, 1) = “5”)
      十六进制数 [记次变量] = 5
    .判断 (取文本中间 (十六进制, 记次变量, 1) = “4”)
      十六进制数 [记次变量] = 4
    .判断 (取文本中间 (十六进制, 记次变量, 1) = “3”)
      十六进制数 [记次变量] = 3
    .判断 (取文本中间 (十六进制, 记次变量, 1) = “2”)
      十六进制数 [记次变量] = 2
    .判断 (取文本中间 (十六进制, 记次变量, 1) = “1”)
      十六进制数 [记次变量] = 1
    .判断 (取文本中间 (十六进制, 记次变量, 1) = “0”)
      十六进制数 [记次变量] = 0
    .默认

    .判断结束

.计次循环尾 ()
.计次循环首 (文本长度 - 1, 记次变量)
    结果 = 结果 + 求次方 (16, 文本长度 - 记次变量) × 十六进制数 [记次变量]
.计次循环尾 ()
结果 = 结果 + 十六进制数 [取数组成员数 (十六进制数)]
返回 (到文本 (结果))

tianxj 发表于 2007-11-24 19:30:38

.版本 2

.子程序 十六进制到十进制, 整数型
.参数 十六进制文本, 文本型
.局部变量 文本, 文本型
.局部变量 最终值, 整数型
.局部变量 i, 整数型, , , 中间循环变量
.局部变量 临时数值, 文本型, , , 每一位上的值

文本 = 到小写 (十六进制文本)
.变量循环首 (1, 取文本长度 (文本), 1, i)
    临时数值 = 取文本中间 (文本, i, 1)
    .如果 (取代码 (临时数值, ) ≥ 取代码 (“a”, ) 且 取代码 (临时数值, ) ≤ 取代码 (“f”, ))
      最终值 = 最终值 + (取代码 (临时数值, ) - 取代码 (“a”, ) + 10) × 求次方 (16, 取文本长度 (文本) - i)
    .否则
      最终值 = 最终值 + 到数值 (临时数值) × 求次方 (16, 取文本长度 (文本) - i)
    .如果结束

.变量循环尾 ()
返回 (最终值)

maclaurin 发表于 2007-12-2 11:11:55

这个就是传说中的易语言吗?
新人没见过
页: [1]
查看完整版本: 请问,易语言中把十六进制文本转换成10进制文本,怎么做?