ベーマガ、30 年後 ── 把 100 行 BASIC 遊戲移植到 iPhone

先說，這篇跟育兒沒關係啦。日本 80 年代有本叫 マイコン BASIC マガジン、大家都叫它 ベーマガ (Bēmaga) 的 hobbyist 程式雜誌。每一期會把一個小遊戲的完整原始碼印在誌面上、讀者要用 PC-9801 一個字一個字打進去。我把其中一個 ──『Receive No.1』，N88-BASIC 100 行的 2 人對打網球 ──、30 年後、一行一行原封不動搬到 iPhone 上。再加上當年機器做不到的：GA (基因演算法) 學的 CPU 對戰。

這篇真的跟育兒沒關係喔。小孩搞不好還 get 不到這個的好玩在哪。

我把 Receive No.1 ── 30 年後、再次搬到 iPhone 上了。

先講一下背景給沒接觸過日本復古電腦的人。80–90 年代，日本有本叫 マイコン BASIC マガジン 的雜誌、大家都叫它 ベーマガ (Bēmaga)。它最酷的地方是，每期都會把一個小遊戲的完整原始碼直接印在雜誌上 ── 你買回家、坐到 PC-9801 前面、把幾百行程式碼一個字一個字 type 進去，這就是當年的 type-in 文化。Receive No.1 就是其中一個刊登作品 ── 用 N88-BASIC (NEC PC 上的 Microsoft 系 BASIC 方言) 寫的、大概 100 行的 2 人對打網球。

程式碼原樣搬過來。物理也原樣。可能連 bug 都原樣。

670 BEEP:IF SU=T THEN SU=ABS(SU-3) ELSE P(SU)=P(SU)+1
680 GOSUB *TOKUTENKAKU:IF P(SU)=15 THEN GOTO *SHOUHAI

從這行得分判定，到 BX=BX+VX:BY=BY+VY/1.5:VY=VY+1 的重力模型、HX=X+7+32*CS(AA), HY=Y+31*SN(AA) 的手臂碰撞判定、DIM CS(360), SN(360) 預先存好的 22.5° 三角函數表 ── 當年的邏輯我都一行一行搬到手機上。

物理一致、所以當年那些手感全部還在:

• 發球從場地角落往正上方飛、再掉下來
• 揮手臂的那一瞬間決定打出去的角度跟速度
• 球碰到 3 次就算落地
• 只有發球方可以拿分 (老派網球計分)

當年硬體做不到的東西：CPU 對戰

• 會成長的 CPU: 20 個基因，邊打邊進化。我在桌機跑了大概 1500 世代，把那個當作「初始版 CPU」附在 App 裡。當年 Bēmaga 那 100 行裡是塞不下基因演算法的啦。你可以自己練、JSON 匯出、丟給朋友比看看。
• 觀賞模式: 讓兩個 CPU 互打、你只負責看。球有時候會來回拉超久、看著看著有點上癮。

看 Receive No.1 →