游戲程序編譯

『壹』 給我一個用free pascal編譯的游戲程序

program xcvbn;
var
plife,plifemax,patt,pre:integer;
gr,ex,exmax:integer;
alife,alife1,aatt,are:integer;
name,fname:string;
na:text;
code,co:string;
dz:integer;
money:longint;
mp,mpmax:integer;
red,blue,knife,clothes:integer;
i:integer;
god:array[1..100] of 1..7;
godthing:integer;
procere bag;
var
obj:integer;
begin
writeln;
writeln;
writeln('百寶箱:');
writeln('1:紅色葯丸: ',red,' 2:蘭色葯丸: ',blue,' 3:神劍:',knife,' 4:防身衣:',clothes,' 5;離開');
writeln;
writeln;
writeln('請選擇:');
repeat
readln( obj);
case obj of
1:begin
if red>0 then begin
red:=red-1;
plife:=plife+40;
if plife>plifemax then plife:=plifemax;
end;
end;
2:begin
if blue>0 then begin
blue:=blue-1;
mp:=mp+40;
if mp>mpmax then mp:=mpmax;
end;
end;

3:begin
if knife>0 then begin
knife:=knife-1;
patt:=patt+15;
end;
end;
4:begin
if clothes>0 then begin
clothes:=clothes-1;
pre:=pre+15;
end;
end;
end;
writeln;
writeln;
writeln;
until obj=5;
exit;
end;

procere bagplus(sh:integer);
begin
case sh of
1:red:=red+1;
2:blue:=blue+1;
3:knife:=knife+1;
4:clothes:=clothes+1;
end;
end;

procere shop;
var
ob:integer;
begin
writeln;
writeln;
writeln('歡迎來到商店!');
writeln(' 1:紅色葯丸 2:蘭色葯丸 3:神劍 4:防身衣 5:離開');
writeln(' $15 $15 $30 $30');
writeln;
writeln('你想買什麼？');
writeln;
repeat
readln(ob);
case ob of
1:begin
if money>=15 then
begin
money:=money-15;
bagplus(1);
writeln('OK!');
writeln(' 1:紅色葯丸 2:蘭色葯丸 3:神劍 4:防身衣 5:離開');
writeln(' $15 $15 $30 $30');
writeln;
writeln('你想買什麼？');
writeln;
end
else writeln('錢不夠啊，老大！');
end;
2:begin
if money>=15 then
begin
money:=money-15;
bagplus(2);
writeln('OK!');
writeln(' 1:紅色葯丸 2:蘭色葯丸 3:神劍 4:防身衣 5:離開');
writeln(' $15 $15 $30 $30');
writeln;
writeln('你想買什麼？');
writeln;
end
else writeln('錢不夠啊，老大！');
end;

3:begin
if money>=30 then
begin
money:=money-30;
bagplus(3);
writeln('OK!');
writeln(' 1:紅色葯丸 2:蘭色葯丸 3:神劍 4:防身衣 5:離開');
writeln(' $15 $15 $30 $30');
writeln;
writeln('你想買什麼？');
writeln;
end
else writeln('錢不夠啊，老大！');
end;

4:begin
if money>=30 then
begin
money:=money-30;
bagplus(4);
writeln('OK!');
writeln(' 1:紅色葯丸 2:蘭色葯丸 3:神劍 4:防身衣 5:離開');
writeln(' $15 $15 $30 $30');
writeln;
writeln('你想買什麼？');
writeln;
end
else writeln('錢不夠啊，老大！');
end;

end;
until ob=5;
exit;
end;

procere storm;
var
ka,kp:integer;
begin
if mp>=30 then begin
writeln;
writeln;
writeln('破天一劍！！！！！！！！！！');

writeln(' 怪物生命:',alife1);
writeln('你的生命:',plife,'/',plifemax);
kp:=(random(patt)-random(are))*33; ;
if kp>0 then begin
writeln('攻擊！！怪物得到',kp,' 傷害！?！');
alife1:=alife1-kp;
end
else begin
writeln('你無法攻擊');
end;
ka:=aatt-pre+random(aatt div 4)-aatt div 2;
if ka>0 then begin
writeln('怪物攻擊！！你得到',ka,' 傷害！?！');
plife:=plife-ka;
end
else begin
writeln( ' 怪物無法攻擊');
end;
mp:=mp-30;
end
else writeln('魔力不夠！！');
end;

procere wall;
var
ka,kp:integer;
begin
if mp>=15 then begin
writeln;
writeln;
writeln('你用雷光！！！！');
writeln('怪物生命：',alife1);
writeln('你的生命:',plife,'/',plifemax);
kp:=(random(patt)-random(are))*26;
if kp>0 then begin
writeln('攻擊！！怪物得到',kp,' 傷害！?！');
alife1:=alife1-kp;
end
else begin
writeln('你輸了');
end;
ka:=aatt-pre+random(aatt div 4)-aatt div 2;
if ka>0 then begin
writeln('怪物攻擊！！你得到',ka,' 傷害！?！');
plife:=plife-ka;
end
else begin
writeln( ' 你贏了！！！！！');
end;
mp:=mp-10;
end
else writeln('生命不夠！！');
end;

procere ball;
var
ka,kp:integer;
begin
if mp>=5 then begin
writeln;
writeln;
writeln('你用粉碎神拳！！！');
writeln('怪物生命：',alife1);
writeln('你的生命:',plife,'/',plifemax);
kp:=(random(patt)-random(are))*20;
if kp>0 then begin
writeln('攻擊！！怪物得到',kp,' 傷害！?！');
alife1:=alife1-kp;
end
else begin
writeln('你輸了');
end;
ka:=aatt-pre+random(aatt div 4)-aatt div 2;
if ka>0 then begin
writeln('怪物攻擊！！你得到',ka,' 傷害！?！');
plife:=plife-ka;
end
else begin
writeln( ' 你贏了！！！！！');
end;
mp:=mp-10;
end
else writeln('生命不夠！！');
end;

procere magic;
var
ma:integer;

begin
writeln;
writeln;
writeln('1. 粉碎神拳 [5] 2. 雷光 [15] 3.破天一劍 [30]');
writeln('魔法值: ',mp,'/',mpmax);
read(ma);
case ma of
1:ball;
2:wall;
3:storm;
end;
end;

procere plusmoney;
var
money1:longint;
begin
money1:=random(alife);
writeln;
writeln;
writeln('你得到 $',money1);
money:=money1+money;
end;

procere load;
begin
close(na);
writeln;
writeln;
writeln('你的名字: ');
readln;
readln(name);
fname:=concat(name,'.txt');
assign(na,fname);
reset(na);
readln(na,code);
writeln('輸入密碼：');
readln(co);
if co<>code then
begin
writeln('密碼錯誤');
readln;
halt;
end;
readln(na,plife);
readln(na,plifemax);
readln(na,patt);
readln(na,pre);
readln(na,ex);
readln(na,exmax);
readln(na,gr);
readln(na,money);
readln(na,mp);
readln(na,mpmax);
readln(na,red);
readln(na,blue);
readln(na,knife);
readln(na,clothes);

end;

procere save;
var i:integer;
begin
close(na);
assign(na,fname);
rewrite(na);
writeln(na,code);
writeln(na,plife);
writeln(na,plifemax);
writeln(na,patt);
writeln(na,pre);
writeln(na,ex);
writeln(na,exmax);
writeln(na,gr);
writeln(na,money);
writeln(na,mp);
writeln(na,mpmax);
writeln(na,red);
writeln(na,blue);
writeln(na,knife);
writeln(na,clothes);
writeln(na,godthing);
for i:=1 to godthing do writeln(god[i]);
writeln;
writeln;
writeln('save successfully');
writeln;
writeln;
end;

procere see;var i:integer;
begin
writeln('你的名字: ',name);
writeln('你的生命: ',plife,'/',plifemax);
writeln('攻擊力: ',patt);
writeln('防禦力: ',pre);
writeln('經驗: ',ex);
writeln('升級經驗',exmax);
writeln('級數: ',gr);
writeln('鈔票:',money);
writeln('魔力: ',mp,'/',mpmax);
write('光之七神器:');for i:=1 to godthing do write(god[i],' ');
writeln;
writeln('百寶箱:');
writeln('紅色葯丸:',red);
writeln('蘭色葯丸:',blue);
writeln('神劍:' ,knife);
writeln('防身衣:',clothes);
writeln;
writeln;

end;

procere people;
begin
plife:=100;
plifemax:=100;
patt:=20;
pre:=15;
money:=100;
gr:=1;
ex:=0;
exmax:=20;
mp:=50;
mpmax:=50;
red:=5;
blue:=5;
knife:=0;
clothes:=0;
end;

procere old;
var i:integer;
begin
writeln('輸入你的名字 :');
readln;
readln(name);
fname:=concat(name,'.txt');
assign(na,fname);
reset(na);
readln(na,code);
writeln('輸入密碼：');
readln(co);
if co<>code then
begin
writeln('密碼錯誤！');
readln;
halt;
end;
readln(na,plife);
readln(na,plifemax);
readln(na,patt);
readln(na,pre);
readln(na,ex);
readln(na,exmax);
readln(na,gr);
readln(na,money);
readln(na,mp);
readln(na,mpmax);
readln(na,red);
readln(na,blue);
readln(na,knife);
readln(na,clothes);
readln(na,godthing);
for i:=1 to godthing do readln(god[i]);
end;

procere new;
var i:integer;
begin
writeln( ' 輸入你的名字: ');
readln;
readln(name);
if name<>'0' then begin
fname:=concat(name,'.txt');
assign(na,fname);
rewrite(na);
writeln('輸入密碼');
readln(code);
writeln(na,code);
people;
writeln(na,plife);
writeln(na,plifemax);
writeln(na,patt);
writeln(na,pre);
writeln(na,ex);
writeln(na,exmax);
writeln(na,gr);
writeln(na,money);
writeln(na,mp);
writeln(na,mpmax);
writeln(na,red);
writeln(na,blue);
writeln(na,knife);
writeln(na,clothes);
writeln(godthing);
for i:=1 to godthing do writeln(god[i]);
end
else halt;
end;

procere denlu;
var
dl:byte;
begin
writeln('-------------------自製的游戲不要笑----------------------');
writeln('-----------------------僅供娛樂----------------------');

writeln('1: 新游戲 2:老游戲 3:退出');
read(dl);
case dl of
1:new;
2:old;
3:halt;
end;
end;

procere godthing2;
var
qi:integer;
begin
randomize;
qi:=random(50);
case qi of
0,8:begin
writeln('得到光之七神具----1:辟天寶劍');
writeln('攻擊增加60點!!!');
patt:=patt+60;
godthing:=godthing+1;
god[godthing]:=1;
end;
3,16:begin
writeln('得到光之七神具----2:開地玄遠劍');
writeln('攻擊力*2');
patt:=patt*2;
godthing:=godthing+1;
god[godthing]:=2;
end;
end;
end;

procere grow;

begin

if ex>=exmax then begin
plife:=plifemax+50;
plifemax:=plife;
patt:=patt+15;
pre:=pre+15;
mpmax:=mpmax+30;
mp:=mpmax;
ex:=0;
gr:=gr+1;
exmax:=exmax+100;
writeln('升級!!');
godthing2;
writeln;
writeln;
end;
end;

procere experience;
begin
randomize;
ex:=ex+random(alife)+30;
grow;
end;

procere attack;
var
win,lost,run:boolean;
ch,ff,kp,ka:integer;
procere winner;
begin
win:=false;
if alife1<1 then win :=true;
end;
procere loster;
begin
lost:=false;
if plife<1 then lost:=true;
end;

begin
win:=false;
lost:=false;
run:=false;
writeln('1:攻擊; 2:逃跑');
writeln('你的生命:',plife,'/',plifemax);
writeln('你的魔法值: ',mp,'/',mpmax);
readln(ch);
if ch=1 then begin
alife1:=alife;
repeat
writeln;
writeln;
writeln('1:物理￥攻擊; 2:魔法￥攻擊; 3:用百寶箱; 4.逃跑 ');
read(ff);
case ff of
1:begin
writeln;
writeln;
writeln;
writeln;
{}
kp:=random(patt)-random(are);
if kp>0 then begin
writeln('你攻擊！！怪物受到',kp,' 傷害');
alife1:=alife1-kp;
end
else begin
writeln('你輸了');
end;
ka:=random(aatt)-random(pre);
if ka>0 then begin
writeln('怪物攻擊，你得到',ka,' 傷害');
plife:=plife-ka;
end
else begin
writeln( '怪物輸了');
end;
writeln(' 怪物生命:',alife1);
writeln('你生命:',plife,'/',plifemax);
writeln('你的魔法值: ',mp,'/',mpmax);
end;
2:begin
magic;
end;
3:begin
bag;
end;
4:begin
run:=true;
writeln('逃跑失敗');
end;
end;
winner;
loster;

until win or lost or run;
if win then begin experience; plusmoney; writeln('你贏了!!!'); writeln; end;
if lost then
begin
writeln('輸了');
readln;
halt;
end;
end
else exit;
end;

procere animal;
begin
alife:=plifemax+random(50);
if plifemax=100 then begin
aatt:=15;
are:=10;
end
else begin
aatt:=aatt+10;
are:=are+7;
end;
attack;
end;

procere meet;
var
cc:integer;
begin
randomize;
cc:=random(100);
if cc<40 then begin
writeln;
writeln('你遇見一個怪物');
animal;
end
else writeln('沒碰到.......');
end;

procere choose;

begin
writeln('1:找怪物; 2:去商店; 3:讀取; 4:保存; 5:退出 6:查看 7:用百寶箱');
read(dz);
case dz of
1:meet;
2:shop;
3:load;
4:save;
6:see;
7:bag;
end;
end;
begin
denlu;
while dz<>5 do
choose;
close(na);
end.
魔獸

『貳』 游戲編程

re more disputes to come," he added.

『叄』 游戲一般用什麼編程語言開發

一般的大型游戲開發不是單一用某一種軟體語言的問題。一個大型游戲的開發需要非常大的團隊用各種各樣的語言和工具來完成。
總結一下主要有C/C++，匯編語言，著色器語言，腳本語言，高效的開發語言C#或java。
首先一般的游戲開發架構（Windows平台）從底到頂一般是Direct X™——游戲引擎——游戲。
大型游戲開發的大部分工作其實都是在編寫游戲腳本，腳本是大型游戲得以如此高速開發和發布的主要原因。腳本化的開發讓游戲開發擺脫了硬編碼的種種弊端，讓游戲內容可以輕易的修改和調試。比如比較流行的語言。，然後編寫腳本將其組織成一個游戲，不需要什麼底層的編程語言。
Windows平台比較流行的方法是使用最新版本的Visual Studio，顯卡廠商如NVIDIA也會為VS開發一些插件來簡化顯卡編程和調試。(3)游戲程序編譯擴展閱讀：
匯編語言
為了克服機器語言難讀、難編、難記和易出錯的缺點，人們就用與代碼指令實際含義相近的英文縮寫詞、字母和數字等符號來取代指令代碼（如用ADD表示運算符號「+」的機器代碼），於是就產生了匯編語言。所以說，匯編語言是一種用助記符表示的仍然面向機器的計算機語言。匯編語言亦稱符號語言。
匯編語言由於是採用了助記符號來編寫程序，比用機器語言的二進制代碼編程要方便些，在一定程度上簡化了編程過程。匯編語言的特點是用符號代替了機器指令代碼。而且助記符與指令代碼一一對應，基本保留了機器語言的靈活性。使用匯編語言能面向機器並較好地發揮機器的特性，得到質量較高的程序。
匯編語言中由於使用了助記符號，用匯編語言編制的程序送入計算機，計算機不能象用機器語言編寫的程序一樣直接識別和執行，必須通過預先放入計算機的 「匯編程序「的加工和翻譯，才能變成能夠被計算機識別和處理的二進制代碼程序。
用匯編語言等非機器語言書寫好的符號程序稱源程序，運行時匯編程序要將源程序翻譯成目標程序。目標程序是機器語言程序，它一經被安置在內存的預定位置上，就能被計算機的CPU處理和執行。
匯編語言像機器指令一樣，是硬體操作的控制信息，因而仍然是面向機器的語言，使用起來還是比較繁瑣費時，通用性也差。匯編語言是低級語言。但是，匯編語言用來編制系統軟體和過程式控制制軟體，其目標程序佔用內存空間少，運行速度快,有著高級語言不可替代的用途。
高級語言
不論是機器語言還是匯編語言都是面向硬體的具體操作的，語言對機器的過分依賴，要求使用者必須對硬體結構及其工作原理都十分熟悉，這對非計算機專業人員是難以做到的，對於計算機的推廣應用是不利的。計算機事業的發展，促使人們去尋求一些與人類自然語言相接近且能為計算機所接受的語意確定、規則明確、自然直觀和通用易學的計算機語言。
這種與自然語言相近並為計算機所接受和執行的計算機語言稱高級語言。高級語言是面向用戶的語言。無論何種機型的計算機，只要配備上相應的高級語言的編譯或解釋程序，則用該高級語言編寫的程序就可以通用。
如今被廣泛使用的高級語言有BASIC、PASCAL、C、COBOL、FORTRAN、LOGO以及VC、VB等。這些語言都是屬於系統軟體。
計算機並不能直接地接受和執行用高級語言編寫的源程序，源程序在輸入計算機時，通過「翻譯程序」翻譯成機器語言形式的目標程序，計算機才能識別和執行。這種「翻譯」通常有兩種方式，即編譯方式和解釋方式。
編譯方式是：事先編好一個稱為編譯程序的機器語言程序，作為系統軟體存放在計算機內，當用戶由高級語言編寫的源程序輸入計算機後，編譯程序便把源程序整個地翻譯成用機器語言表示的與之等價的目標程序，然後計算機再執行該目標程序，以完成源程序要處理的運算並取得結果。解釋方式是：源程序進入計算機時，解釋程序邊掃描邊解釋作逐句輸入逐句翻譯，計算機一句句執行，並不產生目標程序。
PASCAL、 FORTRAN、COBOL等高級語言執行編譯方式；BASIC語言則以執行解釋方式為主；而PASCAL、C語言是能書寫編譯程序的高級程序設計語言。每一種高級（程序設計）語言，都有自己人為規定的專用符號、英文單詞、語法規則和語句結構（書寫格式）。高級語言與自然語言（英語）更接近，而與硬體功能相分離（徹底脫離了具體的指令系統），便於廣大用戶掌握和使用。高級語言的通用性強，兼容性好，便於移植

『肆』 知道游戲的源代碼，怎麼通過c++編譯，最終變成可以運行的exe格式

你去下載個Microsoft Visual_Studio_6.0 來裝上.
對了建個項目. 把代碼復制進去生成一遍.
.EXE文件就在根目錄下.
我沒搞過C++ 想到原理應該是一樣的.
只是建議下.你去試下. 行再給我分吧 呵呵
我現在機子上沒裝那工具. 具體也記不得了.

『伍』 易語言怎麼編譯游戲

碰到我是你的運氣~~~網路知道里很少人問關於Game Maker的問題的（答的人自然也少）。

英文版里，當游袱川遞沸郛度店砂錠棘戲做完之後，選擇File -> Executable，在出現的框中輸入游戲名稱即可。

如果你用的是中文版，大概位置是「保存」的下面，「發布」的上面。

『陸』 主機游戲與手機游戲在程序編譯方面有什麼區別

首先他們的處理能力就不一樣，電腦的處理能力更高速，啊，手機處理的速度更慢，所以游戲編程方面處理速度不一樣。就處理能力和性能而言，他可以高速發送和接收數字數據。

『柒』 Game Maker 怎麼把做好的游戲編譯

碰到我是你的運氣~~~網路知道里很少人問關於Game Maker的問題的（答的人自然也少）。

英文版里，當游戲做完之後，選擇File -> Executable，在出現的框中輸入游戲名稱即可。

如果你用的是中文版，大概位置是「保存」的下面，「發布」的上面。

『捌』 如何編程一個最簡單游戲代碼

利用隨機數猜大小，內容如下：

1、代碼的第一行，是一個include語句。沒有它我們的程序會編譯不過。有了它就是告訴編譯器在對代碼進行編譯之前，必須要包含程序需要的文件。這里的stdio.h就是我們需要的頭文件。

2、代碼第二行是一個main函數，這個main函數的返回值是一個int整型數據。剛開始學習編程的時候我們可以認為程序運行的時候是從main函數開始的。後續會專門給大家做一個介紹向大家說明在main函數之前還做了哪些事情。

3、每個函數都用一對「｛}」進行包含，表示著函數體的開始和結束，當然後面說到控制語句的時候它還表示一段控制語句的開始和結束。

4、main函數中調用了一個printf函數。它是用來向控制台輸出我們想要的內容。printf的函數定位格式為：int printf(constchar*format,...)。format中定義了輸出內容和格式。

5、return函數執行完後。在退出函數體之前，會將函數進行返回。return後的內容根據函數返回值定義而定。在本段程序中返回的是整型數據0。

『玖』 電腦游戲程序的編譯需要哪些技能

當然需要熟練掌握一門語言,當然,這門語言是什麼無所謂,比如C,C++,VB,JAVA,都可以

學會了語言,不代表就能寫游戲了,更多的還要看你的程序思想,程序靠的是思想,寫俄羅斯方塊用的函數同樣寫CS也許也會用到,就看你的策劃,組織能力如何了
而程序的思想必須在實踐中慢慢獲得,這是沒有捷徑的.

看別人的代碼也是獲取思想的好辦法,別人的代碼中有很多值得你學習的精華
建議多閱讀別人的代碼

好了,祝你成功哦!

『拾』 如何編輯一個游戲的exe文件

如何編輯成一個可以直接運行的exe文件
如何編輯成一個可以直接運行的exe文件？
運行vb.net開發的程序要安裝.net framework
運行java開發的要有JDK
如何讓生成的exe文件直接在另外的機器上運行而不要再安裝其他東西呢？
就像現在電腦里安裝的程序都不需要再安裝.net framework 之類的就能運
java應用程序的class是中間代碼，不能直接運行，需要jre來解釋執行，同時，jre中包含很多java應用程序所依賴的基本功能的class和解釋執行這些class需要的與系統平台相關的真正本地可執行代碼，所以，java的class離不開jre。
類似地：.net應用程序的那些(部分或全部）貌似exe和dll的文件，也都是中間代碼，不能直接運行，需要.net framework來解釋執行，同時，.net framework中包含很多.net應用程序所依賴的基本功能的.net中間代碼和解釋執行這些中間代碼需要的與系統平台相關的真正本地可執行代碼，所以，.net應用程序離不開.net framework。
之所以不需要再安裝.net framework和jre是因為操作系統中已經安裝了合適的.net framework和jre。如果沒有安裝或安裝的版本不適合，同樣不能運行或是運行會出錯。
.net framework是ms windows家族的一員，和windows是血脈相連，必須通過安裝進行大量的注冊、關聯、配置等等處理才能使用，所以，要麼事先安裝要麼在你的.net應用程序的安裝程序中自動安裝，總之要安裝。
jre和操作系統的關系沒有.net那樣復雜，既可以通過安裝成為公用的jre，也可以不用安裝而作為私有的jre隨java程序一起發布。

java應用程序的class是中間代碼，不能直接運行，需要jre來解釋執行，同時，jre中包含很多java應用程序所依賴的基本功能的class和解釋執行這些class需要的與系統平台相關的真正本地可執行代碼，所以，java的class離不開jre。類似地：.net應用程序的那些(部分或全部）貌似exe和dll的文件，也都是中間代碼，不能直接運行，需要.net framework來解釋執行，同時，.net framework中包含很多.net應用程序所依賴的基本功能的.net中間代碼和解釋執行這些中間代碼需要的與系統平台相關的真正本地可執行代碼，所以，.net應用程序離不開.net framework。之所以不需要再安裝.net framework和jre是因為操作系統中已經安裝了合適的.net framework和jre。如果沒有安裝或安裝的版本不適合，同樣不能運行或是運行會出錯。.net framework是ms windows家族的一員，和windows是血脈相連，必須通過安裝進行大量的注冊、關聯、配置等等處理才能使用，所以，要麼事先安裝要麼在你的.net應用程序的安裝程序中自動安裝，總之要安裝。jre和操作系統的關系沒有.net那樣復雜，既可以通過安裝成為公用的jre，也可以不用安裝而作為私