无忧启动论坛

标题: dos下批处理也能实现立体窗口效果2010.06.30 [打印本页]

作者: dos时代菜鸟 时间: 2010-6-29 19:15
标题: dos下批处理也能实现立体窗口效果2010.06.30
用批处理也可以实现 dos下窗口的立体效果

winx.awk 用于为窗口勾画边框，呈现立体效果
2010.06.30 调整软盘中文件放置，用GAWK2.15替换AWK2000版。
软盘影像：http://u.115.com/file/f5f4b9c385
winx2.rar
winx.vfd.gz 内容：
A:\DOS\WINX.AWK 一个AWK脚本，用于调用UCDOS特显实现屏幕指定区域画框功能
A:\dos\awk.exe 文本流处理工具相当于一个小型计算机语言
A:\DOS\CHOIX.COM 用于获取用户键盘鼠标按键
A:\DOS\CTMOUSE.EXE DOS鼠标驱动
A:\DOS\EDIT.COM  DOS文本编辑器
A:\DOS\INPUT.COM 要求用户在屏幕指定位置进行内存变量赋值
A:\DOS\WBAT.COM  DOS下文本窗口设计工具，这里用它的 TEXT 功能
A:\DEMO\TESTWINX.BAT WINX.AWK应用展示
A:\DEMO\XYDEMO.BAT WINX.AWK应用展示（交互实现获取 X*Y 的值）
A:\demo\m.bat       winx.awk 应用展示（呈现类win开始菜单）
A:\UCDOS\*.* 带特显和UCMOUSE功能的UCDOS98

涉及软件：
1、带有特显更能和ucmouse的ucdos
2、wbat
3、awk
4、choix
5、ctmouse

使用方法步骤
1.UCDOS 调用汉字系统和特显功能
RD16
KNL
RDFNT
TX

2.鼠标调用
CTMOUSE
UCMOUSE

3.WBAT的使用
WBAT TEXT 2,6 (BLUE ON WHITE) "DAFDSAFDASFDASF"
实现将指定文本内容显示在指定屏幕区域

4.AWK的使用通过 winx.awk 脚本实现对屏幕指定区域画立体边框
ECHO.|AWK -f winx.awk -v x=2 y=6 h=1 l=15 ok=0
实现把屏幕第2 行第6列开始高度为1行宽度为15字符的区域画一个突起效果的边框

5.choix的使用
choix /c:o /m /n /s
等待用户通过键盘输入“o” 或者通过鼠标在屏幕上点击字母"o" .唯一比choic 强大的地方就是可以等待用户鼠标点取字母。

[ 本帖最后由 dos时代菜鸟于 2010-6-30 14:52 编辑 ]

winx1.jpg (35.25 KB, 下载次数: 72)

winx2.JPG (36.14 KB, 下载次数: 69)

winx3.JPG (35.08 KB, 下载次数: 72)

作者: dos时代菜鸟 时间: 2010-6-29 19:25
更新 winx.awk

winx.awk 的使用：用于为一定区域画框，呈现立体窗体效果
echo.|awk -f winx.awk -v x=? y=? h=? l=? ok=? C=?
ok 包含五个参数 0 1 2 3 4  分别表示：
0 外围一圈画框，用于窗体和简单自制按钮外框突起
1 为0生成的窗体补框使其呈现被按下的效果凹陷
2 外围2圈画框，主要转对 wbat 单个按钮设置  突起要求 wbat按钮中 box 前景色与wbat.ini设置一致
3 在一定范围逐行呈现按钮效果是0的循环    突起
4 在一定范围清屏 C 为颜色                      注意C要大写
5 在一定范围呈现隔行按钮效果是2的循环突起此时h为按钮个数最多12个一列
事例：
echo.|awk -f winx.awk -v x=2 y=2 h=5 l=10 ok=5
表示在第2行第2列开始连续隔行勾画5个宽度为10字符的按钮边框

附上一个身份证号码所在地查询
http://u.115.com/file/f551cddfdb
sfz.vfd

[ 本帖最后由 dos时代菜鸟于 2010-7-5 10:01 编辑 ]

附件
2010-7-5 09:57

sfz1.JPG (15.03 KB)

2010-7-5 09:57

sfz2.JPG (15.77 KB)

[ 本帖最后由 dos时代菜鸟于 2010-7-5 10:03 编辑 ]

作者: chenshipeng 时间: 2010-6-29 20:41
相当强悍，下下来学习了。

作者: dos时代菜鸟 时间: 2010-6-29 23:34
关键在于这个 winx.awk
是大批量改造出立体窗体效果成为一件非常简单的事情。只需要一条命令，就可以把wbat的 text 输出改造成立体化。

作者: ziyun 时间: 2010-6-30 07:10
收藏备用了!谢谢楼主分享!

作者: 超级坏蛋 时间: 2010-6-30 07:52
资源占用情况如何。？

作者: dos时代菜鸟 时间: 2010-6-30 08:38

原帖由 超级坏蛋 于 2010-6-30 07:52 发表
资源占用情况如何。？

我的工具箱中 gdi 界面就是基于这个原理制作
awk 运行后立即退出，不占用资源，ucdos 对内存的适应性更是没得说，rdfnt/tx/ucmouse这三个程序会驻留内存提供图形接口支持。
ucdos各个组件内存占用情况表：
RD16             12K 内核
KNL                37K 内核
RDFNT          15K 打印字体驱动
TX                17K 特显驱动
UCMOUSE       3K    图形鼠标借口
PY                26K 拼音输入法

AWK 2000年版本          74K
GAWK 2.15                   243K

可见，要实现立体窗体功能 RDFNT/TX/UCMOUSE 三个组件多占用内存资源 35K ,而GAWK 运行以后会立即撤离内存。
如果加载了HIMEM.SYS 等内存管理模块，实现预期功能并不消耗太多系统资源。

如果挂载 emm386 ram 模式，再通过 ucdos 的 emb 管理内存，RDFNT+TX+UCMOUSE+PY 将只占用12K常规内存。

[ 本帖最后由 dos时代菜鸟于 2010-6-30 10:46 编辑 ]

作者: jszforms 时间: 2010-6-30 10:09
好资料，收藏学习，这种资料太少了

作者: dos时代菜鸟 时间: 2010-6-30 14:54
http://u.115.com/file/f5f4b9c385
winx2.rar

更新：
1、winx.awk 内部坐标进行微调
2、增加一个 demo\m.bat 展示脚本，实现类win95开始菜单效果。

作者: dos时代菜鸟 时间: 2010-6-30 15:40
m.bat 内容如下：
-------------------------------------------------
@echo off
set tz=
:top
cls
wbat cls (blue on cyan)
wbat text 25,2 (blue on white) @a:\demo\m.bat:0
echo.|awk -f a:\dos\winx.awk -v x=25 y=2 h=1 l=79
echo.|awk -f a:\dos\winx.awk -v x=25 y=2 h=1 l=10
echo.|awk -f a:\dos\winx.awk -v x=25 y=80 h=1 l=1
choix /C:m. /m /n /s >nul
if errorlevel 2 goto end
wbat text 22,2 (blue on white) @a:\demo\m.bat:1
echo.|awk -f a:\dos\winx.awk -v x=22 y=2 h=3 l=10
set x=22
:loop1
echo.|awk -f a:\dos\winx.awk -v x=%x% y=2 h=1 l=10
echo.|awk '{print "set x="%x%+1}'>n.bat
call n.bat
if %x%*==25* goto end1
goto loop1
:end1
echo y|del n.bat >nul
set h=
set tz=
choix /C:fex /M /N /S >NUL
IF ERRORLEVEL 3 goto x
if errorlevel 2 goto e
if errorlevel 1 goto f
goto end
:f
set tz="f"
goto tz
:e
set tz="e"
goto tz
:x
set tz="x"
goto tz
:tz
wbat text 5,10 (+white on blue) @a:\demo\m.bat:tz0
wbat text 6,10 (blue on white ) @a:\demo\m.bat:tz1
echo.|awk -f a:\dos\winx.awk -v x=5 y=10 h=4 l=21
wbat text 7,23 (+red on white) "o"
echo.|awk -f a:\dos\winx.awk -v x=7 y=22 h=1 l=7
wbat text 5,30 (black on white) "x"
echo.|awk -f a:\dos\winx.awk -v x=5 y=30 h=1 l=1
choix /c:xo /m /n /s >nul
if errorlevel 1 set tzx=x
if errorlevel 2 set tzx=o
if %tzx%*==o* echo.|awk -f a:\dos\winx.awk -v x=7 y=22 h=1 l=7 ok=1
if %tzx%*==x* echo.|awk -f a:\dos\winx.awk -v x=5 y=30 h=1 l=1 ok=1
wbat text 10,10 (red on cyan) "按任意键继续"
pause>nul
if %tz%*==x.退出* goto end
set tz=
goto top
:0
(m)主菜单按"m"键盘开始                                                 .
:1
f.文件
e.编辑
x.退出
:tz0
通知             .
:tz1
你选择了 %tz%
         o.确定
                  .
:1_end

:end
cls
wbat cls (blue on cyan)
set tz=

作者: netwinxp 时间: 2010-6-30 16:13
两像素的白+黑视觉效果要比一像素白+黑外套一像素白框好，你可以看看windows里面的窗口、按钮控件是不是酱紫。

作者: dos时代菜鸟 时间: 2010-6-30 22:18

原帖由 netwinxp 于 2010-6-30 16:13 发表
两像素的白+黑视觉效果要比一像素白+黑外套一像素白框好，你可以看看windows里面的窗口、按钮控件是不是酱紫。

修改边框颜色，可以自行修改 winx.awk .
用1像素勾勒边框是因为不想破坏汉字。dos下choix 只能获取屏幕上文本文字，而用作图方式画上的文字无法通过choix+鼠标截获。这也是为什么用wbat 的text 输出文本的原因。
每个汉字固定就占用那么几个像素，在文字边勾画边框本身已经侵占了文字范围，用2像素效果固然好，但是文字笔划也有可能被画掉，不美观。

[ 本帖最后由 dos时代菜鸟于 2010-7-1 14:59 编辑 ]

作者: qazwsx24 时间: 2010-7-2 08:03
不错不错，想不到现在在Windows横行的时间里，能再次看到DOS往日的辉煌，感觉真爽

作者: dos时代菜鸟 时间: 2010-7-5 09:57
更新 winx.awk

winx.awk 的使用：用于为一定区域画框，呈现立体窗体效果
echo.|awk -f winx.awk -v x=? y=? h=? l=? ok=? C=?
ok 包含五个参数 0 1 2 3 4  分别表示：
0 外围一圈画框，用于窗体和简单自制按钮外框突起
1 为0生成的窗体补框使其呈现被按下的效果凹陷
2 外围2圈画框，主要转对 wbat 单个按钮设置  突起要求 wbat按钮中 box 前景色与wbat.ini设置一致
3 在一定范围逐行呈现按钮效果是0的循环    突起
4 在一定范围清屏 C 为颜色                      注意C要大写
5 在一定范围呈现隔行按钮效果是2的循环突起此时h为按钮个数最多12个一列
事例：
echo.|awk -f winx.awk -v x=2 y=2 h=5 l=10 ok=5
表示在第2行第2列开始连续隔行勾画5个宽度为10字符的按钮边框

附上一个身份证号码所在地查询
http://u.115.com/file/f551cddfdb
sfz.vfd

[ 本帖最后由 dos时代菜鸟于 2010-7-5 10:01 编辑 ]

sfz1.JPG (15.03 KB, 下载次数: 58)

sfz2.JPG (15.77 KB, 下载次数: 57)

作者: 2010玩玩玩 时间: 2010-8-3 23:45
才发现这个，但下不了了。有的兄弟PM偶个下载地址

作者: dos时代菜鸟 时间: 2010-8-4 00:35

原帖由 2010玩玩玩 于 2010-8-3 23:45 发表
才发现这个，但下不了了。有的兄弟PM偶个下载地址

http://u.115.com/file/f551cddfdb
sfz.vfd

欢迎光临无忧启动论坛 (http://wuyou.net./)