[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[数值计算] 求助批处理将2进制转换为10进制

bin为一段2进制数,首先我需要先把bin拆分为3段,然后我想分别把这3段二进制数转换为10进制数,怎么写批处理?

set str=%bin%
set first=%str:~0,7%

set sec=%str:~-9,4%

set third=%str:~-5%

  1. <# :
  2. @Powershell "& {[ScriptBlock]::Create((gc '%~f0' -raw)).Invoke()}" & pause & goto :eof
  3. #>
  4. $str="0101011001101100010011"
  5. $first="$str".Substring(0,7)
  6. $sec="$str".Substring(9,4)
  7. $third="$str".Substring(13)
  8. [Convert]::ToInt64("$first",2)
  9. [Convert]::ToInt64("$sec",2)
  10. [Convert]::ToInt64("$third",2)
复制代码
#&cls&@powershell "Invoke-Expression ([Io.File]::ReadAllText('%~0',[Text.Encoding]::UTF8))" &pause&exit

TOP

谢谢大神的帮助

TOP

回复 2# ivor

TOP

本帖最后由 ivor 于 2020-11-15 12:47 编辑
  1. #&cls&@powershell "Invoke-Expression ([Io.File]::ReadAllText('%~0'))" &pause&exit
  2. $str="0101011001101100010011"
  3. $first="$str".Substring(0,7)
  4. $sec="$str".Substring(9,4)
  5. $third="$str".Substring(13)
  6. [Convert]::ToInt64("$first",2)
  7. [Convert]::ToInt64("$sec",2)
  8. [Convert]::ToInt64("$third",2)
复制代码
#&cls&@powershell "Invoke-Expression ([Io.File]::ReadAllText('%~0',[Text.Encoding]::UTF8))" &pause&exit

TOP

返回列表