.版本 2 .支持库 eCalc .子程序 _按钮1_被单击 编辑框2.内容 ＝ 十六进制到十进制 (编辑框1.内容) .子程序 十六进制到十进制, 文本型 .参数 十六进制文本, 文本型 .局部变量 循环次数, 整数型 .局部变量 代码, 整数型 .局部变量 临时1, 大数 .局部变量 临时2, 大数 .局部变量 结果, 大数 .局部变量 乘方, 大数 .局部变量 进制, 大数 .局部变量 文本, 文本型 进制.导入数字 (16) 文本 ＝ 到小写 (到半角 (十六进制文本)) .计次循环首 (取文本长度 (文本), 循环次数) 代码 ＝ 取代码 (取文本中间 (到大写 (文本), 取文本长度 (文本) － 循环次数 ＋ 1, 1), ) 临时1.导入数字 (代码 － 55) 临时2.导入数字 (代码 － 48) 乘方.导入数字 (1) .计次循环首 (循环次数 － 1, ) 乘方 ＝ 乘方.乘 (进制) .计次循环尾 () 结果 ＝ 选择 (代码 ≥ 65 且 代码 ≤ 70, 结果.加 (临时1.乘 (乘方)), 结果.加 (临时2.乘 (乘方))) .计次循环尾 () 返回 (结果.导出文本 ())