定时领取物品。

弗雷德

每日礼包.rar (189.36 KB, 下载次数: 231)

2013-8-9 02:47 上传

点击文件名下载附件

XP提问区有人问到这个系统，觉得挺有意思的，就写了一个。
因为是读取当前时间作判断的，所以就没必要放效果图了。
脚本很简单，总共就十几行的事，不过为了方便小白，所以就写成了插件。
首先将脚本复制在main之上，之后自己设定脚本中的内容。
GDSWITCH = 49  #是否可以接受礼包的开关
RXNAME = "xxx" #存档名字不要去掉双引号！
WTIME = 10 #默认间隔10秒，一天是86400秒

事情设定如图所示，开关根据脚本中的设定修改就可以了。


不过实在不明白这个系统放在单机游戏中有什么意义……可能还是有人会跟那个提问者有一样的奇葩想法吧……

end55rpg

柳之一 发表于 2013-8-9 17:22
rm端
module Wininet
  module_function

其实服务器不必吧，可能你的免费个人空间更先倒闭。。。直接读取别人的吧

柳之一

rm端

RUBY 代码复制

module Wininet
  module_function
  def get_http_request(url)
    internetOpen = Win32API.new("wininet.dll","InternetOpen","plppl","l")
    internetOpenUrl = Win32API.new("wininet.dll","InternetOpenUrl","lppllp","l")
    internetReadFile = Win32API.new("wininet.dll","InternetReadFile","lplp","i")
    internetCloseHandle = Win32API.new("wininet.dll","InternetCloseHandle","l","l")
 
    buffer_size = 1024
 
    return_buffer = ''
 
    session = internetOpen.call('RGSS Agent',1,nil,nil,0)
    file = internetOpenUrl.call(session,url,nil,0,0,0)
    loop do
      buf = ' ' * buffer_size
      n = 0
      out = [n].pack('i!')
      result = internetReadFile.call(file,buf,buffer_size,out)
      n = out.unpack('i!')[0]
      if result and n == 0
        break
      end
      return_buffer += buf[0,n]
    end
    internetCloseHandle.call(file)
    internetCloseHandle.call(session)
 
    return return_buffer
  end
end

module Wininet


  module_function


  def get_http_request(url)


    internetOpen = Win32API.new("wininet.dll","InternetOpen","plppl","l")


    internetOpenUrl = Win32API.new("wininet.dll","InternetOpenUrl","lppllp","l")


    internetReadFile = Win32API.new("wininet.dll","InternetReadFile","lplp","i")


    internetCloseHandle = Win32API.new("wininet.dll","InternetCloseHandle","l","l")


 


    buffer_size = 1024


 


    return_buffer = ''


 


    session = internetOpen.call('RGSS Agent',1,nil,nil,0)


    file = internetOpenUrl.call(session,url,nil,0,0,0)


    loop do


      buf = ' ' * buffer_size


      n = 0


      out = [n].pack('i!')


      result = internetReadFile.call(file,buf,buffer_size,out)


      n = out.unpack('i!')[0]


      if result and n == 0


        break


      end


      return_buffer += buf[0,n]


    end


    internetCloseHandle.call(file)


    internetCloseHandle.call(session)


 


    return return_buffer


  end


end

服務端time.php

PHP 代码复制

<?php
echo "<time>".date("Y-m-d")."</time>";
?>

<?php


echo "<time>".date("Y-m-d")."</time>";


?>

url = ''http://www.xxx.com/time.php'
page = Wininet.get_http_request(url)
if page =~ /<time>(.*)<\/time>/i
  p $1
end

chd114

不同档位的话定时领取会不会时间乱套？

flancelot

我觉得这个似乎挺有用的。。。

怪蜀黍

1. tb = Time.now

复制代码

大家快来修改系统时间，疯狂领取游戏礼包！
顺便支持熊叔了！

end55rpg

俺来找茬：tb = Time.now
会出现可怕的后果。。（不爆光了
你需要使用http读取列如百度之类的时间aspphp进行匹配之后获取准确时间

A龙之翱翔A

支持一下。

化螺耕

熊叔威武啊~~~~~抱走了

wingzeroplus

我觉得如果要说唯一的意义的话——设置一个随机领取内容的效果，防止玩家SL大法
真是这样的话，要么道具不是很重要 = 闲着蛋疼
重要道具的话 = 破坏平衡+流失玩家
总之跟熊叔说一样，一个没什么很大意义的东西