.版本 2 .支持库 eAPI .程序集 窗口程序集_启动窗口 .子程序 _按钮1_被单击, , , 汉族制作 .局部变量 盘符, 文本型, , "0" .局部变量 a, 整数型 .局部变量 剩余, 整数型 重定义数组 (盘符, 假, 取驱动器数量 (0)) 盘符 ＝ 取驱动器列表 (0) 画板1.清除 (, , , ) .计次循环首 (取数组成员数 (盘符), a) .如果真 (取磁盘总空间 (盘符 [a]) ≠ -1) 画板1.文本颜色 ＝ 取颜色值 (122, 125, 128) 画板1.字体.字体大小 ＝ 11 画板1.定位写出 (5, 13 × a ＋ 6 ＋ a, 盘符 [a] ＋ “/”) 画板1.画笔颜色 ＝ #浅灰 剩余 ＝ 取磁盘剩余空间 (盘符 [a]) ÷ 取磁盘总空间 (盘符 [a]) × 100 画板1.刷子颜色 ＝ #浅灰 画板1.画矩形 (5 ＋ 28, 13 × a ＋ 6 ＋ a ＋ 1, 100, 13 × a ＋ 6 ＋ a ＋ 13) 画板1.刷子颜色 ＝ #粉红 画板1.画矩形 (5 ＋ 28, 13 × a ＋ 6 ＋ a ＋ 1, 100 － 剩余, 13 × a ＋ 6 ＋ a ＋ 13) 画板1.定位写出 (100 ＋ 2, 13 × a ＋ 6 ＋ a － 1, 到文本 (剩余) ＋ “%”) .如果真结束 处理事件 () .计次循环尾 ()