成人精品一区二区久久久 I 国产美女永久无遮挡 I 中文字幕+乱码+中文字幕明步 I 国产在视频一区二区三区吞精 I 日韩精品小视频 I 成人性生交大片免费4 I 免费aaa级毛片在线视频 I 一级片毛片 I 大型成人社区 I 国模在线播放 I 欧美大荫蒂毛茸茸视频 I 偷偷色噜狠狠狠狠的777米奇 I www.久久亚洲 I 日日搞夜夜操 I 亚洲成色777777女色窝 I 毛片黄色毛片 I 午夜片在线观看 I 国产一区二区三区中文字幕 I 天天干夜夜骑 I 日韩在线视频一区二区三区 I 久久久无码精品亚洲a片0000 I 写真福利片hd在线播放 I 欧美成人一区二免费视频 I 色噜噜狠狠爱综合视频 I 中文字幕无线码免费人妻 I 国产精品久久久久久久久久不蜜臀 I 欧美综合人人做人人爱 I 1024成人网色www I 国产精品视频一二三区 I 亚洲免费美女视频

上午沒事，寫了個俄羅斯方塊程序。




  

test.zip (301 K) 下载次数:3438

因為用的是16位指令,最大列可以是(16-2)14列,當前程序用的是12列,各位可以自己改成14列,也可以用32位指令改成更多列的,改變行數(shù)就不用說了
基本圖形用的是4點的,可以換成5點的(游戲難度更高)

程序詳解
P0  7種基本圖形4個方向，7*4＝28個數(shù)據(jù)  D1000-D1027
P2  邊界檢測用數(shù)據(jù) D1100-D1128[背景圖形]
生成   110000000011
        110000000011
……
        110000000011
        111111111111
        111111111111
P1 根據(jù)D0 D1 D2生成圖形  存在D100-D103數(shù)組里
D0 1-7種基本圖形
D1 1-4種方向
D2 指定圖形所在的列
P3 碰撞檢測
    [背景圖形] + [動態(tài)圖形]     =0?   不等于0說明碰到邊界
    [當前圖形] + [動態(tài)圖形]     =0?   不等于0說明與當前圖形有干涉
    都為0 輸出M1
P4 圖形移動
    調用P1
    將D100-D103放入  [動態(tài)圖形]  中(D3指定行)
    調用P3 進行     碰撞檢測
    未碰撞更新位置  D10 D11 D12 D13
P5 消行得分
    [當前圖形]  D1200-D1231
    逐字(行)檢測  =001111111100 時 前面所有字左移一位    (下降了一行)
P6 畫面顯示
    [當前圖形]  OR  [動態(tài)圖形]  =  [顯示圖形]
    D1600是人機上的點,用作顯示
P7 隨機數(shù)產(chǎn)生圖形
    隨機產(chǎn)生 1-7  1-4 兩組數(shù)據(jù),并初始行,列  [D20,D21,D22,D23] 下次下落方塊數(shù)組
    調用P1 生成 下一個圖形    [D1632,D1633,D1634,D1635]  用于人機顯示
P8 下一個方塊下落
    將下次下落方塊數(shù)組  放入   當前方塊數(shù)組  [D10,D11,D12,D13]
    調用P1 合成圖形 用于人機顯示    

高手啊！