[過去ログ] 【初心者】課題をクリアしていくスレ【講習会】 (787レス)
1-

このスレッドは過去ログ倉庫に格納されています。
次スレ検索 歴削→次スレ 栞削→次スレ 過去ログメニュー
148: 134 [] 04/06/26 10:37 ID:1CizLySr(2/2) AAS
外部リンク[lzh]:gamdev.org

キャラ移動です。一応加速度も考慮してあります。
149
(3): 名前は開発中のものです。 [] 04/06/26 13:26 ID:wteFDikq(1/2) AAS
Wikiなんかじゃなくて専用のHP作ったら?
ソース貼るのに不憫だろ
150: 名前は開発中のものです。 [sage] 04/06/26 13:31 ID:jYUMekjC(1/7) AAS
>>149
神キタ━━━━━━(゚∀゚)━━━━━━ !!
tabとか半角スペースめんどいもんな
ひょっとして過去にうぷされたソースとかも整形してうぷしてくれれば
うれしいけどそれは望みすぎかな
急がなくていいからがんがれ!
151
(1): 名前は開発中のものです。 [sage] 04/06/26 13:39 ID:CUwn7Ubj(1) AAS
強引な150に萌え
152: Ruby@課題1数当て [] 04/06/26 14:32 ID:jYUMekjC(2/7) AAS
kotae=rand(9)+1
while (true)
print "1〜9の数を入力してください\n"
gets
ans=Integer(chop)
if ans==kotae then
print "正解\n"
break
else
print "不正解\n"
end
end
153
(1): 149 [] 04/06/26 15:26 ID:wteFDikq(2/2) AAS
俺かYoΣ(´□`;)
154: Ruby@課題2素数 [] 04/06/26 16:17 ID:jYUMekjC(3/7) AAS
count=0
i=2
while count<1000 do
sosu=true
for j in 2..i-1 do
if ( (i % j) == 0)
sosu=false
end
end
if (sosu)
print "#{i}\n"
count=count+1
end
i=i+1
end
print "素数を#{count}個みつけました\n"
155: Ruby/SDL@課題3赤い四角 [] 04/06/26 17:32 ID:jYUMekjC(4/7) AAS
require 'sdl'

SDL.init( SDL::INIT_VIDEO )
screen = SDL.setVideoMode( 640, 480, 16, SDL::SWSURFACE )

screen.fillRect( 0, 0, 320, 240, [ 255, 0, 0 ] )
screen.updateRect( 0, 0, 0, 0 )

loop do
while event = SDL::Event2.poll
case event
when SDL::Event2::Quit, SDL::Event2::KeyDown
exit
end
end
end
156: Ruby/SDL@課題4sin波形 [] 04/06/26 18:50 ID:jYUMekjC(5/7) AAS
require 'sdl' 

SDL.init( SDL::INIT_VIDEO ) 
screen = SDL.setVideoMode( 640, 480, 16, SDL::SWSURFACE )

count=0.0
while count < 6.28
  x=count*100
  y=Math.sin(count)*100+240
  screen.putPixel(x,y,[255,0,0])
  count=count+0.01
end
screen.updateRect( 0, 0, 0, 0 )

loop do  
  while event = SDL::Event2.poll
    case event
    when SDL::Event2::Quit, SDL::Event2::KeyDown
      exit
    end
  end
end
157: Ruby/SDL@課題5キー入力 [] 04/06/26 20:12 ID:jYUMekjC(6/7) AAS
require 'sdl'

SDL.init( SDL::INIT_VIDEO ) 
screen = SDL.setVideoMode( 640, 480, 16, SDL::SWSURFACE ) 

y=0
x=0

loop do
  while event = SDL::Event2.poll 
    case event 
    when SDL::Event2::Quit 
      exit 
    end
  end

  SDL::Key.scan
  y -= 1 if SDL::Key.press?( SDL::Key::UP )
  x += 1 if SDL::Key.press?( SDL::Key::RIGHT )
  y += 1 if SDL::Key.press?( SDL::Key::DOWN )
  x -= 1 if SDL::Key.press?( SDL::Key::LEFT )

  x=0 if x<0
  x=319 if x > 319
  y=0 if y<0
  y=239 if y > 239

  screen.fillRect( 0, 0, 640, 480, [ 0, 0, 0 ] )
  screen.fillRect( x, y, 320, 240, [ 255, 0, 0 ] )
  screen.updateRect( 0, 0, 0, 0 )
end
158
(1): 名前は開発中のものです。 [sage] 04/06/26 21:12 ID:4yTlUeBl(1) AAS
こりゃある意味、荒らしといえなくもないな
159: 名前は開発中のものです。 [] 04/06/26 21:34 ID:jYUMekjC(7/7) AAS
Ruby/SDLインストール方法(Windows)

1.とりあえずコレをダウンロード
外部リンク[lzh]:www.kmc.gr.jp

2.解凍して適当なフォルダにコピー

3.[コピーしたフォルダ]\usr\local\binにパスを切る
(たとえばc:\ruby\usr\local\binなど)

以上でインストール終了。

スクリプトをテキストファイルとして保存して(拡張子は.rbが一般的)
ruby [ファイル名]として実行
(たとえばruby sosu.rbなど)

公式サイト
外部リンク[html]:www.kmc.gr.jp
チュートリアル
外部リンク[html]:www.kmc.gr.jp
160
(1): 名前は開発中のものです。 [sage] 04/06/26 23:23 ID:VAfJSjue(1) AAS
宣伝?
161: 名前は開発中のものです。 [] 04/06/26 23:49 ID:PaYEz6W8(1) AAS
キー入力、Delphiです
TApplicationEventsとQD3のDDIDEX使ってます

private
Chara: TPoint;

procedure TForm1.ApplicationEvents1Idle(Sender: TObject;
var Done: Boolean);
begin
DDIDEX1.Scan(DI_KEYB);
Chara.X:=Chara.X+DDIDEX1.Stick.X;
Chara.Y:=Chara.Y+DDIDEX1.Stick.Y;
if (Chara.X<0) or (Chara.X>319
319(2): 名前は開発中のものです。 [sage] 04/07/14 14:18 ID:fwuwWRAB(1) AAS
チェック対象がたくさんある場合の当たり判定って、どうやるのがベストなんだろう?
弾が20個、ターゲットが20機居たら20x20の全組み合わせの判定をするしかないの?
) then begin
Chara.X:=Chara.X-DDIDEX1.Stick.X;
end;
if (Chara.Y<0) or (Chara.Y>239
239(1): 名前は開発中のものです。 [sage] 04/07/04 13:00 ID:WDudAYFD(3/5) AAS
それ以上のは今までに計算した分と対応してるだけ
) then begin
Chara.Y:=Chara.Y-DDIDEX1.Stick.Y;
end;
Canvas.Brush.Color:=clBlack;
Canvas.FillRect(Rect(0,0,ClientWidth,ClientHeight));
Canvas.Brush.Color:=clRed;
Canvas.FillRect(Rect(Chara.X,Chara.Y,Chara.X+320,Chara.Y+240));
Sleep(5);
Done:=False;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
DoubleBuffered:=True;
ClientWidth:=640;
ClientHeight:=480;
end;
162
(1): 名前は開発中のものです。 [sage] 04/06/27 01:17 ID:m6T91X5d(1/2) AAS
>>149
インデントを保ったままソースをうぷしたいなら
ソース置き場やゲムデヴあぷろだをを利用させてもらう手もある
というかこのスレはなぜ貼り付けるのが主流なんだw

ソース置き場
外部リンク[html]:do.sakura.ne.jp
ゲムデヴあぷろだ
外部リンク:gamdev.org

>>151
うむ、萌えプロ目指してるからな
参考1) 外部リンク[html]:www.bk1.co.jp
参考2) 画像リンク


>>153
      ☆ チン     マチクタビレタ〜
                        マチクタビレタ〜
       ☆ チン  〃  ∧_∧   / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
        ヽ ___\(\・∀・) < 専用のHPまだ〜?
            \_/⊂ ⊂_)    \_____________
          / ̄ ̄ ̄ ̄ ̄ ̄ /|
       | ̄ ̄ ̄ ̄ ̄ ̄ ̄|  |
       |  S p o k e  |
>>158
このスレ自体(ry
まぁ、土曜日を利用してスタートダッシュだ許せ

>>160
おまいらも開発環境や実行環境ぐらい書けよ
ところでRubyって宣伝と思われるほどマイナーなのか?
ちなみにRuby暦1日(もう2日目だな)なので優しくしてくれな
163
(2): 名前は開発中のものです。 [sage] 04/06/27 02:56 ID:fYoguU/V(1/3) AAS
>>162
>このスレはなぜ貼り付けるのが主流なんだw
ダウソして解凍してって面倒なので結構貼り付けいいと思うんだが
普通のレスが見にくい&改行制限が問題だな

2ch型掲示板を設置して生徒一人につき1スレ使ってソースを貼り付けていくっていうのはどうでしょ?
TABの問題が残るかな?
164
(2): 名前は開発中のものです。 [sage] 04/06/27 06:21 ID:6ucDfgWE(1) AAS
>>163
神キタ━━━━━━(゚∀゚)━━━━━━ !!
ダウソとか解凍めんどいもんな
ひょっとして過去にうぷされたソースとかもスレ立てて貼りつけてくれれば
うれしいけどそれは望みすぎかな
急がなくていいからがんがれ!
165
(1): 名前は開発中のものです。 [sage] 04/06/27 07:31 ID:fYoguU/V(2/3) AAS
>>164
コピペかよ!ほんとに作るぞ?
aaacafeとかだったらすぐだし
166
(1): 名前は開発中のものです。 [sage] 04/06/27 09:45 ID:sIosK61q(1/2) AAS
ソースをコピペしてコンパイルして実行するほうがはるかにめんどい
167
(3): 129 [sage] 04/06/27 10:57 ID:BWzYLsUd(1/2) AAS
今更ながらやっとwindows.hが読める?環境が整ったよ…
>>130-132さんありがとう。

LSI-C86試食でやっていたのですがこの度borlandのなんとかをいれました
次はSDL&Cygwin????
なんかいまだにDelphiとか分からないんですけど何をどうするのが好ましいのでしょうか…?

自分だけ違う次元ですね…。鬱。
168
(1): 名前は開発中のものです。 [sage] 04/06/27 12:50 ID:1xxqplwj(1) AAS
>167
SDLとかCygwinとかDelphiとか気にしなくても良いから
とりあえずborland c++ コンパイラ用意できたということで
Cのお勉強をしてみましょうよ
169
(2): 167 [sage] 04/06/27 13:15 ID:BWzYLsUd(2/2) AAS
>>168
SDLとかいれたほうが楽なのかなと思ったのですが…
やっぱりいきなり窓プログラミングにぶっ飛ぶより基礎からじっくりやるべきですか
基礎でぬくぬくしてられないと思ったもので…反省。
170
(1): 課題2@D言語 [sage] 04/06/27 13:29 ID:TlIkOaxm(1/2) AAS
まだβ版だけど先取りして勉強。
素数判定。

const int MAX_COUNT = 1000;

int main() {
    int   num,check,count;
    
    printf("1\n");
    count = 1;
    num = 2;
    while (count<MAX_COUNT) {
        for (check=2;check<num;check++) {
            if (num%check==0) break;
        }
        if (check==num) {
            printf("%d\n",num);
            count++;
        }
        num++;
    }
    return 0;
}
171
(1): 名前は開発中のものです。 [] 04/06/27 17:32 ID:m6T91X5d(2/2) AAS
>>163
ソース貼り付けのメリットも捨てがたいな
テキストファイルを扱えるあぷろだがあれば閲覧もダウンロードもできて楽かもしれん
スレにソース貼りまくりも妙に楽しいんだが

>>164
   ,,ヘ ヘ    / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
   (,, ゚∇゚) < クレクレ厨逝ってよち!
  〜(,,_ノ    \_____________

>>165
megaBBSスクリプト( 外部リンク[html]:pabbs.hp.infoseek.co.jp )が半角、全角、TABを扱えていい感じだった
しかも等幅フォントも使えるみたい

2chでインデントつける方法は教えてもらってきた
2chスレ:tech

>>166
だよな、人のソースみて勉強してる立場からすると崩れたソースは辛い

>>167>>169
Win32APIで窓プログラミング汁!
ぬくぬくどころか最難関だw
といっても参加者やわかる人が多い環境でもあるので王道かもしれん
ひたすらたくさんの開発環境を整えてPCの基礎知識を仕入れるのも(・∀・)イイ!

>>170
D言語知らないから間違ってたら悪いんだが
それって1も表示されないか?(1はもちろん素数じゃない)

>>生徒BLUE氏
BRUSHの解放忘れがあるよ
172: 課題2@D言語 [sage] 04/06/27 17:41 ID:TlIkOaxm(2/2) AAS
>>171
1と自分以外で割れない数が素数じゃないの?
1と1以外で割れない数だからと思って"わざわざ"付け足したのに orz
1-
あと 615 レスあります
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル

ぬこの手 ぬこTOP 0.025s