电影《数码宝贝大冒险:最后的进化·羁绊》近期开始上映,看到大银幕里一张张熟悉又陌生的脸,就很容易想起那段热血沸腾的时光,乐乐也非常喜欢动漫里一个个独特的角色。
尤其是里面的光子郎,他在团队中相当于军师的角色,性格冷静且十分聪明。
这个小男孩对所有人都很礼貌(包括父母),会在称呼后加上敬语。经常背着一台仿APPLE的笔记型电脑到处跑的男孩,儿时双亲却死于车祸,由父母的远房亲戚收养。和太一关系相当好,在可能遇到黑暗四天王的攻击危险之下,仍然与太一一起出去寻找感冒药。
其中非常经典的一个情节就是,最早在档案岛的安杜路兽的工厂中,光子郎通过分析巨大「电池」内墙壁上的文字(也就是数码文字和一些数字,还有人类世界的文字)从而描绘出了档案岛的全貌。
然而当时动画给的一个画面就是光子郎的屏幕是我们熟悉的【编程】,那《数码宝贝》里泉光子郎的编程水平到底有多厉害呢?知乎上有一位大神借此做了解答。
题图:Random Forest/知乎
怎样评价《数码宝贝》第一部中的泉光子郎的编程水平?
答主:Random Forest(2 万+ 赞同)
受到@夜路川答主勇于用 python 进化自己室友的激励,我顺便深挖了一下《数码宝贝》第一部第五集中光子郎在电脑上敲出的代码,终于把原始代码跑了出来,视频在最后。
《数码宝贝》第一部第五集截图
虽然这段代码会自己乱动并让甲虫兽进化,显得狂拽酷炫吊炸天,但其实和第十集出现的代码是一模一样的(而动画里表现出的效果明显不同)。第十集里的代码反而看得更清楚一点。
《数码宝贝》第一部第十集截图
根据这张图抽出文本如下:
100 /* func sample. coast creation */
110 float s
120 while s<1 or s>=2
130 input "ratio 1 to 2";s
140 endwhile
150 s = (s-1)/10+1
160 screen 1,2,1,1
170 s=sqr(s*s-1)
180 float x0=100, x1=412, y0=0, y1=0
190 fractal(x0,x1,y0,y1,1)
200 line(100, 50, 412, 50, 255, 65535)
210 end
220 func fractal(x0;float,x1;float,y0;float,y1;float,sp;int)
230 float l, r, x2, y2
240 l=sqr((x1-x0)*(x1-x0)+(y1-y0)*(y1-y0))
250 if l<2 or sp>=9 then {
260 line(x0,y0/3+50,x1,y1/3+50,255,65535) : return()
270 }
280 r=rnd()+rnd()+rnd()-2
290 x2=(x0+x1)/2+s*(y1-y0)*r
300 y2=(y0+y1)/2+s*(x0-x1)*r
310 sp = sp + 1
320 fractal(x0,x2,y0,y2,sp)
330 fractal(x2,x1,y2,y1,sp)
340 endfunc
如果想重新原汁原味地运行这段代码,首先要明确它的语言和版本。注意到注释和变量定义的语法更接近 C 系语言,但还有 endwhile、func、endfunc 等关键字,可以确定这不是 VB 或者其他主流的 BASIC 系语言。
但是代码行号的格式暴露了这货肯定是个远古产物,我本来想看看光子郎电脑上这个文件的后缀名是什么,瞅了半天发现是「名称未设定 3」(见上图),失去线索的我只能开始疯狂的 google……
在资料检索过程中主要发现两个问题。一是和这段代码语法相近的语言太多,比如 VFP(Visual FoxPro,知道它的人肯定都老了)、VimScript、SAP 采用的 ABAP、早期 PHP、伪代码的某个版本[1]、乃至德仪计算器的自创脚本语言等等。经过一个个的尝试,发现这些语言都是形似神不似,并不是真正的答案。
Google Books 里找到的一本 TI 计算器手册
第二个问题是,如果仔细看光子郎的代码,你一定会陷入困惑,因为这段代码根本不像是有一个统一的语法规则。这里举两个栗子:
流程控制语法不统一。120-140 行的 while-endwhile 结构,或许让你觉得和 BASIC 有一点点类似,而且顺便猜测 if 语句肯定也会有个 endif 结尾。但是 250-270 行的 if 语句居然用了大括号,更丧心病狂的是在 then 后面接大括号!
变量声明格式不统一。110 行是类 C 的声明格式,而 220 行的函数参数却用了类似 ECMAScript 的声明方式,但用的不是冒号是分号。这让我一度以为这段代码就是导演魔改的,是一种不存在的噩梦般的语言。
然而,在我就要放弃之际,一位国外先行者的博文给了我曙光(尽管文章里有一些错误)[2]。这个语言最终还是被查出来了…… 事情要追溯到 1987 年,夏普发布了一款型号为 X68000 的 PC。作为那个年代的电脑,搭载了 10MHz 的摩托罗拉 68000CPU,1MB 的内存,没有硬盘,且只在日本发售[3]。其操作系统是夏普为这一系列电脑专门设计的 Human68k,《数码宝贝》中的那段代码,就属于这个操作系统专有的编程语言 X-BASIC[4]。
Sharp X68000ACE-HD
X-BASIC 手册
日本维基上 X-BASIC 的一段例程 这个系列的最后一款电脑在 1993 年发布(配置有所增强),而《数码宝贝》第一部是在 1999 年放映的,可见在动画制作时期,光子郎的代码也不算特别陈旧。 为了实际地跑一下这段代码,又经过一番艰辛的努力,我搞到了 X68000 的模拟器,还有操作系统 Human68k(version 3.02)的磁盘映像,现在还能找到这些东西,真的要感谢极客阿宅们的默默奉献。 在模拟器里一开机,感觉就成功了一半:
为了能使代码顺利运行,还需加载 SX-WINDOW 映像。最后终于找到 X-BASIC,一字不差地键入了光子郎的代码:
执行 run 命令,按代码要求输入一个 1 到 2 之间的浮点数值,下面就是见证奇迹的时刻了! 运行《数码宝贝》光子郎写的代码:
我不禁望向窗外的那只放屁虫,它仍在很悠闲地晒太阳,很遗憾我的甲虫兽并没有进化……原因很简单,这真的只是一段随机生成「coast」轮廓的代码。初始输入是一个阈值,从视频里看,显然阈值越高「海岸」越险峻,阈值越低「海岸」越平滑,很有可能是摘取了当时哪个游戏里地图生成器的一段源码。所以,导演又糊弄事呢? 最后话说回光子郎的编程水平,这段代码的难点主要在于用递归实现了分形图形的绘制,虽然没什么特别神秘的地方,但还是需要一定程度的编程技能和数学知识。原理上很像我之前绘制谢尔宾斯基三角形的代码。 但是光子郎当时好像上小学四年级?
而且在动画里,这段程序的输出是这样的,光子郎最后靠这个成功还原了他和美美所在的迷宫。
嘛,单从这里看,感觉能进科大少年班就是了…… 彩蛋:当年 X68000 系列的电脑还随附一个名为 060turbo[5]的软件,单独装在一个磁盘。这个软件的唯一功能是在屏幕上随机打印一张复杂的分形图形(疑似 Mandelbrot 图像?并不是很确定)。我用模拟器试了一下,效果确实惊艳,感觉光子郎在成为分形大师的路上还需努力 23333。
参考 1. ^Pseudocode Examples https://www.unf.edu/~broggio/cop3530/3530pseu.htm 2. ^Running Izzy's "Digivolving" code https://digitalworldproblems.tumblr.com/post/76036641581/while-im-looking-at-that-moviecode-post-he 3. ^X68000 https://en.wikipedia.org/wiki/X68000 4. ^X-BASIC https://ja.wikipedia.org/wiki/X-BASIC 5. ^060turbo の添付ディスク http://retropc.net/x68000/software/hardware/060turbo/disk060t/
责任编辑:xj
原文标题:《数码宝贝》里泉光子郎的编程水平到底有多厉害?
文章出处:【微信公众号:汉中乐博乐博机器人】欢迎添加关注!文章转载请注明出处。
-
C语言
+关注
关注
180文章
7597浏览量
136127 -
编程
+关注
关注
88文章
3587浏览量
93583 -
程序员
+关注
关注
4文章
949浏览量
29759
原文标题:《数码宝贝》里泉光子郎的编程水平到底有多厉害?
文章出处:【微信号:lebo13992672467,微信公众号:汉中乐博乐博机器人】欢迎添加关注!文章转载请注明出处。
发布评论请先 登录
相关推荐
评论