2011年7月31日 星期日

Coding4Fun Toolkit for WP7

銀光的控制項,先筆記一下



http://www.windowsphonegeek.com/articles/Coding4Fun-Toolkit-for-WP7-Overview-and-Getting-Started

2011年7月28日 星期四

[範例]投石車大戰 - 2D物理遊戲


這是微軟官方的XNA遊戲範例, 用C#寫的

內容蠻深的, 要有OO(物件導向的基礎)

希望我能把它消化, 用VB.net重寫一次


http://msdn.microsoft.com/zh-tw/windowsphone/gg508810.aspx

2011年7月25日 星期一

Creating Code Snippets

How to: Create a Basic Code Snippet
Describes how to create a simple code snippet.

How to: Create a New Snippet with Imports and References
Explains how to add Imports and References elements to Visual Basic code snippets.

How to: Create a New Snippet with Replacements
Explains how to add customizable literals and objects to code snippets.

How to: Create Code Snippets for XML Files
Explains how to create a code snippet for XML files.

How to: Assign a Shortcut Name to a Snippet
Explains how to assign a shortcut name to a snippet.

How to: Publish Code Snippets
Explains the process for packaging and deploying code snippets.

Code Snippet Functions
Describes how to use the functions specified in the Function Element (IntelliSense Code Snippets) element of a code snippet.

參考網站
http://msdn.microsoft.com/en-us/library/ms165393.aspx

2011年7月24日 星期日

我的第一支遊戲

第一支遊戲終於完成

雖然是一個簡單的翻紙牌遊戲,不過總算是跨出第一步了


2011年7月20日 星期三

[XNA]處理按下後程序


//Update Field
If 按下旗標 Then
//Do something
按下旗標 = False
Else
If 按下 Then
按下旗標 = True
End If
End If

時間延遲


//Class field
Dim timer As TimeSpan = New TimeSpan(0, 0, 0)

//In your Update method
timer = timer + gameTime.ElapsedGameTime

If timer > TimeSpan.FromSeconds(5) Then
// 5 seconds have elapsed handle what you wanted to do
End If

2011年7月19日 星期二

亂數決定圖片位置



按下開始後圖片位置會隨機改變

接下來就要來寫翻開紙牌的程式了



2011年7月17日 星期日

取8個亂數不重複

遊戲程式常常需要取亂數

以下是取8個亂數不重複


Dim arr(7) As Integer
Dim temp As Integer
Dim rnd As New Random
Dim i As Integer

For i = 0 To 7
temp = rnd.Next(1, 9)

While System.Array.IndexOf(arr, temp) <> -1
temp = rnd.Next(1, 9)
End While

arr(i) = temp
Next i

2011年7月16日 星期六

TAP Handling in XNA



我的第一支程式

在螢幕中央顯示一行中文字,點一下文字變紅色,點在文字外變黑色




If gestureSample.GestureType = GestureType.Tap Then
Dim touchPosition As Vector2 = gestureSample.Position

If touchPosition.X >= textPosition.X And touchPosition.X <= textPosition.X + textSize.X _
And touchPosition.Y >= textPosition.Y And touchPosition.Y <= textPosition.Y + textSize.Y Then

textColor = Color.Red
Else
textColor = Color.Black
End If
End If

建立專屬google+的簡短網址



我的google+專屬網址
http://gplus.to/pochao

測試程式碼顏色


#include
void main()
{
int a=10, b=20;
printf("%d",a+b);
}