ロト６ その３８ 〜次回こそ１等当てまつ〜

　　　　　＼＼　 　４等ワッショイ！！　　／／
　+　　　+　＼＼　　４等ワッショイ！！　／+
　　　　　　　　　　　　　　　　　　　　　　　　　　　　+
.　　　+　　 ／■＼　　／■＼　 ／■＼　　+
　　　　　　（　´∀｀∩（´∀｀∩） （　´ー｀）
　+　　（(　（つ　　　ノ（つ　　丿　（つ　　つ　)）　　+
　　　　　　 ヽ　 （　ノ （　ヽノ　　　）　）　）
　　　　　　　（＿）し'　 し（＿）　 （＿）＿）

　一発当てて、生活変えた〜い･･･なんて思ってるの俺だけか?

ここ見てる人全員そう思ってると思うぞ。

初5等！わーい　400円ゲッツ

ロト６スレで晒した全金額の合計とかってわかる？

>>731
それも事前晒しじゃなくって当選券をＵＰしただけなんだよね

糞なプログラムですがよかったら使ってください。
重複についての処理は気に入らないなら直してください。
当方、趣味でプログラミングはじめたばかりのド素人れす。
public class loto6{
public static void main(String args[]) {
int randomNumber1 = (int)(Math.random( )*43+1);
int randomNumber2 = (int)(Math.random( )*43+1);
int randomNumber3 = (int)(Math.random( )*43+1);
int randomNumber4 = (int)(Math.random( )*43+1);
int randomNumber5 = (int)(Math.random( )*43+1);
int randomNumber6 = (int)(Math.random( )*43+1);

System.out.println(randomNumber1 +"," + randomNumber2 +"," + randomNumber3 +"," + randomNumber4 +"," +randomNumber5 +"," + randomNumber6 +"," );
}
}

>>745
1,1,1,1,1,1
っていうのも出てきそうですね。ヴァー

>>718
「累積の収支」
は出ないのでしょうか？

（´・ω・`）ｼｮﾎﾞｰﾝ でした。
1000円も当たらず・・・・
次回がんがります。

>>745のプログラムでセルフＱＰしますた。

02 12 13 18 25 33
01 15 19 24 30 41
21 22 26 32 40 42
11 20 25 32 36 40
03 18 21 32 35 41

これで来週逝きまつｗ

ネットサーフィンしてたらさ〜ついに見つけちゃったんだよね　幻のロト６
予想屋のページ　一日後にまたいってみたらなかったんだよね〜
　４　６が来る！！！！といってた

>>750
一度見つけてそのあとなかったっていうのがわらえる。

>>745
配列とループを使えばもっと簡単になりまつ。
重複を避けるために、簡単なところで１つ１つ比較していくのを入れるとさらにイイと思いまつ。
当方、BASIC止まりプログラマ？より

Sub QP()
　　　'重複チェックしてないのでダブル可能性あります
　　　For i = 1 To 6
　　　a = Int((43 * Rnd) + 1)
　　　If a <= 9 Then a = "0" & a
　　　If i = 1 Then
　　　ActiveCell = "'" & a
　　　Else
　　　ActiveCell = ActiveCell & " " & a
　　　End If
　　　Next i
　　　ActiveCell.Offset(1, 0).Select
End Sub

Excel VBA版だとこうなるかな？
超初心者だから'重複チェックを簡単に行なうことができないです。

自作のヘボJavaScriptだけど。

<SCRIPT LANGUAGE = "JavaScript">
function get_ransuu(){
var ransuu;
sort = new Array(6);
for(a=0; a<6; a=a+1){
while(ransuu==sort[0] || ransuu==sort[1] || ransuu==sort[2] || ransuu==sort[3] || ransuu==sort[4] || ransuu==[5]){
ransuu = Math.floor(Math.random()*43+1);
if(ransuu <= "9"){ransuu = "0" + ransuu;};
}
sort[a] = ransuu;
}
var swap;
for(a=0; a<6; a=a+1){
for(b = a+1; b < 6; b=b+1){
if(sort[b] < sort[a]){
swap = sort[b];
sort[b] = sort[a];
sort[a] = swap;
}
}
}
document.form1.ran1.value=sort[0];
document.form1.ran2.value=sort[1];
document.form1.ran3.value=sort[2];
document.form1.ran4.value=sort[3];
document.form1.ran5.value=sort[4];
document.form1.ran6.value=sort[5];
}
</SCRIPT>

>>754
メモ帳に貼り付け、ＨＴＭＬにしたけど真っ白なんだが・・・。どうやるの？

ﾁｯ･･･初心者が･･･

<form name="form1">
<input name="ran1" size="2">
<input name="ran2" size="2">
<input name="ran3" size="2">
<input name="ran4" size="2">
<input name="ran5" size="2">
<input name="ran6" size="2">
</form>
<br>
<form>
<INPUT TYPE="button" name="aaa" VALUE="逝ってよし♪" onClick="get_ransuu()">
</form>

>>754
確かにヘボJSだな。

>>755　逝ってよし♪
<form name="form1">
<input name="ran1" size="2">
<input name="ran2" size="2">
<input name="ran3" size="2">
<input name="ran4" size="2">
<input name="ran5" size="2">
<input name="ran6" size="2">
</form>
<br>
<form><INPUT TYPE="button"
STYLE="background-color:aqua;color:black;FONT:12px 'Arial Black';"
onMouseOver="this.style.backgroundColor='black';this.style.color='white';"
onMouseOut= "this.style.backgroundColor='aqua';this.style.color='black';"
onMousedown="this.style.backgroundColor='red';this.style.color='black';"
VALUE="ヘボJavaScript"onClick="get_ransuu()">
</form>

>>544で「１０００円の名無しさん」を名乗った者です。今回は４等が当たり
、三週目にして早くも「11,800円の名無しさん」に昇格しますた。みなさんの
ご声援のおかげでつ。給料前の11.800円は、う、嬉しい。
来週は８０万円の名無しさんを名乗る予定です。今後もよろしくね。

重複チェックのいらない方法。@perlで書く

# ボールを生成
{
　my @ball0;
　foreach(0..42){ $ball0($_) = $_ + 1; }

# ボールを６個取り出して表示。
　print sprintf(qq{%02d %02d %02d %02d %02d %02d\n},
　　splice(@ball,int(rand($#ball)),1),
　　splice(@ball,int(rand($#ball)),1),
　　splice(@ball,int(rand($#ball)),1),
　　splice(@ball,int(rand($#ball)),1),
　　splice(@ball,int(rand($#ball)),1),
　　splice(@ball,int(rand($#ball)),1)
　　);
　exit;
}
# 終わるり。

♪自前予想機で使ってたのを引用。

出現が集中してるのと、出現頻度が少ないのを取り出して
その中からランダムに抽出するといいかも・・・


どーせ当んねーよ

>>760
ソートが抜けてたｽﾏｿ。
{
# ボールを生成
　my (@ball0,@ball1);
　foreach(0..42){ $ball0[$_] = $_ + 1; }

# ボールを６個取り出して並べ替え。
　foreach(0..5){ push(@ball1,splice(@ball0,int(rand($#ball0)),1)); }
　@ball1 = sort { $a <=> $b } @ball1;

# 表示しる。
　print sprintf(qq{%02d %02d %02d %02d %02d %02d\n},@ball1);
　exit;
}
# 終わるり。

>>762
もういいよ。プログラム板逝け。

蒸し蒸し暑いのぉ〜
わぃの金欲はカッカッ来ちょるが( ﾟДﾟ)凸 ｺﾞﾙｧ!
さーて、今週の答え合わせだ( ﾟДﾟ)凸 ｺﾞﾙｧ!

４０　これはガチガチ
３７　まぁベタ
２９　ﾊｧ？(ﾟДﾟ)　チョイずれろよ　３０だろーが( ﾟДﾟ)凸 ｺﾞﾙｧ!
１９　知らねーよ
１７　お前は眠ってろよ
３９　そんな数字あったのかよ
１０　ボーナスでも出るなよ　出過ぎだ逝け

な、な、なんぢぁ( ﾟДﾟ)凸 ｺﾞﾙｧ!
４０はビッしビッしに当てちょるつーに( ﾟДﾟ)凸 ｺﾞﾙｧ!
全滅だっ( ﾟДﾟ)凸 ｺﾞﾙｧ!
ええええええええええぃ　糞ったれ
来週また挑戦だ( ﾟДﾟ)凸 ｺﾞﾙｧ!( ﾟДﾟ)凸 ｺﾞﾙｧ!

( ﾟДﾟ)凸 ｺﾞﾙｧ兄さん、（・∀・）ｷﾀｰ

思ったら、( ﾟДﾟ)凸 ｺﾞﾙｧ兄さんって地味に当たってるんだな・・。

( ﾟДﾟ)凸 ｺﾞﾙｧ! 兄さん、来週もガンガレ!!

14 16 23 27 30 38
03 06 09 22 25 34 QP
01 18 24 35 37 41
01 12 14 26 33 37
14 17 32 38 40 43 QP

02 09 13 14 20 21

>>764 今回のはちとウケたよ。ヽ（`Д´）ﾉ

( ﾟДﾟ)凸ｺﾞﾙｧ兄さんのﾊｧ？(ﾟДﾟ)が大好き。

来週も待ってマース(・∀・)

14 17 18 21 22 24
13 14 15 22 26 27
17 19 10 23 25 19
10 12 14 20 26 29
12 18 20 25 26 27

10 14 20 24 26 31
14 19 26 27 28 31
13 15 16 25 28 29
10 11 13 19 20 25
11 12 17 20 22 30

10 11 13 19 20 25
11 17 18 20 22 27
18 22 24 25 26 28
18 20 24 27 28 31
18 21 24 25 26 30

10 12 13 22 23 30
11 15 22 25 27 30
10 13 15 20 24 30
16 20 23 27 29 31
10 11 21 23 26 31

13 18 25 26 28 30
13 23 24 26 27 31
12 16 28 24 26 31
11 21 24 26 27 28
11 20 21 22 25 29

何回はずれれば気が済むのかね？

>>747
そこまでのことはやってないです。。。
毎週の収支はその時の集計に書いていますので
過去スレを収集すればわかりますけれど、
私が集計を始めてからまだ半年ほどですし
それ以前のことはわかりません。

累積だといくらくらいになるのでしょうね。一度だけ
50万くらい黒字になった週もありましたが、大幅な
赤字は免れないでしょう。

>>772
そんなに死を急ぎたい？

>>772
いつも高額ゲット済のような口調だね。
さしつかえなければ、くじ券と顔、うｐきぼんぬ。

一等を当てるのは俺しかいない！

　>>772

【社会】私立大学教授、地下鉄線路に腹ばいに→左足を切断…大阪
http://news2.2ch.net/test/read.cgi/newsplus/1056096205/

教授〜。体はりすぎ。

>>773
１回でも１等が出れば大幅な黒字になる

今までのロト6で、平均して
一番賞金が多く稼げる組み合わせって
どんな感じですか？
単に出た数字の多い順に6つ選べばいいんですかね？

年内はこれ一本で継続買いします！
02　10　11　27　28　29

ロト6の番号は木曜日の１８時３０分〜１８時４５分に晒すべし。
もしどっかの誰かに同じ番号買われたら、
１等当たったときに、自分の賞金が低くなります。

@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@

無修正ＤＶＤなら 新宿歌舞伎町直送
　　店頭販売の売れ筋のみ厳選してみました　安心の後払い
http://www.dvd01.hamstar.jp/
　　　　　　　　　　　　　白石ひとみ　小森詩　山田まり
＠＠　及川奈央　レジェンド　＠＠　堤さやか　東京バーチャル　大好評
　　　　　http://www.dvd01.hamstar.jp/
　　サンプル画像充実　　見る価値あり 　最高画質

@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
//////////////////////////////////////////////////////////////

みずほの行員がこのスレをチェックして操作してたりして（ｗ
と妄想してみる

>>779
漏れには、質問の意味が分かりません。

キャッシングの審査は秘密厳守で
今月の融資率92％と頼れるローン

アルバイト・失業保険受給中の方でも
迷わずお申し込み下さい。お力になります。
http://www.am1960.com/
携帯電話から　http://www.am1960.com/

清楚系・癒し系・お姉さん系・ロリ系と
素人の女の子がいろいろなことを・・・
NEW_FACEも続々出演してます
只今、生パン、生脱ぎ、生オナ生放送中
http://61.115.1.12/index.html

>>781-783
心配しなくても五等しか当たらないから問題ない。

>>787
それじゃあ買う楽しみがないやん。
まぁ同じ番号買う人なんていないと思うけど・・ｗ