柳之一 发表于 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

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

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

1. tb = Time.now

复制代码

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

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

支持一下。

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

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