サルでもできた！スロゲー開発

スロゲーを作りたくてたまらないヒヨッコ共が
四苦八苦して成長していくスレです。
生暖かく見守ってやってください。

合言葉は「元気があれば、何でもできる。」

前スレ
サルでもできるスロゲー開発
http://gamble2.2ch.net/test/read.cgi/slot/1068398809/

テンプレは>>2-12ぐらい

１．まずは下記のアドレスでHSPという開発ツールをゲットだ
　　　http://www.onionsoft.net/hsp/
２．「プログラミングなんてやったことないよ！」って人は、HSPのページから
　　リンクしてある解説サイト等で基礎をチラっと勉強すると吉
　　（「正宗」作者の３２氏はここで勉強したらしいぞ→　ttp://sapporo.cool.ne.jp/daturyoku/）
３．このスレと過去スレを参考にして、プログラムを書いてみよう
　　分からないことがあったら、先輩たちにドンドン質問しる
　　【過去スレ】
　　サルでもできるスロゲー開発
　　　http://gamble2.2ch.net/test/read.cgi/slot/1068398809/
４．作ったものを見てもらいたい時は、下記アドレスにアップロードするべし
　　プログラムに対してアドバイスが欲しい時は、コンパイル前のソース( .as形式)も
　　同梱することを忘れずに。
　　　http://yam-jp.com/~nanashi/devslot.php

関連サイト等はこちら　byぱちへる氏
　http://pachihell.at.infoseek.co.jp/suroge/index.html

>>2-12ぐらいといいつつ、他は特に用意してないので（ｫｨ

オススメサイトとか貼ったり、雑談とかしたり、
もう適当に始めちゃってください。

それでは元気に行ってみよう　↓　　　　　　　　　　ｵﾔｽﾐ

↑
超スルーされてやんの（ｗ
スロ板でここまでスルーされたスレもめずらしいな
バッハゴーゴー
バッハゴーゴー
バックナンバー

>>90氏
ﾓﾂｶﾚ､ｿｼﾃﾓﾔｼﾐ。

「サルでもできた」より「サル以下でもできた」のほうが漏れ的にはよかったなぁ。

>>952
やっと片言での日常会話ができるようになったってとこでつかね。
他人のスプリクトは知らない命令多すぎていじれません。
でももうそろそろわかる頃かなと、調子こいてみる。

>>964
それいいｱｲﾃﾞｨｱでつね。
漏れは、すべり中かどうかだけ監視しようと思ってたけど、
その変数一つで数を増やすだけで他の状態も監視できまつね。
とりあえずその前に、ボタン押す＝１、すべり終わる＝０を、3ﾘｰﾙ分書いたんでつが、
無効時間があるのは押し順に関係なく第一停止だけ。ﾅﾝﾃﾞ?ﾐﾀｲﾅ。

ｵﾊﾖｳｺﾞｻﾞｲﾏｽ
っつかいきなり荒らし入っちゃってるし。鬱
このスレは前スレ同様、保存されて職人見習いのための教科書として
まとめサイトに掲載される予定なので、煽り・荒らしは徹底放置です。


＞hage氏
ｵﾂ　日々精進されてるようで、何よりです。


えと、前スレ住人は数字コテのままだと現行スレとカブるので
各自微妙に工夫してくだちい。

いつもこのスレを楽しく拝見させて頂いております。
職人の皆様、ﾌﾚｰヾ(ﾟｰﾟゞ)( 尸ｰﾟ)尸_ﾌﾚｰ
頑張ってくださいね〜♪

数字小手ではなかったが変えてみますた。
おまいらも変えてみてはいかがでつか？

>>90氏
我ながら何よりでつ。
糞な質問でも親切に答えてくれるおまいら先輩方のおかげでつ・ﾟ・(つД｀)・ﾟ・

すべり中のボタンの無効は、比較的どうでもいい＆ないほうが高速消化できる＆思　い　通　り　に　な　ら　な　い
等の理由により導入しない事にしようかと思ってはみますた。
しかし、テーブル制御では第一停止の出目によって他リールのテーブルが選択されるので、
やはりあるべきではないかと思いまつが、おまいらはその辺どう思われまつか？
あと、コントロール制御というのは、成立役を最大限引き込むだけでいいのでしょうか？
自分はテーブル制御しか知らないもんで。


前スレ1000取りされてるよ。

>>1
乙！
みなさんガンバッテまいりましょう〜

>>90氏等のレスアンカーはわかりにくいので
全角で打ってもらうか、つけないようにしていただきたい

>>10 レスアンカーってなんですか。

11 名前：(　´∀｀)ノ７７７７さん[sage] 投稿日：03/12/26 14:49
>>10 レスアンカーってなんですか。
↑
これがレスアンカーだ

>>1乙。
店プレは>>2-12あたり　って…
店プレたくさんまとめてくれたのかと、期待しちゃったぢゃんyo！

【乙】　新スレ誕生おめでとうございます。

整理して作っているつもりだったスクリプトが今では頭の中までグチャグチャ．．．

新スレオメ
俺作ろうとしたけど、出来なかったよ。
猿以下か・・・＿│￣│○

申し訳ない。ひとまず全角に変えてみました。
レスは＞９０って感じでヨロです。

＞見習いＡ
オイラもコントロール制御で作ってるけど、以下のような問題点が。
・第１リール停止：枠上に成立役があると絶対に上段に滑ってきて止まる
・第２リール停止：枠上に成立役があると絶対に上段テンパイする
テンパイした瞬間に制御を止めちゃうと、上のラインでしか揃わなくなるので、
順押しで下段に揃えたい場合は要ビタになってしまいまつｗ

役が成立したら優先ラインを決定して、そのラインに引き込めるなら最大限引き込み、
引き込めなかったら成り行きで揃うようにすればイイ感じになるかと・・・。


しっかりテンプレまとめたかったんですが、ぱちへる氏のサイトがよくまとまってる
＆自分のスロゲで手一杯という状況でして・・・。次スレこそは・・・ｽﾏｿ

前スレの77也。
解り辛いとの意見なのでコテハンに戻しまふ。

現在自分のソースのシェイプアップを図ってます。
結構その場しのぎの文字を多く使っている・・・＿|￣|○
ついでに次のステップ（液晶部分）のためにリール表示も微妙に修正。
上書きしないようにしただけですが・・・（こうしないと液晶のところがﾏﾝﾄﾞｸｻくなる予感がした）
この土日でメインの部分をしっかりとしておけば来年に楽しい液晶つくりが進められる。
ここの部分が作り手として楽しい部分になりますからね。（オリジナリティーもここで出せる）

＞９０　すまん　ワシがせかした為に．．．
しかしアッという間に1000に達してしまいましたネ　特に1000取り君は競合も無く．．．

とりあえず誰が何つくってるかまとめキボンです〜。
かぶったら俺のヘボ度がばれてしまふ

ワシは、とりあえず slot2.ini のサンプルは”旋風プラネット”
汎用システムなので制約多し。．．．
(単純にリールはネオプラ・筐体と演出システムは旋風なので誰とも競合しません)

オイラは前スレで予告した通り
賭博黙示録カイジを題材としたオリジナルスロですな。
ゲーム性はDISC UP＋陸奥一番星みたいな感じ？（謎）

今日は2時ぐらいまでｶﾞﾝｶﾞﾙぞー

神

音がないよ、そういえば効果音は代用品で作ってたな・・・まぁいいか、しばらくは。

大家さん。
コントロール制御のスクリプト一部か方法を公開してくらはい。
おいらのテーブルから(1-4)滑りを拾う方法は。

Ltab.0="43210432104321343210432100"
の文字列テーブルから停止リール番号の位置-1にある値を読み込み
その値に図柄高さを掛た値分滑らせています。
strmid ii,Ltab.0,Indx.0-1

第二停止時の聴牌ラインをコントロールするのに工夫が必要なのですが。
テーブル制御以降コントロール制御する方法がズーット見つかりません。

＞あか　氏
もう、あの独特なリール描画は無くなってしまうんですか？。．．．さみすい。
あと797）

>>24
そのままですよ（ｗ
いままでだらしなくなっていた下部分をカットした、というだけです。
下は今後（予定している）液晶で書き換える部分なので、リールと重なる可能性がある。
で、下の部分を表示させないようにプログラムを修正して・・・（ここは簡単だが）
リールのスタート位置がマイナスからなので計算式を入れないといけなかったのです（´･ω･｀）
せっかくのなめらかリール描画（自分なりに）だったので残さないと悔いが残る気がして・・・

左リールを止めた瞬間（停止ボタンが押された瞬間）に以下の処理。
・ビタ〜４コマ滑った時の５パターンで停止許可フラグを設定
フラグの内容は「不許可」「許可」「優先」の３パターン。
＞チェリー非成立時、チェリーが枠内あるパターンは不許可フラグを設定
＞成立役が枠内にあるパターンに優先フラグを設定
優先→許可の順番で検索し、停止位置を決定（全リール同じ処理）

第２リール
＞小役フラグ成立時、テンパイするパターンを優先設定

第３リール
＞小役フラグ非成立時、小役が揃っているパターンを不許可設定
＞小役フラグ成立時、揃っているパターンを優先設定

ボーナス成立時はボーナスがテンパイ・揃う形に優先設定。
優先・許可フラグが複数ある場合は滑りコマ数が少ない方が
振り分けが高くなるように設定。
（現段階では1/2の抽選に当選すればで次の許可パターンを選択）

んー、まだ実際不具合も多いので、これが正しいとは思いません。ｗ

>>280Sさん
うちのｺﾝﾄﾛｰﾙ制御は･･･
現在の表示ﾘｰﾙに成立絵柄があるかをﾁｪｯｸ
→無ければ1ｺﾏすべる
→･･･最大４回繰り返し
ﾊｲ、ﾋﾞﾀ止まりするし上段揃いﾊﾞｯｶﾘです(･ω･ ｀)

連続演出ﾎﾞｽ用の「強そうな小さめのAA」が見つからない･･･(´ ･ω･)ﾌｩ

新ｽﾚおつです。
>>見習いＡ
おいらもテーブル制御で行こうと思ってます。
（ちなみに完全オリジナルの大量リーチ目マシンです。需要ないと思うけど…ｶﾞﾝｶﾞﾙ!）
すべり中のボタン無効はおいらは採用してます。
でも、もししなかったとしても、テーブル制御には影響ないです。
何故かというと、”第一停止の最終出目（止まった位置）”から判断するのではなく、”第一停止の停止予定位置”から
判断されるからです。
ボタンが押された瞬間に”停止予定位置（目標停止位置）”を取得すれば解決できると思います。

実機のコントロール制御ってのは”引き込み役があったら最大限引き込む”ので、もし３コマスベって上段テンパイしても
最大コマの４コマにはあと１コマあるので右下がりにテンパるんじゃないでしょうか？
だから、最大限滑れるコマ数を判断しなくてはいけないんじゃないでしょうか。

皆さんありがとう。　でも　むずい！！！　頭イタイ死　寝るか。
でも、やっと有意義なスレに戻ってよかった。．．．　

>>コントロール制御でやろうとしている方々

上段ビそろいばかりで淋しいというのなら、成立役をそろいパターンから分けてしまえばよいのでは？

具体的には、（役の後ろの数字は乱数の数字と考えてくれぃ）

＜変更前＞
リプ成立 1-30
チェリ成立 31-39
ベル成立 40-52
スイカ成立 52-61

＜変更後＞
上段リプ成立(横) 1-6
上段リプ成立(斜め) 7-12
中断リプ成立 13-18
下段リプ成立(斜め) 19-24
下段リプ成立(横) 25-30
[以下略]

こんな説明でうまく伝わるかなぁ？

>21
90氏、カイジスロ期待しておりましたが、まさか陸奥一番星とは！！！！
期待度が200%うｐしましたｗ

>>30
ナルホド、フラグ成立の時点で揃うラインも決定してしまうワケでつな。
なかなかいいアイデアだと思います。
ただし、リール配列などによって指定ラインに揃えられないケースもあるので、
例外処理も必要ですね。
その方法で一番のメリットは「滅多に揃わないライン」を設定できることで、
小役告知・テンパイラインの組み合わせでアツくなれそうな予感。

>>31
なぜ陸奥で期待度が・・・ｗ
まぁ、例の3択とジャンケンの3択が似てるので
「どぉぉぉーーん！！」といったところです。（さらなる謎）

>>15
猿仂仲間ﾊｹｰﾝ。
同じ猿仂同士根気よくがんがりませぅ。

＞９０
だいたい予想してたけどやっぱり出目とかラインが偏るようでつね。
コントロール制御ではよほど工夫しないとだめってことでつか。
コントロール方式のテーブルをいくらか作るとか・・・・・・ｹｯｷｮｸﾃｰﾌﾞﾙｼﾞｬﾝ

＞１０１
左押した瞬間に中右テーブルが決定されるって事でつね。
なるほど。それならすべり中に押しても問題ないのか。
当然の事ながら、その停止予定位置の検出なんかとてもわからない訳で。
役の抽選、揃い判定、リール制御ができてからやってみたいと思い松。

良い子はみんな寝たかな。

１．テーブル制御にしろコントロール制御にしろ引き込む位置で工夫が必要で
　　振り分けかたが問題になる。

２．あまり完璧に制御した場合リーチ目などの制御も必要になるしビタなのか
　　あやつられているのか判らなくなってしまう。
　　(テーブル方式の良い点はリーチ目が豊富なところ)

やはり　頭がイタイ。

コツコツとシェイプアップ＆判りやすい文字を使用するなどの改良で５００バイトの節約に成功。
・・・たかが５００、されど５００なわけで・・・
自分の制御部分を見てて「これ・・・リール制御だな」と思い始めた。
リール制御とテーブル制御の区別が判らなかった・・・＿|￣|○

リール制御：
必要な絵柄（ボーナスなり子役なり）を探していき、見つけたらそこで止まるようにする。
処理が簡単だが引き込まなかった場合、など面倒な所が残るためエラーがやや出やすい。

テーブル制御：
あるフラグ、ある場所で止めた時、あらかじめ用意したすべりコマ数を見つけて止める。
膨大なテーブルデータが必要だが想定したラインに確実に止める事ができるのでエラーが少ない。

これでいいんでしたっけ？

＞あか氏
ちょっと違いまつ・・・。
リール制御とは文字通り、リールがどこで止まるかを
制御するプログラム自体の事で、リール制御の方法に
「コントロール制御」と「テーブル制御」の2種類があるという感じです。

awk と言うスクリプト言語を知っていますか、昔からある言語で pelar sed geep
　等と併用されていましたが今はマイナーな言語です。私は好きでたまに使用します、
　特に一発やとして便利です。(コマンドラインに打ち込むだけ)

１．HSP スクリプトからサブルーチン名だけ抜き出す。
　　awk "/^*/" xxx.as
２．サブルーチン名と行番号。
　　awk "/^*/{print NR,$1}" xxx.as
３．コマンドのある行を抜き出す。
　　awk "/gsel/{print NR,$0}" xxx.as
４．最後がloopの行。
　　awk "/loop$/{print NR,$0}" xxx.as
/ /内は正規表現と呼ばれるコントロールが入ります。(^ =行の先頭 $ =行の終わり)
興味がわいた方は awk と検索すれば gawk gjawk mawk や詳しい説明がヒットします。
スレ違いかも．．．スミマセン。．．．。．．．

質問です。

repeat〜loop内に、もう一つrepeat〜loopを作った場合、cntの値はどちらを基準に取得されるのでしょうか？
個別に取得したいのですが…。

>>38
おもしろそうですね（ｗ
テストしてみます。

repeat 5
　a=cnt:mes "loop 5 "+a
　repeat 3
　　a=cnt:mes "loop 3 "+a
　loop
loop
stop

結果は各自で試してみるといいかも。
repeatに入る時に０にしてます。で、loopを越えると消される。
５回の中の３回は毎回０スタートになっています。
でも５回のrepeatは終わってないので継続されてます、不思議です。＿|￣|○
cntが２つある感じですかね・・・

>>39
なるほどぉ。
３重にもしてみましたが、おっしゃる通りどうやらcntの値は”そのrepeat内”を基準とするようですね。
cntという１つの変数でも内部的には別々に用意されている（？）感じですね。
となると、cntは何種類まで（何重のループまで）耐えられるのか知りたくなってきますよねｗ
ネストの限界値の３２と予想してみる。

なるほどぉ。AWKは皆さん興味ないようですね。
個人的には便利だと思っているけど。．．．

ttp://yam-jp.com/~nanashi/slotimg/slo050.lzh

とりあえず制御は完成（したとする）
次からは液晶部分に着手・・・できるといいな(´･ω･｀)

>>36（遅れました・・・）
・・・えーと・・・
つまり分類で言えば「コントロール」「テーブル」ということですね？
勘違いしてたんだな・・・

「ある代数（aとかに）の数字によって場合わけされる」のが欲しい・・・
例えば1つ提示して１だったらここ、２だったらここ・・・って指定できるのがあれば、と。
evaluateだかwheneverだったか忘れたが（確かcobol）ＨＳＰになかったかな・・・
今の所ここをすべてｉｆ〜ｅｌｓｅで書いてる、不便なんです。

on goto ?

repeat 4
if (table_ki7_L.stop_yy_L=1) {return}
else{stop_yy_L--:if(stop_yy_L<0){stop_yy_L=20}}
loop
とりあえず４回を１回にしてみては。．．．

＞あか氏
swich〜case〜swendはどうでしょう？

間違た。
switch〜case〜swendですた。
見当違いだったらｽﾏｿ。

>>44 訂正
誤　とりあえず４回を１回にしてみては。．．．
正　とりあえず４回同じ事を書いている行を１回にへらしてみては。．．．

さらに一つにまとめてみては。．．．(部分的に異なるだけなら)

#module
#deffunc tes val,int
mref p1, 16:mref p2, 1: p1=999
if p2 == 0{p1=11}:if p2 == 1{p1=12}
return
#global
tes xx,0:mes "xx = " + xx:stop

などと好みのコマンドを作ってみては。．．．

>>44
repeatを使う方法は確かに有効なんですが、
テストの段階で「ネストが深すぎます」というエラー文が出てきたんです。
実機みたいに回転と回転の間にウェイトをつけると問題がなくなるんですが
高速で「スタート〜ストップ〜スタート〜ストップ」を繰り返すとエラーが出ちゃうんです。
これは何回もテストを重ねた結果、repeatを使わないとあえてしています。
でもrepeatを使いたいのは事実です。(´･ω･｀)

>>43
>>45
どっちもあった━━(ﾟ∀ﾟ)━━！！
ヘルプで説明を見たらまさしくそいつです。
後はプログラムがどっちを使うと素直かを試しながら使わせてもらいます。感謝。

>>48
使い方がわかんない・・・＿|￣|○
もう少し判るようになってから使ってみよう

>>44 再訂正
誤　if (table_ki7_L.stop_yy_L=1) {return}
正　if (table_ki7_L.stop_yy_L=1) {break}

ポカミスが多くてスマン。

＞あか 氏　今テストしてみましたが問題ないようです。
１．
*hantei_ki7_L
repeat 4
if(table_ki7_L.stop_yy_L=1){break}
else{stop_yy_L--:if(stop_yy_L<0){stop_yy_L=20}}
loop
return
２．黄色7判定を一つにまとめたもの。
*hantei_ki7
if index == 1{repeat 4
if(table_ki7_L.stop_yy_L=1){break}
else{stop_yy_L--:if(stop_yy_L<0){stop_yy_L=20}}:loop}
if index == 2{repeat 4
if(table_ki7_C.stop_yy_C=1){break}
else{stop_yy_C--:if(stop_yy_C<0){stop_yy_C=20}}:loop}
if index == 3{repeat 4
if(table_ki7_R.stop_yy_R=1){break}
else{stop_yy_R--:if(stop_yy_R<0){stop_yy_R=20}}:loop}
return
３．まだ共通化出来るとおもいますが後のことを考えこの程度かと。．．．

ほぼ２０時間ぐらいの時間（金曜夜〜土曜日朝＋日曜昼）をかけてやっとリール回転＋停止まで作れました。

ttp://yam-jp.com/~nanashi/slotimg/slo051.zip
（※HSPのソース＋リール画像しかありません）
展開してできたディレクトリの、"003.as"が最新のソースです。

（ちなみに、001は回転スタート＋停止のみ。002は停止後に各リールの役番号をタイトルバーに表示。003は適当にリールを滑らせています）

次はいよいよ制御部分を作って・・などと考えているのですが、
テーブル制御・コントロール制御の違いがいまいちわかりません。

どなたか教えていただけませんか？

ちょっときいてくださいよみなさん。左リールのみの1パターンだけですが、
押した位置に対するすべりコマ数設定のソースが一発で書けました。
思わず勃起しそうでつ(；´Д`)ﾊｧﾊｧ
この作業をあと（フラグ数＊21）回やったら左部分は完成でつ。







ﾀﾞﾙｰ＿|￣|○

>>52 乙です。
１．全リール停止時に適当な停止キーを押すと全リール再回転します。
２．第三リール停止時ビタの場合絵柄が一瞬で入れ替わる場合と
　　８〜１０コマ滑って止まる場合があります。

．リール作成方法は簡潔でいいです。(文字列をテーブルに使うのは私と同じです)
．将来的にリール回転、停止部分は分割する必要があるかも知れません。
．リールコントロールの概念は過去ログに考え方が記されていると思います
　が皆さんが悩んでいる部分なので明解は見つからないかもしれません。

>>52
コントロール制御は成立役は最大限引き込む制御らしいでつ。
テーブル制御は、>>53で言ってるように、
第一停止（左）で押した位置に対するすべりコマ数がフラグ別に設定されており、
その第一停止出目から第二・第三リール（中、右）のテーブルが選択される。
そのテーブルはすべりコマ数ではなく、どこで止まるかというもの。
停止位置が全部設定されてるって解釈でいいと思い松。

>>ﾍﾎﾞﾌﾟﾛｸﾞﾗﾏｰ見習いA さま

熱烈．．．ソースと解説きぼんぬ。！！！

＞２８０S氏
未完だからやだ！
その前に、さまとかつけないで頂きたい！

>>ﾍﾎﾞﾌﾟﾛｸﾞﾗﾏｰ見習いA 殿

そんなこと言わずに。．．．お願い一行だけでいいから。

テーブル表がないから今日はできねぇ。
明日にしよう。

サル(仂)が一行だけでできる訳ないのですが、何か？
整理してうｐするからちょっとまってくだせぇ。

正座すわりで．．．静かに待ってまつ。(一行と一発を勘違いした？)
そう言えば>>52でパス名に/が使えることを始めて知りました。！

制御の主な部分だけでつ。

if (lp=1)&(ly=1440)&(flg=1) : state=0 : ls=1 : goto *SKPleft
if (state=0)&(k=1)&(lnp=0) : state=1 : lp=1

変数の説明
state　　すべり中＝１
lp　 　　ボタンを押した位置（０は0<ly<80）
ls　　　 リール動いている＝０
ly　　　 リールのｙ座標
lnp　　　リールの現在地（ly/80）
flg　　　フラグ（未設定）
こんなもんでつ。

ｯﾂｰｶｺﾝﾅｿｰｽｺｳｶｲｼﾃﾏｼﾞﾊｽﾞｶｽｨ

ちなみに上と下のソースは全然近所じゃないっす。
if(lp=・・・・・・の下は、ly-=16でつ。
で、その下が*SKPleftとなりまつ。

ﾓｳﾔｳﾞｧｲ､ﾓﾔｽﾐﾅｻｲ

あと、中右が押されてないっていう条件がいりまつ。

ＵＰ&解説 ありがとうございます。が．．．

　もし 停止位置(1) で リールＹ(1440) で (1) なら
　滑りなし で リール停止中 で SKIPleft に行け。

　もし 滑りなし で ？(1) で リール位置(0) なら
　滑りあり で リール回転中。

う〜っ　ワシの頭では理解できない。．．．完成までまちます。．．．

変数が増えてきて変数名を決めるのに悩む…。
英語や英語の略だったらプログラムっぽくてｶｺｲｲんだけど、おいらほとんどがsuberiとかjoudanとかローマ字だからｶｺﾜﾙｲ…。
でもそうしないと自分で何の変数だか忘れちゃうからまぁいっか。
でも憧れる…。

＞１０１ 氏　おばんです。
今日はひまでイーッパイ書き込みしてしまいました。ごめん．．．
テ言うかスクリプト見てても先に進まないので．．．

ttp://dictionary.goo.ne.jp/search.php?MT=%61&kind=je

で翻訳して変数名決めてますが、何か。

変数名は＿（アンダースコア）等を使って区切り、
頭に「ジャンル名」を付けると、後で混乱することを防げます。
デバッグウインドウ上でも整列されるのでｳﾏｰ

例
★ゲーム数データ関連
　　Game_soukaiten　総回転数
　　Game_bigkan　　　ビッグ間ゲーム数
　　Game_bonuskan　ボーナス間ゲーム数
　　Game_bigcount　　ビッグ回数
★制御関連
　　Reel_pushpos　　　停止ボタンが押されたときの下段絵柄番号
　　Reel_stoppos　　　最終的に停止する下段絵柄番号

・・・みたいな感じ。
伊藤家に送ってみるといいよ。

＞９０ 氏　おばんです。

ワシの命名規則は。
変数名 =Xxxx or Xxxx.0 の４文字。
サブルーチン名=Xxxx_Yxxx で Xxxx は動作 Yxxx は対象物。
定数　　　　　　　=XXXX_X です。

長い名前は打ち込むのに苦労したりスペルミスするのでチョンボなワシには
向かないのです。

＞９０氏に禿同。
おいらもそんな感じです。

＞２８０氏
翻訳していたとはｗ


長めでも意味がわかりやすいからやっぱりおいらは日本語かな。
ただ人に見せる時赤面必死（汗

艦長：話題を提起しても伸びない。
艦長：粘着しても伸びない。
艦長：もともと住人が少ないのか。
艦長：ＲＯＭってるだけなのか。
艦員：２８０Ｓがアホだからです。
艦長：よし、目標　２８０Ｓ　波動砲装填開始。
艦員：８０％
艦員：９０％
艦員：１２０％
艦長：発射。
爆音！
艦長：な、な、なぜ　自艦に照準を合わせた。！
艦員：..．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．

そして　サルゲー惑星に平和がもどりました　とさ。

＞もともと住人が少ないのか。




正　　　　　　　　　　　　　　　　　　　　解


−−−＜￥１,０００＞−−−

[艦長の航海日誌]
宇宙暦ｘｘｘｘ1
今日はじめて2CH星雲でまともなＭクラスのスレ星と接近遭遇
スキャンからサルゲー星と判明、しばらく観察して見ることにした。
宇宙暦xxxx2
非常に発展的で向上心に満ちた惑星だが、いかんせん住人が少ない
アカデミーに近隣惑星の住民移住計画を要請。
宇宙暦xxxx3
第一次の移住計画が始まったがなじめず脱落し離星するもの多数
やはり人間の移星はむりなのか。

つづく？

[艦長の航海日誌]
宇宙暦xxxx4
第一次移住計画の失敗から2年第二次移住計画では猿星いわゆるサルの惑星から
移住を求めるべくコーネリアス博士と打ち合わせた結論から過去にサルの惑星に
定住した地球人(アメリカ人)の子孫であるメリケン一族を移住対象として要請した。

つづく？

[艦長の航海日誌]
宇宙暦xxxx5
メリケン一族は期待以上にスローゲー星になじみスロゲー星は飛躍的に発展し
近隣惑星との貿易も栄え大発展をとげた。
宇宙暦xxxx6
喜びもつかのま、原住民と移民とのDNAレベルでの相違から思わぬ疫病が流行
わが艦も医療チームを派遣したが未知な組み合わせにより突然変異を起こした
ウイルスは免疫はおろか感染ルートすらわからない。

つづく？

だーれも遊んでくれないので　寝まつ。
リクエストがあればる続きを考えます。．．．たぶん無いとおもうが。

北斗のスロゲーDLしたんですがswfファイルが開けません。
さっきShockwave Flashプレイヤーをインストールしたんですがそれでもダメです…。
どうしたらいいんでしょうか？どなたか教えてください。

swf版はこのスレ発祥ではないのでスレ違いですが・・・。一応。
ブラウザにドラッグ＆ドロップで遊べると思います。
この説明で分からなかったら、このスレではなく
フリーのスロゲを〜スレで聞いてください。

＞２８０
ｵ津

ﾓﾊ。
280Sﾀｿは孤独に耐えかねて寝たか。
>>62でつが、まず訂正
lp　 　　ボタンを押した位置（１は0<ly<79）でつ。なんでもいいんだけど一応。

日本語で説明すると、
(上)　フラグが１で、lyが０〜７９の間で押され、かつ、lyが1440（19ｺﾏ目）のとき、ly-=16をスキップ。
　　　　lyが1440に満たない場合は、それに達するまでly-=16を実行。
(下)　すべり中でなく、lyが０〜７９間で左キーが押されたらlp=1

ってな具合でつが、サルが書いてる以上、非常にわかりにくいと思いまつ。
でも、ややこしいだけで難しい命令とか使ってないので、
【サルでもできた】にふさわしいと決め付けてみるテスト。
つーか、誰かこのソースの穴を指摘してくらはい。
ﾅﾝﾄﾅｸｺﾜﾋ

今フラグの数勘定したら19もあった。
左の第一停止だけで399パターン、鬱。
JACinとJAC中のリプは通常のリプフラグと同じにしていいものかどうか検討中。
やっぱだめなんだろうけど。

>>ﾍﾎﾞﾌﾟﾛｸﾞﾗﾏｰ見習いAさん
JACinとリプフラグのテーブルは同じでいいのではないでしょうか･･･？
JAC中のリプはハズシポイントの関係で７・リプ・リプなんかの
特殊役もあるので難しいかもしれませんが･･･
ウチも制御を少しでも奥深くしようとと思って作成中だったんだけど
痛恨のミスを指摘されて半端版で急遽UPしたりして･･･。

まだまだ猿、日々精進也･･･

こんな夜中に起きてる人ﾊｹｰﾝ。

JACinはともかくJAC中は１ラインになるうえに代役が止まるから
難しいというか、無理だと思うんでつが。
その前にテーブルが同じでいいわけがないｗ

JACﾊｽﾞﾚを忘れてた。
20もある。うああああああああ

if（なんちゃら）&（なんちゃら）&（なんちゃら）
とかやってたらきりがない＿|￣|○
状態を全部数値化するしかないな。
なんかいいｱｲﾃﾞｨｱがあれば、教えて頂ければ幸いでつ。

おいらもサル以下なので>>62がよく理解できないですが…
もしやボタンを押された位置によって逐一テーブル（というか止まる位置）を指定するつもりですか？
ソースが膨大になる恐れが…。
>>23で２８０氏が言っているように後でまとめた方が良さそうです。
ちなみにおいらも全く同じ方法を取っています。

あと状態ですが、状態変数をたくさん作るより、都合の悪い状態の時はそこを通らないようにすればいいと思いまつ。
例えば
if (a=1)&(b=0){　…
if (a=1)&(b=1){　…
のようなソースがあったら
if a=1{
if b=0{ }
if b=1{ }
}
if a=0{
}
こんな感じにするとか。
要するになるべくいちいち複数の条件をつけないって事です。
そうすることによって処理も早くなるだろうし。

てことでお互いｶﾞﾝｶﾞりませう。

ボタンを押された位置によって逐一テーブル（というか止まる位置）を指定するつもりですよ。
むしろテーブル表をみた事ある人なら当たり前の発想だと思いまつ。

で、その中括弧はなんでつか？
しかも中身がないなんて、漏れには理解できない・ﾟ・(つД｀)・ﾟ・
フラグ別の押された位置に対するすべりコマだから、漏れ的にこれ以上簡潔にできません＿|￣|○

なんか１０１誌のおかげでわかりそうな悪寒。
ちょっと自力で考えてみまつ。

１０１氏＝紙
これから１０１氏が後輪する度にあがめ倒しまつ。
１０１紙のおかげでｻﾙ仂から一気に勝ち組にのし上がる事ができそうでつ。
誠にありがとうございまつ。

>>答えてくださったみなさま、

ありがとうございます。
すべての場合の滑りコマ数が定義してあるのが「テーブル制御」で、
成立役に応じて役がそろうように滑りコマ数を決定するのが「コントロール制御」なんですね。

（間違っていたらつっこみプリーズ）

「テーブル表」っていうものを見たこと無いんですが、配列変数を使えば何となくできる・・・かなぁ。
と、思い始めました。
今日で仕事納めなので、仕事が終わったらまた考えてみます。
サンクスでした！

>>52
微妙に違うぞとつっこんでみる。

そう言えば漏れ、配列変数の使い方がわからないんでつ。
ヘルプ見ても定義の仕方しか載ってないし。
誰か教えてクリトリス！

抽選パターンが(設定1〜6)*(1〜3枚掛け)*(高確･低確･BIG中)+JACgameの55通り
フラグ数22、第一停止パターン462通り、気が遠い・・・・・・

おはよう。
数値型の場合。
　dim a,3　　= ａの箱が３っ　添え字の数　０−２　まで。
　dim a,3,3　=　上記個々の箱の中にさらに箱が３っある。
文字列型の場合。
sdim 32,a　=　３２文字入るａの箱が３こある。
ｓｄｉｍ　ａ，３２，３　＝　
多次元配列の操作と注意。
dim a,3　の場合　a.0 a.1 a.2　の箱があるので変数　ii　を変化させて使用する。
dim a,3:a.0=9,8,7
repeat 3:mes a.cnt:loop　でcntが0から2まで変化している。
dim a,3,3:dim b,3
a.0.0=1,2,3　は使用できない。
a.0.0=1:a.0.1=2:a.0.2=3:a.1.0=4...　と箱の中にものを入れる。
mes a.0.b.0　は使用出来ない。
ii=b.0:mes a.0.ii　と単体の変数に値を代入して使用する。
sdim a,1,3
a.0="abc","def","ghi"　とした場合箱の容量が1しかないのでa.0は"g"になる。
sdim a,1,3
repeat 3:ii=cnt:str ii:a.cnt=ii:mes a.cnt:loop
mes a.0　上記mesでは正しく表示されているa.0がa.2の内容になってしまう。

質問です。
１．機械設定。（初回設定，以後変化なし）
　．影響されるもの。
　　　　役の抽選確立。：モードの移行抽選確立。：確立状態の抽選確率。
　　　　ＡＴ初あたり　：ＡＴ継続回数。
２．モード。
　．影響されるもの。
　　　　ボーナス放出確立。（ＲＴに影響）
３．確立状態（高確ＡＢ，低確）。
　．影響されるもの。
　　　　ボーナス放出確立。：ＡＴ当選確率。（含む継続回数）
４．ＲＴのＧ数抽選確立
　．影響されるもの。
　　　　ボーナス放出後抽選。（特定子役で解除抽選）
５．ＡＴの継続抽選確立
として必要なデータは
１．確立ごとの役配分確立表。
２．設定ごとのモード移行確立表。
３．役ごとのモード抽選確立表。
４．役ごとの確立状態抽選表。
５．確立ごとのＡＴ抽選表
６．ＡＴ継続回数抽選表。
これでいいですか？．．．

昔のｽﾛﾏｶﾞ引っ張り出してきて、ﾎﾞﾇｽ成立Pの左21ｺﾏ分書いてみますた。
自分の書いたソース見てｵﾅﾇｰできまつ(；´Д`)ﾊｧﾊｧ

＞280S氏
せっかく説明して頂いているのに小生の頭脳では全く理解できません。

dim reel1,23 : reel1=1,6,3,5,4,7,2,2,2,5,7,3,6,2,5,4,6,5,4,6,5,1,6
dim reel2,23 : reel2=1,6,7,5,6,4,1,7,5,3,6,7,5,6,2,7,5,6,4,6,7,1,6
dim reel3,23 : reel3=1,5,4,7,6,5,3,7,2,5,4,7,6,5,3,7,6,5,4,7,6,1,5

わからないけどとりあえずこれだけは書いておるんでつ。
これで揃い判定の基本みたいなのを説明して頂けないでしょうか？

>>ﾍﾎﾞﾌﾟﾛｸﾞﾗﾏｰ見習いAさん
21コマリールなら配列数は21でいいのでは･･･？
揃い判定は･･･
左上段絵柄＝中上段絵柄＝右上段絵柄だったら、揃っている
(以下全ﾗｲﾝ分)
という感じでうちはやっとります･･･。

只今制御部分を大幅ﾀﾞｲｴｯﾄ中･･･50％ぐらいの大幅ダイエットに成功しそうです･･･

dim reel1,23 : reel1.0=1,6,3,5,4,7,2,2,2,5,7,3,6,2,5,4,6,5,4,6,5,1,6
dim reel2,23 : reel2.0=1,6,7,5,6,4,1,7,5,3,6,7,5,6,2,7,5,6,4,6,7,1,6
dim reel3,23 : reel3.0=1,5,4,7,6,5,3,7,2,5,4,7,6,5,3,7,6,5,4,7,6,1,5

dim l:dim c:dim r
l=1 :c=1 :r=4
ii=reel1.l :str ii

if ((reel1.l)&(reel2.c)&(reel3.r)):dialog ii +" atari",0
stop

>>見習い氏
もうお分かりかと思いますが>>86の”中身の無い括弧”にはなんか書いてください。
その中身ではなくソースのまとめ方を書いただけでつ。
…て事で拝み倒さないで下さいｗおいらもサルですから。

＞２８０氏
５の１〜５の意味が良く分かりませんが…いいと思いまつ。
が、機種によって必要ｏｒ不必要になりますよね。

＞repeat 3:ii=cnt:str ii:a.cnt=ii:mes a.cnt:loop
＞mes a.0　上記mesでは正しく表示されているa.0がa.2の内容になってしまう。

え！？なぜ？？

＞６８０氏
多分繋ぎ目分だと思います。
おいらは枠上・下も考慮に入れて配列数が26でつ。（後々気付いたんだけど、２５で良かったかも…。）

５０％ものダイエット…ｽﾊﾞﾗｼｲ!ｶﾞﾝｶﾞってくらさい。

訂正
if ((reel1.l=reel2.c)&(reel2.c=reel3.r)):dialog ii +" atari",0

１０１　氏　スマン簡単に説明しようとして間違えた。

sdim a,1,3
repeat 3:ii=cnt:str ii:a.cnt=ii+"aa":mes a.cnt:loop
mes a.0　
stop

で結果が意図したとおりになる？。．．．

＞a.0がa.2の内容になってしまう。

この意味が良く分からないのですが…。
>>100のソースを実行すると
0aa
1aa
2aa
0
となり、正しい結果が出ます。

101get!!

>>94　では
誤　として必要なデータは
正　上記５つの要素を満たすために必要な数値表は下記の５つ。
と言いたかった。
確かに機種によっては不必要な組み合わせもありまつ。

>>100 でも期待した結果とは少しズレがあるが、言いたかったことは
文字変数の箱が小さいと代入中に確認してＯＫでも実際代入されていない
という事でした。．．．

誤　a.0がa.2の内容になってしまう。
正　用意された箱の分しか代入されない。

＞0aa
＞1aa
＞2aa
＞0
＞となり、正しい結果が出ます。

あげげ足をとるわけではないが結果は正しくないと思う。

ようやく理解できますた　ノ
最後のa.0は0aa出なければいけないんでつね。
sdim a,1,3と、”1”しかない箱の説明がしたかった。ってことですね。

そうです。　
簡単に配列の使い方と変数バッファの使い方を説明しようと書いたがどうもミスが
多いようで迷惑をかけてスマン。

sdim a,4,32 と配列を作ってバッファーが32あるのに何故結果が異なるのか
こ一時間悩んだあげく配列数とバッファーが逆なのに気づいた失敗から学んだことです。
エラーが出ないのよネ、ただし1024?を超えるとむちゃくちゃな位置でエラーがでるの
よネ。

エラーの出ないミスは、小一時間？が頭の中をループしますよね。
そんな時は休憩を入れるといいかもです。

a.(b+1)のように配列に計算式を入れられない…これ不便でつ…。
a.b+1のようにするとa.bの値に1足されてしまうし…。

＞６８０氏
切れ目の関係で初めから23で定義しておくとややこしくないと思ってそうしますたが、
21で処理し切れるんでしょうか？できるならそうしたいでつ。

>>97
かれこれ50分程見てるが、わからない事が多すぎる。
後ほど嵐のように質問させて頂きまつ。

＞１０１紙
もちろん中身書いて正常に動作しますた。
一般に大した事がなくても、漏れには漏れにわかる範囲の革命的な書き方ですた。
１０１紙が教えてくれなかったらﾏﾝﾄﾞｸｾｰ作業を延々と続けてた訳でつから。
１０１紙は紙でつ。

>>107
私もリールを作るテーブルに2+21+3合計26の図柄を定義しそのテーブルを利用して
盤面の図柄を判定しています。
(中段のルール番号21の時上段リール番号1を取得するのが楽だから)

ワシも　１０１　紙　と呼ばせて頂いてもよろしいか。？

l=1 :c=1 :r=4←これは配列のｎ番目の要素って事でつか？

遅ﾚｽですが…
>>92
おいらは２枚掛けはあまり意味無いので排除しました。
あとＪＡＣハズレも無くしました。
ただＪＡＣハズレなどのフラグは、”役判定フラグ”として正式に抽選しなくても、どうせ参照テーブルの抽選が
あるのだから、そこで”揃う””揃わない”を振り分けてもいいかと。
保通協の検定に通すわけじゃないのでそこらへんは簡易にしてもいいと思います。

…左を押した時に中・右も決定してしまう方法もアリなんだけど（実際そういうメーカーもあるし）…
左→中とした時や左→右と押した時に初めて残りのリールの停止位置を決定するようにすれば、
こぼす小役などに融通が利くようになるが、データが膨大…。そこまでする必要あるんだろうか…。

＞２８０氏＞見習い氏
単なるこのサルｽﾚイズムによるものでつ。
文字通りペラペラの”紙”でつｗ

以前と同じ制御が559行までダイエットできましたっ（以前は1137行
うちは21コマでやってますが･･･ちょっと回りくどいかも。
上段位置(ﾘｰﾙ番号)をｊとして
一コマ動く度に
j-- : if j<0 : j=20
ってやってます(･ω･ ｀)

>>108
配列変数わかってない漏れがいうのもなんでつが、
23で十分だと思うんでつ。26あったほうがもっと楽になりまつか？

>>109　その通りですが配列は0から始まるので注意が必要です。

>>113　上端下端ののぞき量と、さきほどの位置検出の安易さから26使用しています。
テーブルを文字列で上中下の判定例(最適化する段階で共通項目をまとめる)

sdim reel,32,3
dim rp,3
reel.0="12312345671234567123456712"
reel.1="12312345671234567123456712"
reel.2="12312345671234567123456712"

rp.0=1,1,1;Reel Low Pos
;Low
ii=rp.0+1:jj=rp.1+1:kk=rp.2+1
strmid mm,reel.0,ii,1:strmid nn,reel.0,jj,1:strmid pp,reel.0,kk,1
if (mm=nn)&(nn=pp):mes "A"
;Mid
ii=rp.0+2:jj=rp.1+2:kk=rp.2+2
strmid mm,reel.0,ii,1:strmid nn,reel.0,jj,1:strmid pp,reel.0,kk,1
if (mm=nn)&(nn=pp):mes "A"
;Top
ii=rp.0+3:jj=rp.1+3:kk=rp.2+3
strmid mm,reel.0,ii,1:strmid nn,reel.0,jj,1:strmid pp,reel.0,kk,1
if (mm=nn)&(nn=pp):mes "A"
stop

＞１０１紙
完全なオリジナルであればそうしたいもんでつ。
ただ漏れは、実機の変則打ち以外の部分だけでも完全に再現しようと企んでおりまつ故、
手抜きは控えたいところでつ。

ペラペラでも何でも紙は紙でつ。

＞６８０氏
おめ。
でも、急激な減量は危険でつよ。

今話題のsdim…。
自分も同じように２８０氏の書き方でテーブルを列挙してるんですが、見直してみると…！

sdimで配列宣言してない！！
…でも何の問題も無く動くんですね。
さすが高級言語だなぁｗ

＞１０１紙　多次元配列でですか。？

＞２８０氏
１次元でつ。

１次元なら64文字OKです。

やぁ、今日も伊藤家の時間だよ。


〜継ぎ目処理の裏ワザ〜

( コマ番号 ＋ 21 ） \ 21

これだけ。
コマ番号がマイナスになるところを、あらかじめ21を足すことで回避。



　　　ｶｰﾝ

なぬっ。そうなんですかぁ。
数値型も実験してみたら１次元なら宣言しなくてもいいですね。
変数も宣言なしでいいばかりか、配列変数までも…。恐るべし。

ちなみに私は汎用的に使う変数ii,jj,kkとxx,yy,zzを予約せずに使用しています。
ii,jj,kkはループ用(for を頻繁に使用するので)や数値用に使用。
xx,yy,zzは数値を文字列に変換して表示する時などに使用。

>>114
誤　strmid mm,reel.0,ii,1:strmid nn,reel.0,jj,1:strmid pp,reel.0,kk,1
正　strmid mm,reel.0,ii,1:strmid nn,reel.1,jj,1:strmid pp,reel.2,kk,1

また間違えた。．．．いい加減な性格がバレバレでんな。

＞９０氏
流石!おみごとっ!!
そういうのいつも感服します。

ｶｰﾝどころか…合格!

ttp://www.lt.sakura.ne.jp/~sukima/k-keizi/douzin/psod-main.html
ここの同人スロゲーもＨＳＰで作成したらしいんだけど（ゲーム内の
ドキュメントに書いてあった）リール回転からリール停止までに少し
ウェイトがかかったり（その間に押したストップボタンは無効）
同時にストップを複数押すと、左から順に止まっていく。ウェイトもかかる。
こういう細かい処理はどうやってるのか不思議だ。

液晶がリール停止毎の切り替えだったり、リールが１コマづつ
動いてるのは少し残念だたが。

↑ためそうとしたが無料じゃないの。？

＞９０　大家さん　乙　です。　今２ッ目１００まで貯まったら本にして金儲け！

[艦長の航海日誌] 購読希望しますか。？．．．．．．

>>125
ウホッ　いいエロスロ・・・・
そういう機能についてはここで模索していきﾏｯｼｮｲ

>>126
本にして・・・３冊売れるかどうかが勝負ラインですな
航海日誌読み上げ分のエネルギーはシールドに廻しておくように。

＞９０さん
ｻｽｶﾞ(;´Д｀)

>>見習いAさん
確かに急激な減量すぎて･･･ﾀﾞﾒかも(´ ･ω･)、

>>125
まだＤＬしてないんだけど、
＞リール回転からリール停止までに少し ウェイトがかかったり（その間に押したストップボタンは無効）
これはただメインループ内で捨て変数tmpを１足していき、30くらいになったらキー取得を許可すればいいのではないでしょうか？
とりあえずＤＬしてみまつ。

↑　大家さんは試せたの。？．．．ダウンロード販売って何。
多分ごしゅぎ買いで10冊は売れまっせ。．．．赤字じゃん。

てかこれ無料じゃないぢゃん!

＞６８０　さま
関内スレに出没していませんでしたか。？

>>125さん
無料じゃないと試しようが･･･でも
101さんの言う方法でできるかとウチも思いましたっ

>>280Sさん
関内スレ？多分人違いだと思います･･･

フリー開発環境で有料はキライだ。　プン！

＞２８０氏
配列変数を勉強しようとすると思考そのものが止まってしまう・ﾟ・(つД｀)・ﾟ・
マジ申し訳ないでつが、漏れが適当に書いたソースで解説おながいしまつ。

if (reel1.lnp)=(reel2.cnp)=(reel3.rnp) : pos 0,300 :mes "何かそろいますた"
ヴぁか丸出しのソースかと思いまつが、何回回してもmesが実行されませんですた。
何故なのか、ヴぁかに理解できるように指導願いまつ・ﾟ・(つД｀)・ﾟ・

条件式にイコール二つ以上って書けたっけ・・・。

if (reel1.lnp = reel2.cnp)&(reel2.cnp = reel3.rnp) :

に変えてみて？

>>133
そうか６８０と言う名前で出ていたので貴殿かと思ったすまん。
ところで北斗（北都?)について言いたいことが２〜３あるが。

１．ｊａｋｉｎさせなくてもバトルボーナスＸが出るヨ。
２．リールがgmode 3 or 4 なのでぶれる効果を狙っていると思うが年なワシには見にくい。
３．でも、モナ演出はだいぶ充実してきてすごくいい。
４．ナビを外していると継続数が多い気がするのは錯覚だと思う。

ちなみにワシが生まれたのは昭和．．．．．何年だっけ．．．今９０-ｘ歳か．．．

このスレを見て、１から勉強を始めようと思うのですが
そんな人　他にもいますか？

>>135
そこまでの考え方はあっている
>>136
の言うようにHSPでその文法は使用できないので
左と仲が同じ　で　中と右　が同じと書き換えて　判定　シュる。
その他
if (reel1.lnp=7)&(reel2.cnp=7)&(reel3.rnp=7) : pos 0,300 :mes
役が判明していれば上記もＯＫ
＆＝ａｎｄ　です
｜＝ｏｒ　　です

過去にａｎｄ　ｏｒ　の代わりに　*　+　を使用した時代もあります。

＞A
失礼。説明が抜けてましたな。恐らくＡ＝Ｂ＝Ｃというのは文法として間違っているので、
「Ａ＝Ｂ」と「Ｂ＝Ｃ」が両方とも成立するとき（＆記号）という書き方にしてみては？っつーことです。

>>138
前スレからの住人はほぼ全員そんな感じですよ。
ぜひ頑張ってみてくらはい。

>>138
プラモデルと同じで何かを作りたいと言う気持ちがあれば誰でも出来ます。

大家さ〜ん。
防御シールドに回したエネルギーがホロデッキに吸い取られています
このままではメインコンピュターが勝手に[艦長の航海日誌] を読み上げてしまいます
．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．あたァ．．．

今日も　もう　誰〜れも　遊んでくれないんだ　プン！　もう　クソして寝るよ。

＞９０氏
おお、いけますた。
でもなんか判定が無茶苦茶だ。
にしてもかなりの進歩かも。
ｻﾝｸｽｺ!宣言文もっかいみなおしまつ。

＞２８０S氏
その方法は代役とかで使えまつね。
ちょっと研究してみまつ。

だだ誰かワシの名を呼んだ？．．．．．．．．．．．．．．．．．．．．ウレピィ。

>>280Sさん
１．それは･･･ﾏｼﾞすっかり忘れてました（汗）今から修正しておきます･･･
２．ぶれる効果を狙って･･･？リール描画はﾃﾞﾌｫ設定なのでgmode 0でし･･･。
３．どうもありがとうございますっ！
４．REG中のﾅﾋﾞ音は･･･実は実機音を録音しただけなので全く関係なかったりします(´ ･ω･)

>>138さん
全然大丈夫だと思いまっす。
気合さえあれば何でも作れますょ

何とか制御大幅ﾀﾞｲｴｯﾄのせいで生まれたﾊﾞｸﾞ達の駆除が終わったぽい(´ ･ω･)=3
ﾀﾞｲｴｯﾄというよりも以前のｽｸﾘﾌﾟﾄが肥満だっただけな気がｽﾙ

･･･肥満→正常もﾀﾞｲｴｯﾄかヽ(´д`)ﾉ

とんでもないバグﾊｹｰﾝ。
一旦止めたリールがボタンを押すと1ｺﾏずつ送れやがる。
ﾄﾞｳｼﾖｳ＿|￣|○

というか２８０S氏よ、つまらなくても寝ないで頂きたい。

みんな正月休みでしょ。　なんかして遊ぼうよ。ネェ　ネェ　ネェ　ネェ　ネェ！！！

参考になるのでＲＯＭらせて貰ってるが、行数が多すぎ。
日本語の文章は簡潔に！
じゃないとついてけない（；＿；）

>>148
一度止めたリールはボタン操作不能フラグを立てて、
ボタンの入力チェックのルーチンで、操作不能のリールは
ボタンチェック自体スキップされるようにすればいいかも。

＞２８０
俺は明日・・・っつか今日が
仕事納めですが何か？

>>150
ワシのせいだスマン。！！！

>>151
それはたいへん申し訳ない。ペコリン。　実はワシは一年中休みなのだ。（泣き

>>151はオイラね。

>>150
ｽﾏｿ・・・。雑談は極力控えようと思うんだが、
プログラムの話だけでガチガチにしてしまうのもどうかなと思って。
ＲＯＭってないで、疑問点があったらドンドン質問しる。

（´∀｀|( ・д・)っ|） ＜正月休みなどない！

>>148
そうしてるはずなんでつが、あちこちいぢってる内に無効が無効になったぽ。
鬱＿|￣|○

>>151ﾀﾞｯﾀ。ｽﾏｿ＿|￣|○

で
一年中休みと打ち明けたワシに労わりの言葉はないのかナ。
罵倒しかないのか．．．

じゃ〜一つ
pos 10,200 は　pos 10 200 でもいける命令によっては区切り記号を”，”
から"　”にかえてもＯＫです。

↑　間違えた　pos 10 200 は10が無視されてｘ200となる。．．．

>>143 モード　閉局でっ　おやすみなさい。

>>148のバグは修正できますた。
あと、抽選でつかってる
if 0<rslt<41 : flg=1
とかも式として認識されないのでつか？
フラグが一定だからされてないぽ＿|￣|○
だとしたらなんではずれフラグは立つんだ？

＞２８０S氏よ、つまらなくても寝ないで頂きたい。

*lottery
rnd x,9
rnd xx,9
rnd xxx,9
rnd xxxx,9
rslt=x+(xx*10)+(xxx*100)+(xxxx*1000)
if 0<rslt< 41 : flg=1
if 42<rslt< 61 : flg=2
if 61<rslt< 605 : flg=3
if 605<rslt<1855 : flg=4
if 1855<rslt<1874 : flg=5
if 1874<rslt<3874 : flg=6
if 3874<rslt<5540 : flg=7
if 5540<rslt<9999 : flg=8
return
これがなんで毎回フラグが8になるのか説明しる！

＞Ａ
はずれフラグが0とか？
ご想像の通り、そのif文は文法として成立していないので、
全てスルーされた結果、flgに何が入っているのか・・・。

＞２８０
親墨


日本国民全員が非生産的な1日を過ごす日・・・正月。
我らはクリエイティブに新年を迎えてみようではないか。

８がはずれでございまつ。

なるほど。そのソースだと・・・
全てのif文を条件通過してしまっているかもしれない。
flgがどんどん上書きされて、最終的に8が入るわけですな。
前述のような形に比較式を書き直してください。

あと、その抽選方式なら
rnd rslt,10000とやれば一発で乱数取得できますよ。

ではまた明日・・・。ｵﾔｽﾐ

心強い意見ありがとうございます
前スレから読んで頑張ってみます

＞２８０氏
おいらも一年中休みでつ。

＞見習い氏
if 0<rslt<41 : flg=1
↓
if (rslt>0)&(rslt<41):flg=1

＞１３８氏
ｶﾞﾝｶﾞﾚ!

おは！

if 文の動作説明。

if 1 :mes "1 deru"
if 2 :mes "2 deru"
if -1 :mes "-1 deru"
if 0 :mes "0 denai"

要するに　0　意外なら条件を満たすと言うことです。
よって
mes 0<rslt< 41　とすると　1　が表示されるので　>>162　の式はすべての
条件を満たし最後の　flg=8　が有効になったと言うわけ。

ちなみに
if (1)+(1) はａｎｄと同じ：if (1)*(1) はｏｒと同じデース。

>>106 (101氏)

誰もかいていないようなので。
☆配列変数に対して演算をしようとすると配列の添え字に対して計算してしまう問題の解決法。

例)

a=0
b=real.a+1 ; (real.0の結果に1を足したい・・・けど、real..1の中身が取り出されてしまう。)

↓

a=0
b=(real.a)+1 ; (先にreal.0を出してから、1を足す。要は"("でくくるだけですな）

何へぇ〜ぐらいですか？

さん　へぇ〜　！

VisualBasic の場合　if a=1 and b=2 then は正しく評価されるが
Hsp の場合　if (a=1) and (b2) : としなければ評価されない
これはHspの作者がC言語に毒されているからである。

何へぇ〜ぐらいですか？

ところで>>52氏は先日のスロゲー進んでますか。？．．．

オハヨウ。仕事も最終日です。イッテキマツ。

＞２８０
またもや脳内代弁サンクス。
HSPの仕様では比較式が正しければ1、間違っていれば0という
数字として扱われるようになっているんでしょうな。
（C言語だとtrueが「0以外」という定義にされてる場合多いけど）

0 < rslt < 41 のような式だと、（仮にrsltに100が入っているとして）
まず「0 < rslt」が評価され、「0 < 100」なので当然条件合致。
すると、「0 < rslt」自体が1という数字として扱われるので
最終的な式としては「1 < 41」という形になり、これも合致。
こういう仕組みで、if文が実行されていたのではなかろうか？と。

>>169
うわーん。そうじゃなくて
a=10,20,30
b=1
mes a.b+1
の結果が"21"ではなくて"30"にしたいんどす。
要するにa.1を出したいのではなくa.2を出したいということです。

まぁただもうひとつ変数cを用意して、c=b+1:a.cの一文を書けばいい話ですがその分面倒です。。

>>171
うーん。そうですな。ＨＳＰは左から右へ比較されますからね。４へぇ。

>>172
そうだすな。これも左から比較されて真（１）と残りの41が比較されちゃうんですな。

…ってかこれから忘年会…遅刻しそう…。

>>おまいら
前から思ってたけど、おまいらはサルなんかじゃない！

＞１０１紙
おはようございまつ。
その場合迷わず変数を増やしましょう。
サルでもできるのが前提でつから難しい事抜きで逝きましょう。

配列の要素が無効ですって言われるんでつが具体的にどんなエラーなんでつか？
ちなみに揃い判定のところでつ。

配列の箱が無い。．．．．．．．．．．．．．．．．．．．．．．．．．．．　信頼度　1
配列の箱が小さい。．．．．．．．．．．．．．．．．．．．．．．．．．．．信頼度　2
配列の箱に入れるものが異なる。(数値　int　文字列　str)．．．　信頼度　3
のどれかですょ。．．．たぶん。

＞２８０氏
if (reel1.l3=1)&(reel2.c3=1)&(reel3.r3=1) : mes "七が揃いますた"
↑これの数値だけ変えた香具師が３８行ある中で
エラーが指摘されるのがこの一行だけなんでつ。
これ以外は正常に実行されてるので、その３つの中のどれでもないと思うのでつが。

>>見習いAさん
l3かc3かr3のどれかが宣言した配列の範囲をｵｰﾊﾞｰしてるのでは？
例えば
dim a,10
と宣言していて
if a.n=1 : 〜
と書いている時にnの値が10以上だとそういうﾒｯｾｰｼﾞが出ます。

なぜかﾃﾞﾊﾞｯｸﾞｳｨﾝﾄﾞｳの変数一覧が出なく･･･
objﾌｧｲﾙ削除＆再起動＆再ｲﾝｽｺしても直らない･･･(´ ･ω･)
他のﾌｧｲﾙ実行した時はちゃんと出るんですが、
何か原因があるのですか･･･？

北斗のｿｰｽ上げました･･･
http://yam-jp.com/~nanashi/slotimg/slo056.zip
どうしたらいいのか検討もつかない･･･
あ･･･ﾃﾞﾊﾞｯｸﾞ仕様なので色んなﾀﾞｲｱﾛｸﾞとかでます。
変数一覧が出ないのはなぜか･･･知りたい(´ ･ω･)

if (reel1.l3=1)&(reel2.c3=1)&(reel3.r3=1) : mes "七が揃いますた"
の行の手前に
xx=l3:str l3:dialog xx,0
xx=c3:str l3:dialog xx,0
xx=r3:str l3:dialog xx,0
xx=reel.l3:str l3:dialog xx,0
xx=reel.c3:str l3:dialog xx,0
xx=reel.r3:str l3:dialog xx,0
end
と付け加え各値を確認してみよう。

訂正　各行の str l3 を　c3 r3 に書き換えてくらはい。

＞６８０氏
ずっとエラーがでる時の状態をみておりまつが、
必ずいずれかのリールの下段に１番がある時に発生しまつ。
やはり切れ目の関係で配列の無い部分を指定してるかも・・・・

＞６８０　氏
スクリプト中のdaialog を消せば出ると思います。

>>181
パラメータの型がちがいますって言われますた・ﾟ・(つД｀)・ﾟ・

＞ﾍﾎﾞﾌﾟﾛｸﾞﾗﾏｰ見習いA　殿

>>181 の方法で確認してネ。

どーでもいいけど２８０氏は間違い→訂正多すぎｗ

訂正
xx=l3 : str xx : dialog xx,0 ｓｔｒ　の部分を書き換えてください。
再三　スマン。

解決･･･でもｲﾏｲﾁわからずｗ
repeat 4
【対象絵柄の停止位置ﾁｪｯｸ】→停止していればbreak
【リールを一コマすべらす】
loop
ってやってる所のrepeatを5にすると解消･･･まぁ
ｽﾍﾞﾘﾙｰﾁﾝの方で最大ｽﾍﾞﾘｺﾏを4にしてるから問題はないけど･･･

見習いAさんがいい事言った！っぽい気がｽﾙ･･･
検証してみまつ。

xx=l3: str xx :dialog xx,0
xx=c3 :str xx :dialog xx,0
xx=r3: str xx :dialog xx,0
xx=reel.l3 :str xx :dialog xx,0
xx=reel.c3 :str xx :dialog xx,0
xx=reel.r3: str xx :dialog xx,0
end
＞どーでもいいけど２８０氏は間違い→訂正多すぎｗ

速くヒントをと思うとコピペで失敗するのです　ゆえに>>174の書き込みは
妥当ではありまえん。

艦長！計算式でエラーが発生しますた！
御指示を！

>>174わしなんでつが・・・・

xx=l3: str xx :dialog xx,0

の意味は数値型の値をdaialogで表示することが出来ないのでxxに代入した値を
str　で文字列に変換して表示すると言うもの。
mes の方が簡単だがウィンドウの状態がわからないのでdialogにした。


>>192　計算式でエラーが出た行の構文がワシのように間違っていないですか。

これで何がわかるのかｻﾊﾟｰﾘわかっておりませぬが、
最後の行で配列の・・がでまつ。
つーことはr3がおかしいってことでつか？

妥当だと思いますが上から3っめのr3の値は正常値ですか
異常なら　r3 に問題があり。
正常値なら　reel.x　配列に問題があると判定します。

ﾜｰ
最後の3行全部エラーでますたよ。

xx=reel.l3 :str xx :dialog xx,0
xx=reel.c3 :str xx :dialog xx,0
xx=reel.r3: str xx :dialog xx,0

最後の3行　reel1.l3 reel2.c3 reel3.c3 に書き換えてください。

配列っつーか
l1=ly/80
l2=l1+1
l3=l1+2
これはマズくないでつか？

>>197
エラーでなくなりますた。

>>198　文法的には問題ないと思います。
>>197　で訂正したようにreel配列の名前が間違っていました。再々訂正をためしてくらはい。

状況としては
「上、中段判定は至って正常、下段判定は高頻度エラー」でつ。

各ダイアログで表示された値に矛盾点はありませんか。

>>200
とりあえず一安心でつ。
ご協力感謝痛しまつ。
一体何が悪いんだか・・・

>>202
見てなかった･･･
今からよく観察しまつ。

スレ番号204中　280S の書き込み 72 回 中 修正回数 12 回
書き込み率 35% うち 訂正率 16% 　．．．．．．．．．．サル以下じゃん。！

よくわからませんが、どうも中、右の下段３番が怪しいっぽい。
かなりお疲れのようなのでとりあえず風呂はいりまつ。

>>205
ｽｹﾞｰ。
今から２８０S氏の間違いをカウントするスレにしてみてはいかが？

○変数の内容を確認してもらうだけで異常にミスったので。．．．

デバッグ。(変数の内容確認 対象 a.1)
0.標準エディタの場合デバッグウインドウ(但し目的変数が表示されない場合もある)
1.mes で表示する(数値型も文字列型もOK)
　mes a.1
2.title に表示する。(文字列型のみなので str で文字列型に変換)
　title a.1 又は xx=a.1 : str xx : title xx
3.dialog で表示する。(文字列型のみなので　同上)
　dialog a.1,0 又は xx=a.1 : str xx : dialog xx,0
4.上記1.2.で一時停止したい場合は最後に: dialog "",0 などとする.
stop で停止した場合スレッドに実行が残る場合があるので注意。
end でプログラム停止。
5.文字列として適当な変数に貯めた後に表示する。
sdim zz,1024 : xx=a.1 :str xx :zz=zz+xx+"\n" :dialog zz,0
6.別の上記表示方。
mesbox zz,300,300,,1024 を作成し表示は objprm 0,zz
objprm 0,zz の 0 はオブジェID (出来た順番)

＞ﾍﾎﾞﾌﾟﾛｸﾞﾗﾏｰ見習いA　殿

出来れば自分の使用している変数名の間違いは気づいてほしかった。．．．
まぁ　いいわけだが。

それでは”ﾍﾎﾞﾌﾟﾛｸﾞﾗﾏｰ見習いA”氏を280S公認280Sのミスカウント大臣に
任命いたしますので定期的に280Sミス白書の提出をお願いします。

みなさまおはようございます。

>>171 (280S氏)
昨日は「今日は忘年会だぁ〜」ってことで、朝まで遊び歩いていたので、あれからほとんど進んでいません。
(169の書き込みは家に帰ってきて、寝る前に書いたのです）

これからリール制御の部分を作ってみようかなぁと思っています。

※一応メモ。
各役＋リールごとに滑りコマ数を文字列の配列として用意する。
(たとえばこんな感じ→suberikoma.0.1="001234012201230012332")
変数の0.1のうち、１文字目が成立役の番号。２文字目がリール番号。
リールを止めたときに、停止一番目の文字を呼び出して、その数だけリールを滑らせる。

…と、こんなロジックでくんでみようと思っていたり。
テーブル作るのがかなり面倒っぽいので、まずは一個の役だけ作って、
「必ずその役だけしかでないスロット」にしてみます。

>280S氏
何故半分寝かかってたもんで。ｺﾞﾒｿ。

>52氏
それだとかなり楽そうでつね。
動作が良好であれば即ソース公開きぼんぬ致しまつ。

＞５２氏　楽しみです。

私の場合滑りテーブルは Ltab.0-Ltab.9 をワンセットで１−７が図柄対応役
０がはずれ８がシングル９がJACと決めた配列をとりあえず３セットづつ用意
しています。(Ctab.x Rtab.X)
Ltab.10-Ltab.19とLtab.20-Ltab.29の切り替えはランダムに行い聴牌の偏りを
ごまかそうとしています。(ごまかせると期待している)
いずれにしろ配列変数の添え字を配列変数で変えられないのが一番の不便です。

＞ﾍﾎﾞﾌﾟﾛｸﾞﾗﾏｰ見習いA280S氏専用ミスカウント大臣　殿

名前が長いのでたいして変わらないがこれはどうかな。．．．

　ﾍﾎﾞﾌﾟﾛ見習いA兼280S専用ﾐｽｶﾝ大臣

>>173 (101氏)

それだったらそのままでうまく動くと思うのですが・・・
試していないですが、a.(b+1)ってやるのは・・・だめでつか？


リール制御ですが、一応できました。
ttp://yam-jp.com/~nanashi/slotimg/slo058.zip
これの004.asです。

JACゲーム用って事で、どうやっても中段リプレイor中段BAR・リプ・リプしかそろわないはず・・です。


で、みなさんに質問。

最初はリプレイしかそろわない奴を作ろうと思ったのですが、
リールの配列からしてどうしても５コマ・６コマ滑らせないといけない部分が・・・。
中段揃いにこだわらなければ可能なのですが、こんな時はどうしたらいいんでしょう？

>>213
BARと同じく、JACゲーム用のリプ代用絵柄を
増やせばいいだけでは？
スイカ・リプ・リプの機種とか結構ありますよ。


1日の間にスレ伸びまくり。
そして睡魔襲来
合戦敗北　　　　まんなっか

制御は一歩後退･･･でもREG演出を大量追加･･･疲れたｗ
そろそろVerUPできそうです。

>>52さん
90さんと同じく代用絵柄を使うしか･･･
オリジナル配列なら変えてしまうのもｱﾘかな？
ってﾊｽﾞｼﾎﾟｲﾝﾄがなくなるﾖｶﾝ
･･･っとｱｼｽﾄでいいのか
ﾃｰﾌﾞﾙ制御はかなり大変そうですが是非がんばってください！
単純計算だと役数×３(上中下)×３(左中右)必要･･･になってくるのかな？

大家さん。すまん！ワシの訂正訂正でスレが伸びまくった。．．．
＞１０１氏　はまだ忘年会中なのか。？

>>214 (９０氏) >>215 (６８０氏)

アドバイスサンクスです！
215の書き込みを見て、
「中段でそろえられないのなら成立役を斜めや下段に変えてしまえばいいじゃん！」
と、思いつきました。

というか、この書き込みを見るまで成立役の種類だけでなくそろい方（上段・中段・下段）ごとにテーブルが必要と言うことに気づきませんでした…

やはり猿だったらしい。

とりあえず、今日は眠くなるまでテーブルを作ってみます。
演出の方も作ってみたいが、絵心がないので何か代用する方法を模索中。

…あ、それ以前に役成立後の処理（メダルの増減など）を作っていない。＿|￣|○

>>216
今帰ってまいりました。
朝までコースですた。
気付いたらタバコ３箱吸ってて鬱…。

>>213
それがダメなのでつょ…。
まぁ素直にもう一つ変数を用意することで解決することはしますが。

>>215
もっともっとですよぉ〜。
１種類だけでは少ないので、おいらは４種類は用意しようと思っているので、
役数（成立Ｐ用やＪＡＣ中等も）*４（種類）*２１（コマ）
それに１枚掛けや変則押し、順押しとはさみで違うテーブルを用意したら…((；ﾟДﾟ)ｶﾞｸｶﾞｸﾌﾞﾙﾌﾞﾙ
そのくらい覚悟してまつ。

前スレ280氏の間違い訂正回数3回

第一停止のテーブルは配列変数で処理したほうがよさげ。
第二第三は配列変数使わないほうがよさげ。

つーか誰もいねーなー。

みんなで年越しﾃﾞﾊﾞｸﾞ
やらないか

>>220 (ﾍ臣氏)
第１のみ配列って事は、のこりは第１の停止位置にごとにif文か何かで処理するって事ですか？

テーブル作ってうんざりしてきたので、何か別の方法を模索中です・・・。
あるいは根本から考え直すか・・・。

大晦日も正月も仕事だｺﾞﾗｧ・・・バイトだけど。
液晶部分の作成には土日ぐらいしか時間が無いや(´･ω･｀)

みなさん、良い年を・・・
来年も新人さんがこのスレをみて作っていく事を願ってみよう。

＞５２氏
第一停止(左)は２１ｺﾏ全てに個別ですべりｺﾏを指定しないと逝けないが、
中右は条件を
(左の停止位置１〜２１）＆（成立フラグ）
にして、あとは1リール中の各停止位置（すべりコマ数ではない）
を数個指定してやるだけなのでorで書いて逝くほうがよいのではないかと

みなさんよいお年を

明けますた

＞明石
漏れも今日仕事だｺﾞﾙｧ

＞52氏
テーブル表見たいならうｐしますが、何か？

おけおめ！
ことよろ！

ビバ２ｋ４年！！

＞１０１紙様
今年こそはいいスプリクトが書けまつように・・

>227
ageてしまった、鬱。

明けましておめでとうごさいます。　今年もミス連発　夜露氏苦．．．

やっと左部分完成しますた。
でも中右ビタだからなんのこっちゃ・・・＿|￣|○

＞２８０S氏
今年もエラー連発しまつので、漏れにカウントされないようにヘルプおながいしまつ。

こないだのエラーの原因は明日究明しることにして今日はもう寝よう。
ｵﾏｲﾗﾓﾔｽﾐﾅｻｲﾏｾ

>>ﾍ臣氏
ぜひテーブルUP希望します！

わたしも>>223の書き込みを見て何となくイメージがわきましたが、実装方法が思いつきません・・・。
わたしは、もうちょっとシンキング・タイムで・・・。

一年のけいは元旦にあり。！　だれか　ア・ソ・ボ･････！

去年のサップと曙の試合で金取るなアホ！と
テレビで見ているだけなのに文句を言ってしまった。．．．NHKにしか金はらってないのに。

＞ﾍ臣　殿　厳正なエラーカウントを希望。

＞５２　氏　ﾍ臣　殿　今日も仕事とはご苦労さん。
君たち若者が汗水たらして稼いだ金の大半はワシの年金になる．．．日はまだ遠い。

>>234 (280S氏)

新年初エラーですか？
私はお仕事じゃないですよ。

お仕事なのはﾍ臣氏と、あか氏ですよん。


>>ﾍ臣氏

280S氏のエラー+=1で、お願いします。

>>235 ピンポン正解です。　あか氏ですた。

＞280S氏のエラー+=1で、お願いします。
280Sエラー++ で夜露氏苦．．．

あけまして！

>>52さん
細かい事なのですが･･･訂正をｗ
ﾘｰﾙ画像ﾌｫﾙﾀﾞの名前が「real」となっていますが
正しくはreelではないでしょうか･･･？
うちの勘違いじゃないかと思ってﾎﾝﾔｸしてみると
「reel」＝「ﾘｰﾙ」
「real」＝「実数」だそうで（汗

ﾃｰﾌﾞﾙ表ですが、停止位置ごとにif文でｽﾍﾞﾘ数を指定するよりも
配列変数を使って例えば
dim table_r_bell,21
table_r_bell=1,2,3,0,1,2,3,4,････
のように先に指定しておいて
役抽選時にﾃｰﾌﾞﾙ選択→停止キーを押した時にその位置から何ｺﾏすベる
かを取得して滑らせる、という方法がいいのではないでしょうか･･･？

ちなみに「スロット テーブル表」でぐぐると大花火のテーブル表が出てきたりしますた。

ｵﾏｲﾗｵﾊﾖｳｺﾞｻﾞｲﾏﾂ

＞６８０氏
漏れが言いたいのは
配列の宣言したところでそれはたった1回しかつかわれないから
宣言するだけ無駄だと言いたかったのでつ。
が、微妙な容量削減にはなると思う。

＞５２氏
いまから表うｐしまつね。

!!280Serror 16!!

＞ﾍ臣 殿　おつとめご苦労さまです。．．．そのカウントあってるの。？
＞いまから表うｐしまつね。　重たい画像ファイル今見ました。．．．

来客や年賀状の整理や酒の飲みすぎで普段から乱れている生活がパワーアップ！！！

誰かお年玉くれ！

ワシからのお年玉。(ゴミかも！)

;文字列テーブル用:[gtab,変数,文字列,位置,増減]
;変数の型が戻り型:未宣言の場合数値型になります。
#module
#deffunc gtab val,str,int,int
mref p2,33:mref p3,2:mref p4,3:mref p5,33:mref p6,1024
p3=p3+p4 :strmid p5,p2,p3,1
if p6 & 2 {mref p1,24}
else {mref p1,16:int p5}
p1=p5
return
#global
;Test Script
reel="01234567890"
sdim xx,32 ;xx= 文字列の挙動
gtab xx,reel,5 :mes xx:xx=xx+" STRINGS":mes xx
dim yy ;yy= 数値型の挙動
gtab yy,reel,5,-1:mes yy:yy=yy+" INTEGER":mes yy
stop

>>ﾍ臣氏

テーブルうｐｷﾀｰｰｰｰ
といっても、我が家はナローバンドなのでIrvineにダウンロードをまかせて、明日にでも見てみますね。

あとは、寝る前にディレクトリ名の間違いを直して・・・。(;^_^A アセアセ…
（指摘サンクスです！>>６８０氏）

他にも間違いがありそうだが、見つけたモノからこつこつ直していきますは。

んでは、ちょっと今更感もありますが、今年もよろしく！

＞52氏
もし定額制などでダイアルアップ接続ならば各社の
ADSL１Mの方が安くて速いと思います。(月額1500〜2500円程度)
一度比較検討してみてはいかがでしょうか。

>>241
訂正ﾏﾀﾞｰ？

中・右の作業にとりかかっていまつが、
テーブル選択が４つあるのがﾄﾃﾓｳｻﾞｲﾃﾞｰｽ

なんか気晴らしに違う素材でﾎﾟﾁﾎﾟﾁ打ってたら
こんなんできましたｗ
http://yam-jp.com/~nanashi/slotimg/slo066.zip

っとまぁただﾘｰﾙ回転するだけやん！って思ったら
kaitenﾙｰﾁﾝ内のrepeatの値を変えると･･･（10ぐらいがいい感じ？
ﾘｰﾙがﾌﾞﾙﾌﾞﾙ震える？感じに･･･
ﾊﾞｳﾝﾄﾞｽﾄｯﾌﾟとかに使えんだろうか･･･。

ちょっと質問。

if flg=1|2

これは括弧なしでも有効でつか？

>>ﾍ臣さん
そういう時は別途に簡単なスクリプト書いて試してみるとよいですよっ

flg=1
if flg=1|2 : mes "ok"
stop

これを実行してみたところ
flg=1でもok
flg=2でもok
でも
flg=0でもokと出ました。
if (flg=1)|(flg=2)じゃないとﾀﾞﾒﾎﾟですね〜

>>238
ｳﾎｯ。
中・右のテーブルは初めて見ました。
ＫＫＫとか書かれていたので雑誌名はやはりアレですかな？
ガイドしか読まないので、今もまだ掲載される事はあるんでしょうか。
…てか読み方がよくﾜｶﾗﾅｲ…。

>>６８０氏
ソース見させてもらいました。
そんなやり方もあるんですねぇ。
バウンド…にも見えなくは無いですが、下に沈みこむ時上側に画像がなくなっちゃってます。。

>>246ﾍ氏
以前と同じ理由でダメでつ。

＞６８０氏
ごもっともでつ。
行数が異常な量になってるので思考が止まりかけてまつ。
括弧のつける位置をいろいろ変えてみますたが、
どうやらダメッポのようでつ。
=のあとにorで数値を沢山書く必要があるのでつが、
なんとかならないでつか？

６８０氏ｽﾏｿ。かぶってしまった。。
補足で…
なぜ>>247のソースでflg=0でもｏｋと出てしまったのか…
if 2:mes "ok"
stop
とだけ書いてみれば分かると思います。

気になったのでif文で色々検証・・・。

flg=
if (flg=1)|(flg=2)&(flg=1) : mes "ok"
stop
はflg=1の時のみokと出て

flg=
flg2=
if (flg=1)|(flg=2)&(flg2=1) : mes "ok"
stop

ではflg=1、flg2=1かflg=2、flg2=1の時のみok

flg=
flg2=
flg3=
if (flg=1)&(flg3=2)|(flg=2)&(flg2=1) : mes "ok"
stop

だとflg1、2、3が
1、1、2と2、1、1と2、1、2の時にokと出ました。

if文の比較はorから、って事でいいんだろうか･･･(汗

>>251
ぃゃただ単に左から比較されてるんだと思います。

>>ﾍ臣さん
うまい具合に比較対象をまとめると短い文でもちゃんと判断式が
書けるんですが･･･うちは苦手だなぁｗ
↓(多分)北都の中で一番長い比較式
if (sb=2)&(reel1.j1!=yaku2)&(reel1.c1!=yaku2)&(reel1.g1!=yaku2)&(reel1.w1!=yaku2)&(reel1.ww1!=yaku2)

>>101さん
先生！if 2 : mes "ok"やってみましたが原理がわかりませぬｗ
ifの後なのに比較式じゃないし･･･

>>101さん
ぃぁ左からだと3番目のｽｸﾘﾌﾟﾄで
2、1、1の時にokと出るのがわからなくなり･･･ません？

＞１０１紙
おそらく5年ほど前のﾏｶﾞでつ。
見方は下段が●の位置で止まりまつ。

>>250は比較対象が明確でなければ全て条件を満たした事になると言う事でつね。

＞６８０氏
永杉。
2,1,1は普通におｋでしょ。

orは比較じゃないからなんとかできそうな気がするんでつが・・・

>>６８０氏
if 0:mes "ok"
これを実行すると何も出ません。
if文はＨＳＰの場合、『0かそれ以外か』を判断してまつ。
比較する時も『偽（0）か真（1）』で判断されまつ。（もしかしたら”真”は”0以外”と判断されているかもしれません）

(flg=1)&(flg3=2)　これは”偽”だけど次の比較は
or(flg=2)　なので”真”
(flg2=1)　も”真”なので結果は”真”になりまつよ。

>>ﾍ氏
やっぱりﾏｶﾞでつか。
あとでじっくり見たいと思います。

このスレでの教訓

ス　ロ　雑　誌　は　捨　て　る　な

比較対象がないのに、何に対しての真なのか偽なのかがわからねー。

>>ﾍ臣さん＆101さん
ほんとだ･･･普通に左からですね(汗

>>ﾍ臣さん
発想次第で短くすることも可能だと思いますよー。
うちの253の式は意味としては
「2ｺﾏすべった時点で枠内or枠枠上以内に成立役絵柄がなければ→」
という式なんですが絵柄表示(停止時&すべり時)時に判断しておけば
変数は1つ増える事になりますがこんな長い式は必要ではなくなるはず･･･。

というかリール回転時とstartキー待ち時の液晶の動作速度を揃えるのは
どうやったらいいんだろうか･･･。北都のREG1G〜3G目なんて
明らかに停止後は加速してるし（汗

>>ﾍ氏
部屋にはもう５年くらいのガイド＆ＭＡＸが山積みされてますがｗ

多分”0以外なので真”なんじゃ？
ちなみにマイナス値や計算式を入れても、『0』で無ければおｋです。

>>６８０氏
＞というかリール回転時とstartキー待ち時の液晶の動作速度を揃えるのは
どうやったらいいんだろうか･･･。

おいらはわざわざ止まっているものも描画し続けさせてます。
しかしこれだと重い方にあわせているので当然重くなります。

前ｽﾚで９０氏がＰＣの処理速度に関係なく一定のスピードを取得する方法を提案していましたよ。
おいらはあまり理解できませんでしたが…（汗

＞６８０氏
変数を増やせば大概の条件式は短くなるはずでつね。
でも漏れのはこれ以上変数にできないので困っておりまつ。

＞１０１紙
スロッターの鏡or病気(ADHDとか)でつね。

というかこれらのif文ってエラーもんだろ。
エクセルなら多分怒られるぞ。

漏れの書きたい条件式

ビジ成立中、左下段に20番が停止した場合、table=12(�@−２参照）
table=12の場合、中リールのy座標が
240 400 640 1040 1280 1440 1600の時、cy-=16をスキップ


漏れの脳内スクリプト

if ls=1{if table=10{if cy=240|400|640|1040|1280|1440|1600 : state=0 : cs=1 : goto *SKPcenter
}}

今初めて知った事
{の前って「 : 」いらんのね･･･
ﾍ臣さんの脳内ｽｸﾘﾌﾟﾄ見てやってみたら（汗
cy=240|400|640|1040|1280|1440|1600
これはﾀﾞﾒなんじゃなかろうか。。。

うちなら素直にこう書くと思ふ･･･。
if (ls=1)&(table=10) : if (cy=240)|(cy=400)|(cy=640)|(cy=1040)|(cy=1280)|(cy=1440)|(cy=1600) : state=0 : cs=1 : goto *SKPcenter
ﾅｶﾞｰ━━━━━(ﾟ∀ﾟ；)━━━━━!!!
ぱっと見で240 400 640 1040･･･に規則性がなさげなので･･･。

>>264
＞スロッターの鏡or病気(ADHDとか)でつね。
でつｗ

＞というかこれらのif文ってエラーもんだろ。
エクセルなら多分怒られるぞ。

生意気にもＣでやってみたところＨＳＰと同じように”0”か”それ以外”に分けられるようでつ。
比較式を記入しなくてもそれは同じでした。

>>268
この話はもう終わったか…。

>>６８０氏＆ﾍ氏
その数字たちはｙ軸の値ですよね？
だとすれば規則性はあると思いますが…。

仕事ｵﾜﾀｰﾖ

嫌だから書いてないけど>>267を見て改めて実感した。ｳｻﾞｲ､ｳｻﾞｽｷﾞﾙﾖ。
＞１０１紙の仰るとおりその80の倍数達はy座標なので、
どうにかしてcy=を一つだけでできないものだろうかと、小一時間。

>>268
比較式がないif文が変だと認識されないのはどの言語でも普通なのでつね。
それなら括弧が閉じられてないくらいでエラーでないでくれよ・ﾟ・(つД｀)・ﾟ・

>>ﾍ氏
（コマ番号）*８０　←こいつが共通部分です。
なのでまず12番のテーブルが選択されたら、中も12番のテーブルへ移行。
配列変数かもしくは文字列型のデータを予め格納しておきます。
例えば
table_c12="012340123401234012340"　のように。
そして”何コマ目か”を判断したら、table_c12から”何コマすべりか”を取得すればいいと思います。

巧く説明できませんが、左が押された瞬間にテーブル番号が決定されていると思うので、
中も押された瞬間にtable_c12を取得すればいいんじゃないでしょうか。
計算部分（すべりコマ*80とか）が一つで済むばかりか、いちいちif文を通らなくて済みます。
括弧は処理を遅くするらしいですし…。

ってことで寝まつ。。

ＩＦ文とａｎｄ．ｏｒの説明>>168も見てね。
>>272の方法で滑りを取得するのに>>241のコマンドを使ってね。

>>101神
なんで昨日その事に気付かなかったのか･･･眠かったのかなｗ
仮に左リールの絵柄配列をreel_l、左下段停止位置変数がg1だとして
table10に下段の停止位置が指定しているなら
if (ls=1)&(table10.g1>0) : state=0 : cs=1 : goto *SKPcenter
これだけでよくない？

結局左中右全部同じ方法でやれという事でつか？

＞１０１紙
正確には左が止まったときにテーブル選択しまつ。
括弧が処理を遅くするのなら漏れのはフリーズ寸前でつ・ﾟ・(つД｀)・ﾟ・

＞６８０氏
g1>0の意味は何でつか？
それに括弧が要るような気が・・・

＞２８０氏
やっとわかりますたが
数時間前まで

(；´Д`)ﾊｧ？

ですた。

真理値表（ＡＮＤ）
Ａ−−｜｜｜
　　　　｜｜｜｜−−Ｘ
Ｂ−−｜｜｜

Ａ　　Ｂ　　Ｘ
０　　０　　０
０　　１　　０
１　　０　　０
１　　１　　１
真理値表（ＯＲ）
Ａ−−｜｜｜
　　　　　｜｜｜−−Ｘ
Ｂ−−｜｜｜

Ａ　　Ｂ　　Ｘ
０　　０　　０
０　　１　　１
１　　０　　１
１　　１　　１

多言語では下記のような使い方は一般的でっ。
#const True -1
#const False 0
ii=True
if ii :mes "True"
stop
全ての言語の条件式は０か１（-1）で制御できます。
参考：評価の方法＝（逆）ポーランド技法

>>ﾍ臣さん
if文は一行で表せる場合は括弧いりませんよー
あとg1>0は例えばtable10が
table10=0,1,2,3,4,0,1,2,0･･･
と表されているならば
「その停止位置から何ｺﾏすべるか」というのが
0以上ならすべる、というものであります。

あ、cy-=16が「すべる」というものならば逆に
「>」ではなく「=」を使う事になるのかな･･･。

あと左が止まった時だけにテーブル選択というのはかなり無茶かと･･･
例えば左停止時に右上がり揃いのテーブルが選択されて
左下段に絵柄が停止している時に中リール下段にビタすると取りこぼすんじゃ
ないかと･･･。

リール制御の方法について。
１．完全テーブル制御（全てテーブルで解決）
２．完全コントロール制御（全てコントロールする）
３．テーブル制御とコントロール制御の併用
　　．左出目(第一停止)を完全テーブル制御、中もテーブル制御
　　　右はコントロール制御
　　．左出目で盤面内に目的役がある場合はビタ
　　　中と右をコントロール制御
参考：アステカのＣＴは左テーブル中右フリー(基本的に)

テーブル制御って難しい･･･。
猫目改造してテーブル制御導入してみてたけど
たった9個のテーブルさえ動作しない･･･(汗

テーブル制御とコントロール制御の違いがいくつかわかった気が(作る側の
テーブル制御
○ちゃんと作れれば驚くほどｽｸﾘﾌﾟﾄが簡潔になる
○非成立役揃い、揃う役の非揃いが起こらない
○大量リーチ目が再現できる
×ものすごい量のテーブルを書かないといけない
×デバッグが大変

コントロール制御
○ヘタレ制御なら簡単に作れる
○比較式を一般化すればするほど簡潔にまとめられる
○デバッグが簡単
×ちゃんとしてないと非成立役揃いや成立役の非揃いが起こる
×大量リーチ目の再現が難しい(増やすほど行数が多く･･･。

個人的には一長一短な気がします･･･が
職人レベルや職人一歩手前レベルぐらいだと
テーブルの方がよりｹﾞｰﾑ性の高い物を作れそうだと思いまふ。

うちはﾏﾀﾞｺﾝﾄﾛｰﾙﾈ･･･(･ω･｀ )

>>277
それはわかってまつが、実際扱う数字が0や1ではないので為になりませんｗ

>>279
考え方が違うので理解に苦みますたが、ﾅﾙﾎﾄﾞ。
cy-=16を通るという事は、すべるというよりかは
回転を維持するという解釈がよいかと。

しかし、効率がよくても変数が把握しづらいものは極力避けたいでつ。
サルでも･･のスレタイ通り、サルがサルなりに理解できるものを採用したいと思い松。
せっかく提案してもらいながらこういう事言って誠に申し訳ないでつ。

＞あと左が止まった時だけにテーブル選択というのはかなり無茶かと･･･
くどいようでつが、テーブル選択の基準は出目であって押した位置ではないでつ。
押した位置でテーブル決定できるのに越したことはありませんが。
あと取りこぼしに関してでつが、こればっかりはテーブル表を見て頂きたい。
4ｺﾏ以内に目的の絵柄がないor嫌がらせでないかぎり引き込むようになってるはずでつ。

>>ﾍ臣さん
ﾅﾙﾎﾄﾞ･･･。あの部分はリール回転部分の一部だったんですね。
回転中でなくてすべり中でもなければリールを動かさない=停止している
ということだったんですね･･･ｻｽｶﾞ。

あとうちが言いたかったのは>>275の
＞正確には左が止まったときにテーブル選択しまつ。
という部分が中も右もテーブル決定する、というように読めたので
中も右も決定してしまうと揃うﾗｲﾝが限定されてしまって
結果停止位置によっては変な取りこぼしも発生するのではないか
ということだったのです･･･。
勘違いだったようで申し訳ない･･･。

朝おいらが言ったことをサクっとわかりやすく>>273（２８０氏）がまとめてくれてますねｗ

>>283（６８０氏）
＞中も右も決定してしまうと揃うﾗｲﾝが限定されてしまって …

結構そういう機種多いです。
回避策は停止位置によってラインの書き換えを行うということですよね？
特例テーブルが増えるなぁ…。そこ悩み中。。

>>揃うラインが限定されてしまう
回避方法はいろいろあるけど個人的ヘタレ回避策は　　乱数を使う
というもの。

＋１方式で対応絵柄を探す制御の場合、
すべりコマ数が１または２の時に乱数を使ってもう１コマずらすなどの卑怯技を使う。
中や右はそれで済むし、左角チェなどは＋２、などなど・・・
乱数の条件を複雑にすれば（例：ａ＝１〜４、ｂ＝２〜６、ａ／ｂにしたとき１以上になればスベリを＋１）
レア制御だって夢ではない。
どうせ最後リールは引き込むしかないんだからテンパイラインを間違わなければ大丈夫。

・・・いかが？

>ﾍ臣 殿
＞それはわかってまつが、実際扱う数字が0や1ではないので為になりませんｗ
それが解っていれば個々の組み合わせなので問題ないのでは。

(a=1)and (b=0) and(c=3) は (a=1)=1 (b=0)=1 (c-3)=1
=1*0*3=0 よって結果は0
(a=1) or (b=0) or (c=3) では
=1+0+3=4 よって結果は1
個々に考えて組み合わせれば問題なし。！

誤　(a=1)and (b=0) and(c=3) は (a=1)=1 (b=0)=1 (c-3)=1
正　(a=1)and (b=0) and(c=3) は (a=1)=1 (b=0)=0 (c-3)=1

再訂正
誤　(a=1)and (b=0) and(c=3) は (a=1)=1 (b=0)=0 (c-3)=1
正　(a=1)and (b=0) and(c=3) は (a=1)=1 (b=0)=0 (c=3)=1

>>285あか氏
こぼしが発生しない小役は問題ないのですが、
こぼしが発生する役が、例えば左上段にいる場合、
上段に揃うテーブルが選択されているとすると、
中中段にビタ押されるとすでにその時点でこぼしが確定してしまいます。
中中段にビタ押された瞬間に特例テーブルへ移行（書き換え）すればいいんですが、
データ量が膨大でつ。

アルゼもコンドル時代までは書き換え用のテーブルが用意されていましたが、
花火以降、容量削減のためかわかりませんがラインの途中変更は採用されなくなったようでつ。

>>あか さん
＞すべりコマ数が１または２の時に乱数を使ってもう１コマずらすなどの卑怯技を使う。
ｷﾞｸﾘ･･･北都はｺﾝﾄﾛｰﾙ特有の上段受けばっかり現象(謎)を回避するために
その方法を使っております･･･(汗

>>101さん
＞ラインの途中変更は採用されなくなったようでつ。
という事は最近のｱﾙｾﾞ機種は取りこぼす役の場合は
成立ﾃﾝﾊﾟｲﾗｲﾝ以下にﾋﾞﾀだと取りこぼすのですか･･･？

停止位置によってテーブルを決めるのでは
何か問題あるのかなぁ･･･？

>>６８０氏
そのようだす。
ごく最近の機種には再採用した可能性もあるかもしれませんが…。

”停止位置”によって決めると言うか、”ボタンが押された瞬間”に中・右も決めるのが一般的です。
６８０氏もおっしゃったように、データが膨大になりますが、それをクリアすれば無敵です。
コントロールのような制御にも出来ますし。

>>289(１０１氏）
特例テーブルよりも成立ラインを「上段」→「右下がりor右上がり」
とかに書き換えるルーチンを加えたらどうでしょう？
これならば中を押した後の左や右は上段を使えば済みます。
第３停止だけは変える必要がありますが・・・
if文を使ってしまうためにあまり綺麗な形にはならないと思いますが
「取れる場合に取りこぼしを出さないようにする」為には仕方がないかもしれないです。
特例テーブルなんて余計なものを作るより労力は減ると思います。

ｼｶｼﾅﾝﾃﾞｸﾜｼｸｼｯﾃﾙﾝﾃﾞｼｮｳｶ､ｿﾝﾅｳﾗﾉﾊﾅｼｦ・・・

>>290（６８０氏）
ビンゴ（ｗ
でもそうしないと・・・ねぇ・・・

>>292(あか氏)
特例テーブルと大げさに表現しちゃいましたが、
多分全く同じ事を言ってます。
要するに特別なテーブルか流用テーブルかはその時によりますが、
”書き換え”が行われるのでデータが多くなるかな。と思っています。

＞ｼｶｼﾅﾝﾃﾞｸﾜｼｸｼｯﾃﾙﾝﾃﾞｼｮｳｶ､ｿﾝﾅｳﾗﾉﾊﾅｼｦ・・・

ｽﾛｯﾄｶﾞｽｷﾃﾞｽｷﾃﾞﾀﾏﾗﾅｸﾃ、ｼﾞﾌﾞﾝﾃﾞﾓﾂｸｯﾃｼﾏｲﾀｲ!!ﾄｵﾓｯﾀﾉｶﾞﾎｯﾀﾝﾃﾞﾂ｡

やべぇ、テーブル表の見方を教えてもらおうと思ったらなんか難しい話してる・・・。（汗

＞ﾍ大臣殿，280Sのエラーカウント報告はまだでっか。
さらに　＞９０氏はいずこに消えたか。．．．．．．．．．．．．．．．．．．．．
ワシも今日でＨＳＰ暦１ヶ月そろそろ　↑　か。

いや、ｽﾏﾇｽﾏﾇ。
コントロール制御派の俺が何か言うと、混乱を招きかねないと思って
ちょいとＲＯＭってたんだわ。

っつーのは建前で、新しいオモチャ（ドラムセット）買ったから
はしゃいで叩きまくり（＆ウルセーって怒られた）なところです。

＞９０氏　おめ！
てっきり逃げたのかと思った。．．．
ついでにワシも若い者にまかせて消えようと思ったのに。．．．

消えないで下さい師匠方。

いざテーブルを書こうと思うとかなり複雑だと実感。
暫くはソースいじる前に紙にテーブル書いて視覚的にも分かり易いようにしようかな…。

＞９０氏　１０１氏はともかくワシは一般ピープルですぞ，お間違えの無いように。

紙に書くんだったらEXCELのマスを調整して　↑　や　○　書いたらいかがでっか。

誤　＞９０氏　１０１氏
正　＞１０１氏　９０氏

>>２８０氏
おいらも一般ピープルですが何か？ｗ

エクセルもいいですね。
とにかく視覚的に表さないと、あれもこれもと処理していくうちに頭がパンクしそうでつ。
いつかわけのわからないバグが出て直せなくなりそうだし。
まずは土台が大事ですよね。

＞１０１紙さま。

すでにわけがわからない状況ですが何か！
収束不能なので先ほどから試作品３の準備をしています。

パチスロの種類ってこんなものでっか。
A =:Big(jac 3)
B =:Big(jac 2)
C =:Big(jac 0)Sin(集中)

AC=:A+Sin
BC=:B+Sin Big(jac 2?)
AR=:
AT=:(AT RT)
AR=:
CT=:(無制御)
EG=:(RT LT PAT SG)

追加
ST=:
STAT=:

>>２０８さま
そんな感じです。

A =:Big(jac 3)
B =:Big(jac 2以下)
C =:Big(jac 0)Sin(集中) ｏｒどちらもなし（バケのみとかボヌス自体なしとか）

AC=:A+C
BC=:B+C
AR=AT+RT
AT=:アシストタイム
RT= EG LT PAT SG（リプ高確率）
CT=:リプ以外無制御が基本。フルスペックは200枚＆150Ｇ
ST=ストックタイム（サイレントストック含）

＞１０１紙さま。
すばやい回答ありがとうございます。

機種による高格率A高確率Bの移行条件や役による解除確立やら全てを
満たそうとして挫折しそうです。
払い出しも状態で異なるし
テーブルと制御の切り替えも困るし
ノーマルAタイプを完成させてB，Ｃ，ＡＴ，ＳＴと機能を増やすにしても”土台”作り
が問題だし。

やはり　二兎追うもの一兎も得ず　なのか。．．．

一気に色々作れる人もいると思いますが、
おいらの場合、経験も知識も頭脳もないのでネチネチ土台ばかり作っています。
まぁ少しずつ固めていく性格なので仕方ないというのもあるし、
今目指しているのが純Ａタイプですから、他のみなさんの苦労より全然楽なわけです。

一度カスゲーにせよ完成できた暁には、ＡＴやＳＴなどの付加価値もつける予定ですが、
ほんとにそこまで辿り着けるか微妙なのでつが、
どの道、純Ａの部分は通る道なので、今の段階でいっぱいいっぱいでもｶﾞﾝｶﾞﾙ所存でつ。

＞１０１紙さま　ガンガッテくらはい　応援して待つ。！
最後に、ひさしぶりに古株がROMっているので”コントロール制御論”や　うんぬん
を聞きたいと思う人。？　ハーイ　ハーイ　ハーイ　ハーイ　ハーイ
賛成多数なので民主主義の法則にのっとって　”お願いします！” AT50

う〜っ　ドラムセットに自爆テロしてやる。

＞ひさしぶりに古株がROMっているので”コントロール制御論”や　うんぬん
＞を聞きたいと思う人

ノ

すみません　”ノ”　ノ意味がわかりません。

手

(^o^)丿ﾊｰｲ

責任者を出せ>>1はどこだ。！！！！！

オイラはドラマー♪　ﾄﾞｶﾞﾄﾞｶﾞﾀﾞﾝﾀﾞﾝﾂﾀﾂﾀﾂﾀﾗﾀｼｬｰﾝ
やばい。プログラムより面白いかも・・・（ｫｨ

コントロール制御において、一番重要なのはテンパイチェックと見つけたり。
リール停止時に「リール出目配列変数(3,3)」に絵柄番号格納して、
（まだ停止していないリールについては-1等のNULLを入れておく。）
すると各ラインの対象絵柄番号の数をカウントすれば、
第一ﾘｰﾙ停止時に、枠内に対象絵柄がある状態が「１」
第二ﾘｰﾙ停止時に、絵柄がテンパイしている状況が「２」
第三ﾘｰﾙ停止時に、対象役が揃っている状態が「３」
という数となって帰ってくるわけですな。

まぁ、あとは適当だ。ｳﾋｬﾋｬｰ

＞ひさしぶりに古株がROMっているので”コントロール制御論”や　うんぬん
＞を聞きたいと思う人

ﾉｼ
↑これも「(^o^)／ハーイ」と同じ意味って聞いたけど。あってる？


さらにこんな事も聞いてみたりするテスト。
※同じ質問はあった気がするんですが、回答が見つけられなかったので…

リールのスタート時にちょっと待ちを入れたり、リールのスベり中に別のストップボタンを無効化したいのですが、
こんな時ってどうやればいいですか？

ドラマーは最後には死ぬぞ。！　日産の前社長　石原氏も91歳で死んだ。

その
＞リール出目配列変数(3,3)
と
>各ラインの対象絵柄番号の数
と
>という数となって帰ってくるわけですな。
の
スクリプト見せてケロ。

＞５２氏　正解？

ﾉｼ【のし】
手を振る動作をノとシで表現した物。
半角でﾉｼと書く事により人が手を振っている動作に見える。

>>312
どうされました？？

>>314
ﾉｼ　は手を振ってんの。

＞リールのスタート時にちょっと待ちを入れたり、リールのスベり中に別のストップボタンを無効化したい…

スタート時の待ちは、多分repeatをぐるぐる回っていると思います。
そこに捨て変数を用意し、+1させていき３０になったらキー入力を許可してまつ。
また、実際のスロは、リールが回転したとき、予め決めておいたリール番号が全て中段を通り越したら
ストップボタン許可、とやっているようでつ。
だから一周で押せない時があるんですね。

すべり中の方は…状態別（0=停止　1=すべり中　2=回転中のように）変数を用意するといいと思いまつ。

＞９０神さま　最後にもっと詳しく教えてケロ。
テーブル制御派にもコントロール制御の概念は必要なのだ。

>>317　訴えてやる。．．．

>>315　ドラマーに限らず人間は皆必ず死ぬんですよね〜。

>>315
9コマ分ifでチェックしてるだけｗ
if deme.1.0=check_yaku : chk_line.0+=1 こんな感じ。
斜めライン上のコマでは、斜めラインの分も同時に足してる。
if deme.1.1=check_yaku : chk_line.1+=1 : chk_line.3+=1 : chk_line.4+=1

処理速度追求すると、見苦しくても仕方なし。

＞９０神様にもっと詳しく教えてほしい人挙手。！

　ノ

>>319は＞９０神様ですか。？
ワシの頭脳では理解できないサル語で解説してほしいな。

2典ｐｌｕｓ
ttp://www.media-k.co.jp/jiten/

>>317　（１０１氏）

アドバイス＋つっこみありがとうございます！
（ずーっと「ﾉｼ」の意味を勘違いしていました。）

「スベり中＝現在のリール位置(ypos)と目標の停止位置(reelypos)が等しくない」って考えて、

if ypos<>reelypos : title "スベり中！"

などとやっていました。
…悩むこと１時間強、HSPのドキュメントを見たら、条件判断に「<>」って無かったんですね。

if ypos!=reelypos : title "スベり中！"

と書き換えたら無事に動きました！


スタート時のウエイトはアドバイスを参考に作り込んでみたいと思います。

捨て変数方式にするか、リールの位置にするかは考え中・・・
※間（？）を取って「リールが**コマ動いたら」にするかもしれません。

＞＞シナプス
なんとか努力して理解しる！
闘魂注入ゥゥゥ〜ッ！！

っつか、コントロール制御は作るの楽だけど、
出目を追求する人にはオススメできんよ・・・。
出目を面白くしようとすると例外処理入りまくって
バグも多くなるし。

脳内通信，”おおきに”　”ほなさいなら”！！！

　　　　　　　左　　　　　　　中　　　　　　右

上段　　上段・斜めA　　上段　　　上段・斜めB

中段　　　中段　　中段・斜めA＆B　　中段

下段　　下段・斜めB　　下段　　　下段・斜めA

９コマをチェックする時、対象役があれば
各ラインに割り当てた配列に＋１してるだけですタイ。
これでどう？

ｵﾂｶﾚ

>>322（５２氏？）
勘違いと言うか…詳しくはおいらも分かりません（汗
２典にも”ノ”は載ってないですね。なんかｶﾜｲｲから使ってました。

<>をテストしてみたらエラーも出ないみたいですね。
何の処理をしているんでしょうね…？

＞間（？）を取って「リールが**コマ動いたら」にするかもしれません。

それｲｲ!!　と思いまつ!


何故か訴えられそうなので今日はもう寝まつ…。。

そうです。３２２は私でした。

>>326 （１０１氏）

何故かエラーが出なかったんですよ・・・。<>。
エラーが出てくれれば間違いに気づくのに、エラーが出ないで動いてしまうモノだから発見に時間がかかってしまいました…。

>>325 （９０氏）

これって、テーブル制御でも全リール停止後の役の判定で使えますよね？

テーブル作るのに飽きてきたので、いまは違う場所をちびちび作ったり、わざと回転速度を遅くして動きのおかしい場所をつぶしているところです。
今作っているところ（ウエイト＋スベり中のストップ無効）ができたらこの書き込みを参考にして役の判定を作ろうかなー。





…とりあえず、今の作っているところができたら寝よう。うん。

ｵﾊﾖｳｺﾞｻﾞｲﾏﾂ、ｻｧｼｺﾞﾄｼｺﾞﾄ。

!!280S鰓数　19!!

ｼｺﾞﾄｵﾜﾘ

うわぁぁぁぁぁぁぁぁ
if命令の階層が深すぎますとか言われますた。
どうしようわぁぁぁぁぁぁぁぁ

よしっ、オマイラ今日も逝くぞー！
１．２．３．　配列の要素が無効ダァー！！

10k使ってリオﾀﾝカレンダーｹﾞﾄ!!　お買い得！！


リール始動から1回転するまでボタン無効機能
スベリ終わるまでボタン無効機能
実装完了！

今日は誰も来ないなぁ。ｻﾋﾞｽｨ

リール配列考えるのってメチャンコ難しい。
・押し順で揃う役が２種類
・各リールに３連ブランク絵柄
・左にチェリーは２つ欲しい

これを満たすとなると・・・パズルだ。

今日の進捗

・役の判定をつくってみた。
・バグをいくつかつぶしてみた。
　　（>>54で指摘された停止後に停止ボタンを押すとリールが動くとか…）


今後の予定。（上に行くほど優先度が高い）

・テーブルを作ってみよう。
　（まだテーブルの方法が見えていないので・・・ニントモ。）
・メダルの増減も実装しよう
・メダルをやるのなら情報用画面を作ろう
・画面をちゃんと台の形にしてみよう。

前にUPしてもらったテーブル表によるとなんだか中・右リールそれぞれで16*8ぐらいのテーブルが必要らしいので、
うまい方法がないか考え中。
（「うまい方法」ってのは、数あるテーブルから何を選択すればいいか決めるためのうまい方法ね。）

ここでリクエストしていいのかどうか知りませんが、ダメもとで。
「どなたかイレグイのテーブル表ってお持ちではないですか？？」

…他力本願でスマソ。＿|￣|○

最近変な時間に寝てばっかりだ＿|￣|○

＞９０氏
配列ごときでガタガタいってんじゃねーよ。
テーブル作る段階になったらその悩みがいかにちっぽけかという事を思い知らされまつよ。

＞５２氏
少量リーチ目でよければテーブル1/4カットでも問題ないと思いまつよ。
うまくない方法なら漏れにまかせなさい。
if命令の階層が深すぎますとか言われる事うけあい！

しかし何をもって深すぎるというのか全然わからねーでつ。
if table= 10{if (cy=)|(cy=)|(cy=)|(cy=)|(cy=)|(cy=)|(cy=)|(cy=)|(cy=) : state=0 : cs=1 : goto *SKPcenter}
こんな香具師がたった144行あるだけなのに

＞へ
ﾇﾊﾊﾊ　我はｺﾝﾄﾛｰﾙ制御だから関係ﾅｰｲ
リール配列が一番の難所なのですよ

if table = 10 {
if (cy=)|(cy=)|(cy=)|(cy=)|(cy=)|(cy=)|(cy=)|(cy=)|(cy=){
state=0
cs=1
goto *SKPcenter
}
これでも動かない？

↑最後の行の下に「}」もう一つ

これで動かないならgotoが怪しい

>>ﾍ氏
どっかでif {…}の中の：は保証されないとかなんとか…と読んだ気が…

＞９０氏
押し順ＡＴ機は特に難しそうですね。
しかも対応役が２種類となると、奇抜な配列を作るのはかなり…。
おいらもオリジナルですが、まず先にリーチ目が頭の中にあってそれを実現させるためにあれこれパズルしました。
２箇所に難点が残ったままですが…これ以上１つでも動かすと全体を直さなくちゃならなくなる予感…。
ﾏｼﾞﾑｽﾞｲ…

ここのまとめサイトが欲しいと思っている人の数　→　(1)

押し順役が２つある時点で、サイバードラゴンみたいな
ションボリ配列は確定ダス・・・。

>>337
あぅ・・・このスレが1000行く頃には何とかします。
前スレ持ってなければどっかにうｐしてもいいですよ。

＞９０氏
押し順役がリプ以外の小役となると…３連を配置すると取りこぼす役が発生するの確実でわ？

＞９０氏
改行を入れたらエラーの出てる行が下がってきますた。
なんとか逝けそうな悪寒。
でもこれって{}の位置の問題なんでつよね。
同じ行に入れさせてくれてもいいと思うのでつが･･･

＞１０１紙
もしそれが本当なら全部やりなおし０確なので回線切って首でも釣ろうかな＿|￣|○

海藻が孵化すぎるエラーはおかげさまででなくなりますた。
次は計算式でカッコの記述が違いますって言われますたが、
(cy=)で中に数値を入れてないので当たり前なのでしょうか？

あと、押し順役ってなんでつか？

>>341は、やはり数字を入れたらエラーでなくなったので解決致しますた。
よし、この作業をあと280回繰り返したら完成だ。




ﾀﾞﾙｰ＿|￣|○

＞ﾍ氏
結局『階層が深すぎるエラー』って何が原因だったんでしか？

＞１０１紙
改
行
位
置
？

そういえば、すべり中のボタン無効が効いてないのは、
＞１０１紙の言う:がきいてないのかと小一時間･･
しかし括弧はずして&だけで書いてもきいてない気がしますが、何か？


ﾂｰｶﾀﾞﾚﾓｲﾈｰﾅｰ

今年はサル年。サルの年。

さぁ、サル共！邁進せよ！！

誰かワシを呼んだか。　お呼びじゃ無い．．．こりゃまた失礼．．．ほな．．．さいなら。！

呼ばれてないが。！！！
ﾍ臣 殿
複数行のＩＦ文。
if 1 {pos 0,0
mes "Sal!}

if 1 {pos0,0:mes "Sal"}

if 1 {pos 0,0
mes "Sal!}
else {mes "Aho"}

駄目ダメだめ。
if 1 {if 1 :pos 0,0:mes "Aho!"}
正
if 1 {if 1 {pos 0,0:mes "Aho!"} }

と＞１０１紙は言っていた。
ＨＳＰマニュアル「・条件判断」より引用
「・より複雑な条件判断」
*現在のHSPでは、if命令で「{」「}」を使った複数行記述と、通常の１行のみの
分岐を混在した場合の動作は保証されません。「{」「}」内でさらに条件分岐を
行なう場合には、「{」「}」を使用するようにしてください。
この問題は、今後のバージョンアップで解消していく予定です。

＞ｼﾅﾌﾟｽ

ｸﾞｯｼﾞｮﾌﾞ

そして俺は永眠

ｸﾞｯﾅｲ

大家さん。　＞そして俺は永眠って　どーゆう意味と　こ一時間説明をききたい。！

旋風のやらないか　は　大家　の仕業　か。？！！！

だーれもいなければ５分後に永眠しゅる。

>>348
ｿﾚﾀﾞ!!ｸﾞｯｼﾞｮﾌﾞ!!

間に合っ…たか？

実際に打っている時も制御の事を考えてしまうおいらは、とりあえずＢＩＧ中を完成。

（しかしなぜかエディタからヘルプを開くと、ブラウザからじゃなくＨＴＭＬソースが開いてしまうのはなんでだろ!?
なんか変なとこいじっちゃったかなぁ。でもまぁいーや。）

>>348に基づいて括弧入れてみますたよ。

　　　　　効　果　な　し　！　！

おそらく他に問題があるんだろう。
ﾓｳｲｲﾖ＿|￣|○

＞ﾍ氏
もつかれさまでした。
そうですかぁ。
( )が９重以上になってるって事もないですよね…？

ﾓｳｲｯｶ＿|￣|○

やっと中リールのテーブル入力ｵﾜﾀﾖ＿|￣|○
あと倍ｶﾞﾝｶﾞﾗﾅｹﾚﾊﾞ＿|￣|○
ﾀﾞﾙｰ＿|￣|○

＞１０１氏
９重まで逝ってないでつ。
{}は最大で4重でつ。
あと、漏れはエディタからヘルプ開けませんが、
ヘルプ設定ってのはいぢってみますたか？

以前は標準エディタの「ヘルプ」から「ＨＳＰプログラムガイドを開く」とかブラウザで開けたんだけど、
今はなぜかメモ帳（TeraPad）で開いてしまう…。
謎だ…。
ヘルプ設定いじってみたけど直らないでつ。。

ﾓｳｲｲﾖ＿|￣|○

メモ帳でもサンプルデモから開いてる漏れと比べたらましという事で。
ﾓｳｲｯｶ＿|￣|○

スプリクトの行数がそろそろ２０００逝きそうなんでつが、
おまいらは行数どれくらいなんでしょうか？

普通にhsphelpフォルダから見ればいいのに…。
ﾓｳｲｲﾈ＿|￣|○

３分割しているけど合計１８５０くらいでつ。
進行状況は、
１．最低限のデータ類
２．払い出しや残りＪＡＣなどのデジタルカウンタ
３．払い出し時のフラッシュ演出（暫定）
４．ちょっとした演出（リール消灯とか）
５．ＢＩＧ中＆ＲＥＧ中の制御（とりあえず１種類）

システムの部分はもうほとんど完成かも。
あとはそれぞれを強化していくだけ…？（演出を派手にしたりだとかテーブルを増やしたりだとか確率のバランス調整とか）
テーブルも、ほぼ数字を羅列していくだけで出来そうでつ。

ただ最大の問題…。素材…。

間に合っ…たかも？

＞１０１紙
やぱりそれぐらい逝きまつか。
完成する頃には４０００程逝きそうでつよね。
漏れのテーブルが完成したら７セグとバックライト関係の指導おながいしまつ。
どうやるのか全然ﾜｶﾗﾈ。

前に言ってた複数条件の後の｢:｣なんでつが、
以前まで効いてた所が今は効いてない悪寒。
リールが停止してもいつまでもすべり中で
ボタン入力を受け付けない状態がランダムで発生しまつ。
後々効かなくなる事を確認したのでお前らも注意してください。

鬱だ死のう＿|￣|○

http://yam-jp.com/~nanashi/slotimg/slo069.mp3
北斗のスロゲ〜ミュージックを寄贈します。
ぜひ使ってください。

>>363
すばらしい！！！

一獲千金＠＠月間500万稼ぎ出ました＠＠
体感機最新機開発完了！レンタルします！
詳しくはHPをご覧くださいませ。
http://www.erobum.jp/?tenten
※現在空きあり！先着順終了です、締切の場合はご了承下さいませm(. .)m
※都内近県求む！

間に合っ…たか？

ふ〜ん　”：”　コロンって”マルチステートメント”って言って改行と同じ意味なんだ。
そう言えば他言語で　”；”　セミコロンを改行にしているものがあるな。．．．

マルチのトリートメントが何だァァァァァ！！
ファイッ！　ファイッ！　ファイッ！俺の常識、非常識！！

というわけで、今晩も頑張ろう。

(；´Д`)ﾊｧﾊｧ(；´Д`)ﾊｧﾊｧ(；´Д`)ﾊｧﾊｧテーブル完成しますた(；´Д`)ﾊｧﾊｧ(；´Д`)ﾊｧﾊｧ(；´Д`)ﾊｧﾊｧ


おたくらさっきから何が間に合ってるんでつか？

＞ヘ
ホラ、セールス断るときによく「間に合ってます」って言うべ？


狙い分ける７を赤・青・白で三色作って
トリコロールカラーだウハハハとか思ってたら
激しくガイシュツだったことに気づき、鬱

そろ　そ〜ろう　＞９０＞１０１神紙の作品のスクリプト見せて早漏。．．．

えー、いま制御部分切り離してるからなぁ・・・。
公開しても回って止まるだけじゃよー。

まぁ、どちらにしろ描画方式が特殊なので
近いうちにFPSテスト頼むと思うダスよ。

にぎやかしに。．．．余計にサムイって！
試作品　hspslot3-0.01　作り直すこと３回目の途中作品，前回試作品より後退。

ttp://yam-jp.com/~nanashi/slotimg/slo070.lzh

ちょい質問でつ。
1stのスレからROMってて、ココを参考に
ツレが今未導入機種を作成中なんですが、
誰かとバッティングしないように早めに
作成機種を宣言したほうがイイのでしょうか？
それともバッティング自体、モーマンタイ
なのでしょうか？
教えてっ！パイオニア〜・・・

>>372 はワシだす。
ご意見，苦情，文句，クレーム，罵声，ただいまから６０分間受け付けます。

>>373 ワシはバッティングしても個々の個性があるスロゲーとして問題を感じないです。

オイラはバッティング全然ＯＫですよ。
新庄ぐらいは飛ばせます。守備がちょっと問題アリですけど。

・・・　　ｱｰｱ

まぁ、これから職人さんも増えるでしょうし、
早めに作成宣言するのは悪くないと思います。
自分への渇入れも兼ねて。

＞２８０S氏

苦情＆文句
ソース見たけど全然わからねぇ。
サルにもわかるように説明しる！

280Sクレームセンター受付280Sです。
いかがなされましたか。？
ﾍ臣 さま
おそれいりますが
適切に処理させていただく為にご連絡先をいただけますか。
ガチャ　プープープー．．．

ﾍ臣さま ﾍ臣さま！ ﾍ臣さま！！．．．お客様の都合により現在この．．．．．．キャー

残り２分。

280Sクレームセンターインフォメーション
「本日の受付は終了いたしました。またのご利用をお待ちいたしております。」

やべ、リール配列見直したら
多重入賞できるトコばっかりじゃねぇか・・・。

姉さん・・・ピンチです・・・。

姉さん・・・油断したわ・・・。

次スレタイトル：サルでもできた？スロゲー開発【３】　あと=(1000-383)。

．．．

間に合わ…なかったかさすがに…。
変な時間に寝て起きてしまった…。

もうそろそろスクリプトが長くなってきて、理解するのが難しくなってきましたね。。
＞２８０氏
正直、以前からほぼ何も変わっていません（汗
増えたのは公開はしたくない部分のテーブルのみでつ。
そうなると配列等も公開することになるので、もうちょっと出来上がってからにさせていただきまつ。

おは！　＞１０１紙

ワシも昨日朝６：００から夜８：００まで寝てたのでまだ寝れない。

神紙のスクリプトを見ないとアイデアが浮かばず先に進めない作り直しばかりだ。
早くパクリの素をくらはい。

間に合った…。

＞２８０氏
人のスクリプトを読んで自分のものにできる２８０氏なら、
おいらのなんか全然参考にならない気が…。

パクリに素は提供していきたいですが…何かあるのかな。。
ピンポイントでのリクは一応聞きます。ﾈﾀﾊｽｸﾅｲﾃﾞｽｶﾞ…

＞１０１紙
なにをおっしゃるやら．．．ごけんそんを。！私以外はみな神様で〜す。

前にも書いたことがあると思いますが小説や手紙などの文章と同じで全てが
興味深いのです。．．．シナプスに刺激をくらはい。

おいらのソースこそパクリの集合体…。

んじゃテーブルは非公開（制御のスクリプトじゃなく詳細）
配列も今の段階ではまだ非公開ですが、
編集しなおしてうｐしてみます。
期待しないで下さい…。

みなさまお久しぶりです。

月曜日から仕事が始まったので全然開発が進みましぇん。
今はテーブル部分から離れ（現実逃避）して、
成立役のチェック（昨日ほぼ完成）とか画面をいじってみたり（まだこれから）しています。

上のが終わったらBIGゲームだけ遊べるようにして久々にうｐ・・・でき・・・るかなぁ？

つーか、実行ファイルの作り方調べないと・・。（まて

ttp://yam-jp.com/~nanashi/slotimg/slo072.lzh

批評大歓迎。

＞１０１紙　いっもおねだりばかりで”ゴメンネ”
ワシのソースを見て解るように何度作り直しても同じような物しか出来ないのだよ。
（発想力　0.0001g 程度）

リール描画の紙さま＞５２氏　おひさ。．．．
久々にうｐ・・・でき・・・るぞ　（ソースのままでも可)

＞１０１氏
速報：役そろい時の音と払い出し音全く意識していなかった修正せねば。おおきに。

＞２８０氏
なんかﾈﾀありました？
パクリも歓迎。

ひょぉぉあちゃぁあちゃぁあちゃぁぁ…でバケ揃いました。

＞１０１氏　スクリプト拝見しました，もうほとんど90％完成していますね。
ただ丁寧に機能を盛り込んでいるようなので追加機能の数量によっては60％程度か。
なんとワシのスクリプトがいかに手抜きか実感しました。

テーブルが無いので速度調整（すまん）777をゲットBGMに感動した。

ひとりごと
一行の文字数を80程度に決めたほうが印刷や閲覧時に便利かと思う。
まぁほかの作品も一行が異常に長いが。

＞２８０氏
感想ありがとうございます。
てかよく人のソースを読めるなぁと感心してます。

そうですね。８・９０％は完成してるかもしれません。
丁寧に作っているのは、後々ほかの機種を作る時にも流用できるようにしたいからでつ。

速度調整して色々遊んじゃって構わないですよ。
むしろそうやってバグやおかしいとこを発見された方が助かります。（一応バグ等は無いと自負してますが…）
ちなみにＢＩＧ成立プレイか、成立後一度も３枚掛けしなければプレミアＢＧＭ搭載でつ。（サウンドは暫定）
一枚がけはスペースキーでつ。

１行あたりの文字数が多いのはほとんどコメント部分が長いからでつね。
ちなみにコメント部分は公開用につけたのではなく、忘れないように普段から書いてます。

シーモンキーにもわかるまとめサイトまだ〜？

おまいらがうｐした作品プレイした後で自分のを見たら驚くほど萎えるんですが、何か？

＞１０１紙
BIG中にBIGが揃うのは仕様でつか？

代弁：仕様でっ。．．．制御テーブルが空でっ

それより不可解なのは，"test101.as"では無く "table_data_2.as"をコンパイル
しなければ実行出来ないことだ。．．．

："flash_data.as" に "test101.as" を include "table_data_2.as" に" flash_data.as"
を include している。．．．ワナか。？

フォントをFGW FONTにして何かのAAができたら紙

>280S氏
空なのに何かしらの制御が働いてるのは何故なのか説明キボンヌ。
確かにBIG獲得枚数が−になったり0ﾊﾟﾝしまつが。

ﾍ臣殿　test101.as の

;----------リール停止
*left_stop
if left!mt_l{｝
;wait 10;t

ウェイトのセミコロンを外してコンパイルすと解るかも知れません。

ｳﾎ。
なんか解剖されてるｗ

＞２８０氏
代弁おつです。
>>401はおいらも不可解。。
どうやったらtest101.asにまとめられるか考え中ですが、今のところテーブルデータをいじっているので、
いちいち保存せずにコンパイル+実行出来るのでこのままになってます。

＞ﾍ氏
制御は働いていません。
table_data_2.asの"000000000000000000000"と羅列しているところに、0〜4の好きな数字をいれて実行すると
制御が発生します。
そのままだと全ビタ止まりなのでＢＩＧ中ＢＩＧが揃うのも仕様ですし、チェリーとＪＡＣＩＮが同時成立してしまう
のも仕様でつ。

今日の伊藤家
画像・サウンドのファイル名を一番上でdefineしておくと、
差し替えが楽でいい感じ。


制御部分を切り離して無制御にすると、ビタでBIGを
揃える遊びに夢中になってしまう罠にハマった。無念

神紙がおられるので質問。

HSPのSTICKやGETKEYはHSPのフォームにフォーカスが無くても検出される。
：例えばメモ帳で編集中↑を使用すると回転したりしまっ。

伊藤家で裏技扱っていますか。？

ひとぉぉぉつ！伊藤家ぇ〜 家訓！
「裏技をウル技(ﾃｸ)と言っちゃう奴は〜！
　20代確定でぇ〜あります！」

ドシドシご応募ください。

あと、FPSテストに付き合えｺﾞﾗｧｧｧ

>>407　足もって回されてFPS計るのはヤダ！

http://yam-jp.com/~nanashi/slotimg/slo074.zip

無制御、全リール停止後は必ず×フラッシュ発生。
回転中のFPSｷﾎﾞﾘ。
（フラッシュから復帰するときはFPS落ちる。）

63FPSですた。
１．私的な事ですが”ウエイトウザイ”。
２．私的な事ですがピンクの窓がエロい。
３．ソースが無いのが悲しい。

１．切り忘れた
２．狙い通り
３．レンジで温める時にはずして、袋に入れ忘れやがったなあの店員


何はともあれサンクス

サンクスと言えば去年深夜に買い物をした時異常に金額が高いので
レシートを確認したら買ってもいない”チューハイ５７０円”が先頭に付いてた
店員に文句を言うと平謝りでソフトクリームをくれた。

１．店員が飲んだのか。．．．
２．いっもやっているのか。．．．
３．在庫のばれないソフトクリームを出すとは。．．．
４．一般的に深夜コンビニの店員はバックヤードで友達呼んで宴会ダ。！．．．

＞９０氏
32〜33FPSですた。

おぉ、一番心配だった１０１ﾀｿのﾏｯｽｨｰﾝで30以上出てるなら、
なんとかコレで行けそうですな。サンクス。


コンビニの店員（特に夜番）は、ヤリ放題ヤってるトコ多い。
オイラの友達にも数人居るんだけどさ・・・。
・納品直後の弁当を廃棄（賞味期限切れ）扱いで持ち帰り
　（シールだけレジの下に隠しておいて、帰る間際に通すらしい・・・）
・割引クーポン券は着服
・ボトルキャップ等のオマケで出現率低い奴はブッこ抜き済み
まだ客の釣銭ごまかしたりしてないのが唯一の救いですが・・・。

そのｼﾅﾌﾟｽが行ったコンビニはﾋﾃﾞｪな。
もう行かないほうがいい。もしくは本部にチクれ。

若い頃はみ〜んな悪い事をした。．．．今もしてるの？
大手デーラも所詮町の修理工場のデカイヤツ客が新車で大事にしているのを
知ってか知らずかやりたい放題などと業界業界で秘密があるのさ。
だから相手が非を認めれば本部にチクりはしないのサ。


ちなみにワシの車は一度もデーラに出さない車検も自分でやる。怖くてだせるか。！
だって走行中にタイヤがハブから外れるなんて事件にならないだけでイッパイじゃん。

＞９０氏
今の段階だとリール速度は激しく遅いんですが大丈夫なんでしょうか？

おいらこの前、１ｋ以下の買い物を１ｋ札で払い、お釣りを受け取る時に、
店員がレシートと間違えておいらが渡した１ｋ札+お釣りを返して来たんですが通うべきですか？

＞１０１
あ、ちょいとタイマー式の回転は保留しとります・・・。
ＦＰＳ落ちてコマ飛び越えちゃうと、最大２５コマ滑り発生するんでｗ
次verでは回転速度調整付けます。
あと、その店員はクビになりました。昨日付けで。


ｼﾅﾌﾟｽは車詳しそうだな。オイラの車精密検査してくれ・・・。
不調な箇所が数えられるだけでも3,4,5・・・あぁぁぁぁぁぁ

＞９０氏　すまんが高級車しか検査できんよ大衆車を見るとめまいがするから。
：高級車＝クラウン・セドリック・セルシオ・プレジデント・センチュリー・ベンツ以上ね。

＞９０氏
質問です。
shadow.bmpはどうやってリールにかぶせているんでしょうか？
リール描画するごとに逐一重ねて描画しているんですか？

こいつなんでつが、エアコンの効きがちょっと・・・。
ttp://www.shake-noboru.com/taxi-world-usa0106.htm


ﾊｧ、明日はリール配列見直そう・・・。
ではｸﾞｯﾅｲ

＞１０１
そうでつ。影の下も１フレーム毎に更新されてますからね。
毎回重ね合わせの処理が必要です。このせいでちょっと重いのかも。
オプションでOFFにできるんですが、チェックボックスつけるの忘れますた（死

ﾊﾊﾞ ｸﾞｯﾅｲ

＞９０氏　オツカレ。

＞１０１氏　＞５２氏のGODが巨体を分割してさらに盤面のラインもメインループで
描画していましたＵｐｌｏｄｅｒにあると思います。

つｌて言うか＞５２氏の場合そうしないとリールの上下側が見えてしまう。
（下側は液晶用にカットしたようですが）

さらに＞９０氏のビットマップを拡大していくとグラデーションの綺麗なこと。

＞９０氏
ｻﾝｸｽでつ!!
立体的に見えるのでかなり魅力なのですが、処理速度との兼ね合いを見つつパクらせてもらうか検討してみまつ。

ﾓﾔｽﾐ…。
ｵｲﾗﾊﾓｳﾁｮｯﾄﾔﾛｳ!

＞２８０氏
あれ！？
ＧＯＤて５２氏でしたっけ？

でもたしかにＧＯＤは『リール+筐体+ライン』を描画していましたね。

あれ．．．＞５２氏って"入れ食い”だったかも。
＞あか氏の間違えですた。．．．スンマソン。

なんかキモイスレになってきたな

．．．動いているリールに画をかぶせるのって簡単と思ったが結構面倒だった。
転送前の画像に貼り付けて転送したほうが楽だな。．．．

>>426

では、あなたはどんなスレを望むのですか？

おまいらがこのスレにおられるのがキモイですね。
おまいらがお書きになったスプリクトはサルには理解できないんですね。
漏れは自分が書いたスプリクトさえ理解できないんですね。
だからバグがあっても修正できないんですね。
だからおまいらにバグ修正して頂きたいんですね。
でもｼｮﾎﾞｲからうｐしたくないんですね。
困りましたですね。

＞９０氏
録画中68-89ですた
>>403わかりませんですた

おは！　ﾍ臣殿．．．(いつも早起きでっね）

スクリプトの見た目に騙されてはいけません中身は"if"による分岐だけですから。

>>403解りませんでしたか。？
;wait 10の";"を外すと停止位置調整の動きが鮮明に見えるはずですが。

ｳﾎｯ!ｲｲﾀｲﾐﾝｸﾞ!（いつも変な時間に寝るんでっ）

見た目に騙されてなんかいないでつよ。
特に#がつく命令はｻﾊﾟｰﾘでつ。

セミコロン外すと#Label not foundがｲﾊﾟｰｲでてきまつ・ﾟ・(つД｀)・ﾟ・

どなたかﾎﾞﾇｽ未成立時にﾘﾁ目がガンガンでるバグ修正を引き受けてくれる髪はおられませんか？

#の付く命令って特殊なものしか無いとお見ますが。

＞セミコロン外すと#Label not foundがｲﾊﾟｰｲでてきまつ・ﾟ・(つД｀)・ﾟ・
↓
>>401を読んでね。（table_data_2.as）をコンパイルしないと動きません。

よかったらスクリプト見させてください。（力になっれるかどうか不明ですが）

今からうｐしまつんでよろしくおながいしまつ・ﾟ・(つД｀)・ﾟ・

>>401読んでやったら何かが見つからないみたいでつ・ﾟ・(つД｀)・ﾟ・

うｐしますた。

漏れが一番理解できないのはtable=143のときに
143以外のテーブルが採用されてる事なんでつ。

速報：いま見ていますが、本当にIF文の塊なので構造を理解するのに
時間がかかりそうです。

サルはifを覚えたらif文以外書こうとしません。
お手数をお掛け致しまつがどうぞよろすくおながい致しまつ・ﾟ・(つД｀)・ﾟ・

速報２：
if table= 10{
if (cy=1600)|(cy=240)|(cy=320)|(cy=640)|(cy=960)|(cy=1280) : goto *CENTERstop
}
は
if table= 10{
if (cy=1600)|(cy=240)|(cy=320)|(cy=640)|(cy=960)|(cy=1280) { goto *CENTERstop}
}
は全てこうします。

【すまん】コレが動く原理がまだ理解できない。
例えば全てのリール描画を　*SKPright　の下で行っているが
そのあとどこにも飛ばされず　;左リール釦押し位置取得　のルーチンが始まる。

*main　間のループは１８１２行でやっと　goto *main　されている。

速報３：
*lottery 役抽選など唯一のＧＯＳＵＢ。
stick k,15,1 で全ての停止判定ののち cp rp に　k を代入。
ls cs rs ０回転１停止。
lp cp rp １でＫＥＹが押された。
全ての条件判断がｍａｉｎループに記述されたものである。
１４３選択方法　ｔｂｌｓｌ=2　lsp=16 で　 table=143　が選択される。
table=143　は　*SKPcenter　と　*SKPleft に存在する。

動作はあるていど理解できましたがコレを修正するよりは各パーツに分解して
ＧＯＳＵＢ　ＧＯＴＯ　で処理した方が問題が少ないと思います。

このままでエラーを検証するにはまず，
１．ＩＦ文の入れ子部分の修正。
２．テーブル143が選ばれる条件をととのえる。
３．if tblsl=2{　の143選択部分通過をｄａｉａｌｇなどを設置して行う
４．テーブル143の部分にｄａｉａｌｇなどを設置して通過の確認を行う。

ﾍ臣殿
if tblsl=1{;通常 1
title "1"　追加

if tblsl=2{;通常 2
title "2"　追加

if (ls=1)&(cs=1)&(rs=1) : gosub *judge : goto *ROTATION　追加
int xx:xx=tblsl2:str xx:yy=xx+" "　追加
int xx:xx=lsp :str xx:yy=yy+xx+" "　追加
int xx:xx=table :str xx:yy=yy+xx+" "　追加
title yy　追加
wait 5　追加
goto *main

if 5<slrate : tblsl64=2;59/64
tblsl2 =2　追加
でタイトルに状況が表示されるので試して下さい。
私の結果はテーブル2ではなくテーブル1が選択される場合があり
←キー検出のタイミングで結果が異なるようである。

ただいまご帰宅なさいました。

気合の入った混じれスに激しく感謝致しまつ。
少々わけわからんけどとりあえず試してみまつ。

私がヴぁかでした。なんとお詫びしたらいいのやら。
確かにif table=143は通過している事を確認したのでやっぱりテーブルかと思ったら
何度も見直したはずのテーブルの数値が間違っておりました。
280氏には大変申し訳なく思っております。
これからはこんなお願いしないのでどうかお許しを・ﾟ・(つД｀)・ﾟ・

言い訳させて頂きますと、テーブル表の基準が下段で、
入力するy座標が上段の為、精神が安定していないと混乱するようです。
探せば他にもごろごろでてくる悪寒。
ﾎﾝﾄﾆｽﾐﾏｾﾝﾃﾞｼﾀ

ﾍ臣殿　べつに暇だからいいのですが。．．．

ＩＦ文の”｛”の使用方法は全ての箇所で間違っていますから期待通りの結果が
得られるとは思われません。
この状態で機能を拡張する場合問題の解決が困難な状況に陥る気がします。

問題点
１．ＩＦ文の”｛”と”：”の使用方法。
２．無意味なＩＦ文のネスト。
３．ｌｎｐの取得方法に問題がある為停止位置を決めるのに苦労している。
継ぎ目の処理をキチンと行えば
if (lp= 1)&(ly=1440) {gosub *LEFTstop}
この部分は必要なくなると思う。
４．テーブルの記述が複雑すぎる。
xx=0
cx=cy/80
if table= 10{if (cx=20)|(cx=3)|(cx=4)|(cx=8)|(cx=12)|(cx=16) {xx=1}
if xx :gosub *CENTERstop
ですっきりし入力や確認も楽になる。

マジレスすぎてスマンが挫折せずに頑張っていただくためにと
”えらそうに”書いてしまった。．．．気にさわったらゆるしてネ。！

両氏もつかれですた。

＞ﾍ氏
おいらのソースは２８０氏の言う通りでつ。
コンパイルするファイルがtable_data_2.asでないと、#Label not foundが出てしまいます。
test101.asファイルの229,230,248,249,267,268,360,1014行をそれぞれコメントにするか削除すれば
test101.asだけで動きます。（テーブルデータとフラッシュデータが切り離されるだけでつ）
あと、；ｔ　と書かれている所はテスト用なので本当はいらない記述なのでつ。

…おいらもテーブル表の基準が上段なので違和感ｱﾘｱﾘ…

＞ﾍ氏
貴ソースの1842〜1849行目のテーブル取得ですが、正しい選択率で取得されてない気が…。

ﾍ臣殿　dental...as　のIF文の表面的な修正を施したものをＵｐしておきました。
よかったら使ってネ。

質問です。
先日うｐしたソースもそうなのですが、ゲームを起動した直後の動きが少しぎこちないというか、
微妙に処理落ちが発生します。（他のアプリケーションは起動させてません）
数ゲーム消化すると期待通りの動きをするんですが原因は何なんでしょう？

疑っているのが、変数の初期化じゃないかと。
半分くらいの変数は冒頭で初期化をしているのですが、残りの半分くらいは面倒くさくて途中でいきなり
変数に値を入れてたりします。
これが原因なのかは分かりませんが、初期化をせずにいきなり変数を使うと処理が遅くなることがあるのでしょうか？

>>445
暇なんだったらもう一つおながいしちゃおかしら。

問題点
１．おそらく全くわかっていない（最初に正常に動作した為、それで正しいと思っている）
２．ネストは極力避けたいのだが、本人は無意味とは思っておらず「やむを得ない処理」としています。
３．上と同じく動作しているので問題なんてある訳ねーじゃんと思っている。
　　　できれば継ぎ目の美味い処理と必要なくなる原理の詳細キボンヌ致します。
４．微修正の嵐ダルー＿|￣|○

>>446
既にご存知かと思いますが、そんな小難しい事言われても理解できる訳が御座いません。
自分のデバグが終わってからやってみようと思います。

>>447
そうなんでっ。
10枚役成立時にREGがそろいます＿|￣|○
テーブル42か44を洗濯するはずが41を洗濯しやがります＿|￣|○
＜のあとに＝追加しましたが変化なしです＿|￣|○

>>448
神ｷﾀ━━━━━━━━(ﾟ∀ﾟ)━━━━━━━━!!!!
もうすりきれるまで使わせて頂きまつ(；´Д`)ﾊｧﾊｧ

＞ﾍ氏
「＜」は未満
「＞」はそれを超える数値
「＜＝」は以下
「＞＝」は以上
でつ。

あと、例えばrnd a,5は
aは”0〜4”の”5つ”の値になりまつ。
混乱しそうですが落ち着いて考えれば無問題ですよ。

ﾍ臣殿
あまり手を付けすぎるとﾍ臣の独創性が損なわれる危険があるのと必ずしもワシの
方法が正解とはいえない（ミス監査対象だから）ただ基本的な部分を参考にしてほしい
と思います。

＞１０１氏ご指摘のようにテーブル選択部分も変なので参考までに修正してみました。

rnd tblsl,2 ;テーブル選択No.取得
rnd slrate,64 ;テーブル選択確率
if (tblsl == 0) : tblsl2 =1 ;1/2
if (tblsl == 1) : tblsl2 =2 ;1/2
if (slrate >= 0)&(slrate <= 1) : tblsl32=1 ; 2/64
if (slrate >= 2) : tblsl32=2 ;62/64
if (slrate >= 0)&(slrate <= 4) : tblsl64=1 ; 5/64
if (slrate >= 5) : tblsl64=2 ;59/64

xx=tblsl2 :str xx:yy="tblsl2="+xx
xx=tblsl32:str xx:yy=yy+" tablsl32="+xx
xx=tblsl64:str xx:yy=yy+" tablsl64="+xx
xx=tblsl :str xx:yy=yy+" tblsl="+xx
xx=slrate :str xx:yy=yy+" slrate="+xx
title yy
これも正解かどうかは解りませんので考えかたの参考にして下さい。

追伸：
標準のエディタよりフリーのエディタで”置換”機能などを使えば全体の修正は数回の
作業で完了します。

過去に書き込んだ”ＡＷＫ”などの”正規表現”を習得すると簡単に間違えを見つけたり
修正が可能になります。

少し余裕がでたり暇なときに一度検討してチョンマゲ。！

リール配列チェックがﾏﾝﾄﾞｸｻｲので、
チェック用のツールを作ってしもた・・・。

配列から完全オリジナルのスロ作ってる人で、
欲しい人いたら上げまつｗ

＞９０氏
激しく欲しいでつ!!

脳内通信：・・・---・・・　モールス解読（なんでもいいからクレ！）本当はＳＯＳ。

＞１０１紙
rnd tblsl,3　は、０〜３までを取得しているつもりですたが、
０〜２だったんでつね＿|￣|○


>>451のテーブル選択ですが、

tblsl2 =2　追加

が残ってた・・・・・鬱＿|￣|○

そう言えば先日のＨＳＰ試作品3でＩＮファイルの
ｄｂｕｇ＿０．０＝１をｄｂｕｇ＿０．０＝９にすると作成されたリール配列が
表示されるのだが似て非なるんものか。？

最近、ｓｏｆｔｅｔｈｅｒと言う（　登　と言う大学生）が作ったソフトにはまってしまった。

＞２８０紙
if (tblsl == 0)
の＝が２つあるのはどういう意味かというのと
str xx:yy="tblsl2="+xx
は、何をしているのか説明して頂けないでしょうか？
意味がわからないままコピペしてたもんで。

＞２８０氏
ホントだぁ。
裏技みたいで楽しかったでつｗ
でも多分９０氏は『配列チェック』と言っているので、重複入賞が無いか等を調べられるドラえもんのアイテムのような
ツールを作ったんじゃないでしょうか。
かなりﾜｸﾜｸ。

http://yam-jp.com/~nanashi/slotimg/slo082.as
あげますた

１．絵柄名を入力してＯＫ押す
２．配列を作成してＯＫ押す
３．サーチ結果を大発表

注意点
・チェリー関係は無視(チェリーがらみで複合するの当然だし)
　ただし、チェリーの３つ揃いも役として判定されまつ
・複合箇所が多すぎるとバッファ溢れて不正な処理を以下略

あとは各自適当にイジってくれ
このツールについての一切の責任は負いませぬﾌﾞﾋﾋ

ｷﾀ━━━━(ﾟ∀ﾟ)━━━━!!
けど、何故か絵柄入力後、強制終了してしまいまつ…。

ﾍ臣殿　スマンがワシは”紙”ではなく”一般猿人”なのでお間違えの無いように。

＝＝は＝と同じでＣ言語などの場合条件式と代入を区別しているがＨＳＰでは
どちらも同じ意味です。．．．ビジュアルの問題ダス

ＳＴＲＸＸ：．．．はタイトルに数値は表示できないので文字列方に変換してその
文字列をつなげているのです。．．．ウインドウタイトルバーを見てね。

＞１０１氏喜んでもらえてウレピー。．．．わしも＞９０氏のツールは一齣一齣の
画像からもっと複雑な処理をするものだと思う。

（販売可能なソフトだと思うとプレッシャーをかけてみる）

速報：普通にうごくが　”揃いラインの意味を検討中”

んー・・・実は、オイラの方でも強制終了する時アリ。
確定でするわけじゃないので、ＯＳの問題？
コンボボックスを安定して配置できる数に限界があるとか・・・。

補足として、全部絵柄を埋めないままチェック開始すると
全部0番の絵柄になって複合しまくって強制終了確定なので
勝手にランダムな配列を作成してまつ。ｽﾝﾏｿﾝ
あと、結果発表時の配列番号は中段基準ダス。

もう適当にイジってなんとかしてください。
オイラにとっての役目は終えたソフトですからｗ


＞（販売可能なソフトだと思うとプレッシャーをかけてみる）

　　　　　　　　　　　残　　　　　　　　　　　　　　念

揃いライン"数"でつ・・・

意味は・・・見たマンマです。
相当特殊な配列じゃないと３ライン以上は揃わないけど。


▲ ▲ ▲
＠ ▲ ＃　　うちゅーせんかん (旧)やーまーとー
▲ ＠ ▲

何度やっても『配列の設定』で強制終了ダス。。
でも。
こんなツールを自作どころか考えもしませんですた。
９０氏のアイデア＆開発力は確かに○商事を超えていると思いまつ!神!!

てか、よう考えたらUI付ける必要なかったな。
ソースの中で直接配列にブチ込めば毎回
設定し直す必要ないわけやし・・・。何やってんだ俺。

＞１０１
っつーわけで、恐らく空きメモリ絡みだと思われる。
もし本気で使いたいのならチェックルーチンだけぶっこ抜いて、
ソースに配列を直接書き込んで使ってくらはい。


ついに永遠のライバル、藤商事を越えてしまったか・・・。
総員、次の目標・・・エイペックス！！

＞１０１神　やはり解らん。．．．教えてクレヨン。

起動：上から1-7を入力
次面：そのままOK
結果：途中は意味がわかるが最初の方がラインがずれている

揃いラインの意味は
左:0 中:8 右:8 揃いライン数:2
の場合左0番中8番右8番がそろうと言うことでいいんだよね。？

誤＞　１０１神
正＞　９０神
すまん、間違えた。

１．絵柄名を設定（「７」とか「チェリー」とか）してＯＫ
２．配列（初期配列はランダム）を完成させてＯＫ

３．左:0 中:8 右:8 揃いライン数:2の場合、

左中段に0番、中中段に8番、右中段に8番が止まった場合、
何らかの役が２ラインで揃っているっつーことだす。

わたしバカよね。．．．おかげさまでヤーット解りました。

『配列の設定』で左リールの１番のコンボボックスを触らなければ正常に動作する模様…。
９０氏のソースを参考にしつつ、拡張機能をつけたものを作ってみるのも楽しそうでつね。
ヒマな時やってみる所存でありまつ!

北都新Verうｐしました〜
ソース見ておかしな所指摘･･･して欲しいかも(´ ･ω･)手におえなｋ

>>468
その並び方はスペースインベーダー（バルテック？）ではなかったか？　とつっこみ。

神の液晶作るのﾒﾝﾄﾞｸｻ・・・
あきらめてオリスロ作ろうか悩みどころです。

＞６８０氏
ＪＡＣＩＮの押し順時、『132』と表示されていたのですが、無視して順押しすると揃うことがありまつ!
てか、オリジナルの液晶演出楽しいです。完成が楽しみでつ。

＞あか氏
スペースインベーダー懐かしい!

おいらは今フラッシュ演出をいじって遊んでいるんだけど、どうもgosubとawait,waitの羅列で使い勝手が悪い…。
テンキーをリールに見立て、数字を入れるだけでフラッシュしてくれるツールでも作ろうかと。。ｨｬｿﾝﾅｽｷﾙﾅｲ。

＞テンキーをリールに見立て、数字を入れるだけでフラッシュしてくれるツール
それ面白いなぁ。
フラッシュのアニメーションパターンを汎用性のある
データ形式にして、外部ファイル化すれば大いにアリと思うが。


スペースインベーダーもあの配置で３ライン複合あったね。
一応、(旧)ヤマトにもあるんでつよ。(リール配列の一番上)
ttp://www.pachimaga.com/db/slot_db/sammy_slot/58/sammy_slot_58.html

一応、個別の点灯・消灯をサブルーチン化してgosubの羅列で書ける様にはしているんだけど、
ソースが不細工＆もうちょっと簡略化したい。
少しいじれば、たとえば”74269”とだけ書けばＶフラッシュする。みたいにはできるだろうとは思うんだけど、
問題はウェイトでつ…。
ウェイトの値がそれぞれ違うわけだし、いちいちwait文を書くのならあまり変わらない気がするんですよね。
いいアイデアないでしょうか？

文字列の中にWait値を埋め込んでしまうのはどうかな？
数字をwait値とみなして、実際はそれを１０倍してみたり。

あぁ、スマソ。
「qwe asd zxc」辺りを実際のフラッシュパターンに
使った上で、ってことね。

あ。それいいかもしれないでつ!!
「qwe asd zxc」辺りを使う（点灯）のもいいんですが、そうするともう一つ消灯が必要なので「rty fgh vbn」を使うか、
それともはじめから２文字取り出して、
”t7t5t310s7”（点灯7点灯5点灯3ウェイト100消灯7）
のようにした方が楽か…。
視覚的に同じ位置＆テンキーの正方形配列が魅力なんですが。。ﾄﾞｯﾁﾆｼﾖｳｶ…。

でもできそうでつ!やってみます。

まぁ、このあたりの書式は自分が分かりやすいやつが
ベストだと思いまつ。
一応、オイラだったらこうするってパターンを考えてみた。
（テンキー配置を利用する前提で）

全部1文字単位で解釈します。
L　　　　(light)全コマ点灯、以下数字コマンドは消灯と解釈
D　　　　(dark)　上記の逆
W　　　　(wait)実際に描画する＆以下数字コマンドは待ち時間
1〜9　　対応するコマを点灯にセット/消灯にセット/WAIT

Vフラなら"D74269W9"または"L8513W9"で
□■□
□■□　　←これをwait 90の時間だけ表示。
■□■
W99なら180、W999なら270って具合に。0を10と解釈するのもアリ。

”Ｄ74269Ｗ9”と書いて「Ｄの後は全部消灯、Ｗの後はウェイトですよ〜」と書く方が簡単そうですね。
でもどうやるのか…。まずは自分なりに作ってみます。

ちなみに文字列の中身が何文字なのかを調べる命令というのはありますか？

渇ァ〜ッ！
それはヘルプの文字列操作系に堂々と載っとるワイ！

strlen

ﾋｨｨ!!ごまんなさい先生。

曲がりなりにも出来たらうｐしてみまつ!!

＞＞１０１さん
実はJacの押し順はハサミならどっちでも揃うようになっております(汗
また押し順を無視してもビタなら押し順不問で揃いますｗ

どんどんLV上がってるこのｽﾚにｶﾞｸﾌﾞﾙ

うｐしてみました。（ソースは実行できません。）

少しややこしいですが、
「Ｌ」は全消灯、「Ｄ」は全点灯、「ｔ」はその後の数字が点灯、「ｓ」はその後の数字が消灯、「ｗ」はその後の数字がウェイト、でつ。
*te_7や*sy_8などには点灯・消灯の個別サブルーチンが用意されています。

もっと煮詰められるところがありそうですがどうでしょう？

あ。ちなみにソースのフラッシュは
「Ｖ」→「Ｉ」→「Ｃ」
とフラッシュするプログラムでつ。

うわーん。
文字列が６４文字以上になるとバッファオーバーフローになってしまいまつ。
文字列を分割するのはﾏﾝﾄﾞｸｾｰので、６４文字以上も入れられる方法ってないでつか？

ソース見ますた。特に問題ないと思います。
（if fl="9":gosub*te_9が1個余計？）


wを廃止して「 . 」1個をwait10とかに対応させた方が
単純で見やすくなりそうな気もしマッスル

またヘルプを読んでない人がいまつね・・・
渇渇渇渇 渇ぁぁぁぁ〜〜〜〜つっ！

sdim命令は通常使う文字列の最大文字数を拡張することもできます。
例：sdim a,200; 変数aは200文字までの文字列を扱えます

ホントだ。余計が…ｗ

ﾋｨｨｨ〜!!ごまんなさい師匠!でもためになりますた!!
sdimって配列だけじゃなかったんでつね!

誰かソースを改良、改変して是非パクっちゃってください。

もう少し見やすくしました。
小文字と大文字も区別されるようなので
「qwe asd zxc」は消灯
「QWE ASD ZXC」は点灯
「l」は全点灯（light）
「o」は全消灯（近くにあったから）
「．」は一つでawait 50

flash_patt="QAXDE.qaxde."
のように使えばいいと思いまつ。

flash_patt="o.QAXDE.qaxde." ;全消灯した後Ｖフラ
gosub*flash_st

〜〜〜

*flash_st
strlen fl_le,flash_patt
repeat fl_le
strmid fl,flash_patt,cnt,1
if fl="l":gosub*zententou
if fl="o":gosub*zensyoutou
if fl="Q":gosub*te_7
if fl="W":gosub*te_8
if fl="E":gosub*te_9
;行数が多いって言われたので一部省略
if fl="x":gosub*sy_2
if fl="c":gosub*sy_3
if fl=".":await 50
loop
return

＞２８０S氏
まぁあなたが紙でないと仰るのなら漏れは微生物並ということで。

質問したい事があったのですが、レスを読んでるうちに頭痛がしてきました。
今までついて来てるフリしてたつもりですが、そのフリすらできそうにないです。

折れに構わずおまいらだけでも生き延びて下さい・・・・

>>１０１氏

「ソースの意味は分からないが、とにかくすごい機能だ！」
※キン肉マソ風

◇リールフラッシュを実装するために必要なモノって以下の４つであってます？
　1.普通のリール画像
　2.暗くしたリール画像
　3.絵柄のまわりだけ暗くしたリール画像
　4.１０１氏のソースを理解する能力

1.しかない…＿|￣|○

つーか、イレグイの場合は全リールが停止する前にリールがフラッシュしていた気が・・・。
やはり演出系は後回しにして、まともにBIGゲームだけでも遊べるようにしよう。（現実逃避？）

オイラは
＜リール点灯・絵柄点灯＞＜リール点灯・絵柄消灯＞
＜リール消灯・絵柄点灯＞＜リール消灯・絵柄消灯＞
の４パターンを用意しとりﾏｯｽﾙ。

オイラもイレグイフラッシュが気に入ってる一人でして。
どうにか実装したい・・・。

わ〜っ　すごい勢いでスレが伸びてる。

hspslot3.macの中にあるｓｐｌｉｔコマンドは任意の区切り記号で区切られたデータ
のｎ番目の取得用です使えたらつかってね。

ﾍ臣殿　ガンガレ。！

＞９０氏　ＲＯＭってますか。　お願いがありますが。．．．．．．

なんだらば〜？

先日のリールチェックプログラムの検索部分のアルゴリズムが理解できない。
パ食ったプログラムをＵＰしたら修正してもれえますか。

＞９０神　笑わないで修正キボン。　ttp://yam-jp.com/~nanashi/slotimg/slo087.lzh

repeat 5の中がおかしいぞい。
しかしオイラは、他人が書いたソースを解読して修正ってのが
一番苦手なのさ・・・。っつーわけで、要点だけ説明。

cl=(nl + cln.0.cnt + 21) \ 21
cc=(nc + cln.1.cnt + 21) \ 21
cr=(nr + cln.2.cnt + 21) \ 21
ここで現在検索中の段にcln（上段・下段・斜め用のズレを
あらかじめ格納しておいた配列）を足して、検索する段の
番号を一旦はじき出してまつ。

cl=en.cl.0
cc=en.cc.1
cr=en.cr.2
んで、ここで実際の絵柄番号に変換しなおしてるわけだす。
あとはご想像の通りかと。

＞repeat 5の中がおかしいぞい
その通り。
１２：００頃から作ってみたのだが検索の所に来て思ったより面倒だった
ので＞９０氏に修正してもらおうと思った。

理屈はなんとなくわかるのだが面倒でチョチョイと＞９０氏に修正してもらおうと
思ったが世の中そんない甘くないか。！．．．．．

正直言うと風邪で頭痛がひどくて
知能指数が低下しとるんですわ・・・。
今日のところは勘弁してくらはい。

repeat5の中身は、ライン上の３絵柄番号が一致してたら
役揃い変数に+1ってのを５ライン分やってるだけなので、
ifを５行書いても同じだす。頑張ってけれ〜・・ｺﾞﾎｺﾞﾎｹﾞﾌﾝ!

風邪（ＳＡＲＳ？）なら寝てないといけませんよ。脳内の温度上昇率から見て。．．．

なかなかスロゲーが進まないので気分転換に改造してみようと思ったのだが
やはり自分の考え方で処理するほうが楽なのかも知れない。ネ

ただ、こういう物という発想が無いので気分転換に作るにしても何も無い。
＞１０１氏のフラッシュ確認プログラム等もあったらいいなと言う発想がない。
（貧乏だからあるもので我慢する習性が身についているのかも）

＞９０早く寝てケロ。

ここ一週間ほどの成果物ということで、役のチェックモジュール（９０氏が作ったreelcheckerとは違います）をうｐしてみる。

ttp://yam-jp.com/~nanashi/slotimg/slo088.as

こいつは実際のゲーム用のHSPソースに#includeして使うモノです。
簡単な使い方をソースに書いていますが、正直わかりにくいかも…
しかも、イレグイ特化型なので他の人は使いにくいかも…

ま、みなさんのシナプスを少しでも刺激できたらいいかなって事であげてみます。
質問、つっこみ、改良案etc.etc.大募集です。

では、ぼちぼち寝ます。

＞５２氏
あ。そうでつね。９０氏の言う通り４パターンくらい必要かと思います。
でもおいらは横着して２パターンしか使ってません。。
モジュール作れちゃう５２氏なら、100％4.がありまつ!!
ちなみに…
おいらは>>509が理解できません!
何に使うのかもわからないでつ…。＿|￣|○

＞２８０氏
なんだかｽｺﾞｲ!!
よーし。寝て起きたらソースをじっくり見てみよう。
てかマジで一つのアプリケーションとして使えると思います。

おは！
＞５２氏　：ラインチェックの方法例。(試作品１−３で使用している模式)
せっかくのモジュールもっと汎用性のあるものに改造してみては。？

Tlin="111,177,771"
L1=1:C1=7:R1=7

Clin=Tlin+","
yy=""+L1+C1+R1
repeat
instr ii,Clin,","
strmid xx,Clin,0,ii:strmid Clin,Clin,ii+1,64
if xx=yy :mes "no."+cnt+" "+xx+" "+"match"
if (Clin="") :break
loop
stop

＞１０１氏　がプログラムの修正をしてくれるのが楽しみだなワクワクドキドキ。！

３７３で質問したモノです。みなさん御回答ありがとうございます。
バッティングは、みなさん基本的にOK！のようですね。
まだ実機が未導入の為（明日が導入日みたいですね）制御はなしですが
イメージだけならUPできます。要望があれば、うぷりますね♪
では、重ね々々、御回答　感謝でつ！

天気よかったから３年ぶりに成人式に行ってきました。ﾏﾀﾞﾀﾞﾚﾓｲﾅｶｯﾀ…。

>>511
＞１０１氏　がプログラムの修正をしてくれるのが楽しみだなワクワクドキドキ。！

２８０氏のソースに着いて行くだけでｲｯﾊﾟｲｲｯﾊﾟｲ。
結論：限りなく無理

て事でリールチェックプログラムの完成期待!!

もうワシには無理。．．．検索ルーチンは１００％　＞９０氏のパクリなのに制御不能。
何故！
;--- 1 ---
Nn.0.0=-1:Nn.0.1=0:Nn.0.2=1,Nn.0.3=-1,Nn.0.4=1
Nn.1.0=-1:Nn.1.1=0:Nn.1.2=1,Nn.1.3= 0,Nn.1.4=0
Nn.2.0=-1:Nn.2.1=0:Nn.2.2=1,Nn.2.3= 1,Nn.2.4=-1
;--- 2 ---
Nn.0.0=-1,-1,-1: Nn.0.1= 0, 0, 0: Nn.0.2=-1, 1, 1
Nn.0.3=-1, 0, 1: Nn.0.4= 1, 0,-1
;--- 2 ---と;--- 2 ---の代入方法で結果が異なるのか単純にワシのボケなのか。

ttp://yam-jp.com/~nanashi/slotimg/slo089.lzh

＞９０　＞１０１　氏に一方的にお願いしまつ。

,Nn.0.3=-1,Nn.0.4=1
↑　　　　 ↑
カンマで命令区切れたっけ？

サンプル付加用に書いて間違えた”：”にしても変。

そー言えば＞９０氏風邪の具合はいかがか　かんばしく無ければ安静に。

検索ルーチンはほとんど＞９０氏の物で
盤面位置用変数が３次元から２次元のＮｎ
リール番号変数が３次元から２次元のＬｎ，Ｃｎ，Ｒｎに変わっているだけなのに
ワシだけが異次元に迷い込んだのか。．．．．．．

＞９０氏
スマン！Ｎｎ．０．２の値が--- 1 ---と--- 2---で異なっていた。
異次元にいるせいかこの検索結果が正解なのかも理解できない。．．．．．．．．．

ふ〜っ　寝て起きてスクリプト眺めたら原因がわかった。．．．
また”ポカミス”だった。
配列変数で　Ｎｎ，３，３　を使用しているのに　汎用変数で　ｎｎ　を使用していた。
皆さんご迷惑をおかけしました。．．．とりあえずｆｉｘしたものＵＰしときます。

ttp://yam-jp.com/~nanashi/slotimg/slo090.lzh

>>519
神!間違いなく神!!
おいらも９０氏のソースをパクって、配列チェッカーを作っていたんだけど、たった今眠くてヘタレる事にしまつ。。
明日以降に２８０氏のソースを拝ませてもらいまつ…。

>>510 (１０１氏)

やっていることとしては各リールの状態（止まった柄）を0〜6の数字として受け取って、
その柄で成立している役を最初の引数に返します。（下の例を見てみてください）
※6はチェリーとして扱っているので、左だけにあれば役が成立します。

例1）
reel_check yaku,1,1,1,0 ;最後の「0」は通常ゲーム中ということを意味しています。
str yaku
title yaku ;タイトルバーに「1」って出る…はず。

例2）
reel_check yaku,6,3,5,0
str yaku
title yaku ;タイトルバーに「6」って出る…はず。

例3）
reel_check yaku,2,4,6,0
str yaku
title yaku ;タイトルバーに「10」って出る…はず。


>>511 (280S氏)

読み間違えていたらスマソですが、Tlinってのが役を入れている場所でしょうか？
で、L1=左、C1=中、R1=右　のリールって事ですよね。
わたしのモジュールも役（認められるそろい方のパターン）を変数か何かに入れられたら幸せになりそうな気がするんですがねぇ…。

＞１０１氏　昨夜から役，半日クスガッタ腹いせに機能を拡張してみました。

ttp://yam-jp.com/~nanashi/slotimg/slo091.lzh

＞５２氏　その通り>511のスクリプトは動作確認済みですから動かせてみて
くらはい。
（私の場合もう少し異なりますが：試作品３のモジュールも見てね）

私の場合汎用性の高い物と言うことでＩＮＩファイルで全てを定義していて
特殊な並びの”あたり”や”演出”などを編集可能なテーブルに格納してユーザー
が任意に変更することを目的にしています。．．．
（いいかえれば利用者がデバッグを行う）

＞５２氏のモジュールを少し改造して
パラメ−タに役データを渡して処理すればモジュールのスクリプトが簡潔に
なり複数のあたり役に対応できると考えました。
あとＰＶＡＬなども利用すると返り値を数値型や文字列型に変換でき応用範囲
が広がると思います。

．．．．などとポカミス連発のワシが言っても説得力はありませんが。

>522 のスクリプト初期化忘れあり。

*job2
Dn=0:data="":objprm 63,data
Ｄｎ＝0：を追加してね。．．．まだ問題あるかも．．．もう寝る。！

９０氏の配列チェッカーを改造して視覚的に表示できるようにしようと思っていたが…
>>522が完璧。自分のソースはもうゴミ箱へ…。
欲を言えば用意したbmpの絵柄サイズを指定できる機能と、結果表示された画像が何番に当たるのかもっと分かり易くなって欲しい…とわがままを言ってみる。

今日は静かだニャ〜。　ヘ大臣はワシのミスカウント業務遂行しているのかニャ？．．．

＞２８０先生!
curdirとはどういう意味でしょうか？
印刷してヒマな時眺めているんだけど、マンガ読むより面白い。

あっ見っけ。

curdir はカレントディレクトリでｅｘｅの実行された場所です。
使用例：cyrdir+"/img/aaa.bmp"　．．．パス区切りは"￥￥"より"／"の方綺麗.。
しなみに chdir はディレクトリー変更だす。

>>524 HSPでオブジェクトの配置は64個までまなのでメニューはマウスクリック
にしているのでオブジェクトの追加が出来ない＝機能拡張むり？
機能ＵＰしたあと確認図柄の上に番号を表示させた、よかったらソースＵＰします。
ついでに揃い数を1にして図柄を移動させると面白い少しハマッタ。

悪くてもソースUPしといた。　ttp://yam-jp.com/~nanashi/slotimg/slo097.lzh

訂正　ttp://yam-jp.com/~nanashi/slotimg/slo097.as

どーもー、新年明けましておめでとうございます。
久しぶりに覗かせて頂きました。

いきなり不躾ではありますけど、
政宗のデータウインドウで文字化けが発生するという報告があって、
困ってます。

今の所OSがMeだとおきるっぽいんですけど、
どーしたらいいのかわからないです。

次の書き込みでソース張っておきます。

;-------------データ表示関係
if bigc>0 : bigkaku=playc/bigc
if regc>0 : regkaku=playc/regc
if inmedal>0 : payout1=outmedal*100/inmedal
if inmedal>0 : payout2=(outmedal*1000/inmedal)\10

color 0,0,0 : boxf 558,0,WIN_W,WIN_H

font "",12,1
color 255,255,255
pos 565,10
if setrand=0 : mes "設定"+set+""
if setrand>0 : mes "設定?"
mes
mes "所持メダル枚数"
mes
mes " "+havemedal+"枚"
mes
mes "投資金額"
mes
mes " ￥"+tousi+"000-"
mes
mes "総ゲーム数"
mes
mes " "+playc+"G"
mes

;-------------続き----------------

mes "BR間ゲーム数"
mes
mes " "+kankaku+"G"
mes
mes "BIG"+bigc+"回"
if bigc=0 : mes " (1/∞)"
if bigc>0 : mes " (1/"+bigkaku+")"
mes "REG"+regc+"回"
if regc=0 : mes " (1/∞)"
if regc>0 : mes " (1/"+regkaku+")"
mes
font "",10,0
mes "medalin "+inmedal+""
mes "medalout "+outmedal+""
mes "payout "+payout1+"."+payout2+"%"

if (seigyono>70)|(modehyo=0) : goto *starttv2
pos 560,340
gcopy 7,68*6,47*yakuid,96,47
if (yakuid<=1)&(stokmessage=0)&(kaijyoreason=0) : pos 570,390 : font "",12,1 : mes "　　１Ｇ連"
if (yakuid<=1)&(stokmessage=0)&(kaijyoreason=1) : pos 570,390 : font "",12,1 : mes "　 ＲＴ消化"
if (yakuid<=1)&(stokmessage=0)&(kaijyoreason=2) : pos 570,390 : font "",12,1 : mes "純ハズレ解除"
if (yakuid<=1)&(stokmessage=0)&(kaijyoreason=3) : pos 560,390 : font "",12,1 : mes "Big stock時解除"
if (yakuid<=1)&(stokmessage=0)&(kaijyoreason=4) : pos 560,390 : font "",12,1 : mes "Reg stock時解除"
if (yakuid<=1)&(stokmessage=0)&(kaijyoreason=5) : pos 570,390 : font "",12,1 : mes "チェリー解除"
if (yakuid<=1)&(stokmessage=0)&(kaijyoreason=6) : pos 570,390 : font "",12,1 : mes "　　松解除"
if stokmessage=1 : font "",30,1 : color 255,0,0 : pos 570,347 : mes "stock"

＞２８０先生
ﾐｯｶｯﾁｬﾀ!
記述とchdirに似た命令だったので予想は出来たのですが、ヘルプになくて…。
おかげで理解できました。ありがとうございます。

一画面に64個なければおｋなんでしょうか…。
…だとしたらオブジェクトを追加が出来まつ!

>>529
揃い数0が１ラインで
揃い数1が２ラインなのは仕様ですか？
３ライン以上は判定してくれないんですか？

質問ばっかですみません。。

＞３２氏
今年もよろしくです。

おいらじゃ役立たずですが、fontの中身がないのはなぜでつか？
sysfontでもだめでつか？

３２氏　ど素人サルの意見。．文字化けの実態を知らないのでソースに対して。

１．データ表示部分を独立したサブルーチンにしゅる。
　　例：stemp="　　１Ｇ連":index=1:gosub *disp
２．文字型＋数値型で数値を文字列に変換しているが念のため
　　文字型に変換して連結する。
　　例：xx="aaaa":str xx:yy=yy+xx:mes yy
３．pos 560,390 以下の部分は全ての判断が完了した時点で上記１．
　　の方法で表示する。
　　上述で少しは問題が見つけ安くなるなど”えらそうに”言ってみる。
（スミマセン調子こきました）

>>533 if文の中にじかにブチコンデいるので大着してもうた。
　*job5と*job6で++--しているだけなので改造は簡単かと思うニャー。

＞３２氏
只今おいらもＤＬしてみましたが、うわーん見事に文字化けしてます。
Win98でつ。

fontの中身が無いのは、指定しなくても大丈夫かなぁ。と思ったんで･･･
ちなみにプログラム全体でも、font命令を使ってるのはココだけなんで、
他の場所で指定している訳でもないです。

それと、おいらの動作環境では、このままでも文字化けは発生していないので、
何が原因なのかもよくわかりません。


それと、今の猿スレの流れは、役の同時成立を避けるリール配列。
ということでよろしいのでしょうか？

実は政宗にも配列上の矛盾はあるんですよね。
たとえば、

リ リ リ
姫桜俵
俵俵俵
-------
なんてことも起こりうるんですが、リール制御で、
左リールがそこで停止した場合は、リプレイは何があっても、
ナナメラインでのみ揃うようにして、強引に同時成立を避けてます。
多少の矛盾はリール制御でごまかせるっぽいですよ。

っていうか、むしろ複合小役が取れるのは、結構打ち甲斐があるかと…

win98で完全に文字化けしているのなら名前は忘れたが使用している
ＨＳＰの使用しているＷＩＮコモンコントロール．ＤＬＬに問題があると思います。
バージョンＵＰで直ったような記憶も。？？？
文字化け　ｗｉｎ９ｘ　ＤＬＬ　コモンコントロール　などでググってみては。

>１０１さん
どーんな感じで文字化けしてます？
普通の文字化けどおり、全角文字のみ化けちゃってるってところでしょうか？

>>537
政宗にもあるんでつね。へぇ〜へぇ〜。
強引にラインを予め決めてしまうのもいいですが、それだと成立可能性役が絞られちゃいます。
ので特定の場所以外は違うラインにも揃うようにすればいいとは思うのですが、
はさみで押された時は絶対ダメってな事になりテーブルがそれだけ増えちゃいますよね。

というおいらも自作配列に同時成立個所が２パターン。。
１コマでも修正しようものなら、全部が崩れてしまうのでほんとパズルのようです。
でも実際はそれを逆手にとってやってる途中でつ!!

>>539
えと、
『０Ｇ』『ＢＲ』『ＢＩＧ』『ＲＥＧ』『１/』『medalin 0』『medalout 0』『payout 0.0%』
は読み取れます。
あとはロシア語（？）のように化けてます。

…てか設定７だった…。。。

正常の場合はこう表示されるはずなんですよね…

http://musyoku1978.kt.fc2.com/slotgame/masagazo.JPG

とりあえず、今日は遅いんでもう寝ます。
原因究明はまた明日って事で…

>>478 101氏
実機と同じようにするには第一停止ボタンが正解かどうかで
JAC引き込みかベル第一停止正解かを判断し、制御を切り替える必要がある。
北斗のJACINと似たようような制御をやっているのは旋風がわかりやすい。
実機AT機でのﾎﾞﾇｽ引き込みははほとんどがこれのはず（第一停止押し時に正解かどうかでﾎﾞﾇｽ／小役の制御切替）。

で、北斗の場合第一停止小役成立でのJAC引き込み無しを避けるため
わざとハズレをナビしてJACを引き込めるようにしている、
というのがあの笑い声ナビ真相なわけだ。
だから指示を無視して逆にハサミでやった場合にベルが取れるとかJACINしないとかが実機ではある。
そこまでやるかどうかは680氏次第。

＞３２氏
一応上げときました。
　ttp://yam-jp.com/~nanashi/slotimg/slo098.bmp

fontって一回だけ指定すればいいと思うのですが…。
例）font "ＭＳ 明朝"

>１０１さん
サンクスです。参考になりました。
とりあえず、明日以降改良版EXEボンボンを作ってみようかと思います。

たわごと。

win9x系とwinnt系ではuser32.dllとcomctl32の機能が異なるのでcomctl32.dll
のバージョンによっては表示が乱れる場合がある。

comctl32.dll
95初期版=4.00950
98初期版=4.72.3110.1
98SP2=5.8

バージョン確認方comctl32.dllのプロパティ欄。

>>３２氏
ガイドに吉宗のテーブルのってましたよー

風邪チャンスの連チャンもそろそろ終了の方向らしい。
あー、しかし・・・ノドが痛てぇ。

ところで、フリゲスレの方に「パトレイバースロ作るべ」って人が
いるんだが・・・。
この前、ワイド版を全巻揃えて読破したワシとしては
是非とも、応援していきたい所存でありマッスル。

そういや、共通化できる処理は、なるべくdeffunc等で
共用できるようにした方がいいですな・・・。
ストップボタンが押されたときの処理を
push_stop x　(左=0　中=1　右=2)
としたことで、ずいぶんスッキリしますた。ﾜｰｲ


あと、向こうに一応誘導貼ってみますた。
でも文章から察するに、余裕で開発できる腕前の持ち主？
あぁ・・・それにしても、パトレイバースロ面白そうやなぁ・・・。

☆射撃ミッション
的を一発打って、中心の赤い部分に当たればボーナス。
赤い部分が大きければ期待度大。
通常は泉が撃つが、プレミアで太田が撃つ。
（吉宗の流鏑馬演出のパクリというツッコミは歓迎。）

こんなんどうでしょ。オタ臭くなってゴメンよぉぉ・・・

パトスロ・・・あ〜るファンとしては・・・失礼。＿|￣|○

自分のソースを見ながら何とか別のリール動かすソース作れないか考察中。
単純に１列を使っていたのを絵柄ごとにしたいだけなんですがねぇ・・・
しばらく作成から離れてるからまた苦労しそうだ。

９０氏　Ｈ５Ｎ１終息おめ。！　リールチェック自己解決しましたサンクス。

ねごと。
ＳＮＫのスロを見ても今後何でもスロになると思う「基本的に抽選機械」なのだ。

ｸｹｰｯ ｺｯｺｯｺｯ ﾌﾟｼｭｰ(炭酸ｶﾞｽ)　ｺｯ…ｺｯ…　ｸﾞｶﾞ
ｱｲﾂﾗをせめて棒々鶏(ﾊﾞﾝﾊﾞﾝｼﾞｨ)にして処分してあげたい。

＞あか氏
オイラも1列方式から単独方式に切り替えた一人だす。
絵柄を単独で描画すると切り取りの計算が面倒なので、
別バッファに一旦描画してメインに転送というセコい技を
使っちゃったりしてますが。ツルセコ〜（以下、時の狭間へ）

＞ｼﾅﾌﾟｽ
「どこでもいっしょ」をスロで復活。通称トロスロ。
プレイヤーはメモリーカードを使って前回の続きから出来る。
1000枚飲ませると、プレゼントを買ってあげることができる。
どうよ。このアイデアをS○NYに売ってきてくれ。

ではｸﾞｯﾅｲ

>>548
ガンバってスキャンしる！！

親父氏　ＨＰひさびさに見た。

"それと、そろそろ通称猿スレに以前のコテハンで現れるかも。"

の言明から”親父氏降臨準備”

１．ＨＳＰスロゲーソース待ちくたびれた。
２．バイナリー形式のリール制御テーブルの説明きぼん。
３．早くコテハンで正式に降臨しれ。

以上ＲＯＭってたら読んでケロ。！

>>554
本当だ

俺にHSPを教えてくれた親父…
今でも一応感謝はしてるよ

ﾄﾘﾉｺｻﾚﾃﾓｼｺﾞﾄﾊｾﾈﾊﾞ

!!280S鰓数　20!!

ｼｺﾞﾄｵﾜﾘ

ﾍ臣殿　やっとかめやな。！　お元気出ですか。．．．１　２　３　闘魂チャンス。

兄貴！　お勤めご苦労様です。　どうスヵ　シャバの空気は。．．．．．．．．．

HSP試作品３-0.04。．．．　ttp://yam-jp.com/~nanashi/slotimg/slo100.lzh

「280Sレスポンスセンターはただいまから翌日1：00まで苦情を受け付けます。」

＞ｼﾅﾌﾟｽ
見たよ。だいぶ完成に近いっぽいね。ｳﾗﾔﾏｽｩｨｰ

液晶が青くチカチカするのはワシを例の原理で殺す気デスネ？

どーもです。
文字化けの件ですが、あっけなく解決してしまいました。
１０１さんの指摘のようにfontの中身がなかったのがいけなかったみたいです。

"MS Pゴシック"って指定してあげたら、それで万事OKだったです。

みなさん、おさわがせしました&ありがとうございました。

３２氏ｵﾂ。
これからもサル共をﾖﾛｽｸ・・・。ﾅﾑﾅﾑ


〜今日の伊藤家〜
HSPエディタの背景カラーを変えると
ちょっと新鮮な気分でプログラミングできます。

２へぇ

仕事帰りの電車の中で考えていたのですが、
90氏・280S氏のリールチェッカーを応用すれば「テーブル作成支援スクリプト」が作れるのではないでしょうか？
だって、「役の成立する止まり方を調べてくれる」のなら、「その並びにするためには何コマ滑らせればよいか」を各コマで調べる機能を追加すれば・・・

ソースも見ずに妄想しているので、実現できるのかどうか分かんないですが、もしできたらかなりすごいかも。

だ〜れもいないな、　二度寝するか。！．．．

もう３日間はソースいじるのさぼってますた。
今からちょっといじろうかな…。

＞５２氏
拡張機能としていいアイデアですね!!
おいらには改良できるほどのｽｷﾙはないですが、『リールチェッカー』はこのｽﾚから生まれた副産物としてだけじゃなく、
一つの素晴らしいツールになりそうですね。
とりあえず基盤を作り上げた９０・２８０氏に感謝!!

１０１タン　見っけ。！．．．おは。！

ども。やっとかめです。
0.04をＤＬしました。
リプぞろいの時の絵柄点滅時に「ベル→リプ」と点滅することがあります!!

苦情ありがと。
点滅がベルからリプに変わると言う解釈でよろしいでしょうか。

BEL BEL BEL → REP REP REP

とするとリールチェック後盤面の位置がずれたか，redrawの関係か
いずれにせよ再現させなければ。．．．

そんな感じ…だったんですが、どうやら他の絵柄でも起こるようです。
最後の停止リールがまだ完全に止まる前に点滅を始めるようで、１コマ上の絵柄で点滅をしているようです。

ＰＣのスペックを過信して全ての処理をメインで行っていますから描画処理が
間に合わない場合にこの現象が起こると思われます。

repeat
redraw 0
Sped.1=Sped.3/10:if (Sped.1\2) != 0 :Sped.1++ ;速度調整用
:gosub *Rset_Vars ;変数初期用
:gosub *Gets_Keys ;入力処理用
:gosub *Move_Reel ;回転処理用

　このへんで停止フラグのあと適当なカウンターで時間稼ぎをして
　カウンターの数値と停止フラグで点滅処理を行う
　（ウエイトの位置変更でもいけるかも）

if (Sbtn.0=0)&(Sbtn.1=0)&(Sbtn.2=0) :gosub *Flsh_Reel ;点滅処理用
:gosub *Disp_Demo ;液晶処理用
if (Auto.0 == 1) :gosub *Auto_Play ;自動回転用
:gosub *Dbug_stat ;デバッグ用
await Time.0 ;ウエイト用
redraw 1
loop

点滅までに適当なウエイトを入れれば直る気がしますが、いずれにせよ
当方ＰＣで現在プレーを録画していますがおそらく再現できない気がします。

でも、本当にありがとう。　勉強になるワ！

おいらの場合、常に『動いている』『停止している』『滑っている』のどれかの状態にいて、
判定部分も『停止している』状態になったら許可、としていますがどうでしょう？

この場合も一応 Sbtn.0=0=停止 Sbtn0=1=回転 Sbtn.0=2=滑り となっていますが。

プログラム上フラグがセットされてから最終回転が行われているためだと思う。

リール回転部分は下記のみだから（w
*Move_Dots ;ドット処理
redraw 1:pos Posx.index,Posy.index:ii=Rch.index
gcopy Pic.ii,0,Posr.index,REEL_W,(REEL_H*REEL_D)+REEL_U+REEL_B
if Posr.index <= (REEL_U) {Posr.index=((REEL_H*(REEL_R-4))-REEL_U)
redraw 0}
return

もしくは"誤魔化し”部分に問題が。．．．(w

懲りずにリール配列チェックツールだす。
http://yam-jp.com/~nanashi/slotimg/slo101.zip

例によって、一切の苦情・要望はスルーされまｯｼｮｲ

>>572
最強。マジため息が出るほど神。
うｐろだじゃもったいない。
どこかのサイトに置いた方がいいと思いまつ!!

ごまんなさい。
要望しちまいました…。＿|￣|○

ループ再生させるためのwavファイルを作成する便利なツールってあります？

>>575
どっかから音楽を引っ張ってきて、ループさせても
違和感無く聞こえるようにしたい・・・という意味なら、
どのサウンド編集ソフトでも大差ないです。
「どこで切るか」か重要なので、手作業の職人芸っぽい
ところがありますね。

前スレで紹介されてたツール
ttp://www.cycleof5th.com/products/sefree/index.htm

．．．

>>572　をＤＬしようとＵＰローダにアクセスを試みるも接続されない何故。

や〜っと接続でけた。　９０氏は天才！！！．．．なんでソースが無いんだヨ〜〜！
「タルタルソース」でいいからよ　付けてくれよ。　ケチンボ．．．．．．

チェック部分は前に公開した奴と同じだし、
ソース付ける意味無いべ？

あと、今回はかなり恥ずかしい処理してるので、
（ゲームでもないのに毎フレーム画像描画してたり・・・）
隠蔽の方向でおながいします。

listbox内でonclick取ってくれないんだよねぇ・・・。
あとon mouseoverとかあれば、10倍楽になるんだけど。

いや〜　ソースの無いコロッケはまじゅい。

ワシがほしいのは結果ではなく過程なのだ”てゆ〜か”他人のソース食べないと
生きていけない。．．．

モジュールとかプラグインとか使えばなんでも出来ると思うが．ｈｐｉや.ｄｌｌを添付
すうるのはマンドクセーですからね。
（WA_MACROはウィンドウズＡＰＩを簡単に利用するマクロなので案外有効かも）

ＨＳＰでこれ以上やるならＣ，Ｃ＋＋，Ｄでふんばったほうがいいよね。

真夜中にやっとかめどす。
とりあえずタイトルバーにメダル増減を表示させてみますた。
3枚掛け時
1G目→47枚
2G目→17枚
3G目→.7枚

一枚掛け時
1G目→49枚
2G目→39枚
3G目→29枚

(ﾟдﾟ)ﾊｧ?

前スレ＞473の説明でincludeが理解できますた。
９０紙ｻﾝｸｽｺ!!

リールフラッシュ用にリール画像をいじりたいんですが、何かおすすめのソフトありますか？

＞ﾍ氏
やっとかめどす。
テーブル制御はパズルのようだと感じた冬の夜だす。

>>581のソースｷﾎﾞﾝ。

抽選部分に
mdl-=３とか２とか１とか
str mdl : title mdl
でつ。

抽選部分…？
レバー叩いてから次にレバー叩くまでの間、複数回mdlがマイナスされているに５００ゼニー。

あと、一度文字列型にしたあと、数値型に戻してからmdl-3などをしてまつか？

うひゃぁぁ
真下にint mdl追加したら正常になったっぁぁぁ
理解できねぇぇ

数値を変化させるときは必ず前にint
表示させるときは必ず前にstr
でよろしいのでしょうか？
betとpayoutにそれぞれ書かないとだめでつか？

そうでつ。
お分かりの通り、titleには文字列型でないといけません。
なのでstr mdlとしましたよね？
んで、計算する時は数値型でなくてはいけませんよね。
なのでint mdlが必要でつ。

スクリプトによっては文字列型の数字を計算式で求めても、期待する数値になることもあるようでつ。
が、あとで原因が見つけにくくなったりするので、その時その時に正しい型にしておくのがいいと思いまつ。

ちなみに、前述のようにtitleは文字列型を使わなければいけないようなので、
今回の記述のようにﾏﾝﾄﾞｸｾｰので、おいらはデバッグは別ウィンドウにmesで表示してまつ。

なんか面白いことが分かった。

a="b"
a-1
mes a
stop

へぇー。
１行目の文字と、２行目の数値を色々変えてみると面白い。

ii=123:title ""+ii

で（空の）文字列型に数値型を加算すると数値型が文字列型として加算されますが
私は念のため汎用変数に代入してint,strで型変換をしています。
（この使い方はマニュアルに載っている)

ＨＳＰでメッシュにテクスチャーを貼り付ける場合
画像が裏返しになるのは何故でしゅか。．．．

HSP2.61b2がＵＰされていたので入れ替えたが違いがわからん。．．．

a="b"
peek ii,a,0
mes ii
a-1
mes a
peek ii,a,0
mes ii
stop

これで皆さんもポインター使い。

む。それってポインタなんでつか？（←例に漏れずポインタでヘタレますた。）
単なるキーコードかと思った…。

・gcopy命令のコピー先のウィンドウXサイズが４の倍数でない時に正常に実行されない不具合を修正。
・デバッグウインドゥの変数名をソートして表示するオプションを追加。
・デバッグウインドゥに変数名が表示されないことがある不具合を修正。

この３つは結構ｲｲ!!と思われ。
でもベータ版のようなので、まだうｐデートするのはやめときまつ…。

変数配列の位置を指定して内容を得ると言う意味でポインターと言った。
（ワシもポインターのポインターとか”*”に泣かされた仲間です）

MS系BASICをご存知ならば。
ｐｅｅｋ＝ａｓｃ（）
ｐｏｋｅ＝ｃｈｒ＄（）
と同様に利用可能ですネン。．．．

残念ながらBASICも小学生の時に興味本位でいじっただけで、
そんな難しいことは…ｗ

てことでもやすみなさいませ…。

１０１氏　おつかれ。．．．さぁ〜てと　”センター試験”に行くか。

print asc("A")
65

print chr$(65)
A

一度は見たことがあると思いますが。．．．（キャラクターコード一覧などと）

_･)
タイトルバーに数値を表示する方法

a=680
title ""+a+""
stop

ＨＧＩＭＧ使用３Ｄリールのサンプル。．．．暇つぶしにどうぞ。

ttp://yam-jp.com/~nanashi/slotimg/slo103.lzh

寝た…と見せかけて打ちに行ってきちゃいました。
＞２８０氏。センター試験おつでつ。

>>599
丸っけー!ＨＳＰでもそんなんできるんでつね!!

>>600 も〜かった　も〜かったら　３９，８００のＰＣ買うべし。

明日はワシのフォームに”アステカリターンズ”が導入されるが
”アステカレジェンド”で無常にも期待を裏切られたワシはどうすればよいのか
だいたい何故ＣＴが無いのだ。　プ〜ンプン！！！

センター試験会場に行ったら”ホカロン”とお部屋さがしの”ＣＤ”もらった。．．．．．．

ttp://yam-jp.com/~nanashi/slotimg/slo105.zip

こんなの作ってみた。
テーブル作成のお助けソフト。

あいにく自動では作れませんが・・・。
テンキーで停止位置を設定して矢印キーでテーブルを作ります。
※適当ですがreadmeも用意してみました。

一度に何回もテーブル作れない（メッセージboxの表示がうまくいかない）ので、ここを直してくれる神募集中。
あ、自動作成機能を作る天井人も合わせて募集中・・・。

ぶっちゃけ「俺用ツール」なので、汎用的に作られていませんが、何かの参考になれば・・・。

>>599 （280S氏）

試験乙です！

599のソース見たんですが、あれだけのことが１００行ぐらいの記述でできてしまうんですねぇ・・・。
なんだかびっくりです。

センター試験　自己採点７５０点だった　東大受験しようかな。　ルンルン〜
まともに行って卒業は卒寿か。．．．．．．．．．（点９Ｘ10）

おっしゃぁぁぁぁ　全員ｸﾞｯｼﾞｮﾌﾞ！！
リール配列考えるのにも飽きました！！　ここで一句！

配列を
キャッツからパクッて
一件落着（字あまり）


エノキ茸を
歯ブラシにしたら
毛先が球

>280S氏
その得点なら東大より、どこか国立の医学部の方がいいと思うっす。

朝から”アステカリターンズ”初打ちＳＢ＝6ＮＢ＝6で６，０００枚お持ち帰りでした。
ウレピー。

評判どおり隣の台は２０００ＧオーバーでＢＩＧなしでした、まぐれ当たりだと思うと
怖くてもう打てないでしゅ。

>>606　医大はお金がかかるので無理でシュ！。
パチスロ止めても追いつきません。．．．（今まででＥ３００クラス２台は買えたような）

＞２８０
授業料ゲトおめ。
なんか、リターンズの評判はヒドいね。
4000Gとかハマるらしいし。ｶﾞｸﾌﾞﾙ


ところで、フリースロゲ界(?)では↑キーがBET＋スタートって
ことで定着してるけど、演出上BETボタンが単独で必要な時もあるよね？
ここらへんについて何かいいアイデアあればｷﾎﾞﾘ

>280S氏
国立医学部なら、東大と授業料っておんなじじゃなかったでしたっけ？
国立医学部狙ってたけど、センター8割しか取れずに、
東大理２受けざるを得なかったうえに、
東大も落ちた人間なんで…

まぁ、何年も前の話なんで、
今と当時の受験環境の違いはよくわからないんで、
国立医学部の授業料がいくらなのかわからないですけど。

ただ、先輩として、
(280S氏がいくつかわからないのに先輩と言ってしまってるが･･･)
それだけセンターの点数がいいなら、
ぜったい医学部受けた方が、将来は明るいと思うっすよ。

しかし、いいなぁ、一撃6000枚…
今月オイラは見せ場なし･･･

>>609　国立大学も赤字経営で学部別授業料が検討されていますし医者になっても
インターン時の収入と開業時の収入と世間ではあまりかんばしく無いのが実情です。

現在の日本の実情を鑑みると無駄に税金を納めるなら海外逃亡が唯一生きる道など
と考えてしまいます。．．．すまん　非国民で。！
（海外も駄目なら宇宙に．．．火星でくらすか）

日本政府に文句はいっぱいあるもののその中にいる以上やむおえまい
あまり語ると賛否両論があるのでこのへんで。。。

>>608　そう、そうスペースで全部やりたいとかあったね、でもやはりＢＥＴ→回転
はイラツクので筐体フラッシュとかではだめでしゅか。

スロゲースレで、パトレイバーのオリジナルスロ作るぜぇ！
とか言ってたものです。

とりあえず、どんな感じの機械割りになるかPHPでシュミレートしてみたり
いきなり一撃14000枚の113連とか出されてｶﾞｸﾌﾞﾙなんですが(汗

オリジナルを考えてる人がいたら質問なんですが
作るときの機械割りってどんな風に調整してます？
やっぱりゲームだし、甘めが多いんでしょうか？

ついにパトスロの人ｷﾀｰ

オイラもオリジナルを作ってますが、出玉率とかは
現段階では全くと言っていいほど考えてないです。
まずはゲームとしての面白さが第一ってことで。

オリジナルスロで延々とハマっては面白くないでしょうし、
基本的にはかなり甘めで。
最終的な詰めの段階で簡易シミュでも作って、設定ごとの
BIG確率orAT突入率の微調整で98％〜160％ぐらいの範囲に
収まれば、そこそこカッコは付くかな？と思うとります。

>>612
最大2600ハマリを記録した俺の設計って一体(泣

最終メダル数が、-5000 〜 16000 というのは
遊びでやるには波が荒すぎますねぇ。

各モードの挙動をもうちょっと考えないとダメですなぁ。
特にハマリモード。

わしもrubyでシミュレーションだけしてますけど、
数字だけだからかもしれないけど
100%切るデータができると「つまんねえな」とか思ってしまい、
ついつい割が高くなりがち。

スランプグラフでも出せばメリハリが見えるから
そんなことにはならないんだろうけど。

# PHPで、ってのは盲点でした。
# 結果を整形しやすかったりしそうで、いいですね。
# なるほど。お勉強してみよ。

>>614
CSVで出力して、エクセルにでも貼り付けると便利だよ。

そもそもシミュレーションの作り方が分かんないんですけど、どこから勉強すればいいですか？

perl　と　ruby　は誕生石　php　は？．．．松下幸之助の小冊子？

やっぱり皆さん秀才ばかりだったんでつね…。
定時制の高卒のおいらとは超えられない壁がありまつ。。。

>>611
おいらも一応オリジナル製作です。
今の段階では細かい確率は決めていないのですが、漠然と考えている案は、
設定１〜６までかなり差をつけようかと思っています。
やっぱりゲームなので実機よりは当てたい、でも当たりすぎても飽きてしまうと思うので、
設定１が９０％くらいで設定６が２００％くらいにして、設定の選択率を低設定に偏らせたらいいのではと考えてます。

ちなみにおいらは純Ａタイプを目指しているので、
設定１　1/300〜設定６　1/100くらいにすれば、設定６を期待しつつ遊べると思います。

ダハハ、安心しる！俺なんか高校ほとんどサボってたし、
専門に入っても一番後ろの席でシコシコとゲーム作ってたぞ！
JavaとVBの授業は完全に捨ててた！マルチタスク万歳！！

　　　　　…(´･ω･`) ﾀﾞｶﾗ ｲﾏ ｺﾝﾅﾆ ﾀﾞﾒﾅﾝﾀﾞﾈ…


ただいま、リール消灯関係も実装完了。
あと前スレで話題に上ってた「リールスピード調整でキーが
押しっぱなしになって云々…」の意味が今わかった（遅！）けど、
オイラ流の解決策は変数の値(精度)を10倍とか100倍にして、
「押されていれば0.01dot分づつ上がる」みたいにしますた。
1秒押しっぱで1dot分上がる…みたいな感じになりﾏｯｽﾙ ｳﾎｯ

>>618　ご存知のように２ＣＨの書き込みですから。．．．．．．何を信じていいのやら。

実機をまねたスロゲーは実機と同じ仕様ならシュミレータとして
部分的に異なる場合は単純なゲームとして当たり確立を調整するべきか。

そもそもスロゲーの利用価値が使用者により異なるのは避けられないので
万人が納得出来るものを作るのは難しいと思う。

１．確立挙動に実機の再現を望むひと
２．演出挙動に実機の再現を望むひと
３．実機で味わえない出玉感を楽しみたいひと
４．実機で味わえないレア演出を楽しみたいひと
５．モチーフが好きなスロゲーで楽しみたいひと

どこに的を絞るかで決まると思うッチャ。

>>616
大雑把なものでよければ簡単ですよ。
仕組み的には

１．レバーonでの判定配列を準備する
　　（ $hantei[0]〜[176]はビジ、$hantei[177]〜[1200]はベルみたいに）
２．想定ゲーム数だけループ
　　（ 8000G回すとすれば、 for ($i=1;$i<=8000;$i++) { 〜 }）
３．乱数で、当選役を決める
　　（ $tousen = rand(0,32686) ）
４．if文で、当選役毎の処理を記述
　　（ if ($hantei[$tousen] == "ベル" ) { $coin = $coin + 5; }
　　この例は、ベルが当選だとコイン５枚増量の例）
５．ループなので２番まで戻る、ループが終了したら
　　コイン枚数やビッグの数などを表示

取りこぼし無し、ボーナス成立時に即揃えという結果になりますが、こんなものです。
画像を動かすとか、音を鳴らすとかを考えずにテキストだけでできるので
言語の基本的な命令さえ分かればすぐできますよ。
俺はphpで if, rand, for, srand, print の５命令しか使ってないです。

>>548-549
誘導してくれたのは90氏だったのか（たまにしか見てなかったこのスレ）
プログラム技術はそんなに無いですよ。特に画像処理関係が(泣
ちょっと１からHSPを学ぶのも挫けそうなんで多分趣味用に慣れてる（はずの）
Delphi辺りで組んでみるつもりですが……
Delphiのソースに需要なんてあるのか？このスレ(w

通常時の演出はまだ何も考えてないです。
基本部分でも先に作っちゃわないと妄想で満足してしまいそうなので(w

決まってるのは、６〜７種類あるモードの大まかな挙動＆移行パターンと
パトランプ絵柄のチェリー連でボーナスへの期待大って事ぐらいかな。

# オレ流プログラミング極意その１、できない事は後回し(w

画像反転モジュール。．．．利用価値があるのか？
Ｐ１＝対象バッファ
Ｐ２＝格納バッファ
Ｐ３＝０＝通常：Ｐ３＝１＝左右：Ｐ３＝２＝上下：Ｐ３＝3＝１８０
Ｐ４＝作業用バッファ：省略時３１

#module
#deffunc rot int,int,int,int
mref p0,0: mref p1,1: mref p2,2: mref p3,3

if (p3 == 0) {p3=31}
:gsel p0:xx=winx:yy=winy:buffer p3,xx*3,yy*4
if (p2 == 0) {gsel p3:pos 0,0 :gzoom xx, yy,p0,0,0,xx,yy
gsel p1:gcopy p3,0,0,xx,yy }
if (p2 == 1) {gsel p3:pos xx,yy :gzoom -xx, yy,p0,0,0,xx,yy
gsel p1:gcopy p3,0,yy,xx,yy }
if (p2 == 2) {gsel p3:pos 0,yy*3 :gzoom xx,-yy,p0,0,0,xx,yy
gsel p1:gcopy p3,0,yy*2,xx,yy}
if (p2 == 3) {gsel p3:pos xx,yy*4 :gzoom -xx,-yy,p0,0,0,xx,yy
gsel p1:gcopy p3,0,yy*3,xx,yy}
return
#global

使用例
buffer 2:picload "tes.bmp"
rot 2,0,1
stop

謎もじぅる

#module
#deffunc draw_str str,int,int,int
mref ds_str,32
mref ds_size,1
mref ds_posx,2
mref ds_posy,3
font "ＭＳ ゴシック",ds_size
color 0,255,0
repeat 3
pos ds_posx-1+cnt,ds_posy-1
mes ds_str
pos ds_posx-1+cnt,ds_posy+1
mes ds_str
loop
pos ds_posx-1,ds_posy
mes ds_str
pos ds_posx+1,ds_posy
mes ds_str
color 0,0,0
pos ds_posx,ds_posy
mes ds_str
sysfont 0
return
#global

謎もじぅる 。　draw_str 文字列，サイズ，X，Y　影の調節きぼん。

やっと亀レスでｽﾏｿ
要するにタイトルバーには最初に文字列を含めたら後はなんでもありなんでつね。



　　　　　　　　　　　　　　で　　、


ま　　と　　め　　サ　　イ　　ト　　ま　　だ　　−　　？

>ま　　と　　め　　サ　　イ　　ト　　ま　　だ　　−　　？

ﾍ臣殿が作成中です。！．．．ﾍ臣殿ま　　と　　め　　サ　　イ　　ト　　ま　　だ　　−　　？

＞ヘ

マ　ダ　ー　？

昨日税務署から確定申告用紙が郵送されて来たのだが
ワシのどこから税金を取ろうと言うのだ。　プ〜ンプ〜ン　．．．．．．

正直：前スレで”まとめサイト”作るって言ってた神の進行状況をキボン。

赤コーナー　・・・　源泉徴ォォォォ収ゥゥゥゥゥ　リィィィキィィィ

まとめサイトは最初にゲーム完成させた人に
優先作成権が与えられﾏｯｽﾙ！ｺﾝｸﾞﾗｯﾁｭﾚｰｼｮﾝｯ…！

ttp://yam-jp.com/~nanashi/slotimg/slo112.zip

・点灯／消灯フラッシュパターン対応
・テンキーじゃない方の「１」「２」押しっぱでリールスピード調整
・やっつけ謎文字ゥルによるデータ表示（ミカン性）
・勝手に最大４コマ滑るが気にするべからず

ではﾓﾂｶﾚ ｸﾞｯﾅｲ

＞返信シナプス

リール回転”乙”　フラッシュ”乙”　筐体”丙”　ピンク窓”甲”　総合評価”乙”

フラッシュは”消灯”　”X”　”左上収束”　でしゅか。　「いい夢見ろよ！」

ｻﾙ仂の香具師にまとめサイト作らせようとしてるヴぁかな神々がおられるスレはここでつか？

キモ住人さらしage

どーしてもｈｇｉｍｇテクスチャの挙動はおかしいと思うが．．．自分も信じられない。！

俺もそのライブラリ使ってみたいな・・・。

どういう風に変なん？

はじめまして、こんばんわ
ﾃﾝﾌﾟﾚにあるｻｲﾄを見て勉強してるのですがまったくわかりません(´･ω･`)
才能ないのかなぁ、ﾘｰﾙのまわし方すらわからないよ･･･

>>636
初代スレ過去ログです。
サル共が四苦八苦しながら成長する様子を
お楽しみください。
http://yam-jp.com/~nanashi/slotimg/slo113.zip

過去ログはおいらのサイトで預かりますね。

いまオイラはめひすとのBIG揃え時の演出いじっとります。
しかもtimer.hpiを使って。

おぉ！３２神がまとめてくれそうな予感！？


await命令ってマニュアルでは
＞描画速度の違いなどから時間が早く過ぎることを
＞防止することができます。リアルタイムで更新される
＞画面などの速度を一定に保つ時に使用します。
とか書いてあるけど、実際はタイマー使わないと
リアルタイム処理なんてムリっすよねぇ。

あんまし複雑にタイマー使いすぎると大変なことになりそうなので、
音楽と演出のタイミングを合わせる程度でのみ使おうかなって思ってます。
ですから、リールの回転速度を自動調節しようって目的では使わないっす。

fps値も他のアプリケーション等の状況に左右されるものなので、
過剰な信頼は危ないかなーって思ったんで手動調整にこだわろうと思います。

それと、過去ログをまとめる力はおいらには無いです。
ただ、過去ログ保管所の役割だけでもしようかな…ってだけです。

どなたかが、パーフェクトにまとめなおしてくだされば、さらに有難いですけど。

で、一応、タイトルだけつけてココに上げておきました。

http://musyoku1978.kt.fc2.com/slotgame/saru/saru1.html
次スレ以降はテンプレに追加して置いてください。
それと、このスレもいずれ1000にたどり着くでしょうから、
そのときは、saru2.htmlって名前であげておきますから、
次スレのテンプレには、

サルスレシリーズ�@サルでもできるスロゲー開発
http://musyoku1978.kt.fc2.com/slotgame/saru/saru1.html
サルスレシリーズ�Aサルでもできた！スロゲー開発（前スレ）
http://musyoku1978.kt.fc2.com/slotgame/saru/saru2.html

みたいな感じで加えておいてください。

あ、一つ言い忘れましたけど、
このスレもいずれ倉庫に行きそうになるじゃないですか…
そんときは、ログのhtml化をしなきゃいけないんでしょうけど、
html化ってどうすればいいんですか？

単純にIEで開いたあとに、ソースの拡張子をhtmlに変えて保存するだけで良いのでしょうか？

ｸﾞｯｼﾞｮﾌﾞ　ｻﾝｸｽ!

ログの保存はIEで開いて左上のファイルメニューから
「名前をつけて保存」で自動的に拡張子htmlになりまっす。

特別な用事が無い限り、オイラが一日一度はチェックしてるので
1000行ってdat落ちする前に猿ベージできると思いますが・・・。

>90さん
すんません。
じゃぁ、猿ベージの方は、おいらの方でも出来るだけやろうかとは思いますけど、
とりあえず、お願いしますね。
前スレみたいに何時の間にか落ちちゃってたりすることがあったりしなくもないので…

皆様おはようございます。

＞大屋様　ｈｇｉｍｇはｈｓｐに標準でバンドルされている機能でしゅｓａｍｐｌｅ下の
ｈｇｉｍｇでサンプルがみれます，残念ながらワシの環境ではｈｇｉｍｇｘはハング
してしまいますが。

１．オブジェクトにｔｅｘｌｏａｄでテクスチャーを読み込む場合は正常
２．バッファーの画像をテクスチャーに利用する場合ｓｅｔｕｖが反映されないので
　　サイズ・画像の反転などの症状がでる。

前回のテストを少し最適化？した物をＵＰしましたのでミスなどの指摘よろ。

ttp://yam-jp.com/~nanashi/slotimg/slo113.zip

訂正：　ttp://yam-jp.com/~nanashi/slotimg/slo116.lzh

またコピペでミスしちゃいました。！

＞ｼﾅｯﾌﾟ
前のバージョンよりサクサク動いてるねぃ。
hgimgはノータッチなのでミスとかはわかんね。ｽﾏｿ
ただ、自分の環境で安定動作しないライブラリは使わない方が
いいんじゃないかと思うんだが・・・。


最近、脳内でソースは完成してるのに実際にキーを
打つのがダルくて放置する場合多し・・・。
なんかヴァイタル面とメンタル面ともに不安定なので
作業ペース激遅ですがﾏｯﾀﾘいきﾏｯｽﾙごめんよぅ

おいらもｻｸｻｸ動かしたい…。
メモリってどこで買えるんですか？｡･ﾟ･(ﾉ∀`)･ﾟ･｡

パソコンパーツショップに行けば売ってるよ。
ただ、古いマザーボードだと最近の大容量メモリに
対応していない場合も多いので、ショップに持ち込んで
店員さんに相談するのがベスト。

オイラの足元に転がってるメモリ(32MB×3本)を
今すぐそっちへ遠投してあげたい気分だ。　ﾎﾟｰｲ

寝なきゃいけないときに寝れないこの体質、何とかしたい…。
「ドリエル」に手を出したい今日この頃。

＞９０氏
うわーん。今すぐ遠投されたい気分でつ。

（ソフマップにあるかな…。
マザーボードの名前を店員に言えば分かるかな…。
その前に名前ってどこに書いてあるんだろう…。）

朝だニャー！　「お　は」だニャー。

ｈｇｉｍｇはリール回転制御が楽だからなんとかしたいニャー（１回転＝2パイ）
問題は液晶演出部分と不要リール部分の隠蔽だニャー

最近夜寝て朝起きる規則正しい生活に戻ったニャー。

＞１０１氏　ＰＣからＳＩＭ　ｏｒ　ＤＩＭ　を一枚抜いて持っていったらどうだろうか。

ＰＣデポット・山田電気・など秋葉原に行かなくても近所の量販店にあると思うニャー。

追伸：
だ〜いぶ古いPCだと増設できるRAMの単位が決まっているものがあるので
取説も読んだほうがいいと思うニャー。
（そこまで古いとは思わないが）

> その前に名前ってどこに書いてあるんだろう…。）
マザーボードに書いてあります。

ってかどんなPCか（メーカー物か、ショップ物か）判りませんが
そのPCに付いてきた取説に書いてないかな？

＞２８０氏
おいらも昼型生活になって喜んでても３日で戻る罠ｗ

＞２８０氏＞653氏
ﾚｽｻﾝｸｽです。
とりあえず取説読んでみました。
ﾏﾏﾝボードの名前とは書いてないですが、それっぽいのは色々書いてあるようでつ。
てか本体開いてそれっぽいボード（実際見たこと無い）見ればわかるでしょうか…。
とりあえず今日はこれから寝まつ。ﾓﾔｽﾐﾅｻｲ。

追伸：
あ。もちろん９０氏もﾚｽｻﾝｸｽでつ。

ＳＩＭ　ｏｒ　ＤＩＭの意味もわからん…。
たぶんこのｽﾚの中で一番知識に疎いの０確。
もちっと勉強させてください。

…あと３時間寝れる…。

Perlでテーブル作成スクリプトを作ろうと思ったのだが、
なんだかとてつもない回り道をしている気がする・・・。＿|￣|○

とりあえず、役の成立チェックだけならできるようになったけど、
ここから停止位置を決めて滑りコマを…
とか考えていたらのーみそがパンクしそうでつ。

――いや、どこかで根本的な勘違いをしている気がする。うん。

てきとーにPerlでシミュレーションをでっち上げてみました。

ttp://yam-jp.com/~nanashi/slotimg/slo119.bat
（コメントの漢字変換間違えるし・・・）

コマンドプロンプトで実行してみてください。

正直、かなり使いづらいかも…
ちなみに、AT・ストックなどには全く対応していません。

＞＞６１６氏　５回に１回ぐらい機械割り１００を超える厳しいスペックでしゅか？。

．ｂａｔ形式がｗｉｎ用ａｃｔｉｖｅｐｅｒｌですか？
ａｃｔｉｖｅｐｅｒｌって使ったことが無いんでわからないのですが先頭行で＃！とかで
実行出来ないのかな？。（実行しやすいように．ｂａｔにしてくれたのかな？）

ちなみにｃｙｇｗｉｎのｐｅｒｌで試させていただきました。

ｐｅｒｌに詳しいようでしたらｗｉｎ用ｓｄｋ等でスロゲーのサンプル見せてくらはい。

>>２８０Ｓ氏
元のスクリプトは設定１を想定して作ってあるので機械割りは厳しいです・・・。

で、.batはDOSのバッチ形式です。
このスクリプトはちょっとした裏技を使って、DOSコマンドからそのままPerlを呼び出しています。

なので、Perlにパスが通っていれば、DOSプロンプトで

　　　>slo119.bat (回転数)

でそのまま実行できます。

もちろん、cygwinなどの環境でも

　　　$perl slo119.bat (回転数)

で動く…はずです。（試していないですけど・・・）

PerlについてはちょっとCGIを作ったりシェルを作る程度の知識しかないので、ゲームを作るまではﾑﾘﾎﾟ・・・。

そーでしゅか。　残念。　やはり．ｂａｔ形式は配慮だったのですね。
でもこのスレでｐｅｒｌの実行環境を持っている人は少ないと思いますので。．．．

ｖｅｃｔｏｒ　ｐｅｒｌ　関連
ttp://www.vector.co.jp/vpack/filearea/win95/util/text/perl/index.html

気付けば１週間程さぼっていたらしく、ソース見てたら忘れていることいっぱいだった。。
さぁもうちょっと思い出そう…。

あっ。IDが出るようになった!!

さっき気づいたが、役揃いチェックする時に
if (reel.0.0 = reel.0.1)and(reel.0.0 = reel.0.2) ...
みたいな感じでチェックしてたら
「７-☆-☆」みたいな特殊役に対応できぬ・・・。

汎用化するためには払い出し絵柄テーブル作って順番に
チェックするしかないのかな・・・。ｱｧ ﾏﾝﾄﾞｸｾ ﾏﾝﾄﾞｸｾ

＞１０１
ID・・・3DOME・・・3度目・・・もう3度目ですか。
若いって素晴らしいですね・・・。

っつか、地方スレで書いた後こっちに顔だしにくいな・・・。

近況報告

テーブル選択及びテーブル自体の誤りが氏ぬほどある。
実機とほとんど変わらない確率に設定してあるが小役カウンタを設置したところ、
取りこぼしがない状態でも低確率状態にまずならない。
おやじだと100Ｇでカウンタ値が10000弱。
このスロはあきらめて完全オリジナルで新たに作るか････

　　　　　　　　　　　　　　で　、


ま　　　　と　　　　め　　　　サ　　　　イ　　　　ト　　　　ま　　　　だ　　　　ー　　　　？

近況報告

リール配列が思いつかない(爆

少しはコード書けよ、俺

# 休みの日にＭＢが死ぬとは思わなかった(汗

．．．

ＩＤについて（引用）

ID隠蔽不可能な板ではIDを消す事は通常出来ません。
もし???になっていたとしたらその人はキャップを使える人です。

IDは板内において自分の偽者が出ないようにする機能です。
IDは、板名・IPアドレス・日付によって決定されます。
接続を一回切る事によってIPアドレスが変わる場合はIDも変わりますし、
日付が変わるとIDは変わります。板が違ってもIDは変わります。

＞へ
イレグイは逆に、こぼせる役をほとんどこぼしても
一日中低確率だったような。だから、仕様としてはアリでは？

＞パトの人
最初は適当な実機からパクって微妙に改造するのがいいかも。
リール配列作成支援ツールがお役に立てば幸い。
http://yam-jp.com/~nanashi/slotimg/slo101.zip

＞ｼﾅﾌﾟ
IDがプログラマ

＞９０氏　ﾍ臣殿は”大花火”　”いれぐい”は５２氏　だったと思うッチャ。

あ、いやいや、小役カウンタが一日中プラスの
機種も実際あるんだし、逆にずっとマイナスの機種も
別にＯＫでわ？って話ね。

っつか、実際の大花火に小役カウンタは無いので、
オリジナルっぽくなる予定かな？　期待。

ｈｇｉｍｇ試作品５。　皆さんの環境で快適に動くか教えて下さいませ。

ttp://yam-jp.com/~nanashi/slotimg/slo122.lzh

普通に動いたよ。
右上の数字はFPS？　23〜24。

速や！．．．ありがとう！！！。

「ｇｅｔｓｙｎｃ」で処理の待ち時間を取得しているようなのだが，
サンプルそのまま引用したので理解していない。

うちのｗｉｎ２０００ｒａｍ192ではメモリーリードエラーで動かない。．．．何故
リソース食いすぎなのか。？？？

会社の Duron 700Mhz 512MB WinXP でFPS? 40-55ぐらいかな

動くことは普通に動くけどめちゃくちゃチカチカしてるので
実用性には乏しい予感。

こんなんでいい？ >>671

補足

メモリ使用量は 10,600K ぐらいだった。
タスクマネージャで見てみたら、CPUパワー96%ぐらい喰われてるんだが。

パトスロの人(仮　氏　確認ありがとうございます。

１．チカチカするのは盤面全てですか，又はリール部分のみ。？

２．出来ればＱ，Ａキーでウエイトが変わりますからウエイトを変化させてチカチカ
　　に変化があるか調べてもらえませんか。

当方ｃｅｌ　２．３Ｇ　でＴの値が１０前後なので４０−５０は非常に大きいので
ＰＣの性能（Ｇカード）の性能の問題で速すぎるのか遅すぎるのか知りたいです。
（Ｇデバイスのハードウエアーアクセレレータの位置もできれば）

当方でもウエイトを小さくするとリール部分がチカチカします，さらに筐体画像
の描画位置を変更すると盤面全てがチカチカします。

勝手いってすみませんがよろしければお願いします。

>>676
Sがウエイト値？40以下だと、チラツキまくり
41〜59だと、時々ちらつきがあり
60ぐらいからは安定してます。

ちらつくのはリール部分のみです。

VGAは、ミレのG400Maxでアクセラレータは最大。
起動しているアプリの数でチラツキ度合いが変わるので
おそらくCPUパワーの問題かと。（液晶モニタも関係ある？）

＞パトスロの人(仮　氏　再度確認ありがとうございます。

６０ぐらいで安定と言うことは当然リールの回転スピード遅いですよね。
リフレッシュの関係で液晶モニターも関係あるかもしれませんね？。
（液晶の性質上早い動きに追従できない．．．）

ｈｇｉｍｇで３Ｄリールを回すと便利だと思ったのですがＣＰＵパワーが必要なようですね
残念。．．．　ほんとうにありがとうございました。

誰〜れも　いないのかニャー・　今日も規則正しく寝れるニャー・

そうはイカンザキ！！

小役抽選部分完成！


そして・・・寝ろ！

開発シュピードが速いノ〜。　ワシは何をやっているのやら。．．．寄り道ばかりジャ。！

れるられろれろれ．．．．．未然，終始，連帯，仮定，命令形か・・・！！！

開発が何も進んでいない！

そして…寝る！！



――――　ﾀﾞﾒﾎﾟ　＿|￣|○

ネンネンヨ〜　ねんねんよ〜　ぼうやよいこだ　ねんねんよ〜

今日は朝一猪木自身をワシ自身が打ちに行ってみようと思っとりますばい
ばってんもう寝ますきに。

　”皆様おやすみなさいませ”

ガンガレ！おまいら！俺からの闘魂注入！！

　　　元気があれば　　リプレイもある

＞２８０S紙
漏れのは大花火ではなく、花火でつ。

＞９０紙
取りこぼしまくってもずっと低確率状態＝実質低確率ではない＝高確率状態が必要ない＝当然小役カウンタもいらない＝何やってんだか
と、なるのでつが。

どうやらｽﾛﾏｶﾞのテーブルもおかしい。
だいたいびｇとれｇの選択テーブルに同じ箇所があるのが理解できない。
１，２枚掛けのテーブル作るのもﾏﾝﾄﾞｸｾので
花火やめて少量ﾘﾁ目のオリスロ作る事にしまつ。

リール配列ﾏﾝﾄﾞｸｾ＿|￣|○

あ、HANABIなのね・・・。
だったら小役カウンタはプラマイ往復しないとおかしいね。
小役確率と減算値をもう一度チェックだら〜。
ttp://www10.ocn.ne.jp/~kyouken/shin/hanabi.htm

＞びｇとれｇの選択テーブルに同じ箇所があるのが
BR共通リーチ目を出すためかな？よくわからんが・・・。

と・・・とにかくガンガレ！　闘魂注入だぁぁ！

　　　　　　　　　　　　�B　�@　�A

えー、低確率時を確認しますたところどの役も異常なしでありまつ！
ただ自分の脳内減算値が98・100・103だった事に脱力＿|￣|○

BR共通ﾘﾁ目でも選択テーブルは違う訳で、
BR共通テーブルになると、おやじ達によく見られる、
「７が揃う状態なのにバケが揃ってしまった」状態そのものになってしまいまつ。
正確なデータがない以上実機再現ﾑﾘﾎﾟ＿|￣|○

リプレイを3枚役扱いにしてるとかいうオチは無いよね？
あとは、小役カウンタ値の推移を見ながら検証するしか・・・。

BIGでもREGでも同じテーブル番号が参照されてるとしたら、
「ボーナスは揃わないけど(BR共通)リーチ目が出る」テーブル
ということしか考えられませんなぁ・・・。成立P限定？　・・・謎

どれも正しい確率になってるのでHSPの乱数生成に問題があると言ってみる。
リプレイは処理を考えるのがﾀﾞﾙｲので3枚役扱いにしてまつ。
もちろん小役カウンタ値は掛ける前の状態に戻してまつがね。

＞「ボーナスは揃わないけど(BR共通)リーチ目が出る」テーブル
だったら問題ないのでつが、

実　際　ど　ち　ら　も　揃　う　ん　だ　よ　！　　　　　　　　　　　　　　　　　　　　ﾜﾊﾊ

HSPの乱数は0〜32767までってトコはＯＫ？
あとは・・・逆に、ＰＡＹ時の加算値が間違ってるとか・・・

HANABIのテーブルに関しては詳しくないのでわからんが、
「BIG成立後ハズレ」と「REG成立後ハズレ」で全く同じ
テーブルが選ばれているとしたら・・・。
・雑誌の誤植
・実は成立役と矛盾すると最後にコントロール処理で蹴る仕様だった
どちらかですな。（前者の振り分け99％）

確か、BR成立Pの左リールは通常時ハズレと全く
同じテーブルが選択されていたような気も。うろ覚え。
・・・んー、役に立てずスマンな。寝る。

BIG後ハズレとＲＥＧ後ハズレが共通でも問題ない、というか普通にありえるのでは？
でも…
＞実　際　ど　ち　ら　も　揃　う　ん　だ　よ　！

誤植の可能性９９．９９％（解釈があっていた場合）

＞・実は成立役と矛盾すると最後にコントロール処理で蹴る仕様だった

さすがにそれは…ないです。
でもＢＲ成立Ｐの左リールは、リアボまで通常時ハズレと全く同じ停止位置なのは確かです。

ってこんな時間になにしてんだろ＿|￣|○

乱数の最大値は9999+9*10000にしてまつ。

花火でコントロールは考えられませんね。
自分で考えたテーブルじゃないから誤植かどうかわからん。
ﾎﾞﾇｽが揃わないBR共通のテーブルならいいけど
揃わなかったらいらないし、普通に存在してはならないものだと思いまつが？
今テーブル確認したらﾋﾞｸｯﾘ。
通常はずれと成立Pの左の制御が全く同じですた。23.8へぇ

不安になってきたのでカウンタについて一応確認したいのでつが、
bet*100をマイナス
payout*原産地をプラス
でいいでつよね。

あぁぁ・・・原因はココだった？
減算値はその名の通り、引き算にしか使っちゃいけませんヨ。
プラスするのは「加算値」で、小役カウンタ付きの機種は
全メーカー全機種共通で「256」です。

BET：×減算値(97〜102)をマイナス
PAY：×加算値(256)をプラス

えーっと減算値について詳しく解説した方がいいでしょうか？

えっと、してもいいでしょうかと聞きつつもう解説を始めてしまうのですが、

説明その�@

大まか９０さんのいう事であっているので補足になるのですが、

小役カウンタというものが機種によっては搭載されていまして、
機械に突っ込んだメダル枚数に対して、一定範囲内の回転数を維持させるための役割を持っています。

小役カウンターが正の値のとき、小役低確率状態、
小役カウンターが負の値のとき、小役高確率状態となります。

ただし、小役カウンターが正負のどちらでもないとき
（つまり０の時は、小役高確率状態となります。）