基於打地鼠的程序設計

㈠ 自學cocos2d js游戲開發應該按什麼步驟進行

跟你簡要說一下我的自學路，以免你走彎路

背景：
有工作，而且很忙；在不影響工作基礎上用業余時間鼓搗（經常會因為工作耽擱學習進度）；基本沒技術背景（初中qbasic、高中pascal半吊子），大學文科，工作也不是搞代碼。因此我感覺我的自學路跟你還是挺契合的。

1
兩年前的一天，決定要做獨立游戲製作人。選定引擎cocos2d，開始學習objective-c語言；（如果你打算只在iOS平台開發可以學obj-c配合cocos2d或者sprite kit；如果打算跨平台就要用cocos2d-x和c++了；當然unity什麼的也不錯但是我還沒嘗試過，一直很嚮往）

2
我跳過了iOS程序開發（似懂非懂看完了斯坦福那一系列的教學視頻），結合當時情況直接選擇了cocos2d引擎，這時開始接觸 @吳一刀 推薦的博客；我主要看的是子龍山人<子龍山人 - 博客園>、Ray Wenderlich<Ray Wenderlich>、Himi<黑米GameDev街區>這些博客里最基本的例子，知易那個以我當時的水平還看不懂。

3
嘗試開始設計自己的簡單游戲，我做打地鼠！當然比教學例子里的打地鼠復雜多了

4
這個過程中發現自己懂的實在是不夠，所以又開啃這本書：Learn cocos2d 2 by Steffen Itterheim & Andreas Low

5
慢慢的發現需要一些趁手的工具和編輯器，並發展出一套自己構建於cocos2d之上的游戲設計架構。我目前的情況是這樣：

關卡編輯我使用plist文件配合自己寫的類；

sprite sheet使用TexturePacker<TexturePacker>；

動畫/UI編輯最初自己手寫太累，後來選擇了cocosbuilder，請注意現在這個軟體已經停止維護，轉而引導用戶使用SpriteBuilder<SpriteBuilder>（域名都做了自動跳轉；SpriteBuilder我木有研究過，建議你研究一下）。

粒子編輯我自己還沒實際用到，如果真正需要我感覺cocosbuilder的夠我用的。//更新：後來用到了ParticleDesigner和cocosbuilder兩個軟體的粒子編輯混搭

我當時遇到的一個大麻煩是如何讓cocosbuilder、cocos2d版本互相兼容且cocosbuilder無問題。大概情況是這樣：cocosbuilder2.1和cocos2d-iphone2.0及2.1版本都不協調怎麼辦？；What version of Cocosbuilder and Cocos2d-iphone should I choose?

目前我使用的cocosbuilder 2.1版本（漸變層有bug、並且很可惜動畫播放完沒有觸發消息的機制，我只好把每個動畫時長都手動記錄一下自己處理）

======3月12日更新======
在 @GarfieldKwong 指點下發現這個版本動畫播放完是可以觸發消息機制的，更高級版本3.x支持的效果應該是在動畫中就加入callback的關鍵幀
新技能get√

具體代碼可見下面學習案例的第一個例子里Explosion部分
=====================

cocosbuider的學習可以看兩個例子Creating a Game with CocosBuilder；Introction to CocosBuilder；然後就是多用多嘗試。

6
整個學習過程要學會查資料、學會尋求幫助，我主要用的stackoverflow（話說剛剛發現stackoverflow的reputation喜過15，終於可以投票了:）

在學習過程中得到了子龍山人（我認為本尊是這位 @屈光輝 ）、LearnCocos2d作者Steffen、 @kubisoft 以及眾多網上朋友的幫助，再次表示感謝。

7
硬體及開發者資格：看完c++開始看obj-c，這個過程一直是使用的vmware虛擬機安裝的mac系統寫程序；然後入手一個最便宜的mac pro、以及iPhone，嘗試玩各種游戲；從看c++開始大約過了1年半（已經有非常簡陋的游戲demo）才真正購入iOS開發者資格並開始真機測試。

8
嘗試過的一些其他工具、各種彎路和坑、以及發散內容：
可以拖拽方式寫代碼的stencyl <Stencyl: Make iPhone, iPad, Android & Flash Games without code>；
最初學的不是ojc-c而是譚浩強老師的c++程序設計（雖然有人不喜譚老師，但那書是中文的讓我對面對對象程序設計有一些初步的概念，再看英文的obj-c不至於太摸不著頭腦，反正手頭正好有這么一本買了6年沒看的c++。。。）；
嘗試過<Tiled Map Editor>但自己目前的坑沒有用到；
嘗試過一點物理引擎和粒子，但自己目前的坑沒有用到；現在粒子用到了，做了火焰等效果，也挺美的；但是一定要注意CPU佔用優化，內存方面我最低支持4S沒遇到大問題

學習音樂製作，這個我小時候學琴一直也喜歡音樂所以有一點點底子，如果沒有基礎可能上手有門檻；開始用的軟體LMMS，但是音源插件在64位系統的問題我一直沒解決掉時間精力也不多，所以是暫時停滯了；最近發現Garage Band可能也可以寫歌；另外還試過一個很有歷史的微軟的音樂自動編輯器，很好玩，用來做背景音樂也不錯。

入手手繪板學畫畫（這中間糾結了好久才決定用點陣圖不用矢量圖），如果你能找到熱愛游戲的美術同學一起搞那最好不過。但是我一直對畫畫心癢難搔。。。所以入了這個深坑，曬一曬：
轉載
z

㈡ 求助，一個基於labview的打地鼠游戲設計

基於Labview的打地鼠游戲程序VI，打開可直接使用。

程序圖：

㈢ 單片機 8個LED燈隨機閃爍怎麼做

1、首先在電腦中新建項目：Keil uVision4 51單片機LED閃爍編程，如下圖所示。

㈣ 如何用VB程序設計打地鼠游戲

下面是源代碼：
Form1:
Private Sub Form_Load() Dim temp As Integer Randomize
temp = Int(Rnd * 3) + 1
Form1.Picture = LoadPicture("C:\Users\Administrator\Desktop\打地鼠\picture" & temp & ".jpg") WindowsMediaPlayer1.URL = "C:\Users\Administrator\Desktop\打地鼠\Heaven's Devils.wma" End Sub
Private Sub Label1_Click() Form2.Show Form2.num = -1 Form1.Hide
WindowsMediaPlayer1.URL = ""
Open "C:\Users\Administrator\Desktop\打地鼠\primary.dat" For Append As #1 '寫操作 Close #1
Open "C:\Users\Administrator\Desktop\打地鼠\intermediate.dat" For Append As #2 Close #2
Open "C:\Users\Administrator\Desktop\打地鼠\advanced.dat" For Append As #3 Close #3 End Sub
Private Sub Label2_Click() End End Sub
Form2:
Dim allnum As Integer, oknum As Integer '定義變化次數 打中次數 Public num As Integer '判別是否第一次開始游戲 Dim flags1 As Boolean '判別文件是否保存 Public flags As Boolean '判別是否播放聲音 Private Sub countine_Click() pause.Enabled = True Timer1.Enabled = True countine.Enabled = False WLXZ.Enabled = True End Sub
Private Sub exit_Click() Dim X As Integer Dim tt As Integer
X = MsgBox("是否真的退出？", vbYesNo, "退出遊戲框")
If X = 6 Then
tt = MsgBox("退出遊戲之前,是否保存", vbYesNo, "保存提示") If tt = 6 Then
If flags1 = True Then End Else
If Timer1.Interval = 1000 Then
Open "C:\Users\Administrator\Desktop\打地鼠\primary.dat" For Append As #1 '寫操作
Print #1, Text1.Text + " " + Format(Date, "M/d/yy") Close #1
ElseIf Timer1.Interval = 500 Then
Open "C:\Users\Administrator\Desktop\打地鼠\intermediate.dat" For Append As #2
Print #2, Text1.Text + " " + Format(Date, "M/d/yy") Close #2 Else
Open "C:\Users\Administrator\Desktop\打地鼠\advanced.dat" For Append As #3
Print #3, Text1.Text + " " + Format(Date, "M/d/yy") Close #3 End If End If End If End End If End Sub
Private Sub Form_Load() Form4.Check1.Value = 1
WindowsMediaPlayer1.Controls.stop countine.Enabled = False pause.Enabled = False WLXZ.Enabled = False
Form5.Top = Form2.Top + 700 Form5.Left = Form2.Left flags1 = False flags = True End Sub
Private Sub help_Click() Form3.Show End Sub
Private Sub new_game_Click() num = num + 1 Dim t As Integer
If (num > 0) Then
t = MsgBox("新游戲開始之前,是否保存", vbYesNo, "保存提示") If t = 6 Then
flags1 = True
If Timer1.Interval = 1000 Then
Open "C:\Users\Administrator\Desktop\打地鼠\primary.dat" For Append As #1 '寫操作
Print #1, Text1.Text + " " + Format(Date, "M/d/yy") Close #1
ElseIf Timer1.Interval = 500 Then
Open "C:\Users\Administrator\Desktop\打地鼠\intermediate.dat" For Append As #2
Print #2, Text1.Text + " " + Format(Date, "M/d/yy") Close #2 Else
Open "C:\Users\Administrator\Desktop\打地鼠\advanced.dat" For Append As #3
Print #3, Text1.Text + " " + Format(Date, "M/d/yy") Close #3 End If End If End If
Call Form_Load
allnum = 0 '變化次數初始為0 oknum = 0 '打中次數初始為0 Timer1.Enabled = True pause.Enabled = True WLXZ.Enabled = True End Sub
Private Sub options_Click() Timer1.Enabled = False Form4.Show
WLXZ.Enabled = False countine.Enabled = True End Sub
Private Sub pause_Click() Dim r, g, b As Integer Timer1.Enabled = False countine.Enabled = True pause.Enabled = False WLXZ.Enabled = False
Form5.Top = Form2.Top + 700 Form5.Left = Form2.Left Form5.Show

㈤ C語言編程打地鼠

剛寫好的，打地鼠小游戲。

功能：每三秒，會在游戲區域隨機位置刷出地鼠，滑鼠點擊地鼠，無論點中與否，地鼠都會立即刷新。

點中地鼠按你要求計分，點不中記錄失敗次數，3次失敗，游戲結束，顯示GAME OVER！

#include<stdio.h>
#include<stdlib.h>
#include<windows.h>
#include<conio.h>
#include<time.h>
#include<string.h>
#include<malloc.h>
#definegSizek30//區域大小寬度
#definegSizeg20//區域大小高度
#definegBegin3//活動區域起始行
intmain()
{
intt=0,s0,s1,i,j,count=0,fen=0,row=0,clo=0;
chargameA[gSizeg][gSizek+1],fSave[10]={0};
SetConsoleTitle("打地鼠");
HANDLEhInput=GetStdHandle(STD_INPUT_HANDLE);//獲取標准輸入設備句柄
INPUT_RECORDinRec;
DWORDres;
COORDp0;
p0.X=0;
p0.Y=0;

srand(time(0));
s0=time(NULL);
strcpy(gameA[0],"GAME");
strcpy(gameA[1],"未命中次數:0,計分:000000");
for(i=gBegin-1;i<gSizeg;i++)
{
for(j=0;j<gSizek+1;j++)
{
if(i>gBegin-1&&i<gSizeg-1&&j>0&&j<gSizek-1)
gameA[i][j]='';
else
gameA[i][j]=4;
if(j==gSizek)
gameA[i][j]=0;
}
}
for(i=0;i<gSizeg;i++)
printf("%s ",gameA[i]);

while(1)
{

if(t>=3)
{
if(row>0&&clo>0)
gameA[row][clo]='';
row=rand()%(gSizeg-1);
clo=rand()%(gSizek-1);
s0=time(NULL);
SetConsoleCursorPosition(GetStdHandle(STD_OUTPUT_HANDLE),p0);

叢蔽if(row<3)
row=4;
if(clo<1)
clo=1;
gameA[row][clo]=2;
for(i=0;i<gSizeg;i++)
{
//gameA[i][gSizeg+1]=0;
printf("%s ",gameA[i]);
}

}
if(count==3)
{
p0.X=10;
p0.Y=8;
SetConsoleCursorPosition(GetStdHandle(STD_OUTPUT_HANDLE),p0);
printf("GAMEOVER!");
break;
}
s1=time(NULL);
t=s1-s0;
滲凳州ReadConsoleInput(hInput,&inRec,1,&res);
if(inRec.EventType==MOUSE_EVENT&&inRec.Event.MouseEvent.dwButtonState==FROM_LEFT_1ST_BUTTON_PRESSED)//滑鼠左鍵
{
if(inRec.Event.MouseEvent.dwMousePosition.X==clo&&inRec.Event.MouseEvent.dwMousePosition.Y==row)
{

if(fen==0)
fen=1;
if(fen>999999)
fen=999999;
else
fen=fen*2;

粗碧sprintf(fSave,"%06d",fen);
gameA[1][18]=0;
strcat(gameA[1],fSave);
}
else
{
count++;
fen=0;
gameA[1][11]=count+'0';
}
t=4;
}
}
while(1);
return0;
}