| 送交者: 桂花酒[♂★★★和气生财★★★♂] 于 2018-11-24 13:53 已读 4716 次 1 赞 | 桂花酒的个人频道 |
人工智能艺术 6park.com
我相信最终人工智能会有我们目前不知的灵魂和情感，于是也可以与艺术家们百家争鸣，但是现在硬件水平不行。 6park.com
然而，有了足够数据和必要的算法，以目前的硬件水平和写码能力，完全可以模仿艺术家的风格，诗词歌赋，风花雪月，，，，，甚至炒股，打麻将，玩Poker，，，，，，忙于赚钱的朋友，也可以思考赚钱艺术化，比如对已经存在的送餐洗碗机器人提出改进思想或者创新，当然，您不必劳神写码，勿需跟码农和IT民工争食。 6park.com
我有一位老师是Poker业余高手，可惜我从来没有玩过Poker，理解不多，只写了一步就没有时间了。这玩意事关Games with incomplete information和数百万美金的奖金，估计打败围棋冠军的人工智能团队也在搞。但是我已经写码 Back Testing 证明，完全对冲可以做到炒股永不输钱。 6park.com
下面是 Robot for poetry 诗歌机器人， 没时间的朋友不必看。 6park.com
许多诗人和文科生没有闲工夫写码，可能误认为写程序非码农莫能。其实， 6park.com
诗歌机器人的制造，必须由诗人或者文科生主持大业，广大专业和业余诗歌爱好者大量的码字，并没有职业码农多少事。 6park.com下面是Robot for poetry写的诗歌， 因为我只是一个业余诗歌爱好者，自然编的程序写不出有创意的好诗，只是模仿而已。 6park.com
但是，这4首诗歌都是原创。 6park.com1. 去年今日留园中， 6park.com
小散AI相映红。 6park.com 小散不知何处去， 6park.com AI依旧笑股市。 6park.com2. 蓝天给了我 6park.com
蓝色的幽梦， 6park.com 我却用它 6park.com 寻找前程 6park.com3. 明年游全球， 6park.com
提前报夫知 6park.com 钱须连夜赚， 6park.com 莫待口袋空。 6park.com4. 我如果爱你—— 6park.com
绝不像冷淡的月光， 6park.com 不照你的夜路 6park.com 却照沟渠。 6park.com我居住地的宪法 art 5 absatz 3 grundgesetz 给与了艺术自由，所以可以给出我的一个模仿知名诗人的风格写中文诗歌的源码框架。一方面说明，人工智能艺术 So Easy，文廊大杂博伦军情的才子佳人都可以参与。二是希望，各位码农和IT民工们，给出批评指教或者更好的源码框架。 6park.com
这里桂花酒示范一下Robot for poetry源码大致结构，目的是说明诗歌机器人程序不难，但是特麻烦。 6park.com
//+------------------------------------------------------------------+ 6park.com //| Robot for poetry | 6park.com //| Copyright 2018, 广大专业和业余诗歌爱好者 和码农 | 6park.com //| | 6park.com //+-----------------------------------------------------------------+ 6park.com #property copyright "Copyright 2018, 广大专业和业余诗歌爱好者 和码农" 6park.com #property link "http://www." 6park.com #property version "1.00" 6park.comInput int Choice = 18572; //18572=访崔护12 由子窗口根据选择模仿诗人的诗歌产生 6park.com
Input string 门中A[]; //一维字符串数组，例如，其中门中A[9] = "留园"; 6park.comInput string 人面A[] //一维字符串数组，例如，其中人面A[6] = "小散"; 6park.comInput string 桃花A[] //一维字符串数组，例如，其中桃花A[3] = "AI"; 6park.comInput string 春风A[] //一维字符串数组，例如，其中春风A[5] = "股市"; 6park.com .......... 6park.com .......... 6park.com //+------------------------------------------------------------------+ 6park.com //| Expert initialization function | 6park.com //+------------------------------------------------------------------+ 6park.com int OnInit() 6park.com { 6park.com //--- 6park.com //子窗口根据选择模仿诗人的诗歌产生int Choice， 比如 Choice = 18572 调用 子程序 访崔护12 6park.com //--- 6park.com return(INIT_SUCCEEDED); 6park.com } 6park.com //+------------------------------------------------------------------+ 6park.com //| Expert deinitialization function | 6park.com //+------------------------------------------------------------------+ 6park.com void OnDeinit(const int reason) 6park.com { 6park.com //--- 6park.com 6park.com } 6park.com //+------------------------------------------------------------------+ 6park.com //| 主程序 | 6park.com //+------------------------------------------------------------------+ 6park.comvoid 6park.com{ 6park.com //--- 6park.com Switch(Choice) 6park.com ......... 6park.com case 18572: 6park.com for(int i:=1; i评分完成：已经给 桂花酒 加上 100 银元！
请点这里投票，“赞”助支持！