[過去ﾛｸﾞ] プログラミングできる人 来て(ヽﾟд)ｸﾚ [無断転載禁止]©2ch.net (1002ﾚｽ)
上下前次1-新
抽出解除 必死ﾁｪｯｶｰ(本家) (べ) 自ID ﾚｽ栞 あぼーん
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
534: 2016/05/24(火)00:11 ID:V9KACOy5(1/14) AAS
龍神録を参考に見ているけど、一匹インベーダーの敷居が高いです。
DXRubyなら、なんとか……。保障は無い。
何か良い資料は有りませんか？
536(1): 2016/05/24(火)08:15 ID:V9KACOy5(2/14) AAS
とりあえず、できました。（アルファベットには考慮してないです）
#!/usr/local/bin/perl
my $rando=int(rand(100));
my $yuza=<stdin>;
until($yuza==$rando){
if($yuza>$rando){print
537(1): 2016/05/24(火)08:16 ID:V9KACOy5(3/14) AAS
#!/usr/local/bin/perl
my $rando=int(rand(100));
my $yuza=<stdin>;
until($yuza==$rando){
if($yuza>$rando){print"ookii\n";}elsif($yuza<$rando){print"tisai\n";}
$yuza=<stdin>;if($yuza==$rando){print"hit";}
}
省1
543: 2016/05/24(火)13:30 ID:V9KACOy5(4/14) AAS
なんやコレ？
めちゃくちゃ難しいやんけ
オーマイガー
544: 2016/05/24(火)16:34 ID:V9KACOy5(5/14) AAS
AA省
545: 2016/05/24(火)17:03 ID:V9KACOy5(6/14) AAS
ヒット&ボロー企画
企画背景
学習用企画
概要
重複しない数字[0〜9]をよういて、4行[桁]の数字を発生させる。
プレイヤーに数字の入力を貰い。数と桁が当たっていたら、[hit]と表示させる
この時に桁が違っていても、数が発生させた4行の中に有るなら[buro]と表示させる
省5
546: 2016/05/24(火)17:04 ID:V9KACOy5(7/14) AAS
-------------------------------------------------------
重複してない０〜９の数字を配列に格納する
発生させた数字を数として扱う。or 発生させた数字を文字として扱う。 どちらでも可能
格納した配列をランダムに入れ替える。 この時に配列名が変わっていても可能
ランダムに入れ替えた配列から4つの数字を取り出す。
プレイヤーに4つの数字を入力して貰う。
入力された数字（文字）がhitしているかを1桁（文字）ごとに調べる
省5
550: 2016/05/24(火)19:16 ID:V9KACOy5(8/14) AAS
上が企画書で下が仕様書
hitとburoの判定で困ってる
ルール上、重複しない4つの数字←これは純粋な乱数では不可能
if文連打で可能だけど、流石に無い
配列に(0..9)って書いて、ココから取り出した方が良いって気づいた。
1文字ずつの判定に$aaa[$i]==$bbb[$i] ,else{}~~~って続けてるけど、なんか微妙
何も無しにプログラム書こうとしたら、途中で躓いたから、企画書と仕様書を作った。
省2
551: 2016/05/24(火)19:31 ID:V9KACOy5(9/14) AAS
よく使うのが下記
unless(defined undef && false){ }
unless文until文undefとfalseかな
ラノベとかプログラムの本は>>1から見たら、殆ど一緒かな。
ラノベでストーリが動いて行くのと、ソースで変数が動くのは同じ感じに見える。
完結に言うと、人のコードは読めるけど、書けない人です。'`ｨ (ﾟдﾟ)/
あ〜んど、発展系の組み立てが致命的に難しい。
省1
555: 2016/05/24(火)21:24 ID:V9KACOy5(10/14) AAS
>>553
物凄いガチガチのコードで笑ってもうた。
ユーザー（UI/UX）の配慮まで有ったので、素直に感動した。
もぅちょい頑張ってみる。
561: 2016/05/24(火)22:43 ID:V9KACOy5(11/14) AAS
ごり押しなら、できた。 これじゃない感じが半端ない。
#!/usr/local/bin/perl
use utf8;
use List::Util;
my @toi=(0..9);
my @data = List::Util::shuffle @toi;
#print"@data\n";
省17
562: 2016/05/24(火)22:45 ID:V9KACOy5(12/14) AAS
もぅちょっと、纏めれた筈なんだが……これが限界です。
564: 2016/05/24(火)23:16 ID:V9KACOy5(13/14) AAS
1匹インベーダーは難しいので下記のサイトを使おうか検討中
外部ﾘﾝｸ:scratch.mit.edu
望ましい実装環境を教えて下さい。&主観で良いので難易度もお願いします。
565: 2016/05/24(火)23:39 ID:V9KACOy5(14/14) AAS
AA省
上下前次1-新書関写板覧索設栞歴
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.032s