存储单位换算

天空c

  

子程序名	返回值类型	公开	备 注
储存换算	小数型		将储存单位进行换算  返回换算后的结果
参数名	类 型	参考	可空	数组	备 注
欲换算的数值	小数型				欲换算的数值
换算前单位	整数型				0.bit 1.B 2.KB 3.MB 4.GB 5.TG 6.PB 7...以此类推
换算后单位	整数型				0.bit 1.B 2.KB 3.MB 4.GB 5.TG 6.PB 7...以此类推

变量名	类 型	静态	数组	备 注
tep	小数型
i	整数型

tep ＝ 欲换算的数值
如果真 (换算前单位 ＝ 换算后单位)
返回 (tep)
如果真 (换算前单位 ＜ 0 或 换算后单位 ＜ 0)
返回 (0)
如果真 (换算前单位 ＝ 0 或 换算后单位 ＝ 0)
如果真 (换算前单位 ＞ 换算后单位)
计次循环首 (换算前单位 － 换算后单位 － 1, i)
tep ＝ tep × 1024
计次循环尾 ()
返回 (tep × 8)
如果真 (换算前单位 ＜ 换算后单位)
tep ＝ tep ÷ 8
计次循环首 (换算后单位 － 换算前单位 － 1, i)
tep ＝ tep ÷ 1024
计次循环尾 ()
返回 (tep)

如果真 (换算前单位 ＞ 换算后单位)
计次循环首 (换算前单位 － 换算后单位, i)
tep ＝ tep × 1024
计次循环尾 ()
返回 (tep)
如果真 (换算前单位 ＜ 换算后单位)
计次循环首 (换算后单位 － 换算前单位, i)
tep ＝ tep ÷ 1024
计次循环尾 ()
返回 (tep)
返回 (0)

.版本 2<br /> <br /> .子程序 储存换算, 小数型, 公开, 将储存单位进行换算  返回换算后的结果<br /> .参数 欲换算的数值, 小数型, , 欲换算的数值<br /> .参数 换算前单位, 整数型, , 0.bit 1.B 2.KB 3.MB 4.GB 5.TG 6.PB 7...以此类推<br /> .参数 换算后单位, 整数型, , 0.bit 1.B 2.KB 3.MB 4.GB 5.TG 6.PB 7...以此类推<br /> .局部变量 tep, 小数型<br /> .局部变量 i, 整数型<br /> <br /> tep ＝ 欲换算的数值<br /> .如果真 (换算前单位 ＝ 换算后单位)<br />     返回 (tep)<br /> .如果真结束<br /> .如果真 (换算前单位 ＜ 0 或 换算后单位 ＜ 0)<br />     返回 (0)<br /> .如果真结束<br /> .如果真 (换算前单位 ＝ 0 或 换算后单位 ＝ 0)<br />     .如果真 (换算前单位 ＞ 换算后单位)<br />         .计次循环首 (换算前单位 － 换算后单位 － 1, i)<br />             tep ＝ tep × 1024<br />         .计次循环尾 ()<br />         返回 (tep × 8)<br />     .如果真结束<br />     .如果真 (换算前单位 ＜ 换算后单位)<br />         tep ＝ tep ÷ 8<br />         .计次循环首 (换算后单位 － 换算前单位 － 1, i)<br />             tep ＝ tep ÷ 1024<br />         .计次循环尾 ()<br />         返回 (tep)<br />     .如果真结束<br /> <br /> .如果真结束<br /> .如果真 (换算前单位 ＞ 换算后单位)<br />     .计次循环首 (换算前单位 － 换算后单位, i)<br />         tep ＝ tep × 1024<br />     .计次循环尾 ()<br />     返回 (tep)<br /> .如果真结束<br /> .如果真 (换算前单位 ＜ 换算后单位)<br />     .计次循环首 (换算后单位 － 换算前单位, i)<br />         tep ＝ tep ÷ 1024<br />     .计次循环尾 ()<br />     返回 (tep)<br /> .如果真结束<br /> 返回 (0)

顺便问一句，是存储单位还是储存单位?

ghost12

不明真相的吃瓜群众路过~\赶紧买个瓜围观

真冬

  

子程序名	返回值类型	公开	备 注
储存换算g	小数型		将储存单位进行换算  返回换算后的结果
参数名	类 型	参考	可空	数组	备 注
欲换算的数值	小数型				欲换算的数值
换算前单位	整数型				0.bit 1.B 2.KB 3.MB 4.GB 5.TG 6.PB 7...以此类推
换算后单位	整数型				0.bit 1.B 2.KB 3.MB 4.GB 5.TG 6.PB 7...以此类推

变量名	类 型	静态	数组	备 注
tep	小数型
等于0bit	整数型
乘法	整数型
除法	整数型

tep ＝ 欲换算的数值
如果真 (换算前单位 ＝ 换算后单位)
返回 (tep)
如果真 (换算前单位 ＜ 0 或 换算后单位 ＜ 0)
返回 (0)
等于0bit ＝ 到整数 (换算前单位 ＝ 0 或 换算后单位 ＝ 0)  ' 等于0的话得到1 不等于0得到0
乘法 ＝ 到整数 (换算前单位 ＞ 换算后单位)  ' 大鱼得到1 小鱼等于得到0
除法 ＝ 到整数 (换算前单位 ＜ 换算后单位)  ' 小鱼得到1 大鱼等于得到0
如果真 (除法 ＝ 1)
tep ＝ tep ÷ (7  ×  等于0bit ＋ 1)
' 等于0bit的话得到1 等于0bit不等于0得到0
' 7*1+1=7+1=8
' tep ＝ tep ÷ 8
' 7*0+1=0+1=1
' tep ＝ tep ÷ 1
' 换算前单位 － 换算后单位 － 1
' 换算前单位 － 换算后单位 － 0
计次循环首 (换算前单位 － 换算后单位 － 等于0bit, )
tep ＝ tep  × (1023 × 乘法 ＋ 1) ÷ (1023 × 除法 ＋ 1)
' 大鱼乘法得到1 除法得到0
' × (1023 × 1 ＋ 1) ÷ (1023 × 0 ＋ 1)
' × (1023 ＋ 1) ÷ (0 ＋ 1)
' × 1024 ÷ 1
' tep ＝ tep × 1024 ÷ 1
' 1024 ÷ 1=1024
' tep ＝ tep × 1024
' 小鱼乘法得到0 除法得到1
' × (1023 × 0 ＋ 1) ÷ (1023 × 1 ＋ 1)
' × (0 ＋ 1) ÷ (1023 ＋ 1)
' × 1 ÷ 1024
' tep ＝ tep × 1 ÷ 1024
' tep × 1=tep
' tep ＝ tep ÷ 1024
计次循环尾 ()
返回 (tep  × (7 × 等于0bit ＋ 1))
' 等于0bit的话得到1 等于0bit不等于0得到0
' 7*1+1=7+1=8
' tep × 8
' 7*0+1=0+1=1
' tep × 1

.版本 2<br /> <br /> .子程序 储存换算g, 小数型, 公开, 将储存单位进行换算  返回换算后的结果<br /> .参数 欲换算的数值, 小数型, , 欲换算的数值<br /> .参数 换算前单位, 整数型, , 0.bit 1.B 2.KB 3.MB 4.GB 5.TG 6.PB 7...以此类推<br /> .参数 换算后单位, 整数型, , 0.bit 1.B 2.KB 3.MB 4.GB 5.TG 6.PB 7...以此类推<br /> .局部变量 tep, 小数型<br /> .局部变量 等于0bit, 整数型<br /> .局部变量 乘法, 整数型<br /> .局部变量 除法, 整数型<br /> <br /> tep ＝ 欲换算的数值<br /> .如果真 (换算前单位 ＝ 换算后单位)<br />     返回 (tep)<br /> .如果真结束<br /> .如果真 (换算前单位 ＜ 0 或 换算后单位 ＜ 0)<br />     返回 (0)<br /> .如果真结束<br /> 等于0bit ＝ 到整数 (换算前单位 ＝ 0 或 换算后单位 ＝ 0)  ' 等于0的话得到1 不等于0得到0<br /> 乘法 ＝ 到整数 (换算前单位 ＞ 换算后单位)  ' 大鱼得到1 小鱼等于得到0<br /> 除法 ＝ 到整数 (换算前单位 ＜ 换算后单位)  ' 小鱼得到1 大鱼等于得到0<br /> .如果真 (除法 ＝ 1)<br />     tep ＝ tep ÷ (7  ×  等于0bit ＋ 1)<br />     ' 等于0bit的话得到1 等于0bit不等于0得到0<br />     ' 7*1+1=7+1=8<br />     ' tep ＝ tep ÷ 8<br />     ' 7*0+1=0+1=1<br />     ' tep ＝ tep ÷ 1<br /> .如果真结束<br /> ' 换算前单位 － 换算后单位 － 1<br /> ' 换算前单位 － 换算后单位 － 0<br /> .计次循环首 (换算前单位 － 换算后单位 － 等于0bit, )<br />     tep ＝ tep  ×  (1023 × 乘法 ＋ 1) ÷ (1023 × 除法 ＋ 1)<br />     ' 大鱼乘法得到1 除法得到0<br />     ' × (1023 × 1 ＋ 1) ÷ (1023 × 0 ＋ 1)<br />     ' × (1023 ＋ 1) ÷ (0 ＋ 1)<br />     ' × 1024 ÷ 1<br />     ' tep ＝ tep × 1024 ÷ 1<br />     ' 1024 ÷ 1=1024<br />     ' tep ＝ tep × 1024<br />     ' 小鱼乘法得到0 除法得到1<br />     ' × (1023 × 0 ＋ 1) ÷ (1023 × 1 ＋ 1)<br />     ' × (0 ＋ 1) ÷ (1023 ＋ 1)<br />     ' × 1 ÷ 1024<br />     ' tep ＝ tep × 1 ÷ 1024<br />     ' tep × 1=tep<br />     ' tep ＝ tep ÷ 1024<br /> .计次循环尾 ()<br /> 返回 (tep  ×  (7 × 等于0bit ＋ 1))<br /> ' 等于0bit的话得到1 等于0bit不等于0得到0<br /> ' 7*1+1=7+1=8<br /> ' tep × 8<br /> ' 7*0+1=0+1=1<br /> ' tep × 1

真冬

  

子程序名	返回值类型	公开	备 注
储存换算g	小数型		将储存单位进行换算  返回换算后的结果
参数名	类 型	参考	可空	数组	备 注
欲换算的数值	小数型				欲换算的数值
换算前单位	整数型				0.bit 1.B 2.KB 3.MB 4.GB 5.TG 6.PB 7...以此类推
换算后单位	整数型				0.bit 1.B 2.KB 3.MB 4.GB 5.TG 6.PB 7...以此类推

变量名	类 型	静态	数组	备 注
tep	小数型
等于0bit	整数型
乘法	整数型
除法	整数型

tep ＝ 欲换算的数值
如果真 (换算前单位 ＝ 换算后单位)
返回 (tep)
如果真 (换算前单位 ＜ 0 或 换算后单位 ＜ 0)
返回 (0)
等于0bit ＝ 到整数 (换算前单位 ＝ 0 或 换算后单位 ＝ 0)  ' 等于0的话得到1 不等于0得到0
乘法 ＝ 到整数 (换算前单位 ＞ 换算后单位)  ' 大鱼得到1 小鱼等于得到0
除法 ＝ 到整数 (换算前单位 ＜ 换算后单位)  ' 小鱼得到1 大鱼等于得到0
tep ＝ tep ÷ (7 × 等于0bit ＋ 1)
' 等于0bit的话得到1 等于0bit不等于0得到0
' 7*1+1=7+1=8
' tep ＝ tep ÷ 8
' 7*0+1=0+1=1
' tep ＝ tep ÷ 1
' 换算前单位 － 换算后单位 － 1
' 换算前单位 － 换算后单位 － 0
计次循环首 (换算前单位 － 换算后单位 － 等于0bit, )
tep ＝ tep �� (1023 × 乘法 ＋ 1) ÷ (1023 × 除法 ＋ 1)
' 大鱼乘法得到1 除法得到0
' × (1023 × 1 ＋ 1) ÷ (1023 × 0 ＋ 1)
' × (1023 ＋ 1) ÷ (0 ＋ 1)
' × 1024 ÷ 1
' tep ＝ tep × 1024 ÷ 1
' 1024 ÷ 1=1024
' tep ＝ tep × 1024
' 小鱼乘法得到0 除法得到1
' × (1023 × 0 ＋ 1) ÷ (1023 × 1 ＋ 1)
' × (0 ＋ 1) ÷ (1023 ＋ 1)
' × 1 ÷ 1024
' tep ＝ tep × 1 ÷ 1024
' tep × 1=tep
' tep ＝ tep ÷ 1024
计次循环尾 ()
返回 (tep �� (7 × 等于0bit ＋ 1))
' 等于0bit的话得到1 等于0bit不等于0得到0
' 7*1+1=7+1=8
' tep × 8
' 7*0+1=0+1=1
' tep × 1

.版本 2<br /> <br /> .子程序 储存换算g, 小数型, 公开, 将储存单位进行换算  返回换算后的结果<br /> .参数 欲换算的数值, 小数型, , 欲换算的数值<br /> .参数 换算前单位, 整数型, , 0.bit 1.B 2.KB 3.MB 4.GB 5.TG 6.PB 7...以此类推<br /> .参数 换算后单位, 整数型, , 0.bit 1.B 2.KB 3.MB 4.GB 5.TG 6.PB 7...以此类推<br /> .局部变量 tep, 小数型<br /> .局部变量 等于0bit, 整数型<br /> .局部变量 乘法, 整数型<br /> .局部变量 除法, 整数型<br /> <br /> tep ＝ 欲换算的数值<br /> .如果真 (换算前单位 ＝ 换算后单位)<br />     返回 (tep)<br /> .如果真结束<br /> .如果真 (换算前单位 ＜ 0 或 换算后单位 ＜ 0)<br />     返回 (0)<br /> .如果真结束<br /> 等于0bit ＝ 到整数 (换算前单位 ＝ 0 或 换算后单位 ＝ 0)  ' 等于0的话得到1 不等于0得到0<br /> 乘法 ＝ 到整数 (换算前单位 ＞ 换算后单位)  ' 大鱼得到1 小鱼等于得到0<br /> 除法 ＝ 到整数 (换算前单位 ＜ 换算后单位)  ' 小鱼得到1 大鱼等于得到0<br /> tep ＝ tep ÷ (7 × 等于0bit ＋ 1)<br /> ' 等于0bit的话得到1 等于0bit不等于0得到0<br /> ' 7*1+1=7+1=8<br /> ' tep ＝ tep ÷ 8<br /> ' 7*0+1=0+1=1<br /> ' tep ＝ tep ÷ 1<br /> ' 换算前单位 － 换算后单位 － 1<br /> ' 换算前单位 － 换算后单位 － 0<br /> .计次循环首 (换算前单位 － 换算后单位 － 等于0bit, )<br />     tep ＝ tep × (1023 × 乘法 ＋ 1) ÷ (1023 × 除法 ＋ 1)<br />     ' 大鱼乘法得到1 除法得到0<br />     ' × (1023 × 1 ＋ 1) ÷ (1023 × 0 ＋ 1)<br />     ' × (1023 ＋ 1) ÷ (0 ＋ 1)<br />     ' × 1024 ÷ 1<br />     ' tep ＝ tep × 1024 ÷ 1<br />     ' 1024 ÷ 1=1024<br />     ' tep ＝ tep × 1024<br />     ' 小鱼乘法得到0 除法得到1<br />     ' × (1023 × 0 ＋ 1) ÷ (1023 × 1 ＋ 1)<br />     ' × (0 ＋ 1) ÷ (1023 ＋ 1)<br />     ' × 1 ÷ 1024<br />     ' tep ＝ tep × 1 ÷ 1024<br />     ' tep × 1=tep<br />     ' tep ＝ tep ÷ 1024<br /> .计次循环尾 ()<br /> 返回 (tep × (7 × 等于0bit ＋ 1))<br /> ' 等于0bit的话得到1 等于0bit不等于0得到0<br /> ' 7*1+1=7+1=8<br /> ' tep × 8<br /> ' 7*0+1=0+1=1<br /> ' tep × 1

噢噢

支持开源~！感谢分享

信易达

用系统api不香吗

天空c

我点了保存草稿就直接发出来了？