轻轻松松学编程(二） 小小恶作剧程序

【 习语言示例代码-视窗测试1_1.习      作者：微风  2010.6   梦飞翔创作坊 2007-2010   习语言编程实验室 QQ群：61440235 】

【 本程序实现：打开虚拟显示器，通过定时器控制显示器显示和隐藏，用户按特定键后关闭显示器  
   本程序使用 习语言1.5版 以上版本编译  】

#包含 "习语言系统.接口"
#包含 “习语言视窗.接口”

【=====全局参数=====】
整数类型  显示器状态 = 0；

整数类型  定时器回调 ( 双字类型 定时器号码 )
{
 整数类型 结果= -1；
 如果（ 显示器状态 等于 1 ） {
  结果 = 图形设置显示器状态( ‘隐藏’)；
  显示器状态 = 0；
 }否则{
  结果 = 图形设置显示器状态( ‘显示’)；
  显示器状态 = 1；
 }
 返回 0；
}

【 主程序 】
整数类型 主函数（ 整数类型 参数个数, 字符类型 *参数表[]）
{
 整数类型 键码；
 
 图形初始化显示器( 空指针， 320, 240，空指针， 0， 空指针);
 图形打开显示器();
 显示器状态 = 1；
 图形输出文字(10, 30 ，“哈哈，你好，握个手吧！”);
 图形输出文字(10, 200 ，“按‘1’键退出”);
 图形初始化定时器（ 定时器回调）；
 图形创建定时器（定时器1， 2000 ）；
 重复{
  键码 = 获取按键()；
 }当（键码 && 键码 ！= ‘1’ ）；
 图形销毁定时器（ 定时器1）；
 图形关闭显示器()；
 返回 0;
}