|
发表于 2017-3-20 19:18:12
|
显示全部楼层
四川省泸州市
呵呵,
.版本 2
.支持库 EdirectX
.子程序 loadg
' TransColor = 取颜色值 (9 × 16 + 9, 255, 255)
TransColor = 取颜色值 (153, 254, 254)
' for (t=0;t<161;t++){
' for (tt=0;tt<8;tt++){
' grap[t][tt]=0;
' }}
' ma-=100; mb==5000;
' end();
' 读入画面
' 设置透明色
' Player
mgrap [1].建位图页面 (屏幕, 取运行目录 () + “\res\player.bmp”, )
mgrap [2].建位图页面 (屏幕, 取运行目录 () + “\res\brock.bmp”, )
mgrap [3].建位图页面 (屏幕, 取运行目录 () + “\res\item.bmp”, )
mgrap [4].建位图页面 (屏幕, 取运行目录 () + “\res\teki.bmp”, )
mgrap [5].建位图页面 (屏幕, 取运行目录 () + “\res\haikei.bmp”, )
mgrap [6].建位图页面 (屏幕, 取运行目录 () + “\res\brock2.bmp”, )
mgrap [7].建位图页面 (屏幕, 取运行目录 () + “\res\omake.bmp”, )
mgrap [8].建位图页面 (屏幕, 取运行目录 () + “\res\omake2.bmp”, )
mgrap [31].建位图页面 (屏幕, 取运行目录 () + “\res\syobon3.bmp”, )
.计次循环首 (51, t)
mgrap [t].置关键色 (TransColor)
.计次循环尾 ()
' 读入Player
grap [41] [1] = DerivationGraph (0, 0, 30, 36, mgrap [1])
grap [1] [1] = DerivationGraph (31 × 4, 0, 30, 36, mgrap [1])
grap [2] [1] = DerivationGraph (31 × 1, 0, 30, 36, mgrap [1])
grap [3] [1] = DerivationGraph (31 × 2, 0, 30, 36, mgrap [1])
grap [4] [1] = DerivationGraph (31 × 3, 0, 30, 36, mgrap [1])
grap [42] [1] = DerivationGraph (50, 0, 51, 73, mgrap [7])
' 读入ブロック
x1 = 2
.计次循环首 (7, t)
grap [t] [x1] = DerivationGraph (33 × (t - 1), 0, 30, 30, mgrap [x1])
grap [t + 30] [x1] = DerivationGraph (33 × (t - 1), 33, 30, 30, mgrap [x1])
grap [t + 60] [x1] = DerivationGraph (33 × (t - 1), 66, 30, 30, mgrap [x1])
.计次循环尾 ()
grap [9] [x1] = DerivationGraph (33 × 7, 0, 30, 30, mgrap [x1])
grap [17] [x1] = DerivationGraph (33 × 6, 0, 24, 27, mgrap [3])
grap [11] [x1] = DerivationGraph (33 × 9, 0, 30, 30, mgrap [x1])
grap [41] [x1] = DerivationGraph (33 × 9, 33, 30, 30, mgrap [x1])
grap [71] [x1] = DerivationGraph (33 × 9, 66, 30, 30, mgrap [x1])
这是一部分,整个游戏全靠这样做出来,你懂么?连小白都不算的,基础都不会的就想弄?单纯的计算问题
最看不惯有些人连毛都不懂还想怎么怎么 |
|