设为首页收藏本站|繁體中文

Project1

 找回密码
 注册会员
搜索
查看: 2039|回复: 5
打印 上一主题 下一主题

[已经过期] 【双蛋活动】用Ruby对文学作品重创作

[复制链接]

Lv3.寻梦者

梦石
0
星屑
1195
在线时间
1564 小时
注册时间
2008-7-30
帖子
4418

贵宾

跳转到指定楼层
1
发表于 2010-12-24 20:34:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

加入我们,或者,欢迎回来。

您需要 登录 才可以下载或查看,没有帐号?注册会员

x
本帖最后由 DeathKing 于 2010-12-24 21:04 编辑

Perl可以写诗,Emacs可以煮咖啡。那么,Ruby呢?

我们不妨用Ruby来进行文学创作吧!这会很有趣哦!

要求只有3点

    1、没有语法错误(可以被正常解释);
    2、没有偏离作品原意;
    3、附上母版文学作品地址或选段。

然后看谁的最富有创意,并让我们用投票产生优胜者!获得丰厚的奖励。
提交的多段代码以得分最高的为准。

奖励:

    第一名:5VIP
    第二名:4VIP
    第三名:3VIP
    参与奖:666经验


Sample By me
  1. # 准备部分
  2. Mind = Module.new{def self.nobler?;true;end}
  3. Question = Class.new
  4. Sea = Class.new{attr_accessor  :troubles}
  5. sea = Sea.new
  6. this = Question.new
  7. def suffer(*args);end
  8. def self.against(*args);end
  9. def by_end(who);end
  10. _2b = 0
  11. # 《哈姆雷特》
  12. _2b || !(_2b)
  13. this.is_a? Question
  14. suffer((:sling and :arrows)) if Mind.nobler?
  15. self.against( sea.troubles, :by => :take_arms )
  16. by_end("them"){ {:to => :die, :to => :sleep} }
复制代码

To be, or not to be: that is the question:
Whether 'tis nobler in the mind to suffer
The slings and arrows of outrageous fortune,
Or to take arms against a sea of troubles,
And by opposing end them. To die: to sleep;

生存或毁灭, 这是个必答之问题:
是否应默默的忍受坎苛命运之无情打击,
还是应与深如大海之无涯苦难奋然为敌,
并将其克服。




参考资料:
Emacs真能煮咖啡么:http://www.cppblog.com/xguru/archive/2010/07/27/121416.html
Perl诗歌:http://bbs.linuxpk.com/thread-4169-1-1.html

点评

我等脚本盲望而却步……  发表于 2010-12-24 21:06

Lv2.观梦者 (管理员)

八云紫的式神

梦石
0
星屑
614
在线时间
1243 小时
注册时间
2008-1-1
帖子
4282

烫烫烫

2
发表于 2010-12-24 20:40:17 | 只看该作者
之前写MGM的时候写出来的个绕口令
  1. @file = file if File.file? file
复制代码
这个在涉及到文件的类初始化时经常用,传递进一个局部变量file,如果这个文件存在就存入@file
放在一个带file参数的方法里即可通过编译,例如
  1. def file=(file)
  2.   @file = file if File.file? file
  3. end
复制代码
rm for linux(wine)制作中,期待夏娜SAMA能实现到webrm上
回复 支持 反对

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
90
在线时间
308 小时
注册时间
2010-8-10
帖子
794
3
发表于 2010-12-24 20:41:06 | 只看该作者
本帖最后由 不是马甲 于 2010-12-26 12:25 编辑

重新写了一下,自己编了一个诗歌 (囧,那是诗歌吗?!)
放在rmvx无错误
  1.   def love
  2.     if the world? or @people_live != true
  3.       @nothing_love = false
  4.     else
  5.       love = $peole_live.arround?(@me, @you)
  6.       if like and love?
  7.         @the_world = true
  8.       elsif not love
  9.         @Heaven and earth suddenly darkness  = true
  10.       end
  11.     end
  12.   end
复制代码
  1. 如果我们在世界,
  2.     或有人在我们身边。
  3.   我们的身边将不会没有爱。

  4. 爱,你我身边的人们;
  5.    爱,使世界变得真实;
  6.    若果没有爱,
  7.         世界将一片黑暗。
复制代码

点评

不是这个意思啊,是指ruby语句看起来是诗歌,而不是结果,参考主楼或5楼  发表于 2010-12-26 08:39
试试放到RGSS或Ruby中运行,看有没有错误,否则是不算的哦~~  发表于 2010-12-24 21:13
回复 支持 反对

使用道具 举报

Lv3.寻梦者

梦石
0
星屑
4427
在线时间
1911 小时
注册时间
2010-12-21
帖子
2365
4
发表于 2010-12-24 21:56:00 | 只看该作者
本帖最后由 黄亦天 于 2010-12-25 00:15 编辑
  1. world = "light"
  2. heart ="dark"
  3. if world == heart
  4.     print "      "
  5. else
  6.     print "what?"
  7. end
  8. exit
  9.    
复制代码
脚本新手仅仅用F1里看过的知识原创的一首作品……

世界被赋予了光明
我的心却融进了黑暗
倘若这个世界与我的心一模一样
展现在我眼前的只会是一片空白
但若不是如此,展现在我面前的又是什么?
最终,
不论相同与否,都是一切的结束……

呃……相当简单的一个东西了……
显示完what?就结束了……

————————————————
补充:
好吧眼花看漏了个“重”字……
新手只能原创一下下了……

点评

原创也是可以的,只是说重创作难度稍大,有意思些^_^  发表于 2010-12-25 08:14
55~~为了写这个电脑卡了,没抢到圣诞楼的68……残念的杯具了……  发表于 2010-12-24 22:01
绿坝娘素材库企划

素材库获取方法:暂时中止,需求者私聊。
回复 支持 反对

使用道具 举报

Lv5.捕梦者 (管理员)

老黄鸡

梦石
0
星屑
42681
在线时间
7616 小时
注册时间
2009-7-6
帖子
13506

开拓者贵宾

5
发表于 2010-12-25 10:12:51 | 只看该作者
本帖最后由 fux2 于 2010-12-25 15:42 编辑

喵不知道符合规则不
  1. class Array
  2.   
  3.   def word(count)
  4.     a="abcdefghijklmnopqrstuvwxyz"
  5.     return a[count,1]
  6.   end

  7.   def like(fux2)
  8.     return [word(self[0]),self[1],self[2],self[3]]
  9.   end
  10.   
  11.   def of(fux2)
  12.     unless fux2 == "the past"
  13.       return [self[0],word(self[1]),self[2],self[3]]
  14.     end
  15.     return self
  16.   end
  17.   
  18.   def better_than(fux2)
  19.     return [self[0],self[1],word(self[2]),self[3]]
  20.   end
  21.   
  22. end

  23. class Temp < Array

  24.   I = [5,20,23,2]
  25.   a = I.like("the dreams").of("the future").better_than("the history").of("the past")
  26.   p a.to_s

  27. end

  28. a = Temp.new
复制代码
.
点我查看运行结果
.
.


I.like("the dreams").of("the future").better_than("the history").of("the past")
I like the dreams of the future better than the history of the past.

我不缅怀过去的历史,而致力于未来的梦想。—— T. Jefferson 杰弗逊(美国第3任总统)


.
.
.
.
RGDirect - DirectX驱动的RGSS,点我了解.
RM全系列成套系统定制请联系QQ1213237796
不接受对其他插件维护的委托
回复 支持 反对

使用道具 举报

Lv1.梦旅人

万物创造者

梦石
0
星屑
54
在线时间
352 小时
注册时间
2008-2-15
帖子
2432
6
发表于 2010-12-26 13:12:19 | 只看该作者
  1. #准备
  2. class Servant;attr_accessor :knowledge;knowledge = Array.new;end
  3. class Person;def gave;return [];end;def make_it_clear(arg);end;def angel;return nil;end;def initialize;@servants={:John=>Servant.new};end;end
  4. class Thing;def quickly_take_place? ;end;end
  5. things=[Thing.new];he=Person.new;Jesus_Christ = []

  6. #Revelation
  7. if Jesus_Christ.find{|revelation| god.gave.include? revelation}
  8.   thing = things.find{|item| item.quickly_take_place?}
  9.   he.servants.keys.each{|servant| he.servants[servant].knowledge.push thing}
  10.   he.servants[:John] = he.send(make_it_clear,he.angel)
  11. end
复制代码
《新约·启示录》第一节
The Revelation of Jesus Christ which God gave him so that his servants might have knowledge of the things which will quickly take place: and he sent and made it clear by his angel to his servant John.

随便写点什么,应该符合要求吧……?
From mortal hope immortal power springs.
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

拿上你的纸笔,建造一个属于你的梦想世界,加入吧。
 注册会员
找回密码

站长信箱:[email protected]|手机版|小黑屋|无图版|Project1游戏制作

GMT+8, 2024-12-24 07:49

Powered by Discuz! X3.1

© 2001-2013 Comsenz Inc.

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