[数值计算] 批处理把单位为KB的超大数转换为GB单位

随风

如 e 盘大小为 12346058067203134065432153  kb
要求换算出 有多少 G  ?

给个思路.

ieutk

我也不清楚youxi01是怎么看出来的

我也想知道他是怎么看出来的

随风

ls两位，什么叫用编辑工具写的？youxi你是怎么看出来的？
楼上说的这个工具，论坛里有啊，第三方软件里面。

ieutk

嗯,谢谢加分!

是一个叫什么notepad+的工具写的吧,现在不记的,上次中招了,重搞系统就没见那工具

youxi01

单看你的代码结构,就不得不让我给你加分啊?
不过,弱弱的问一句，你这个似乎用专门的代码编辑工具写的吧?

ieutk

我也来一个,相比楼上两位大大,我的代码好"复杂",都有点不好意思贴出来了

@echo off
set split=5
set zero=0000000000
for %%a in (C D E F G H I J K L M N O P Q R S T U V W X Y Z) do (
	if exist %%a:\ (
		for /f "tokens=3 delims= " %%i in ('dir /-c %%a:\') do set size=%%i
		setlocal enabledelayedexpansion
		call :pd size-a size-b
		call :xyz ie1 ie2
		echo.
		call echo  你的%%a盘所剩空间为: %%ie1%%.%%ie2:~0,1%%G
		echo.
  	  ))
pause&goto :eof

:pd
if "!size:~-%split%,1!"=="0" (
	set /a split-=1
	goto pd
    ) else (
	call set %1=%%size:~0,-%split%%%
	call set %2=%%size:~-%split%%%
	goto :eof
    )

:xyz
set /a a=%size-a%/1024,b=%size-b%/1024
set /a c=%size-a%%%1024,d=%size-b%%%1024
call set /a e=%a%%%zero:~-%split%%%
call set /a f=%c%%%zero:~-%split%%%
set /a %1=(%e%+%b%+(%f%+%d%)/1024)/(1024*1024)
set /a %2=(%e%+%b%+(%f%+%d%)/1024)%%(1024*1024)
goto :eof
复制代码

随风

加不加一样的,

youxi01

set /a "var=%%i/1024/1024,yu=%%i%%1024"

这里 加引号有什么用途?

随风

结果基本正确,但还是不知道这是什么原理.
数学等于零
简化了一点,不知道还能不能更简洁?
:

@echo off&setlocal EnableDelayedExpansion
set size=19337576448&set "var=!size:~0,4!"
for /l %%i in (5 1 100) do (
   set var=!var!!size:~%%i,1!
   set /a "res_=var/1024,var=var%%1024"
   set "str=!str!!res_!"
   if "!size:~%%i,1!"=="" goto :result
)
:result
for /f "delims=0 tokens=*" %%i in ("!str!") do (
  set /a "var=%%i/1024/1024,yu=%%i%%1024"
)
echo !var!.!yu! G
pause>nul
复制代码

[ 本帖最后由 随风 于 2007-12-7 10:20 编辑 ]

youxi01

借用小学数学计算时的 “借位思想”。
测试代码：

@echo off&setlocal EnableDelayedExpansion
set size=12346058067203134065432153
set num1=%size:~0,4%
set num2=%size:~4%
call :division %num1%
for /l %%i in (0 1 100) do (
   set num=!num2:~%%i,1!
   if "!num!"=="" goto :result
   call :division !var!!num!
)

:result
for /f "delims=0 tokens=*" %%i in ("!str!") do echo %%i

pause>nul
:division
set /a var=%1 %% 1024
set /a res_=%1/1024
set str=!str!!res_!
复制代码

不知道结果对不对罗