北大侠客行MUD论坛

 找回密码
 注册
搜索
热搜: 新手 wiki 升级
查看: 3628|回复: 2

一個mush 的小玩意兒...

[复制链接]
发表于 2009-12-30 00:10:09 | 显示全部楼层 |阅读模式
  1. sub hideMainWindow {
  2.     my $positionString = GetMainWindowPosition();
  3.     my ($left, $top, $width, $height) = split /,/, $positionString;

  4.     if ($left + $width > 0 or $top + $height > 0) {

  5.         #-------------------------
  6.         # if visiable we will hide the main window
  7.         #-------------------------
  8.         MoveMainWindow(-1 * $width - $left, -1 * $height - $top, $width, $height);
  9.     }
  10.     else {

  11.         #-------------------------
  12.         # if invisiable we move the main window that can be visiable
  13.         #-------------------------
  14.         MoveMainWindow(-1 * ($left + $width), -1 * ($height + $top), $width, $height);
  15.     }
  16. }
复制代码
北大侠客行Mud(pkuxkx.com),最好的中文Mud游戏!
发表于 2009-12-30 13:42:46 | 显示全部楼层
呵呵,终于有perl的脚本了。

MUSH支持的:VBScript, JScript, LUA, PerlScript, PHPScript, Python 这里全有了,就差 Tcl 和 Ruby 的了。
北大侠客行Mud(pkuxkx.com),最好的中文Mud游戏!
发表于 2009-12-30 13:56:23 | 显示全部楼层
原帖由 ddid 于 2009-12-30 01:42 PM 发表
呵呵,终于有perl的脚本了。

MUSH支持的:VBScript, JScript, LUA, PerlScript, PHPScript, Python 这里全有了,就差 Tcl 和 Ruby 的了。


我是PHP代表....嘿嘿..
北大侠客行Mud(pkuxkx.com),最好的中文Mud游戏!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|北大侠客行MUD ( 京ICP备16065414号-1 )

GMT+8, 2024-11-2 01:23 AM , Processed in 0.014554 second(s), 14 queries .

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表