习语言轻轻松松学编程(二) 小小恶作剧程序
http://img313.ph.126.net/cgmuDnoEZQPm2hXsp0QaRA==/3681692695375682850.jpg【 习语言示例代码-视窗测试1_1.习 作者:微风2010.6 梦飞翔创作坊 2007-2010 】
【 本程序实现:打开虚拟显示器,通过定时器控制显示器显示和隐藏,用户按特定键后关闭显示器
本程序使用 习语言1.5版 以上版本编译】
#包含 "习语言系统.接口"
#包含 “习语言视窗.接口”
【=====全局参数=====】
整数类型显示器状态 = 0;
整数类型定时器回调 ( 双字类型 定时器号码 )
{
整数类型 结果= -1;
如果( 显示器状态 等于 1 ) {
结果 = 图形设置显示器状态( ‘隐藏’);
显示器状态 = 0;
}否则{
结果 = 图形设置显示器状态( ‘显示’);
显示器状态 = 1;
}
返回 0;
}
【 主程序 】
整数类型 主函数( 整数类型 参数个数, 字符类型 *参数表[])
{
整数类型 键码;
图形初始化显示器( 空指针, 320, 240,空指针, 0, 空指针);
图形打开显示器();
显示器状态 = 1;
图形输出文字(10, 30 ,“哈哈,你好,握个手吧!”);
图形输出文字(10, 200 ,“按‘1’键退出”);
图形初始化定时器( 定时器回调);
图形创建定时器(定时器1, 2000 );
重复{
键码 = 获取按键();
}当(键码 && 键码 != ‘1’ );
图形销毁定时器( 定时器1);
图形关闭显示器();
返回 0;
}
习语言视窗.接口??? 这个好玩呀 呵呵呵
:)
页:
[1]