1181748
Tonyu BBS
[再読み込み] [ホームページ] [使いかた] [ワード検索] [管理用]

おなまえ

Eメール
題  名  
コメント(http(s)://などのURLが含まれていると投稿できないことがあります)
添付プログラム
※プログラムに関する質問は、そのプログラムを添付して送ると対応が早くできます
添付方法...
削除キー (自分の記事を削除時に使用。英数字で8文字以内)
文字色
豆乳システムでの累乗 投稿者 : 111(flh1abg223.gif.mesh.ad.jp)
- 2009/06/26(Fri) 21:37 No.12439
 


 豆乳システムで累乗を行う関数(もしくは簡単に扱える方法)などは無いでしょうか?

 やはり、
  
  h=0.99;
  for(i = 0;i > 50;i++)h=h*h;

 という様な形しか出来ないのでしょうか?
  functionと引数・・・と、実用的な形にしようとすると、ちょっと大変そうで・・・。

 ご存知の方、よろしくお願いします。


Re: 豆乳システムでの累乗 投稿者 : イッカ!(p3060-ipbf2605hodogaya.kanagawa.ocn.ne.jp)
- 2009/06/27(Sat) 14:51 No.12442
 
xに累乗したい数、nに回数を入れると値が戻ってきます。
ただし大きすぎる数、小数点以下が多い数には使えません(´・ω・`)

使い方:x=power(8,3);  (←x=8*8*8と同じ)

function power(x,n){
  if (x==null || n==null) return 0;
  if (x==0 && n==0) return 1;
  xn=1;
  if (n>0) {
    for (i=0;i<n;i++) {
      xn = xn * x;
    }
  } else if (n<0) {
    n = -n;
    for (i=0;i<n;i++) {
      xn = xn / x;
    }
  } else {
    return 0;
  }
  return xn;
}


Re: 豆乳システムでの累乗 投稿者 : 111(flh1abg223.gif.mesh.ad.jp)
- 2009/06/27(Sat) 22:55 No.12445
 
 自分で作った方が勉強になったかも知れませんが、使わせて頂きました。
 いい感じな動きをするようになりました、ありがとうございます!

 細かい所まで考えられているのが分かります。
 ちょっと分からないのが、累乗の回数(引数)がマイナスだった場合は・・・、これは”累乗”と呼ばれる範囲に入るものなのでしょうか?
 返ってくる値がすごく小さくて、ちょっと使いづらい気もするのですが、これは例えばどういった時に使うのが一番有効的でしょう?

 もし良ければ教えて頂けると、助かります。

 

 

 


Re: 豆乳システムでの累乗 投稿者 : マッキー(3d2cb0cf.ip.ncv.ne.jp)
- 2009/06/28(Sun) 08:47 No.12446
 
マイナス乗は、あまり使う機会がないかもしれませんが、
累乗は、プラスだけでなく、マイナスもあります。

例えば、2の何乗で考えると、
2の3乗 = 1*2*2*2 = 8
2の2乗 = 1*2*2   = 4
2の1乗 = 1*2     = 2
2の0乗 = 1       = 1
2の-1乗 = 1/2     = 0.5
2の-2乗 = 1/2/2   = 0.25
2の-3乗 = 1/2/2/2 = 0.125
となります。

xの3乗は、x*x*xでもいいですが、実際は1*x*x*xです。
xの0乗は、必ず1になります。(ただし、0の0乗は0という考えもあるようです)
xの-1乗は、1/xになります。
xの-2乗は、1/x/xでもいいですが、1/(xの2乗)になります。


イッカ!さんの、プログラムを少し変えました。(0乗で0になったので)
function power(x,n){
  var xn;
  if(x==null||n==null)return null;
  if(x==0&&n==0)return null;
  xn=1;
  if(n>0){
    for(i=0;i<n;i++){
      xn=xn*x;
    }
  }else if(n<0){
    for(i=0;i>n;i--){
      xn=xn/x;
    }
  }
  return xn;
}


Re: 豆乳システムでの累乗 投稿者 : イッカ!(p3060-ipbf2605hodogaya.kanagawa.ocn.ne.jp)
- 2009/06/28(Sun) 10:13 No.12448
 
>マッキーさん
適当なプログラムを改造してくださり、ありがとうございます。

>111さん
マイナスの使い道はあんまり無いと思います。

例)vx-=power(vx,-2);
---
vxが二の場合。
2-=0.5
1.5-=0.375
1.125-=0.281
0.844-=0.211
0.633
と言った感じで、少しずつ減るみたいです。
使えなくもないですが、無理して使う必要は全くありません!(
そんな感じです。
---


Re: 豆乳システムでの累乗 投稿者 : 111(flh1abg223.gif.mesh.ad.jp)
- 2009/06/29(Mon) 00:48 No.12450
 
 2乗の0が1なんて・・・。かけ算の感覚だと、0が普通な気もしますね。

 >イッカ!さん
 ああ、なるほど・・・こんな風に減るのですか。
 powerの返り値を -= の形にするのがコツですね。この減り方なら、使う場面もありそうですね。

 ありがとうございます!

Tonyu RuntimeのUsrソースプログラムに関して 投稿者 : Triangle Ld.(i218-47-199-58.s06.a011.ap.plala.or.jp)
- 2009/06/22(Mon) 15:56 No.12430
 


ランタイムを作成するときに、Usrにソースファイルが入っています。
リソースなるものを知っている私はPlayer.exeにそのプログラムを入れてしまって、そこから読んだほうが早いし、隠し要素があるゲームを作るときには便利かなと思いました。
Delphiにはリソースを操作するものがあったらがんばってみてください。hoge-さん。
(hoge-さんの反応が最近ないようですが、忙しいようです。少し休んでみてはどうでしょうか。)


Re: Tonyu RuntimeのUsrソースプログラムに関して 投稿者 : マッキー(3d2cb443.ip.ncv.ne.jp)
- 2009/06/23(Tue) 23:42 No.12431
 
hoge-さんが、答えるところなのにすみません。

>Player.exeにそのプログラムを入れてしまって
それはコンパイラ言語にする、ということですか?
ttp://hoge1e3.sakura.ne.jp/tonyu/project/pages/viewComment.cgi?mainkey=2563&
↑ここで、似たような話がありました。

hoge-さんは、掲示板の上にもかいてあるとおり、忙しいそうなので、作ってもらえないかもしれません。

それに、コンパイラ言語にするには、たぶん一からTonyuを作り直すことになる。(新しいTonyuを作るという話もあるけど)
そして、難しくて時間もかかると思います。(何年もかかると思う)

誰かが、コンパイラTonyuを作ってしまえば、hoge-さんの負担も少なくなります。(あとは、作ってくれる人がいればいいけど)


Re: Tonyu RuntimeのUsrソースプログラムに関して 投稿者 : Triangle Ld.(i218-47-199-58.s06.a011.ap.plala.or.jp)
- 2009/06/24(Wed) 15:43 No.12432
 
少し曖昧だったようです。
コンパイラにしてPlayer.exeに組み込むんじゃなくて、Player.exeのリソースにソースプログラムを入れてしまうということです。
文章訂正:
Delphiにはリソースを操作するものがあったらがんばってみてください。hoge-さん。=>Delphiにリソースを操作するものがあったらがんばってみてください。hoge-さん。
あと、私はDelphiに少しだけ触れたことがあるので、もしかしたら作れるかもしれません(でもコンパイラは作ったことないです)。


Re: Tonyu RuntimeのUsrソースプログラムに関して 投稿者 : Triangle Ld.(i218-47-199-58.s06.a011.ap.plala.or.jp)
- 2009/06/24(Wed) 15:48 No.12433
 
追加:
もしhoge-さんにC言語(またはC++)の知識があったら、ソースプログラムをC言語風に解析して、Player.exeとくっつけて(プログラムを)、それをCコンパイラでうまくexeにすればいけるんじゃないでしょうか。
しかし、これをやろうとするとTonyuの長所である「オブジェクトの並列動作」が結構難しくなります(できなくなるわけではない)。


Re: Tonyu RuntimeのUsrソースプログラムに関して 投稿者 : Triangle Ld.(softbank219014226155.bbtec.net)
- 2009/06/26(Fri) 22:33 No.12440
 
一つ忘れていました。
C言語は、int型で関数を宣言し、returnでvoid型(=なし)をしていするとコンパイルでエラーがかえってきます。
問題はこんなものですかね...。
あと、Tonyuはオブジェクト指向言語なので、これをPlayer.exeにも引き継がせるのならC++かJavaがおすすめです。

画面端(上下左右の端)から弾を複数出させるには 投稿者 : AZKX(ipc133ssv5)
- 2009/06/24(Wed) 15:53 No.12434
 


題名のとおりです。
画面端(上下左右それぞれの端)から弾を複数出させたいのですが、いまひとつよくわかりません。
弾の軌道は直線でそれぞれ別々の角度で射出(?)させたいと思っています。

どなたでも構いませんので、詳しくお願いします。


Re: 画面端(上下左右の端)から弾を複数出させるには 投稿者 : 111(flh1abg223.gif.mesh.ad.jp)
- 2009/06/24(Wed) 23:53 No.12436
 
 左上の端 (0,0)
 右上の端 ($screenWidth,0)
 左下の端 (0,$screenHeight)
 右下の端  ($screenWidth,$screenHeight)

 という座標だと思います(それぞれX・Y座標です)
 画面がスクロールするとまた変わってきますが・・・

 弾が角度の方向に向かって直進、させたいのならば
 
 x+=cos(角度)*speed;
 y+=sin(角度)*speed;

 「角度」に任意の数字を入れれば、そちらの方向に直進します。「speed」の部分に数字を入れれば、速度が調整できます。

 複数弾を出すのはforの中にapperを入れれば出来ると思います。
 別々の角度は、弾を一つ撃つごとに、上でも書いた、任意の角度を再指定してやるのですね。

 分かりづらかったらすみません。

 

当たり判定の表示 投稿者 : AZKX(ipc133ssv5)
- 2009/06/17(Wed) 17:55 No.12415
 


作成中のゲームで当たり判定の設定をしているのですが、その際にデバッグ用に実際の当たり判定を表示させたいのですが、どのようにすればいいでしょうか。

当たり判定は、

function crashTo(t) {
  return dist(t.x-x,t.y-y)<任意の数値;
}

を用いて作っています。

誰でも構いませんので、詳しくお願いします。


Re: 当たり判定の表示 投稿者 : ロンド(fl1-119-240-64-86.iba.mesh.ad.jp)
- 2009/06/17(Wed) 20:21 No.12416
 
//===============================================================
// 対象オブジェクトとの当り判定を返す
//---------------------------------------------------------------
// t        : 対象オブジェクト
// areaX    : X判定の長さ
// areaY    : Y判定の長さ
// areaDraw : 1=当り判定を表示する それ以外=当り判定を表示しない
//===============================================================
function myCrashTo(t,areaX,areaY,areaDraw) {

  // 当り判定表示
  if(areaDraw == 1)
   drawRect(x-(areaX/2),y-(areaY/2), x+(areaX/2),y+(areaY/2),color(255,255,255),-10);

  // 当り判定
  if(dist(x-t.x, x-t.x) < areaX && dist(y-t.y, y-t.y) < areaY)
   return 1;
  
  return 0;
  
}

仮に if(myCrashTo(t,20,50,1)) で呼び出した場合、横が範囲20、縦が範囲50になります。当り判定を表示したくない場合は第4引数を1意外(0等)にしてください。


Re: 当たり判定の表示 投稿者 : Triangle Ld.(i218-47-199-58.s06.a011.ap.plala.or.jp)
- 2009/06/18(Thu) 15:55 No.12418
 
>当たり判定は、
>
>function crashTo(t) {
>  return dist(t.x-x,t.y-y)<任意の数値;
>}
>
>を用いて作っています。

ならば、引数を少し拡張して、

function crashTo(t, debug){
  var tw, th;

  tw = getPatWidth(t.p);
  th = getPatHeight(t.p);

  if (debug) {
    drawRect(t.x - tw / 2, t.y - th / 2, t.x + tw / 2, t.y + th / 2, $clRed, t.zOrder + 100);
  }
  if (abs(t.x - x) < tw / 2 || abs(t.y - y) < th / 2){
    return 1;
  }
  return 0;
}

高さと幅が違うなら、distを使うまでもありません。
if (debug)という文はif (debug == 1)と同じです。
getPatWidth(Height)は、パターンの幅(高さ)を返します。


Re: 当たり判定の表示 投稿者 : ロンド(fl1-119-240-64-86.iba.mesh.ad.jp)
- 2009/06/18(Thu) 22:10 No.12420
 
なるほど。absを使う方法は思いつきませんでした。

関係ないですけど、処理速度検証したらcrashTo()ってデフォのまま使うより、当り判定指定して上げた方が処理速度上がるみたいですね・・。

横スクロール 投稿者 : 中2初心者(i118-20-243-65.s05.a009.ap.plala.or.jp)
- 2009/06/14(Sun) 10:59 No.12397
 


検索は、しましたが、よくわからないので・・・

スクロールはするんですが、横のみ のスクロールは
どうしたらいいのでしょうか?

if (y<2500) $map.scrollTo(x-250,y-310);// スクロール

if (getkey(32)==1) {//ジャンプ
    if ($map.getAt(x,y+16)==$pat_block+3){
      if (wY== 1 && getkey(32)==1) y-=10; q+=1; wait(1); $map.scrollTo(x-250,y-310);
       if (q=1 && getkey(37)>0 && $map.getAt(x-16,y)!=$pat_block+3)x-=10;
       if (q=1 && getkey(39)>0 && $map.getAt(x+16,y)!=$pat_block+3)x+=10;
              y-=10; q+=1; wait(1); $map.scrollTo(x-250,y-310);
       if (q=2 && getkey(37)>0 && $map.getAt(x-16,y)!=$pat_block+3)x-=10;
       if (q=2 && getkey(39)>0 && $map.getAt(x+16,y)!=$pat_block+3)x+=10;
       y-=10; q+=1; wait(1); $map.scrollTo(x-250,y-310);
       if (q=3 && getkey(37)>0 && $map.getAt(x-16,y)!=$pat_block+3)x-=10;
       if (q=3 && getkey(39)>0 && $map.getAt(x+16,y)!=$pat_block+3)x+=10;
              y-=10; q+=1; wait(1); $map.scrollTo(x-250,y-310);
       if (q=4 && getkey(37)>0 && $map.getAt(x-16,y)!=$pat_block+3)x-=10;
       if (q=4 && getkey(39)>0 && $map.getAt(x+16,y)!=$pat_block+3)x+=10;
       y-=10; q+=1; wait(1); $map.scrollTo(x-250,y-310);
       if (q=5 && getkey(37)>0 && $map.getAt(x-16,y)!=$pat_block+3)x-=10;
       if (q=5 && getkey(39)>0 && $map.getAt(x+16,y)!=$pat_block+3)x+=10;
              y-=10; q+=1; wait(1); $map.scrollTo(x-250,y-310);
       if (q=6 && getkey(37)>0 && $map.getAt(x-16,y)!=$pat_block+3)x-=10;
       if (q=6 && getkey(39)>0 && $map.getAt(x+16,y)!=$pat_block+3)x+=10;
       y-=10; q+=1; wait(1); $map.scrollTo(x-250,y-310);
       if (q=7 && getkey(37)>0 && $map.getAt(x-16,y)!=$pat_block+3)x-=10;
       if (q=7 && getkey(39)>0 && $map.getAt(x+16,y)!=$pat_block+3)x+=10;
              y-=10; q+=1; wait(1); $map.scrollTo(x-250,y-310);
       if (q=8 && getkey(37)>0 && $map.getAt(x-16,y)!=$pat_block+3)x-=10;
       if (q=8 && getkey(39)>0 && $map.getAt(x+16,y)!=$pat_block+3)x+=10;
       
     }


Re: 横スクロール 投稿者 : 中2初心者(i118-20-243-65.s05.a009.ap.plala.or.jp)
- 2009/06/14(Sun) 11:21 No.12399
 
できそうっぽいです。
y-310がいけないんですね。
yを使わずにいけばよかったんだ・・・


Re: 横スクロール 投稿者 : renf(softbank220018203123.bbtec.net)
- 2009/06/14(Sun) 11:41 No.12401
 
関係ないですけどすごい長いプログラムですよね

横スクロールジャンプアクションを作ってるなら
飛んで落下していくっていうのは

while(1) { 

 y+=vy;
if ($map.getAt(x,y+16+vy)==$pat_block+3){
  vy=0;
    if (getkey(32)==1) {//ジャンプ
      vy=-10;
    }
}else{
  vy+=0.1;
 if (getkey(37)>0 && $map.getAt(x-16,y)!=$pat_block+3)x-=10;
if (getkey(39)>0 && $map.getAt(x+16,y)!=$pat_block+3)x+=10;

}
$map.scrollTo(x-250,-310); 
  update();
}

とかってするのがオススメです。
参考とかにしてください・・


Re: 横スクロール 投稿者 : 中2初心者(i118-20-243-65.s05.a009.ap.plala.or.jp)
- 2009/06/14(Sun) 11:57 No.12402
 
ありがとうございます。
だいぶよくなりました。


ちょっと補足 投稿者 : Triangle Ld.(softbank219014226155.bbtec.net)
- 2009/06/15(Mon) 21:52 No.12413
 
中2初心者さんへ補足
アクションゲームやTonyuについての詳しいことはインターネット上にもたくさんあるので、それも参考にするといいかもしれません。
どうでもいいことですが…


Re: 横スクロール 投稿者 : Triangle Ld.(softbank219014226155.bbtec.net)
- 2009/06/18(Thu) 22:29 No.12422
 
しつこいようですが、プログラム中のif文のなかの条件式「q=x(xは任意の数)」などは「q==x」の書き間違いじゃないのでしょうか。

.
[直接移動] [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] [11] [12] [13] [14] [15] [16] [17] [18] [19] [20] [21] [22] [23] [24] [25] [26] [27] [28] [29] [30] [31] [32] [33] [34] [35] [36] [37] [38] [39] [40] [41] [42] [43] [44] [45] [46] [47] [48] [49] [50] [51] [52] [53] [54] [55] [56] [57] [58] [59] [60] [61] [62] [63] [64] [65] [66] [67] [68] [69] [70] [71] [72] [73] [74] [75] [76] [77] [78] [79] [80] [81] [82] [83] [84] [85] [86] [87] [88] [89] [90] [91] [92] [93] [94] [95] [96] [97] [98] [99] [100] [101] [102] [103] [104] [105] [106] [107] [108] [109] [110] [111] [112] [113] [114] [115] [116] [117] [118] [119] [120] [121] [122] [123] [124] [125] [126] [127] [128] [129] [130] [131] [132] [133] [134] [135] [136] [137] [138] [139] [140] [141] [142] [143] [144] [145] [146] [147] [148] [149] [150] [151] [152] [153] [154] [155] [156] [157] [158] [159] [160] [161] [162] [163] [164] [165] [166] [167] [168] [169] [170] [171] [172] [173] [174] [175] [176] [177] [178] [179] [180] [181] [182] [183] [184] [185] [186] [187] [188] [189] [190] [191] [192] [193] [194] [195] [196] [197] [198] [199] [200] [201] [202] [203] [204] [205] [206] [207] [208] [209] [210] [211] [212] [213] [214] [215] [216] [217] [218] [219] [220] [221] [222] [223] [224] [225] [226] [227] [228] [229] [230] [231] [232] [233] [234] [235] [236] [237] [238] [239] [240] [241] [242] [243] [244] [245] [246] [247] [248] [249] [250] [251] [252] [253] [254] [255] [256] [257] [258] [259] [260] [261] [262] [263] [264] [265] [266] [267] [268] [269] [270] [271] [272] [273] [274] [275] [276] [277] [278] [279] [280] [281] [282] [283] [284] [285] [286] [287] [288] [289] [290] [291] [292] [293] [294] [295] [296] [297] [298] [299] [300] [301] [302] [303] [304] [305] [306] [307] [308] [309] [310] [311] [312] [313] [314] [315] [316] [317] [318] [319] [320] [321] [322] [323] [324] [325] [326] [327] [328] [329] [330] [331] [332] [333] [334] [335] [336] [337] [338] [339] [340] [341] [342] [343] [344] [345] [346] [347] [348] [349] [350] [351] [352] [353] [354] [355] [356] [357] [358] [359] [360] [361] [362] [363] [364] [365] [366] [367] [368] [369] [370] [371] [372] [373] [374] [375] [376] [377] [378] [379] [380] [381] [382] [383] [384] [385] [386] [387] [388] [389] [390] [391] [392] [393] [394] [395] [396] [397] [398] [399] [400] [401] [402] [403] [404] [405] [406] [407] [408] [409] [410] [411] [412] [413] [414] [415] [416] [417] [418] [419] [420] [421] [422] [423] [424] [425] [426] [427] [428] [429] [430] [431] [432] [433] [434] [435] [436] [437] [438] [439] [440] [441] [442] [443] [444] [445] [446] [447] [448] [449] [450] [451] [452] [453] [454] [455] [456] [457] [458] [459] [460] [461] [462] [463] [464] [465] [466] [467] [468] [469] [470] [471] [472] [473] [474] [475] [476] [477] [478] [479] [480] [481] [482] [483] [484] [485] [486] [487] [488] [489] [490] [491] [492] [493] [494] [495] [496] [497] [498] [499] [500] [501] [502] [503] [504] [505] [506] [507] [508] [509] [510] [511] [512] [513] [514] [515] [516] [517] [518] [519] [520] [521] [522] [523] [524] [525] [526] [527] [528] [529] [530] [531] [532] [533] [534] [535] [536] [537] [538] [539] [540] [541] [542] [543] [544] [545] [546] [547] [548] [549] [550] [551] [552] [553] [554] [555] [556] [557] [558] [559] [560] [561] [562] [563] [564] [565] [566] [567] [568] [569] [570] [571] [572]
- 以下のフォームから自分の投稿記事を修正・削除することができます -
処理 記事No パスワード

- Joyful Note -