s id=十进制输入框id
s id1=输出框或文本id
ug(id,"text",t)
supper(t,t)
s csl=1
s jie=0
slg(t,lt)
s(lt-1,ltt)
s xun=lt
for(1;xun)
{
 ssg(t,ltt,lt,ti)
 f(ti=="A")
 {
  s ti=10
  }
 f(ti=="B")
 {
  s ti=11
  }
 f(ti=="C")
 {
  s ti=12
  }
 f(ti=="D")
 {
  s ti=13
  }
 f(ti=="E")
 {
  s ti=14
  }
 f(ti=="F")
 {
  s ti=15
  }
 f(ti<=15)
 {
  s(ti*csl,ti)
  s(jie+ti,jie)
  s(csl*16,csl)
  s(lt-1,lt)
  s(lt-1,ltt)
  }
}
us(id1,"text",jie)