## ä»‹ç» å‘¨æ˜“è§£æžå’Œè§„范输出,输出两个数å—(下å¦å’Œä¸Šå¦ï¼‰å¯¹åº”解æžåˆ°å‘¨æ˜“ä¸çš„一å¦ï¼Œ 并分部分输出主å¦ï¼Œå…çˆ»ï¼Œå½–è¾žï¼Œè±¡ä¼ éƒ¨åˆ†ã€‚å¯ä»¥æ¥è¿›è¡Œåˆæ¥å¦åœã€‚ ## 安装åŠä½¿ç”¨ 具体使用方法,è§example 先安装模å—ï¼Œç„¶åŽ use ZHOUYI; binmode STDOUT, ":utf8"; my ( $num1, $mum2 )=@ARGV; my $reply = ZhouyiEx( ZYindex( $mum2, $num1 )); my $reply1=outGua($reply); my $replyyao=sixyao($reply); my $replytuan=outtuan($reply); my $replyxiang=outxiang($reply); print $reply1,"\n"; print "===å…爻==\n\n"; print $replyyao,"\n"; print "===彖辞==\n\n"; print $replytuan,"\n"; print "===è±¡ä¼ ==\n\n"; print $replyxiang,"\n"; ä¿å˜ä¸ºzypm.pl perl zypm.pl 2 25 #### 结果展示 #### the outer like : 《易經》第åå¦å±¥å¤©æ¾¤å±¥ä¹¾ä¸Šå…Œä¸‹ 履,履虎尾,ä¸å’¥äººï¼Œäº¨ã€‚ ### ===å…爻== 《易經》第åå¦å±¥å¤©æ¾¤å±¥ä¹¾ä¸Šå…Œä¸‹ 履,履虎尾,ä¸å’¥äººï¼Œäº¨ã€‚ åˆä¹ï¼šç´ 履往,無咎。 ä¹äºŒï¼šå±¥é“å¦å¦ï¼Œå¹½äººè²žå‰ã€‚ å…三:眇能視,跛能履,履虎尾,咥人,凶。æ¦äººç‚ºäºŽå¤§å›ã€‚ ä¹å››ï¼šå±¥è™Žå°¾ï¼Œæ„¬æ„¬ï¼Œçµ‚å‰ã€‚ ä¹äº”:夬履,貞厲。 上ä¹ï¼šè¦–履考祥,其旋元å‰ã€‚ ### ===彖辞== 《易經》第åå¦å±¥å¤©æ¾¤å±¥ä¹¾ä¸Šå…Œä¸‹ 履,履虎尾,ä¸å’¥äººï¼Œäº¨ã€‚ 《彖》曰:履,柔履剛也。說而應乎乾,是以「履虎尾,ä¸å’¥äººï¼Œäº¨ã€ã€‚剛ä¸æ£ï¼Œå±¥å¸ä½è€Œä¸ç–šï¼Œå…‰æ˜Žä¹Ÿã€‚ ### ===è±¡ä¼ == 《易經》第åå¦å±¥å¤©æ¾¤å±¥ä¹¾ä¸Šå…Œä¸‹ 履,履虎尾,ä¸å’¥äººï¼Œäº¨ã€‚ 《象》曰:上天下澤,履。å›å以辨上下ã€å®šæ°‘志。 ã€Šè±¡ã€‹æ›°ï¼šç´ å±¥ä¹‹å¾€ï¼Œç¨è¡Œæ„¿ä¹Ÿã€‚ 《象》曰:「幽人貞å‰ã€ï¼Œä¸ä¸è‡ªäº‚也。 《象》曰:「眇能視ã€ï¼Œä¸è¶³ä»¥æœ‰æ˜Žä¹Ÿã€‚「跛能履ã€ï¼Œä¸è¶³ä»¥èˆ‡è¡Œä¹Ÿã€‚咥人之凶,ä½ä¸ç•¶ä¹Ÿã€‚「æ¦äººç‚ºäºŽå¤§å›ã€ï¼Œå¿—剛也。 《象》曰:「愬愬,終å‰ã€ï¼Œå¿—行也。 《象》曰:「夬履,貞厲ã€ï¼Œä½æ£ç•¶ä¹Ÿã€‚ 《象》曰:元å‰åœ¨ä¸Šï¼Œå¤§æœ‰æ…¶ä¹Ÿ ### ZHOUYI-ZhanBu ZHUYI::ZhanBu (周易å åœ) - A util of ZHOUYI modules,divination to judge for the future using YI's Gua(å¦) or tuan(彖)info! use ZHOUYI::ZhanBu; my ( $gnum, $bgnum, $byao, $bgua ) = qigua(); print jiegua( $gnum, $bgnum, $byao, $bgua ) ... #### 结果展示 #### the outer like : å¦ï¼šã€Šæ˜“經》第三å二å¦æ†é›·é¢¨æ†éœ‡ä¸Šå·½ä¸‹ æ†ï¼Œäº¨ï¼Œç„¡å’Žï¼Œåˆ©è²žï¼Œåˆ©æœ‰æ”¸å¾€ã€‚ 《彖》曰:æ†ï¼Œä¹…也。剛上而柔下,雷風相與,巽而動,剛柔皆應,æ†ã€‚「æ†ï¼Œäº¨ï¼Œç„¡å’Žï¼Œåˆ©è²žã€ï¼Œä¹…於其é“也,天地之é“,æ†ä¹…而ä¸å·²ä¹Ÿã€‚「利有攸往ã€ï¼Œçµ‚則有始也。日月得天而能久照,四時變化而能久æˆï¼Œè–人久於其é“而天下化æˆã€‚觀其所æ†ï¼Œè€Œå¤©åœ°è¬ç‰©ä¹‹æƒ…å¯è¦‹çŸ£ï¼ 《象》曰:雷風,æ†ã€‚å›å以立ä¸æ˜“方。 爻:å…五:æ†å…¶å¾·ï¼Œè²žå©¦äººå‰ï¼Œå¤«å凶。 《象》曰:婦人貞å‰ï¼Œå¾žä¸€è€Œçµ‚也。夫å制義,從婦凶也 ##### You can using in oneline as you like: $perl -MZHOUYI::ZhanBu -e 'print jiegua(qigua())' #or just use: $perl -MZHOUYI::ZhanBu -e 'print pu()' ### 利用Mojo::webqqæ’件形å¼äº¤äº’å¼å åœã€‚ #### Using this plugin I Successful predicted the United States election。 æ’件example/Pu.pm(关于Mojo::webqqè¯¦è§ https://github.com/sjdy521/Mojo-Webqq)  如上图图显示预测æå‰ä¸¤å¤©é¢„测到美国大选明主党候选人: ä¹å››ã€‚鼎折足,覆公餗,其形渥,凶。 象曰:覆公餗,信如何也。 北宋易å¦å®¶é‚µé›è§£ï¼š 凶:得æ¤çˆ»è€…,多ç¾ä¹‹æ—¶ï¼Œæˆ–生足疾。åšå®˜çš„有被贬èŒä¹‹å¿§ã€‚ 结果éžå¸¸é 谱。 ## Git repo [Github](http://github.com/bollwarm/ZHOUYI) [oschina](https://git.oschina.net/ijz/ZHOUYI) ## AUTHOR [orange](bollwarm@ijz.me), [虫虫之家Blog](http://ijz.me) ## COPYRIGHT AND LICEE Copyright (C) 2016 æ¡”å This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.