Project1

标题: 定时领取物品。 [打印本页]

作者: 弗雷德 时间: 2013-8-9 02:52
标题: 定时领取物品。
本帖最后由弗雷德于 2013-8-9 02:57 编辑

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

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

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

作者: 紫英晓狼1130 时间: 2013-8-9 05:36
熊叔真厉害，研究一下

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

作者: 化螺耕 时间: 2013-8-9 09:03
熊叔威武啊~~~~~抱走了

作者: A龙之翱翔A 时间: 2013-8-9 09:49
支持一下。

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

作者: 怪蜀黍 时间: 2013-8-9 10:01

tb = Time.now

复制代码

大家快来修改系统时间，疯狂领取游戏礼包！

顺便支持熊叔了！

作者: flancelot 时间: 2013-8-9 11:24
我觉得这个似乎挺有用的。。。

作者: chd114 时间: 2013-8-9 11:50
不同档位的话定时领取会不会时间乱套？

作者: 柳之一 时间: 2013-8-9 17:22
本帖最后由柳之一于 2013-8-9 17:24 编辑

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

作者: end55rpg 时间: 2013-8-9 18:34
本帖最后由 end55rpg 于 2013-8-9 18:35 编辑

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

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

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