Board logo

标题: [转载代码] [开源软件]字符串水族馆:ASCIIquarium [打印本页]

作者: 523066680    时间: 2018-12-10 17:58     标题: [开源软件]字符串水族馆:ASCIIquarium

本帖最后由 523066680 于 2018-12-10 18:00 编辑

首页:https://robobunny.com/projects/asciiquarium/html/
下载:http://freshmeat.sourceforge.net/projects/asciiquarium

转一部分源码,纯粹觉得好奇…… 原来真的是码出来的。
  1. sub add_shark {
  2. my ($old_ent, $anim) = @_;
  3. my @shark_image = (
  4. q#
  5.                               __
  6.                              ( `\
  7.   ,??????????????????????????)   `\
  8. ;' `.????????????????????????(     `\__
  9. ;   `.?????????????__..---''          `~~~~-._
  10.   `.   `.____...--''                       (b  `--._
  11.     >                     _.-'      .((      ._     )
  12.   .`.-`--...__         .-'     -.___.....-(|/|/|/|/'
  13. ;.'?????????`. ...----`.___.',,,_______......---'
  14. '???????????'-'
  15. #,
  16. q#
  17.                      __
  18.                     /' )
  19.                   /'   (??????????????????????????,
  20.               __/'     )????????????????????????.' `;
  21.       _.-~~~~'          ``---..__?????????????.'   ;
  22. _.--'  b)                       ``--...____.'   .'
  23. (     _.      )).      `-._                     <
  24. `\|\|\|\|)-.....___.-     `-.         __...--'-.'.
  25.    `---......_______,,,`.___.'----... .'?????????`.;
  26.                                      `-`???????????`
  27. #,
  28.   );
复制代码
  1. sub add_big_fish {
  2. my ($old_ent, $anim) = @_;
  3. my @big_fish_image = (
  4. q{
  5. ______
  6. `""-.  `````-----.....__
  7.      `.  .      .       `-.
  8.        :     .     .       `.
  9. ,     :   .    .          _ :
  10. : `.   :                  (@) `._
  11. `. `..'     .     =`-.       .__)
  12.    ;     .        =  ~  :     .-"
  13. .' .'`.   .    .  =.-'  `._ .'
  14. : .'   :               .   .'
  15. '   .'  .    .     .   .-'
  16.    .'____....----''.'=.'
  17.    ""             .'.'
  18.                ''"'`
  19. },q{
  20.                            ______
  21.           __.....-----'''''  .-""'
  22.        .-'       .      .  .'
  23.      .'       .     .     :
  24.     : _          .    .   :     ,
  25. _.' (@)                  :   .' :
  26. (__.       .-'=     .     `..' .'
  27. "-.     :  ~  =        .     ;
  28.    `. _.'  `-.=  .    .   .'`. `.
  29.      `.   .               :   `. :
  30.        `-.   .     .    .  `.   `
  31.           `.=`.``----....____`.
  32.             `.`.             ""
  33.               '`"``
  34. });
复制代码
  1. q{
  2.        \:.
  3. \;,   ,;\\\\\,,
  4.   \\\\\;;:::::::o
  5.   ///;;::::::::<
  6. /;` ``/////``
  7. },
  8. q{
  9.        222
  10. 666   1122211
  11.   6661111111114
  12.   66611111111115
  13. 666 113333311
  14. },
  15. q{
  16.       .:/
  17.    ,,///;,   ,;/
  18. o:::::::;;///
  19. >::::::::;;\\\\\
  20.   ''\\\\\\\\\'' ';\
  21. },
  22. q{
  23.       222
  24.    1122211   666
  25. 4111111111666
  26. 51111111111666
  27.   113333311 666
  28. },
  29. q{
  30.   __
  31. ><_'>
  32.    '
  33. },
  34. q{
  35.   11
  36. 61145
  37.    3
  38. },
  39. q{
  40. __
  41. <'_><
  42. `
  43. },
  44. q{
  45. 11
  46. 54116
  47. 3
  48. },
  49. q{
  50.    ..\,
  51. >='   ('>
  52.   '''/''
  53. },
  54. q{
  55.    1121
  56. 661   745
  57.   111311
  58. },
  59. q{
  60.   ,/..
  61. <')   `=<
  62. ``\```
  63. },
  64. q{
  65.   1211
  66. 547   166
  67. 113111
  68. },
  69. q{
  70.    \
  71.   / \
  72. >=_('>
  73.   \_/
  74.    /
  75. },
  76. q{
  77.    2
  78.   1 1
  79. 661745
  80.   111
  81.    3
  82. },
  83. q{
  84.   /
  85. / \
  86. <')_=<
  87. \_/
  88.   \
  89. },
复制代码

作者: 523066680    时间: 2018-12-10 18:37

windows版字符图屏保(scr文件)
https://pan.baidu.com/s/1clSW09AS2rvdUz4NfwQ6Aw




欢迎光临 批处理之家 (http://bbs.bathome.net/) Powered by Discuz! 7.2