Project1

标题: 如何制作出系统弹窗用于meta类游戏 [打印本页]

作者: SleepyCobalt 时间: 2020-8-22 22:19
标题: 如何制作出系统弹窗用于meta类游戏
本帖最后由 SleepyCobalt 于 2020-8-22 22:30 编辑

想知道怎么在xp里做出系统弹窗，像是oneshot那样的

2345截图20200822222945.png (223.35 KB, 下载次数: 45)

作者: soulsaga 时间: 2020-8-22 23:13

RUBY 代码复制

def 弹窗(wnd, text, caption, type = MB_OK) 
        messagebox = Win32API.new('user32', 'MessageBox', %w(p p p i), 'i')    
        messagebox.call(wnd, text, caption, type)   
      end

def 弹窗(wnd, text, caption, type = MB_OK) 


        messagebox = Win32API.new('user32', 'MessageBox', %w(p p p i), 'i')    


        messagebox.call(wnd, text, caption, type)   


      end

事件脚本里用
w = 弹窗(0,"你确定要自杀吗","",4)
p "你选自杀" if w == 6
p "你选不自杀" if w == 7

作者: guoxiaomi 时间: 2020-8-23 22:06
补充一下楼上，关于 MessageBox 的type和返回值可以参见：https://docs.microsoft.com/en-us ... -winuser-messagebox

作者: SleepyCobalt 时间: 2020-8-23 22:10
本帖最后由 SleepyCobalt 于 2020-8-23 22:17 编辑

soulsaga 发表于 2020-8-22 23:13
def 弹窗(wnd, text, caption, type = MB_OK)
messagebox = Win32API.new('user32', 'MessageBox' ...

谢谢啦，可以再问一下怎么读取电脑用户名以在游戏里显示吗，还有这个弹窗怎么做成不是“是”“否”选项，而是只有一个框

作者: SleepyCobalt 时间: 2020-8-23 22:20

guoxiaomi 发表于 2020-8-23 22:06
补充一下楼上，关于 MessageBox 的type和返回值可以参见：https://docs.microsoft.com/en-us/windows/win32 ...

谢谢，打算要学的，现在还什么都看不懂（笑哭）

作者: soulsaga 时间: 2020-8-23 22:20
本帖最后由 soulsaga 于 2020-8-23 22:22 编辑

SleepyCobalt 发表于 2020-8-23 22:10
谢谢啦，可以再问一下怎么读取电脑用户名以在游戏里显示吗，还有这个弹窗怎么做成不是“是”“否”选项， ...

https://rpg.blue/thread-404514-1-1.html

ENV['UserName']

作者: SleepyCobalt 时间: 2020-8-23 22:37

soulsaga 发表于 2020-8-23 22:20
https://rpg.blue/thread-404514-1-1.html

ENV['UserName']

这个是不能用在弹窗里的吗，试了试在显示文章有用，弹窗用不了

作者: soulsaga 时间: 2020-8-23 23:14
本帖最后由 soulsaga 于 2020-8-23 23:29 编辑

SleepyCobalt 发表于 2020-8-23 22:37
这个是不能用在弹窗里的吗，试了试在显示文章有用，弹窗用不了

RUBY 代码复制

a=ENV['UserName'].dup
w = 弹窗(0,a,"",4)
p "你选自杀" if w == 6 
p "你选不自杀" if w == 7

a=ENV['UserName'].dup


w = 弹窗(0,a,"",4)


p "你选自杀" if w == 6 


p "你选不自杀" if w == 7

弹窗要这样写..

作者: SleepyCobalt 时间: 2020-8-23 23:31

soulsaga 发表于 2020-8-23 23:14
a=ENV['UserName'].dup
w = 弹窗(0,a,"",4)
p "你选自杀" if w == 6

了解了！谢谢

欢迎光临 Project1 (https://rpg.blue/)