网站 › 『编程语言区』 › 心形图案［一］

jiujiukeji 发表于 2018-8-21 10:38

心形图案［一］

本帖最后由 jiujiukeji 于 2018-8-21 10:45 编辑

<?php

$str = [".",":","-","=","+","*","#","%","@"];



//一个有3d效果的爱心
function f($x, $y, $z) {
    $a = $x * $x + 9 / 4 * $y * $y + $z * $z - 1;
    return $a * $a * $a - $x * $x * $z * $z * $z - 9 / 80 * $y * $y * $z * $z * $z;
}

function h($x, $z) {
    for ($y = 1; $y >= 0; $y -= 0.001)
      if (f($x, $y, $z) <= 0)
            return $y;
    return 0;
}

for ($z = 1.5; $z > -1.5; $z -= 0.05) {
    for ($x = -1.5; $x < 1.5; $x += 0.025) {
      $v = f($x, 0, $z);
      if ($v <= 0) {
            $y0 = h($x, $z);
            $ny = 0.01;
            $nx = h($x + $ny, $z) - $y0;
            $nz = h($x, $z + $ny) - $y0;
            $nd = 1 / sqrt($nx * $nx + $ny * $ny + $nz * $nz);
            $d = ($nx + $ny - $nz) * $nd * 0.5 + 0.5;
            echo ($str[(int) ($d * 5)]);
      } else
            echo ' ';
    }
    echo "\n";
}



保存成php文件运行，之后鼠标邮件查看源代码

效果图：

半只拖鞋 发表于 2018-8-21 10:53

能不能写个MATLAB的新型代码{:1_927:}

Kaiter_Plus 发表于 2018-8-21 10:58

大神牛逼！

pqingquan 发表于 2018-8-21 11:18

厉害厉害

vvking6 发表于 2018-8-21 11:27

vvking7 发表于 2018-8-21 11:29

jiujiukeji 发表于 2018-8-21 11:42

半只拖鞋 发表于 2018-8-21 10:53
能不能写个MATLAB的新型代码

没学过这个语言 看不懂

lz198959 发表于 2018-8-21 11:55

心形吸引力不大~弄个S型美女

insisty 发表于 2018-8-21 12:53

论坛有你更精彩！

世俗红尘 发表于 2018-8-21 13:47

不行呀 每次都打不开

查看完整版本: 心形图案［一］