度量快速开发平台-专业、快速的软件定制快开平台

标题: 感受sql语句的魅力 [打印本页]
作者: 张兴康    时间: 2020-5-1 16:07
标题: 感受sql语句的魅力

  1. <blockquote>--打印五角星
复制代码
效果图：


再来一个：
  1. --打印出奥运五环
  2. with a as
  3. (select distinct round(a.x + b.x) x, round(a.y + b.y) y
  4.     from (select (sum(x) over(order by n)) x,
  5.                  round(sum(y) over(order by n)) y
  6.             from (select n,
  7.                          cos(n / 30 * 3.1415926) * 2 x,
  8.                          sin(n / 30 * 3.1415926) y
  9.                     from (select rownum - 1 n
  10.                             from all_objects
  11.                            where rownum <= 30 + 30))) a,
  12.          (select n,
  13.                  (sum(x) over(order by n)) x,
  14.                  round(sum(y) over(order by n)) y
  15.             from (select n,
  16.                          cos(m / 3 * 3.1415926) * 2 * 15 x,
  17.                          sin(m / 3 * 3.1415926) * 15 y
  18.                     from (select case
  19.                                    when rownum <= 2 then
  20.                                     3
  21.                                    when rownum = 3 then
  22.                                     -2
  23.                                    else
  24.                                     -6
  25.                                  end m,
  26.                                  rownum - 1 n
  27.                             from all_objects
  28.                            where rownum <= 5))) b)
  29. select replace(sys_connect_by_path(point, '/'), '/', null) star
  30.   from (select b.y, b.x, decode(a.x, null, ' ', '*') point
  31.           from a,
  32.                (select *
  33.                   from (select rownum - 1 + (select min(x) from a) x
  34.                           from all_objects
  35.                          where rownum <= (select max(x) - min(x) + 1 from a)),
  36.                        (select rownum - 1 + (select min(y) from a) y
  37.                           from all_objects
  38.                          where rownum <= (select max(y) - min(y) + 1 from a))) b
  39.          where a.x(+) = b.x
  40.            and a.y(+) = b.y)
  41. where x = (select max(x) from a)
  42. start with x = (select min(x) from a)
  43. connect by y = prior y
  44.        and x = prior x + 1;
复制代码
效果图：



作者: 张兴康    时间: 2020-5-1 16:10
打印五角星的代码好像看不到，重新发过：
  1. with a as
  2. (select distinct round(sum(x) over(order by n)) x,
  3.                   round(sum(y) over(order by n)) y
  4.     from (select n,
  5.                  cos(trunc(n / 20) * (1 - 1 / 5) * 3.1415926) * 2 x,
  6.                  sin(trunc(n / 20) * (1 - 1 / 5) * 3.1415926) y
  7.             from (select rownum - 1 n from all_objects where rownum <= 20 * 5)))
  8. select replace(sys_connect_by_path(point, '/'), '/', null) star
  9.   from (select b.y, b.x, decode(a.x, null, ' ', '*') point
  10.           from a,
  11.                (select *
  12.                   from (select rownum - 1 + (select min(x) from a) x
  13.                           from all_objects
  14.                          where rownum <= (select max(x) - min(x) + 1 from a)),
  15.                        (select rownum - 1 + (select min(y) from a) y
  16.                           from all_objects
  17.                          where rownum <= (select max(y) - min(y) + 1 from a))) b
  18.          where a.x(+) = b.x
  19.            and a.y(+) = b.y)
  20. where x = (select max(x) from a)
  21. start with x = (select min(x) from a)
  22. connect by y = prior y
  23.        and x = prior x + 1;
复制代码


作者: 万望    时间: 2020-5-1 17:11
(*@ο@*) 哇～这个有点复杂啊，我来拆了慢慢看
作者: 王爱东    时间: 2020-5-1 18:29
不错不错，这个sql魅力大。
作者: 张军勇    时间: 2020-5-2 08:49
有点意思。
作者: 陈晓龙    时间: 2020-5-2 14:17
朕试了，确实很屌！
作者: 张兴康    时间: 2020-5-2 16:00
陈晓龙 发表于 2015-12-2 14:17
朕试了，确实很屌！


作者: 陈晓龙    时间: 2020-5-2 18:00
张兴康 发表于 2015-12-2 16:00

写这个的娃儿，智商肯定黑高！
作者: 张兴康    时间: 2020-5-3 15:05
陈晓龙 发表于 2015-12-2 18:00
写这个的娃儿，智商肯定黑高！

属于需要我们膜拜的大神



欢迎光临 度量快速开发平台-专业、快速的软件定制快开平台 (http://plat.delit.cn/) Powered by Discuz! X3.2