第2回昔のPC板杯プログラムコンテスト会場
- 1 :大学生MSXユーザ ◆Ym1dK0rg :02/02/02 02:02
- 恒例となった 第2回昔のPC板杯プログラムコンテストを開催するヨ!
かつてやった(であろう)クダラネー!!プログラムや クダラネー!!テクニックを
再びここで披露して下さい。
詳しくは>>2で。
前スレ http://pc.2ch.net/test/read.cgi/i4004/1008847300/
※)前スレは昔のPC板杯プログラムコンテストに関連した雑談用途で使用することを推奨します。
- 42 :大学生MSXユーザ ◆Ym1dK0rg :02/03/15 00:55
- >>41
逝^H生きてます。=ロo_
前スレの>>1さん生きてます?
- 43 :ナイコンさん:02/04/19 11:43
- 保守age!
全機種OKと言われても、HCとかでは、ねぇ?
- 44 :ナイコンさん:02/04/19 13:41
- >>43
やるやつは移植してでもやるよ。
- 45 :影(「ボケ」担当):02/04/28 09:51
- N88 音ゲー(?)
100 CLS:RANDOMIZE:A$="C?D?E?F?G?A?B?":L1=200:L2=200
110 B$=MID$(A$,(RND(7)*2+1),1):B=ASC(B$)+32
120 C$="O5L128"+B$+"R"
130 PRINT "cho-ultra--don!!"
140 LOCATE 5,5:PRINT A$:PLAY C$
150 FOR I=1 TO L1
160 FOR J=1 TO L2
170 IK$=INKEY$
180 IF IK$<>"" THEN IK=ASC(IK$):I=L1:J=L2
190 NEXT J
200 NEXT I
210 IF IK$=B$ OR IK=B THEN PRINT "O! ";B$:GOTO 230
220 PRINT "X! ";B$
230 END
- 46 :ナイコンさん:02/05/14 08:36
- VTL/2。
50 M=0
70 I=?
80 #=I<>2*100
90 ?="okubyou mono!"
100 #=210
120 #=M=5*260
130 X='
140 #=X>50000*190
150 #=N>10*240
160 ?="WIN!"
170 M=M+1
180 #=70
190 ?="OMAE HA SINDA!"
210 ?=""
220 ?="TSUGI HA DARE?"
230 #=30
240 ?="ANATA HA IKINOKOTTA!"
250 #=20
省略されちゃったかね?
- 47 :46:02/05/14 08:38
- 助かった(笑)
大昔、プログラム書いたノートが出てきた為、それを書いただけ、
よって動作確認なんぞ出来ません。
(VTL/2走る機械が生きている人居ます?居たら羨ましい・・・)
- 48 :ナイコンさん:02/05/15 09:18
- >>46
ワンキーでは無い気がするが・・・・・
- 49 :大学院生MSXユーザ ◆Ym1dK0rg :02/05/19 03:30
- 最近全然MSX触ってないよ。=ロo_
- 50 :ナイコンさん:02/05/19 23:33
- (; ̄ロ ̄) 煤@ 院に進んだのかい!?
- 51 :ナイコンさん:02/06/21 22:54
- age
- 52 :ナイコンさん:02/06/30 15:32
- MSX1専用
事前に SCREEN 1を実行しておくこと
POKE &HF3B0;,0
コレを入力したあとシフトキーを押すとキレイなグラフィックが拝める
- 53 :大学院生MSXユーザ ◆Ym1dK0rg :02/08/10 23:21
- 保守sageシテオク。
何かこのスレ用の作品作らないと なー。
>50
マジです。
- 54 :ナイコンさん:02/08/14 23:52
- >>46
いまさらだが、何がしたかったのか気になる。
>>47
rvtl なんてのがあるよ。
- 55 :ナイコンさん:02/08/15 11:46
- >>54
多分チキンレースだと思われ。
ボタンを押すタイミングが早すぎると「臆病者!」遅すぎると「死んだ」
ちょうどよければ生き残りで、条件が厳しくなって次の相手へ。
プログラムの書ける関数電卓(ポケコンじゃない奴)でブラックジャックもどき作った事がある・・・・
- 56 :ナイコンさん:02/08/17 00:02
- > 70 I=?
> 80 #=I<>2*100
70は数値入力なのでタイミングは関係なさそう。
VTL/2 では <> という演算子はないとおもう。 GAME III?
> 130 X='
> 140 #=X>50000*190
乱数を生成して50000以上なら OMAE HA SHINDA! になるが、
結局、5回で終了すること以外よくわからん。
- 57 :ナイコンさん:02/09/13 17:21
- >>55
チキンレースというよか、ロシアンルーレットっぽい。
5回で終了する辺りが。
- 58 :ナイコンさん:02/11/01 18:15
- N88互換BASIC 2GET-GAME
2 cls:k1=11:l1=1:for i=0 to 3:read a:v(i)=a:read a:w(i)=a:next i
5 color 7,0:locate 10,0:print"##################"
6 for y=1 to 16:locate 10,y:print"#";
7 print spc(16);:print"#":next y
8 locate 10,17:print"##################":a=1:b=255
9 color 2:x2=20:y2=10:locate x2,y2:print"2":color 7:h=0:goto 15
10 for i=0 to 31:next i:locate 32,9:print spc(5)
11 x2=int(rnd(1)*16)+11:y2=int(rnd(1)*16)+1
12 locate x2,y2:color 2:print"2":color 7
15 g=h mod 4:x=v(g):y=w(g):k0=k1:l0=l1:k1=k1+x:l1=l1+y
16 locate k1,l1:print"O":for i=0 to 63:next i:locate k0,l0:print" "
18 if k1=10 then 50 else if k1=27 then 50
19 if l1=0 then 50 else if l1=17 then 50
20 if k1<>x2 then 25 else if l1<>y2 then 25
21 for i=0 to 7:for j=0 to 7:color j:locate 32,9:print"2GET!"
22 next j:next i:a=a+100:goto 10
25 for j=0 to b:next j:if inkey$=" " then h=h+1
27 locate 29,0:print using"SCORE ####";a:a=a+1:c=a/100:b=int(b-c)
30 goto 15:data 1,0,0,1,-1,0,0,-1
50 locate 15,9:print"GAME OVER":for i=0 to 255:next i:end
- 59 :大学院生MSXユーザ ◆UOYm1dK0rg :02/11/02 04:13
- >>58
久々にキタ━━(゚∀゚)━━!!
オレモナー。
- 60 :ナイコンさん:02/11/05 16:26
- 2 cls:color 7,0:x=10:y=0:for i=0 to 3:read a:v(i)=a:read a:w(i)=a
3 for j=0 to 16:locate x,y:print "#":x=x+v(i):y=y+w(i)
4 next j:next i:k1=11:l1=1:a=1:b=255:h=0:k0=255:l0=255
10 locate 32,9:print spc(5):x2=int(rnd(1)*16)+11:y2=int(rnd(1)*16)+1
11 locate x2,y2:color 2:print"2":color 7:if inkey$=" " then h=h+1
15 g=h mod 4:x=v(g):y=w(g):k0=k1:l0=l1:k1=k1+x:l1=l1+y
16 locate k1,l1:print"O":for i=0 to 63:next i:locate k0,l0:print" "
18 if k1=10 then 50 else if k1=27 then 50
19 if l1=0 then 50 else if l1=17 then 50
20 if k1<>x2 then 30 else if l1<>y2 then 30
21 for i=0 to 7:for j=0 to 7:color j:locate 32,9:print"2GET!"
22 next j:next i:a=a+100:goto 10
30 a=a+1:for i=0 to b:next i:if inkey$=" " then h=h+1
31 locate 29,0:print using"SCORE#####";a:c=a/100:b=int(b-c):goto 15
50 locate 15,9:print"GAME OVER":end:data 1,0,0,1,-1,0,0,-1
- 61 :ナイコンさん:02/11/05 16:28
- ↑N88互換BASIC 2GET-GAME
今回はなんとか省略されずに済んだみたいですね。
ちなみにMSXにもそのまま使えます。
機種に合わせてウェイトをイジって遊んで下さい。
- 62 :ナイコンさん:02/12/03 23:39
-
- 63 :山崎渉:03/01/13 21:49
- (^^)
- 64 :ナイコンさん:03/02/05 22:51
- 丸一年
- 65 :ナイコンさん:03/02/12 01:09
- 第1回のほうが盛り上がったな。
- 66 :ナイコンさん:03/03/04 23:33
- 打つのが、面倒なわけよ。
- 67 :山崎渉:03/04/17 12:27
- (^^)
- 68 :山崎渉:03/04/20 05:57
- ∧_∧
( ^^ )< ぬるぽ(^^)
- 69 :山崎渉:03/05/22 02:08
- ━―━―━―━―━―━―━―━―━[JR山崎駅(^^)]━―━―━―━―━―━―━―━―━―
- 70 :ナイコンさん:03/06/05 12:08
- SHARP PC-G850V
10 CLS:CLEAR
20 PRINT "キタ---( )---!!"
30 FOR A=0 TO 5
40 READ C$
50 LOCATE 6,0:PRINT C$
60 FOR B=0 TO 100:NEXT
70 NEXT:END
80 DATA "゚ ","v゚ ","゚v゚"," ゚v"," ゚"," "
- 71 :ナイコンさん:03/06/05 12:10
- みてね♪
http://www1.free-city.net/home/s-rf9/page004.html
- 72 :山崎 渉:03/07/15 11:08
-
__∧_∧_
|( ^^ )| <寝るぽ(^^)
|\⌒⌒⌒\
\ |⌒⌒⌒~| 山崎渉
~ ̄ ̄ ̄ ̄
- 73 :なまえをいれてください:03/07/22 13:16
- ハッキリ言ってアメリカなどの多民族国家では黒人の方がアジア人よりもずっと立場は上だよ。
貧弱で弱弱しく、アグレッシブさに欠け、醜いアジア人は黒人のストレス解消のいい的。
黒人は有名スポーツ選手、ミュージシャンを多数輩出してるし、アジア人はかなり彼らに見下されている。
(黒人は白人には頭があがらないため日系料理天などの日本人店員相手に威張り散らしてストレス解消する。
また、日本女はすぐヤラせてくれる肉便器としてとおっている。
「○ドルでどうだ?(俺を買え)」と逆売春を持ちかける黒人男性も多い。)
彼らの見ていないところでこそこそ陰口しか叩けない日本人は滑稽。
- 74 :ぼるじょあ ◆ySd1dMH5Gk :03/08/02 05:04
- ∧_∧ ∧_∧
ピュ.ー ( ・3・) ( ^^ ) <これからも僕たちを応援して下さいね(^^)。
=〔~∪ ̄ ̄ ̄∪ ̄ ̄〕
= ◎――――――◎ 山崎渉&ぼるじょあ
- 75 :山崎 渉:03/08/15 23:19
- (⌒V⌒)
│ ^ ^ │<これからも僕を応援して下さいね(^^)。
⊂| |つ
(_)(_) 山崎パン
- 76 :ナイコンさん:03/09/01 15:32
- もっとみんながんがれ!
保守age
- 77 : :04/05/01 18:16
-
- 78 : :04/05/01 21:05
-
- 79 :ナイコンさん:04/11/16 15:30:25
- ゲ製作板にBASICで0からプログラムを勉強するスレを立てました。
ここにいる皆さんのお暇な時に来て下さってお好きなように講義をして下さると嬉しいです。
BASICで始めるプログラム
http://pc5.2ch.net/test/read.cgi/gamedev/1100498283/
- 80 :ナイコンさん:2005/04/08(金) 21:41:49
- >>79
http://pc8.2ch.net/test/read.cgi/gamedev/1100498283/
- 81 :ナイコンさん:2005/12/31(土) 01:30:40
- とさか
- 82 :ナイコンさん:2006/01/01(日) 05:09:31
- 山崎渉保存スレになってるな
- 83 :fushianasan:2006/09/05(火) 16:57:15
- a1
- 84 :ナイコンさん:2006/12/07(木) 23:26:40
- 最下層到達記念あげ
- 85 :ナイコンさん:2007/06/07(木) 20:59:03
- >>84
- 86 :ナイコンさん:2009/09/17(木) 21:04:51
- ↑
何が言いたのか
はっきり言ってやれ
やるのかやらないのか
- 87 :ナイコンさん:2009/09/17(木) 21:06:19
- まだまだつづくよ〜
- 88 :ナイコンさん:2011/02/19(土) 21:33:31.07
- アハ〜♪”
- 89 :ナイコンさん:2011/11/25(金) 14:15:56.32
-
- 90 :ナイコンさん:2013/02/16(土) 19:32:27.47
- _
|O\
| \ キリキリ
∧|∧ \ キリキリ
ググゥ>(;⌒ヽ \
∪ | (~)
∪∪ γ´⌒`ヽ
) ) {i:i:i:i:i:i:i:i:}
( ( ( ´・ω・)、
(O ⌒ )O
⊂_)∪
- 91 :ナイコンさん:2013/04/01(月) 23:52:29.68
- (*^-^)
23 KB
[ 2ちゃんねる 3億PV/日をささえる レンタルサーバー \877/2TB/100Mbps]
新着レスの表示
掲示板に戻る
全部
前100
次100
最新50
read.cgi ver 05.0.7.9 2010/05/24 アクチョン仮面 ★
FOX ★ DSO(Dynamic Shared Object)