自动诗人------>一个自动写"诗"的软件

made by lyx(微笙计协)

即使是猴子,只要在打字机上不停敲键盘,它迟早能打出一本莎士比亚全集. ----猴子定理

~~lyx(划掉)~~计算机当然也可以. ----added by Beautyyu言醴

浣溪纱

#include <bits/stdc++.h>
using namespace std;
string
zzp[200] ={"翠叶残","上玉钩","挂玉钩","过橘洲","庭院虚","","","","","","","","","","","","",""},
zpp[200] ={"度春风","绿波间","忆潇湘","玉笙寒","倚阑干","思悠悠","锁重楼","雨中愁","接天流","恨春残","画堂前","凭朱栏","锦衾寒","入长安","满重湖","不可遮","已无花","鬓先华","楚天长","是归家"},
pzz[200] ={"何限恨","云外信","春色暮","流水淡","闲院宇","晴日暖","香烬落","花淡薄","罗幌卷","","","","","","","",""},
zpz[200] ={"共憔悴","君莫怪","窗外雨","映枝转","","","","","","","","","","","","","",""},
zz[500] ={"菡萏","细雨","照壁","指点","东风","翠叶","暗想","咫尺","旧书","夜夜",""},
pp[140] ={"相思","伤心","山河","姑苏","倾城","韶光","阑干","悠悠","悠悠","芭蕉","征鸿","天涯","今朝","珠帘"},
pz[100] ={"明月","携手","凝睇","回首","青鸟","流水","千载","菱蔓","画堂","青嶂"},
zp[800] ={"玉笙","泪珠","绿波","江山","宫殿","藕花","莲叶","几时"};
set<string> if_use;
string rand_(string *t){
        int k,cnt = 0;
        while(t[cnt] != "") ++cnt;
        do{
                k = rand() % cnt;
        }while(if_use.count(t[k]));
        if_use.insert(t[k]);
        int a = 0,b = 10000000;
        while (b--){
                ++ a;
        }
        return t[k];
}

int main() {
        srand(time(NULL));
        cout << "摊破·浣溪沙" <<endl<<endl;
                cout<<rand_(zz)<<rand_(pp)<<rand_(zzp)<<",";
                cout <<rand_(pp)<<rand_(pz)<<rand_(zpp)<<"。"<<endl;
                cout<<rand_(pz)<<rand_(pp)<<rand_(zpz)<<"，";
                cout<<rand_(zpp)<<"。"<<endl;
                //----------------
                cout<<rand_(zz)<<rand_(pp)<<rand_(zzp)<<",";
                cout <<rand_(pp)<<rand_(pz)<<rand_(zpp)<<"。"<<endl;
                cout<<rand_(pz)<<rand_(zp)<<rand_(pzz)<<"，";
                cout<<rand_(zpp)<<"。"<<endl;
}