■ このスレッドは過去ログ倉庫に格納されています
第1回昔のPC板杯プログラムコンテスト
- 1 :あまぐらまぁ:01/12/20 20:21.net
- 毎年恒例となった 第1回昔のPC板杯プログラムコンテストを開催するヨ!
かつてやった(であろう)クダラネー!!プログラムや クダラネー!!テクニックを
再びここで披露して下さい。
目的:画面上に100回「オマエモナー」と表示させる。
特例としてカナが使えない機種は「OMAEMONA-」でも良い。
使用機種:不問
使用言語:BASIC限定(各機種の方言の使用は可)
条件:プログラムコードが長くならないように注意。
(省略されました・・全てを読むにはここを押してください)が
出てしまったら、そのエントリーは無効。
評価:綺麗なソースやアルゴリズムだけではなく、実行したときの芸術性
なども評価の対象とする。
表示1回毎に色を変えたり音を出したり等、演出を凝らすのは
構わない。各自工夫してプログラムすること。
ネタ歓迎!。
エントリーする人は、動作機種を(ものによっては何BASICかも)明記してくれ。
エントリーに対するレスなんかも大いにしちゃって!。もりageて行こう!
ビクーリするようなヤツ期待してます!
- 197 :END:02/07/17 13:00.net
-
- 198 :age:02/09/05 01:54.net
- 10 REM ホシュsage
20 END
- 199 :ナイコンさん:02/09/19 11:59.net
- ActiveBASICはexitで終了だが、
99BASICは終了時はsystemって打つのね。
昔を思い出して笑ったよ〜
- 200 :ナイコンさん:02/09/20 01:04.net
- LEFT$("00"+ HEX$(A), 2)
- 201 :ナイコンさん:02/09/29 13:45.net
-
1000 CLS 3 : A = 400 : B = 8000 : C = 100
1100 FOR Z = 1 TO C
1200 FOR X = 1 TO 7
1300 COLOR X : LOCATE 15,15 : PRINT "キタ (゚∀゚) !!!!!"
1400 FOR Y = 1 TO A : NEXT Y
1500 COLOR X : LOCATE 15,15 : PRINT "キタ ━(゚∀゚)━ !!!!!"
1600 FOR Y = 1 TO A : NEXT Y
1700 COLOR X : LOCATE 15,15 : PRINT "キタ ━━(゚∀゚)━━ !!!!!"
1800 FOR Y = 1 TO A : NEXT Y
1900 COLOR X : LOCATE 15,15 : PRINT "キタ ━━━(゚∀゚)━━━ !!!!!"
2000 FOR Y = 1 TO A : NEXT Y
2100 COLOR X : LOCATE 15,15 : PRINT "キタ ━━━━(゚∀゚)━━━━ !!!!!"
2200 FOR Y = 1 TO A : NEXT Y
2300 COLOR X : LOCATE 15,15 : PRINT "キタ━━━━━━(゚∀゚)━━━━━━ !!!!!"
2400 BEEP
2500 FOR Y = 1 TO B : NEXT Y
2600 NEXT X
2700 NEXT Z
2800 END
- 202 :ナイコンさん:02/09/29 13:49.net
- 1000 CLS 3 : A = 400 : B = 8000 : C = 100
1100 FOR Z = 1 TO C
1200 FOR X = 1 TO 7
1300 COLOR X : LOCATE 15,15 : PRINT "キタ (゚∀゚) !!!!!"
1400 FOR Y = 1 TO A : NEXT Y
1500 COLOR X : LOCATE 15,15 : PRINT "キタ ━(゚∀゚)━ !!!!!"
1600 FOR Y = 1 TO A : NEXT Y
1700 COLOR X : LOCATE 15,15 : PRINT "キタ ━━(゚∀゚)━━ !!!!!"
1800 FOR Y = 1 TO A : NEXT Y
1900 COLOR X : LOCATE 15,15 : PRINT "キタ ━━━(゚∀゚)━━━ !!!!!"
2000 FOR Y = 1 TO A : NEXT Y
2100 COLOR X : LOCATE 15,15 : PRINT "キタ ━━━━(゚∀゚)━━━━ !!!!!"
2200 FOR Y = 1 TO A : NEXT Y
2300 COLOR X : LOCATE 15,15 : PRINT "キタ━━━━━━(゚∀゚)━━━━━━ !!!!!"
2400 BEEP
2500 FOR Y = 1 TO B : NEXT Y
2600 NEXT X
2700 NEXT Z
2800 END
- 203 :ナイコンさん:02/09/29 13:52.net
- ↑
??? 上の二つ、PRINT文の中のspaceが消えてる・・・
しかも結局二重投稿だし・・・ 鬱
Syntax error
ok
■
- 204 :ナイコンさん:02/09/29 14:32.net
- >203
連続の半角空白は1つに圧縮されます。
で、半角で「 」と書くと圧縮されない半角空白に置き換わります。
- 205 :ナイコンさん:02/09/29 16:21.net
- >>204
ひとつおりこうになりますた ありがとうございますた m(_ _)m
- 206 :ナイコンさん:02/12/03 04:08.net
- なるほど
- 207 :ナイコンさん:02/12/24 19:34.net
- 0 go to 0
- 208 :WIDTH :02/12/24 22:06.net
-
●/ < RANDOMIZEニ タヨラナイ、ランスウノ カエカタ。
PRINT"HIT SPACE KEY!":WHILE INKEY$<>" ":A=RND(1):WEND
●/ < ソノ オウヨウレイ。
http://pc.2ch.net/test/read.cgi/i4004/1037113354/202
- 209 :WIDTH 40:02/12/24 22:09.net
- 三(#゚Д)つΣ●/ < >>208ハント゛ルメイヲ ウチソコネマスタ!
- 210 :山崎渉:03/01/13 21:51.net
- (^^)
- 211 :山崎渉:03/03/13 17:31.net
- (^^)
- 212 :山崎渉:03/04/17 12:22.net
- (^^)
- 213 :山崎渉:03/04/20 06:02.net
- ∧_∧
( ^^ )< ぬるぽ(^^)
- 214 :山崎渉:03/05/28 17:12.net
- ∧_∧
ピュ.ー ( ^^ ) <これからも僕を応援して下さいね(^^)。
=〔~∪ ̄ ̄〕
= ◎――◎ 山崎渉
- 215 :山崎 渉:03/07/15 11:10.net
-
__∧_∧_
|( ^^ )| <寝るぽ(^^)
|\⌒⌒⌒\
\ |⌒⌒⌒~| 山崎渉
~ ̄ ̄ ̄ ̄
- 216 :なまえをいれてください:03/07/22 13:00.net
- ハッキリ言ってアメリカなどの多民族国家では黒人の方がアジア人よりもずっと立場は上だよ。
貧弱で弱弱しく、アグレッシブさに欠け、醜いアジア人は黒人のストレス解消のいい的。
黒人は有名スポーツ選手、ミュージシャンを多数輩出してるし、アジア人はかなり彼らに見下されている。
(黒人は白人には頭があがらないため日系料理天などの日本人店員相手に威張り散らしてストレス解消する。
また、日本女はすぐヤラせてくれる肉便器としてとおっている。
「○ドルでどうだ?(俺を買え)」と逆売春を持ちかける黒人男性も多い。)
彼らの見ていないところでこそこそ陰口しか叩けない日本人は滑稽。
- 217 :ぼるじょあ ◆ySd1dMH5Gk :03/08/02 04:59.net
- ∧_∧ ∧_∧
ピュ.ー ( ・3・) ( ^^ ) <これからも僕たちを応援して下さいね(^^)。
=〔~∪ ̄ ̄ ̄∪ ̄ ̄〕
= ◎――――――◎ 山崎渉&ぼるじょあ
- 218 :ナイコンさん:04/02/24 16:00.net
- α
- 219 :ナイコンさん:04/02/25 19:18.net
- β
- 220 :ナイコンさん:04/05/01 21:04.net
- γ
- 221 :ナイコンさん:04/05/02 17:05.net
- δ
- 222 :ナイコンさん:04/05/03 21:21.net
- auto 223,1
- 223 :ナイコンさん:04/05/07 17:51.net
- シルフィード 1面でやられると
「オンマエモナイヨワークワッカッ ハー!」
- 224 :ナイコンさん:04/05/07 18:01.net
- 208のリンク先が見れないなぁ
RANDOMIZEって毎回同じ結果になるから使えないよね?
それを消すためのプログラムがあるのは知ってたが、資料不足でどうにもできず。
田舎で月1000円の小遣いとかじゃどうにも資料を集めるできんかった厨房の頃。
- 225 :ナイコンさん:04/05/12 23:07.net
- ビギナーズオールパーパスシンボリックインストラクションコード!
BASIC
Syntax Error
Ok
- 226 :ナイコンさん:2005/04/17(日) 16:38:42 .net
- 保守
- 227 :ナイコンさん:2005/06/04(土) 03:06:52 .net
- 最下層
- 228 :ナイコンさん:2005/06/05(日) 01:24:07 .net
- 最下層って目立つよな。
あげw
- 229 :ナイコンさん:2006/06/01(木) 20:03:14 .net
- 一年ぶりにあげ
- 230 :ナイコンさん:2006/11/22(水) 01:58:06 .net
- PRINT CHR$(13)
- 231 :ナイコンさん:2006/11/25(土) 13:56:09 .net
- 5 cls
10 print "懐かしい 泣きそうだった ";
15 beep
20 goto 10
25 end
- 232 :ナイコンさん:2007/05/13(日) 00:47:20 .net
- >>224
RANDOMIZE TIMEとか使ってたな。
3年前の書き込みにレスつけるのもどーかだがw
- 233 :ナイコンさん:2007/05/13(日) 00:58:32 .net
- そして内蔵時計脂肪の昨今
- 234 :ナイコンさん:2007/05/21(月) 13:28:06 .net
- 10 PRINT"nullpo"
20 GOTO 10
- 235 :ナイコンさん:2007/05/21(月) 14:28:50 .net
- 15 print ゙ga゙:stop
- 236 :ナイコンさん:2007/05/21(月) 14:44:26 .net
- ゙じゃねえだろオレorz
- 237 :ナイコンさん:2009/08/28(金) 19:45:31 .net
- 二年ぶりにあげ
- 238 :ナイコンさん:2010/11/06(土) 17:18:31 .net
- 1年3ヶ月ぶり age
- 239 :ナイコンさん:2010/11/07(日) 01:11:04 .net
- そんなにスレもつもんか
テーマ決めずになんでもBASICソース貼ってくれ
- 240 :─☆─ [ X | I.I.T. ] COURANT DE CONSOLE ◆TXFAX7cidQpG :2012/01/22(日) 10:06:37.63 .net
- …ってなワケで、オレ様はこちらにいる。
MAIN STREET
http://www.geocities.jp/courant_de_console/main_street/
シンプル・ブレーク・アウト…。
- - - - - - - -
関連スレ
TIME SESSION PART.1 - 新作戦略会議 -
http://jbbs.livedoor.jp/bbs/read.cgi/computer/42600/1321405314/l100
- 241 :ナイコンさん:2012/01/25(水) 19:17:23.99 .net
-
★★今時代は嫌中ブーム!!★★
みなさん嫌中ブーム知ってますか?嫌中ブームが今ネットでのひそかなブームとなってます
2ちゃんねるで大流行りした、嫌韓ブームでしたが
新しく中国を嫌う嫌中ブームがインターネットで流行っているのです!
それもそのはず彼らの横暴な態度に今日本人は怒っているからです!嫌韓と同じですね
新世紀の話題 嫌中ブーム!
時代のトレンド 嫌中ブーム!
さあ新しい時代に乗り遅れるな!話題沸騰、今時代はまさに嫌中ブームなのです!
- 242 :電脳プリオン 忍法帖【Lv=40,xxxPT】(2+0:8) 【17.9m】 :2013/08/18(日) NY:AN:NY.AN ?PLT(12080).net
- ∧_∧
( ・∀・) | | ガッ
と ) | |
Y /ノ 人
/ ) < >__Λ∩
_/し' //. V`Д´)/ ←>>213
(_フ彡 /
- 243 :ナイコンさん:2017/11/23(木) 14:15:17.85 .net
- 忘れたな
- 244 :ナイコンさん:2017/12/18(月) 19:21:17.07 .net
- http://imepic.jp/20171218/674390
- 245 :ナイコンさん:2020/07/03(金) 15:08:14.96 .net
- うける
- 246 :ナイコンさん:2022/05/04(水) 10:48:04 .net
- うけない
総レス数 246
77 KB
掲示板に戻る
全部
前100
次100
最新50
read.cgi ver.24052200