忍者ブログ
ロボット、千葉ロッテマリーンズについていいかげんなことを書きます。
[294]  [293]  [292]  [291]  [290]  [289]  [286]  [285]  [284]  [274]  [272
×

[PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。

と言うわけで新企画です.

・・・・なんか中途半端で終わりそうな気配がプンプンしますが.

F#とXNAでゲームを作ってみると言う新企画です.

僕自身,F#を始めたのが5時間ぐらい前で,XNAに関しても全くのド素人なのでむしろ教えて貰うことのほうが多いと思いますがよろしくお願いします.


では,さっそくインストールから始めます.

インストール方法はF#XNAもインストーラを実行するだけです.

F#はインストール後にPathを通しといた方が良いかも.(勝手にPath通るんだっけ?)
C:\Program Files\FSharp-2.0.0.0\binみたいなところに.


とりあえず,簡単な画面を出すだけのサンプルを作ってみましょう.

ソースはこんな感じ.


#I @"C:\Program Files\Microsoft XNA\XNA Game Studio\v3.0\References\Windows\x86";

#r "Microsoft.Xna.Framework.dll";

#r "Microsoft.Xna.Framework.Game.dll";

#light

open System;
open System.Collections.Generic;
open Microsoft.Xna.Framework;
open Microsoft.Xna.Framework.Audio;
open Microsoft.Xna.Framework.Content;
open Microsoft.Xna.Framework.Graphics;
open Microsoft.Xna.Framework.Input;
open Microsoft.Xna.Framework.Storage;

type MyGame() as x =
        inherit Game(IsMouseVisible=true,
                     IsFixedTimeStep=false)
      


        let m_graphics = new GraphicsDeviceManager(x)
       
        let mutable m_num = 0
        let mutable m_bgc = new Color(20uy, 80uy, 80uy)

        let mutable charaTexture = null
        let mutable spriteBatch = null


        do
            x.Window.Title <- "sample0"
            m_graphics.PreferredBackBufferWidth <- 640;
            m_graphics.PreferredBackBufferHeight <- 480;
       

        override x.Initialize() =
            base.Initialize()


        override x.Update gametime =
            m_num <- m_num + 1
            base.Update gametime
       



        override x.Draw gametime =
            m_graphics.GraphicsDevice.Clear(
                m_bgc
            )

     
            base.Draw gametime

   
let main() =
    let game = new MyGame()
    game.Run()


do main()




作ったら,sample.fsxみたいな名前で保存して,

fsc sample.fsx

とコマンドプロンプトから打つなりしてやれば実行ファイルを作ってくれますし,右クリックしてRun with F# Interactiveをしてやっても実行できるようです.


大体,C#でやるのと同じだと思うので,他を参考にした方が良いかも.
・・・正直,C#でもやったことのない僕が上手く説明出来るとは思えないし.

とりあえず今の進捗状況





キーボードで動画に映っている鼻くそみたいなのを動かしています.
アクションゲームっぽくなってきたかな?







にほんブログ村 IT技術ブログへ
にほんブログ村
PR
この記事にコメントする
お名前
タイトル
文字色
メールアドレス
URL
コメント
パスワード   Vodafone絵文字 i-mode絵文字 Ezweb絵文字
この記事へのトラックバック
この記事にトラックバックする:
カレンダー
08 2019/09 10
S M T W T F S
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
フリーエリア
最新CM
[12/11 Nobu]
[12/11 Kanamura]
[08/24 Nobu]
[08/24 puku]
[08/22 Nobu]
プロフィール
HN:
Nobu
年齢:
30
性別:
男性
誕生日:
1988/09/22
職業:
あれ
趣味:
妄想、自堕落
バーコード
ブログ内検索
P R
カウンター
忍者ブログ [PR]