PHP版消灭星星实现算法

author: ericniu<[email protected]>

<?php
/* 打印星盘
 *
 * stars: 1:赤 2:橙 3:红 4:绿 5:青 6:蓝 7:紫
 */
function show_stars($stars, $star_h, $star_w) {
    
    for ($i = 0; $i < $star_h; $i++) {
        for ($j = 0; $j < $star_w; $j++) {
            echo $stars[$i][$j] . " ";
        }
        echo "\r\n";
    }
    echo "\n\n";
}

/* 星星生成
 *
 * stars: 1:赤 2:橙 3:红 4:绿 5:青 6:蓝 7:紫
 */
function star_init($stars = array(1, 2, 3, 4, 5), $star_h = 20, $star_w = 20) {
    $ret = array();
    
    for ($i = 0; $i < $star_h; $i++) {
        for ($j = 0; $j < $star_w; $j++) {
            $ret[$i][$j] = rand(1, count($stars));
        }
    }
    
    return $ret;
}
/**
 * 获取可以消除的星星
 */
function star_destroy(&$stars_des, $stars, $star_h, $star_w, $x, $y) {
    if($x - 1 >= 0 && $stars[$x - 1][$y] == $stars[$x][$y]) { //(x,y)左方是否有同色的
        
        $t = $x - 1;
        $k = "{$t}_{$y}";
        if (!isset($stars_des[$k])) {
            $stars_des[$k] = 1;
            star_destroy($stars_des, $stars, $star_h, $star_w, $t, $y);
        }
        
    }
    if ($y + 1 < $star_w && $stars[$x][$y + 1] == $stars[$x][$y]) { //(x,y)下方是否有同色的
        
        $t = $y + 1;
        $k = "{$x}_{$t}";
        if (!isset($stars_des[$k])) {
            $stars_des[$k] = 1;
            star_destroy($stars_des, $stars, $star_h, $star_w, $x, $t);
        }
        
    }
    if ($x + 1 < $star_h && $stars[$x + 1][$y] == $stars[$x][$y]) { //(x,y)右方是否有同色的
        
        $t = $x + 1;
        $k = "{$t}_{$y}";
        if (!isset($stars_des[$k])) {
            $stars_des[$k] = 1;
            star_destroy($stars_des, $stars, $star_h, $star_w, $t, $y);
        }
        
    }
    if ($y - 1 >= 0 && $stars[$x][$y - 1] == $stars[$x][$y]) { //(x,y)右方是否有同色的
        
        $t = $y - 1;
        $k = "{$x}_{$t}";
        if (!isset($stars_des[$k])) {
            $stars_des[$k] = 1;
            star_destroy($stars_des, $stars, $star_h, $star_w, $x, $t);
        }
        
    }
}

/**
 * 消除星星
 */
function star_result(&$stars, $star_h, $star_w, $stars_des) {
    if(count($stars_des) <= 1) {
        return false;
    }
    foreach ($stars_des as $k => $v) {
        $t = explode('_', $k);
        $x = $t[0];
        $y = $t[1];
        $stars[$x][$y] = 0;
    }
    
    for ($y = 0; $y < $star_h; $y++) {
        while(true) {
            for($xx = $star_w - 1; $xx >= 0 && $stars[$xx][$y] > 0; $xx--);
            if($xx < 0) { break; }
            
            for($i = $xx - 1; $i >= 0 && $stars[$i][$y] == 0; $i--);
            if($i < 0) { break; }

            $stars[$xx][$y] = $stars[$i][$y];
            $stars[$i][$y] = 0;
        }

    }
    return true;
}

$star_h = 10;
$star_w = 10;
$stars = star_init(array(1, 2, 3,), $star_h, $star_w);
show_stars($stars, $star_h, $star_w);
$score = 0;
while(true) {
    echo "score: " . $score . "\n";
    echo "row[0-9]:";
    $x = intval(fgets(STDIN));

    echo "col[0-9]:";
    $y = intval(fgets(STDIN));

    $stars_des = array();
    $k = "{$x}_{$y}";
    $stars_des[$k] = 1;

    star_destroy($stars_des, $stars, $star_h, $star_w, $x, $y);
    
    star_result($stars, $star_h, $star_w, $stars_des);
    show_stars($stars, $star_h, $star_w);
    count($stars_des) > 1 && $score += count($stars_des) * count($stars_des) * 5;
}