Diskemu应用实例
柏仔 terryzhbb@163.com
首先说明一下，这里所说的Diskemu 是指Bradyzhu 的修改版，我写这篇东西并没有想把
它作为Diskemu 全面的教程，只是把一些较常用的命令说明一下，起个抛砖引玉的作用。
文章虽然好象很长，但许多命令都是重复的，譬如说图形安装界面的脚本可以只看前两个，
文本安装脚本看一个就行了，只是为了完整才把其它的都写进来，大家千万别被这篇东西
的长度吓坏了，呵呵。文中有注释的详细看一下吧，没有的都比较简单。还有就是排版差
了点，看起来有点累，见谅！由于我对这个软件还有一些不大熟悉的地方，文中难免有一
些错误，请不吝指正！
我们知道Diskemu 引导启动后就会自动加载diskemu.cmd。我们要说的就是cmd脚本的写
法，其实这种脚本有点象DOS的批处理，是按由上到下执行的，所以灵活运用goto和return
两个命令比较重要。相信大家看完后应该可以有个大概的了解，再自己动手写一下就不难
掌握了，现在让我们先重温一下Diskemu的命令说明：
bootinfotable：显示启动格式
boot：从软盘或硬盘上启动
语法：Boot <DiskID>
boot 0 从软盘A 启动。
boot 80 从第一个硬盘启动。
batch：加载脚本
语法：batch <FileName> [Label]
batch diskemu.cmd 在当前目录加载diskemu.cmd，然后从头开始执行。
batch diskemu.cmd start 在当前目录加载diskemu.cmd，然后从:start位置开始执行。
cd：变更当前目录
语法： cd <Direcotry>
cd / 切换到根目录。
cd image 切换到当前目录下的image目录。
cd /dir1/dir2 切换到/dir1/dir2目录。
cls：和DOS下的一样，清屏。
dir：和DOS 下的一样，显示当前目录。
echo：回显控制，用于调试
语法：echo on/off
goto：跳转指令
语法：goto <Label>
goto start 跳转到:start 位置
goto ~ 跳转到有SetDefLabel指定的位置(这个是我新加的）
getkey：等待按键
语法：getkey <Time> <DefaultKeyName>
getkey 10 entr 等待按键，如果10秒没有按键，使用缺省按键entr作为输入。输入的按
键被内部保存，由&#111;nkey 指令
检测。
keyval：显示当前保存的按键。
loadsegm：设置代码加载位置
emusegm：设置数据加载位置
help：显示帮助信息
语法：help [Command]
help goto 显示goto指令的详细说明。
help 显示所有指令的简要说明。
&#111;nkey：检测内部保存的按键输入
语法：&#111;nkey <KeyName> <Command>
&#111;nkey f1 goto help 如果内部保存的按键是F1，将执行goto help这条命令。
print：在当前显示位置输出后面的字符串。
readtest：测试文件有效性
reboot：重起
quit：退出到命令行模式
run：加载执行代码
run a.img 在当前目录加载a.img，然后根据他的格式，做软盘模拟启动。
run a.bin 在当前目录加载a.bin，然后跳转到他的入口。
type：和DOS下一样
ver：显示版本信息
clear：清屏。同CLS
cat：同UNIX下的cat。同type 指令
ls：同dir
以下是我新加入的：
logo：显示图片
语法：logo <TimeOut> <ImageFileName>
logo 10 logo.bmp 显示logo.bmp文件，然后等待１０秒，如果有按键，立即退出。
图片如果是256色的BMP文件，支持如下尺寸：320*200， 640*480， 800*600， 1024*768。
图片如果是24位真彩色的BMP文件，支持如下尺寸：640*480， 800*600， 1024*768。
如果不是，请用相关的图形编辑软件转换，否则无法正常显示。
SetKey：设置内部保存的按键
语法：setkey <KeyName>
setkey entr 把内部保存的按键设置Enter键
SetPos：设置当前位置，后续的显示将从指定位置输出
语法：SetPos <XPos> <YPos>
MenuBar：设置菜单条起始和终止位置
语法：MenuBar [pixel] XStart XStop
menubar 20 40 菜单条将从20列到40列
MenuColor：设置菜单条的颜色
语法： menucolor <BackColorTarget> <ForeColorTarget> [BackColorSource
[ForeColorSource]]
menucolor 10 20 设置菜单条的颜色为10号色，菜单条将覆盖当前的20号色的位置。
menucolor 10 设置菜单条的颜色为10号色，菜单条将覆盖当前的backcolor。
HighLight：设置菜单条所在的行
语法：highlight [LineNumber]
highlight 10 把菜单条画在第10行
highlight 消除菜单条
SetDefault：设置goto ~指令跳转的缺省位置
TimerColor：设置倒计数定时器显示的颜色
语法：TimerColor <ForeColor> [BackColor]
timecolor 10 20 倒计数定时器使用10号色，背景使用20号色。
timecolor 10 倒计数定时器使用10号色，背景使用当前背景色。
TimerPos：设置倒计数定时器显示位置
语法：Timerpos <XPos> <YPos>
ForeColor：设置前景色
语法：forecolor <ColorNo>
BackColor：设置背景色
语法：backcolor <ColorNo>
SetDAC：设置调色板
语法：setdac <ColorNo> <RedValue> <GreenValue> <BlueValue>
setdac 10 0xff 0xff 0xff 把10 号色设置为白色
setdac 20 0xff 0x00 0x00 把20号色设置为红色
DrawText：显示字符串
语法：drawtext [pixel] [XPos] [YPos] [ForeColor] [BackColor] "string
drawtext 10 20 100 200 "test 在(10,20)位置以10号色为前景色，20号为背景色，显示test
注意：字符串必须以"开始，在命令和"之间可以有0到4个数字，如果没有就使用当前值
Transparent：设置背景显示模式是否为透过模式
语法：transparent on/off
transparent on 只画前景色。
transparent off 画前景色和背景色。
ColorBlock：画一个色块
语法：colorblock [pixel] <ColorNo> <x1> <y1> <x2> <y2>
colorblock 101 10 12 20 21 用101号色画一个色块，左上角坐标为(10, 12)，右下角坐标
为(20,21)。
Delay：延迟
语法：delay xxx[s|ms|us]
delay 100ms 延迟100 毫秒
AnimatePalette：设置滚动条参数
语法：animatepalette <PaletteStart> <PaletteEnd> xxx[s|ms|us]
animatepalette 0xF0 0xFF 250ms
ShadowParam：设置阴影参数
语法：shadow [pixel] <ColorNumber> <XOffset> [YOffset]
DrawHLine：画水平线
语法：drawhline pixel <ColorNo> <x1> <x2> <y>
DrawVLine：画垂直线
语法：drawvline pixel <ColorNo> <x> <y1> <y2>
LoadChineseFont：设置中文字库及使用参数
语法：loadchinesefont <HighByteStart> <LowByteStart> <Pitch> <Offset> <FontFileName>
loadchinesefont 0xa0 0xa0 94 95 Hzk16
SetResolution：设置显示模式
语法：SetResolution <Width> <High> [<ColorDepth> | ImgColor]
setresolution 800 600 32 设置显示模式为800*600*32Bit
ProcessParam：指定进度条的参数
语法：processparam [pixel] <ForeColor> <BackColor> <x1> <y1> <x2> <y2>
BackgroundImage：指定背景图片
语法：backgroundimage [pixel] <ImageFileName> [XOffset YOffset]
background Backgrnd.bmp
Repaint：重新绘制背景
语法：Repaint [pixel] [XPos [YPos [Width [High]]]]
Repaint 10 20 30 40 重新绘制指定区域的背景
DrawImage：绘制图片
语法： drawimage [pixel] <ImageFileName> <XOffset> <YOffset> [<ClipWidth>
<ClipHigh>]
Call：调用子函数
语法：Call <Label>
call DrawMenu 调用函数DrawMenu
Return：从子函数返回
语法：Return
SetErrorHandle：设置错误处理
语法：SetErrorHandle <command>
SetErrorHandle call errorhandle 当Logo，SetResolution，DrawImage 和Repaint 出错
时，将触发该错误处理。
GetLastError：获取错误的函数号
语法：GetLastError
&#111;nError：判断错误的函数号
语法：&#111;nError <ErrorFunctionID> <command>
&#111;nerror 0x11 goto test 设置模式错误处理
注意：所有数字都可以使用十进制或则十六进制。
下面我们就以英文版的XP二合一为例，说明一下一些命令的用法，相同的命令我不多说，
还有，请结合我后面提供的图片来理解脚本。至于XP 光盘的目录如何建，光盘的文件有
哪些要修改，怎样修改这些问题都不是我要说的重点，所以在这里不会提到。
首先新建一个文本文件，命名为diskemu.cmd
写入内容如下（;号后的是说明，不会被执行）：
;下面的冒号是用来说明entrypoint 是这段子函数的开始标志，我们就是利用这些标志来跳
转，要不，脚本只会按顺序执行
:entrypoint
；延时100ms，显示启动logo 然后等待5秒，如果有按键，立即退出
delay 100ms
logo 5 logo.bmp
:background
；设置背景显示模式为：显示背景色和前景色
transparent off
；以bg.bmp 为背景
backgroundimage pixel bg.bmp 0 0
；设置显示分辨率为800×600
setresolution 800 600 @drawimg
调用drawmenu子函数
call drawmenu
；跳到itemdefault
goto itemdefault
:drawmenu
；清屏
cls 0
；重画背景图
repaint
；返回
return
:mainkey
；如果按键是i调动xp子函数
&#111;nkey i call xp
；如果按键是d调用dos 子函数
&#111;nkey d call dos
；如果按键是b从硬盘启动
&#111;nkey b boot 80
；如果按键是r重启
&#111;nkey r reboot
；如果按键是t加载txt_main.cmd 脚本，切换到文本模式
&#111;nkey t batch txt_main.cmd
return
:itemdefault
repaint
；在（232,252）用item.bmp覆盖背景图，我们就是利用它来做出菜单的效果
drawimage pixel item.bmp 232 252
；等待按键
getkey
；如果按键是Enter调用xp子函数
&#111;nkey entr call xp
&#111;nkey num_entr call xp
&#111;nkey up goto item5
&#111;nkey down goto item2
call mainkey
；跳到item1loop行
goto item1loop
:item1
repaint
drawimage pixel item.bmp 232 252
:item1loop
getkey
&#111;nkey entr call xp
&#111;nkey num_entr call xp
；利用上下按键来选择不同菜单
&#111;nkey up goto item5
&#111;nkey down goto item2
call mainkey
goto item1loop
:item2
repaint
drawimage pixel item.bmp 232 297
:item2loop
getkey
&#111;nkey entr call dos
&#111;nkey num_entr call dos
&#111;nkey up goto item1
&#111;nkey down goto item3
call mainkey
goto item2loop
:item3
repaint
drawimage pixel item.bmp 232 342
:item3loop
getkey
&#111;nkey entr boot 80
&#111;nkey num_entr boot 80
&#111;nkey up goto item2
&#111;nkey down goto item4
call mainkey
goto item3loop
:item4
repaint
drawimage pixel item.bmp 232 387
:item4loop
getkey
&#111;nkey entr reboot
&#111;nkey num_entr reboot
&#111;nkey up goto item3
&#111;nkey down goto item5
call mainkey
goto item4loop
:item5
repaint
drawimage pixel item.bmp 232 433
:item5loop
getkey
&#111;nkey entr batch txt_main.cmd
&#111;nkey num_entr reboot
&#111;nkey up goto item4
&#111;nkey down goto item1
call mainkey
goto item5loop
:xp
batch xp.cmd
getkey
call drawmenu
return
:dos
batch dos.cmd
getkey
call drawmenu
return
接下来是xp.cmd
:nologo
transparent off
；以xp.bmp重画背景
backgroundimage pixel xp.bmp 0 0
setresolution 800 600 @drawimg
call drawmenu
goto itemdefault
:drawmenu
cls 0
repaint
return
;
:mainkey
；pvlk.bif就是VLK版的XP的引导文件
&#111;nkey entr run pvlk.bif
&#111;nkey num_entr run pvlk.bif
return
;
:itemdefault
repaint
drawimage pixel pvlk.bmp 0 240
getkey
&#111;nkey entr run pvlk.bif
&#111;nkey num_entr run pvlk.bif
&#111;nkey up goto item4
&#111;nkey down goto item2
call mainkey
goto item1loop
;
:item1
repaint
drawimage pixel pvlk.bmp 0 240
:item1loop
getkey
&#111;nkey entr run pvlk.bif
&#111;nkey num_entr run pvlk.bif
&#111;nkey up goto item4
&#111;nkey down goto item2
call mainkey
goto item1loop
;
:item2
repaint
drawimage pixel pvsp.bmp 0 300
:item2loop
getkey
；pvsp.bif是集成SP1的XP的引导文件
&#111;nkey entr run pvsp.bif
&#111;nkey num_entr run pvsp.bif
&#111;nkey up goto item1
&#111;nkey down goto item3
call mainkey
goto item2loop
;
:item3
repaint
drawimage pixel key.bmp 0 360
:item3loop
getkey
&#111;nkey entr goto cdkey
&#111;nkey num_entr goto cdkey
&#111;nkey up goto item2
&#111;nkey down goto item4
call mainkey
goto item3loop
;
:item4
repaint
drawimage pixel back.bmp 0 420
:item4loop
getkey
；如果按键是Enter 加载主菜单脚本diskemu.cmd（从backgroud开始加载，即不显示logo）
&#111;nkey entr batch diskemu.cmd background
&#111;nkey num_entr batch diskemu.cmd background
&#111;nkey up goto item3
&#111;nkey down goto item1
call mainkey
goto item4loop
;
:cdkey
；显示CDKEY
drawimage pixel cdkey.bmp 0 0
getkey
&#111;nkey up goto item2
&#111;nkey down goto item4
接着是DOS工具的菜单dos.cmd大部分命令跟前面一样，可以不看
:nologo
transparent off
backgroundimage pixel dos.bmp 0 0
setresolution 800 600 @drawimg
call drawmenu
goto itemdefault
:drawmenu
cls 0
repaint
return
;
:mainkey
&#111;nkey &#111;nkey entr run dm.ima
&#111;nkey num_entr run dm.ima
return
;
:itemdefault
repaint
drawimage pixel dm.bmp 0 230
getkey 60 entr
&#111;nkey entr run dm.ima
&#111;nkey num_entr run dm.ima
&#111;nkey up goto item6
&#111;nkey down goto item2
call mainkey
goto item1loop
;
:item1
repaint
drawimage pixel dm.bmp 0 230
:item1loop
getkey
&#111;nkey entr run dm.ima
&#111;nkey num_entr run dm.ima
&#111;nkey up goto item6
&#111;nkey down goto item2
call mainkey
goto item1loop
;
:item2
repaint
drawimage pixel pq.bmp 0 270
:item2loop
getkey
&#111;nkey entr run pq.img
&#111;nkey num_entr run pq.img
&#111;nkey up goto item1
&#111;nkey down goto item3
call mainkey
goto item2loop
;
:item3
repaint
drawimage pixel kv.bmp 0 310
:item3loop
getkey
&#111;nkey entr run kv.ima
&#111;nkey num_entr kv.ima
&#111;nkey up goto item2
&#111;nkey down goto item4
call mainkey
goto item3loop
;
:item4
repaint
drawimage pixel rav.bmp 0 350
:item3loop
getkey
&#111;nkey entr run rav.ima
&#111;nkey num_entr rav.ima
&#111;nkey up goto item3
&#111;nkey down goto item5
call mainkey
goto item4loop
;
:item5
repaint
drawimage pixel ghost.bmp 0 390
:item5loop
getkey
&#111;nkey entr run ghost.ima
&#111;nkey num_entr ghost.ima
&#111;nkey up goto item4
&#111;nkey down goto item6
call mainkey
goto item5loop
;
:item6
repaint
drawimage pixel back.bmp 0 430
:item3loop
getkey
&#111;nkey entr batch diskemu.cmd background
&#111;nkey num_entr diskemu.cmd background
&#111;nkey up goto item5
&#111;nkey down goto item1
call mainkey
goto item6loop
;
再来就是文本模式主菜单txt_main.cmd
:nologo
transparent on
setresolution 800 600 8
;设置0号色为黑色
setdac 0 0 0 0
;设置1号色为白色
setdac 1 255 255 255
;设置2号色
setdac 2 33 137 146
;设置3号色
setdac 3 237 28 36
;设置4号色
setdac 4 255 255 0
；设置背景色为2号色
backcolor 2
设置前景色为1号色
forcolor 1
；设置倒计时显示位置(这里按行列)
timerpos 42 22
；以3号色显示倒计时
timercolor 3 @auto
；设置进度条位置
processparam 4 0 35 29 65 29
；设置菜单条位置
menubar 35 65
；设置菜单条颜色
menucolor 1 2 @auto
call drawmenu
goto item1
:drawmenu
cls
print
print
print
print
print
print
print
print
print
print
print
print ===================================
print Terry's Bootable CD
print ===================================
print
print 1. Install Windows XP
print 2. Dos Tools
print 3. Boot from Hard-Disk
print 4. Reboot
print 5. Gui Mode
print
print ===================================
print There is seconds left
print
print Enter your choice:_
print
return
:mainkey
&#111;nkey 1 batch txt_xp.cmd
&#111;nkey 2 batch txt_dos.cmd
&#111;nkey 3 boot 80
&#111;nkey 4 reboot
&#111;nkey 5 batch diskemu.cmd background
return
;
:item1
；加亮15行（即菜单处于选中状态）
highlight 15
；等待按键，45秒后自动以Enter作为默认
getkey showtime showprocess 45 entr
&#111;nkey entr batch txt_xp.cmd
&#111;nkey up goto item5
&#111;nkey down goto item2
call mainkey
goto item1
;
:item2
highlight 16
getkey showtime showprocess 45 entr
&#111;nkey entr batch txt_dos.cmd
&#111;nkey up goto item1
&#111;nkey down goto item3
call mainkey
goto item2
;
:item3
highlight 17
getkey showtime showprocess 45 entr
&#111;nkey entr boot 80
&#111;nkey up goto item2
&#111;nkey down goto item4
call mainkey
goto item3
;
:item4
highlight 18
getkey showtime showprocess 45 entr
&#111;nkey entr reboot
&#111;nkey up goto item3
&#111;nkey down goto item5
call mainkey
goto item4
;
:item5
highlight 19
getkey showtime showprocess 45 entr
&#111;nkey entr batch diskemu.cmd background
&#111;nkey up goto item4
&#111;nkey down goto item1
call mainkey
goto item5
;
文本子菜单txt_xp.cmd
:nologo
transparent on
setresolution 800 600 8
;black
setdac 0 0 0 0
;white
setdac 1 255 255 255
setdac 2 33 137 146
;red
setdac 3 237 28 36
;yellow
setdac 4 255 255 0
backcolor 2
forcolor 1
timerpos 42 21
timercolor 3 @auto
processparam 4 0 35 29 65 29
menubar 35 65
menucolor 1 2 @auto
call drawmenu
goto item1
:drawmenu
cls
print
print
print
print
print
print
print
print
print
print
print
print ===================================
print Terry's Bootable CD
print ===================================
print
print 1.Windows XP PRO VLK
print 2.Windows XP PRO VLK(MSDN+SP1)
print 3.CD-Keys
print 4.Back
print
print ===================================
print There is seconds left
print
print Enter your choice:_
print
return
:mainkey
&#111;nkey 1 run pvlk.bif
&#111;nkey 2 run pvsp.bif
&#111;nkey 3 goto cdkey
&#111;nkey 4 batch txt_main.cmd
return
;
:item1
highlight 15
getkey showtime showprocess 45 entr
&#111;nkey entr run pvlk.bif
&#111;nkey up goto item4
&#111;nkey down goto item2
call mainkey
goto item1
;
:item2
highlight 16
getkey showtime showprocess 45 entr
&#111;nkey entr run pvsp.bif
&#111;nkey up goto item1
&#111;nkey down goto item3
call mainkey
goto item2
;
:item3
highlight 17
getkey showtime showprocess 45 entr
&#111;nkey entr goto cdkey
&#111;nkey up goto item2
&#111;nkey down goto item4
call mainkey
goto item3
;
:item4
highlight 18
getkey showtime showprocess 45 entr
&#111;nkey entr batch txt_main.cmd
&#111;nkey up goto item3
&#111;nkey down goto item1
call mainkey
goto item4
;
:cdkey
cls
print
print
print
print
print
print
print
print
print
print
print
print Windows XP Pro VLK:
6YDH3-GPKVM-2DX3V-WDXQM-BHWGJ
print
print
22DVC-GWQW7-7G228-D72Y7-QK8Q3
print
print
22WXC-BDHBH-D6XTY-8V7FC-6YCW3
print
print
233WJ-DKFJ6-XK772-KRDKX-MR3J6
print
print
24WPT-3PJ23-77HR7-3PRQH-M9GFD
print
print
273M3-4KG6D-34MMY-XYFWF-2P4VY
getkey
cls
goto drawmenu
goto item1
;
文本子菜单txt_dos.cmd
:nologo
transparent on
setresolution 800 600 8
;black
setdac 0 0 0 0
;white
setdac 1 255 255 255
setdac 2 33 137 146
;red
setdac 3 237 28 36
;yellow
setdac 4 255 255 0
backcolor 2
forcolor 1
timerpos 42 23
timercolor 3 @auto
processparam 4 0 35 29 65 29
menubar 35 65
menucolor 1 2 @auto
call drawmenu
goto item1
:drawmenu
cls
print
print
print
print
print
print
print
print
print
print
print
print ===================================
print Terry's Bootable CD
print ===================================
print
print 1.Disk Manager 9.56
print 2.Partition Magic 8.01
print 3.KV 2003
print 4.RAV 2003
print 5.Ghost 2003
print 6.Back
print
print ===================================
print There is seconds left
print
print Enter your choice:_
print
return
:mainkey
&#111;nkey 1 run dm.ima
&#111;nkey 2 run pq.ima
&#111;nkey 3 run kv.ima
&#111;nkey 4 run rav.ima
&#111;nkey 5 run ghost.ima
&#111;nkey 6 batch txt_main.cmd
return
;
:item1
highlight 15
getkey showtime showprocess 45 entr
&#111;nkey entr run dm.ima
&#111;nkey up goto item6
&#111;nkey down goto item2
call mainkey
goto item1
;
:item2
highlight 16
getkey showtime showprocess 45 entr
&#111;nkey entr run pq.ima
&#111;nkey up goto item1
&#111;nkey down goto item3
call mainkey
goto item2
;
:item3
highlight 17
getkey showtime showprocess 45 entr
&#111;nkey entr run kv.ima
&#111;nkey up goto item2
&#111;nkey down goto item4
call mainkey
goto item3
;
:item4
highlight 18
getkey showtime showprocess 45 entr
&#111;nkey entr run rav.ima
&#111;nkey up goto item3
&#111;nkey down goto item5
call mainkey
goto item4
;
:item5
highlight 19
getkey showtime showprocess 45 entr
&#111;nkey entr run ghost.ima
&#111;nkey up goto item4
&#111;nkey down goto item6
call mainkey
goto item5
;
:item6
highlight 20
getkey showtime showprocess 45 entr
&#111;nkey entr batch txt_main.cmd
&#111;nkey up goto item5
&#111;nkey down goto item1
call mainkey
goto item6
;
附图(大图是原图的一半，小图无缩
放)：
logo.bmp:
bg.bmp:
xp.bmp:
pvlk.bmp:
pvsp.bmp:
key.bmp:
back.bmp:
cdkey.bmp:
dos.bmp:
dm.bmp:
pq.bmp:
kv.bmp:
rav.bmp:
ghost.bmp:
下面是启动效果：
图形安装界面1:
图形安装界面2:
图形安装界面3:
文本安装界面1:
文本安装界面2:
文本安装界面3: