アカウント名:
パスワード:
こんな感じですか?
FOR I=0 TO 2040VPOKE I,VPEEK(I + 8)NEXT
うろ終え覚えで書いているので間違ってたらごめん(^_^;)
FOR I=0 TO 2040 VPOKE I,VPEEK(I + 8) NEXT うろ終え覚えで書いているので間違ってたらごめん(^_^;)
FOR I=0 TO 2040 VPOKE I,VPEEK(I + 8) NEXT
さらに簡単にいじるなら、フォントのスロット番号とアドレスを保持しているワークエリアを+8してずらしてしまうという手も在りますね。これならスクリーンモードを変えてもずれたままのフォントが適用されるし、グラフィックモードで文字を描画してもずれたままになります。って、懐かしくてこんなことを書いているだけでも目頭が熱くなります (´Д⊂
ワークエリアを書き換えてROMに記録されたBASICコードの実行モードを偽装すればON STOP GOSUBなしでもCTRL + STOPを無効化できるという手法もありましたね。
より多くのコメントがこの議論にあるかもしれませんが、JavaScriptが有効ではない環境を使用している場合、クラシックなコメントシステム(D1)に設定を変更する必要があります。
アレゲはアレゲを呼ぶ -- ある傍観者
私がはじめて書いたBASICプログラム (スコア:1)
20 END
みたいなのだったような。
# もうぜんぜん、BASIC プログラムは書いてないなぁ。
--
「こんにちはマイコン」読者
Re: (スコア:1, おもしろおかしい)
20 GOTO 10
もうアホかと、バカか(ry
Re:私がはじめて書いたBASICプログラム (スコア:1, おもしろおかしい)
私のことですが
Re: (スコア:0)
MSXパソコンのフォントを1文字分ずらして書き換えるプログラムを実行して逃げた覚えが…
で、今も本業でプログラマです。
Re: (スコア:0)
こんな感じですか?
うろ終え覚えで書いているので間違ってたらごめん(^_^;)
Re: (スコア:0)
fM・・(ボソっ)があれば確認できると思うんだけど、・・・が手元にないからなぁ…。
Re:私がはじめて書いたBASICプログラム (スコア:1, 興味深い)
さらに簡単にいじるなら、フォントのスロット番号とアドレスを保持しているワークエリアを+8してずらしてしまうという手も在りますね。これならスクリーンモードを変えてもずれたままのフォントが適用されるし、グラフィックモードで文字を描画してもずれたままになります。って、懐かしくてこんなことを書いているだけでも目頭が熱くなります (´Д⊂
Re: (スコア:0)
同じく。
展示機(PC-88の末期、FE2とかMCとかだったと思う)にこそっと...
STOP OFF
KEY OFF
だかでSTOPとかファンクションキーの割り込みを止めて...
10 COLOR 2
20 PRINT "BABEL ";
30 GOTO 20
RUN
して逃げる。
陰から店員がパニくって電源を落としている様を見て楽しむ。
# ちなみに、今のWindows上のエミュレータでこのコードを実行すると、赤いBABELの文字が読めないほどのスピードで流れてしまいます。
# 昔はそれなりに実感的な速度で流れたんですが(パトレイバー劇中のように1行ごとには流れませんが)。
# かわいい悪戯? かなぁ。
# 同じく現役プログラマなのでAC
Re: (スコア:0)
あと、BEEPも仕込んでおくと、より一層…
# 同じくAC
Re: (スコア:0)
ワークエリアを書き換えてROMに記録されたBASICコードの実行モードを偽装すればON STOP GOSUBなしでもCTRL + STOPを無効化できるという手法もありましたね。