法師加點心得
基本設置
創新人物之前要先知道各屬性對楓之谷法師的影響.
法師最重要的是智力.其次才是幸運.為什麼幸運跟法師有關係?
因為許多法師裝備要求幸運數值.幸運不夠可是連裝備都不能穿.況且幸運可是會增加命中率的喔!
除非玩家想走(全智法).那就可以不點幸運.最普遍法師的配點方式還是智力加幸運.
升級時智力加4幸運加1.
而力量和敏捷都維持不變~初心者配點:力量4,敏捷4, 幸運隨機, 智力隨機
1.升級後配點:智力:幸運 =4:1
2.幸運=角色等級加2
3.其餘全加智力
各型法師優缺點
(僧侶)
要練僧侶的玩家可要有點耐心,因為僧侶不是攻擊力很強的職業,而是個聖職者,所以沒有什麼破壞力高的技能,如果你想要秒殺怪物並且快速升級,那還是請你放棄這個念頭吧!僧侶最大的優點就是省水錢,又被稱為「賺錢機器」,因為可以一邊打怪一邊自補,不像其他職業還得花藥水錢來衝等!以攻擊威力來看,僧侶算是法師中2轉最差的,但是他在三轉後擁有威力強大的技能,例如聖龍召喚、神聖祈禱,那可是連三轉後的火毒巫跟冰雷巫都無法相比的呢!況且近戰職業往往會爭先恐後的跟僧侶組隊練功,組隊時搶手,自己單練也不成問題,僧侶可說是單練組隊兩相宜的多功能角色
(火毒巫師)
強調破壞力至上的火毒巫師,擁有最強大的火屬性破壞魔法,對於冰屬性的敵人可以發揮1.5倍的威力,但是面對火屬性敵人,殺傷力卻會減弱,甚至沒有效果!至於毒屬性魔法可以讓敵人中毒,讓敵人再一定時間內HP逐漸降低,不過這需要一些時間去發酵,通常用於戰鬥時間長的敵人身上!這類型的巫師非常喜歡單槍匹馬深入敵陣,「火焰箭」是二轉巫師傷害最高的技能,只要打怪時以火焰箭為主攻,毒霧為輔助,想獨自單挑單體的高等怪物,絕對不成問題!不過巫師的體力與防禦力較單薄,面對BOSS級的怪物時記得注意自己的血量,不要砲轟怪物轟的太爽,怪物也砲轟你轟的很爽!
(冰雷巫師)
冰雷巫師的威力再法師二轉職業裡算中等,雖然單體攻擊效率不佳,卻可以藉由範圍攻擊來彌補效率上的不足,高等級之後只要把冰跟雷點滿,同時把魔心開下去,就可以全楓之谷走透透!冰雷巫師主修冰屬性魔法,基本威力比火屬性魔法若一些,但是會附加一定時間內的冰凍狀態,對於火屬性的敵人,更可以發揮1.5倍的傷害,至於基本傷害就弱的雷屬性法術,可以同時對周圍的敵人發動範圍攻擊,但是MP消耗量過大,而且使用前玩家得深陷敵陣,才能施放技能,等於是讓自己暴露在危險之中,因此玩家必須具備更多閃怪技巧,可別傻傻的衝進敵陣放煙火,結果自己跟怪物一起躺光光!
楓之谷衝等方法(一轉法師技能配點)
配點建議
1:魔靈彈(1)=>魔力淨化(5)=>魔力擴展(10)=>魔力爪(10)=>魔力淨化(16)=>魔力爪(20)=>魔力防禦(20)
配點建議
2:魔靈彈(1)=>魔力淨化(5)=>魔力擴展(10)=>魔力爪(20)=>魔力防禦(20)
PS:1.魔力擴展修滿之後.如果覺得自己魔力不足.可以先練滿魔力淨化.以增加魔力回復量.之後再修滿魔力爪.反正初期魔力爪的威力沒有比魔靈彈高.魔靈彈1級耗魔量少.初期勉強用也不錯.只要魔靈彈不要點高.只要點1級做為魔力爪的其置點即可.2.魔力之盾的效用和劍士的自身強化相同.都是暫時增加物理防禦40.但時際換算到打怪上卻只有抵消14點左右的傷害值.因此捨棄魔力之盾.修滿實用性較高魔心防禦!
楓之谷衝等方法(二轉僧侶技能配點) 配點建議:(單練型)魔力吸收(1).或.瞬間移動(1)=>群體治療(15)=>群體治療(30)=>瞬間移動(20)=>魔力吸收(20)=>神聖之光(20)=>神聖之箭(30)=>天使祝福(1)配點建議:(輔助型)魔力吸收(1).或.瞬間移動(1)=>群體治療(15)=>神聖之光(5)=>天使祝福(20) =>群體治療(15)=>群體治療(30)=>瞬間移動(20)=>魔力吸收(20)=>神聖之光(20)=>神聖之箭(11)PS:1.瞬間移動跟魔力吸收可以因人而異而去增減點數.畢竟那不是必要的點數.僧侶必點的技能就是群體治療.因為三轉後會成為團隊支柱的重要人物之一.點到滿等於可補hp的300%.假設hp為1000.點滿可補滿3000.組隊若組5人.則一人可平分補600hp.若只點到技能10級.則為1000x5=200.所以群體治療以點滿為佳.2.或許有人會問.單練型又不用跟人組隊.為何群體治療要點滿呢?其實這是見人見智.你能保證永遠不會跟其他人組隊嗎?就算撇開這例子不講.等級到了一定程度.可以打大幽靈跟猴子來快速升級時.這可是僧侶獨一無二的快訴升級練法.所以建議還是點滿比較ok~
二轉火毒巫師技能配點 配點建議:(專精火系)魔力吸收(1).或.瞬間移動(1)=>火燄箭(15)=>火燄箭(30)=>魔力吸收(3)=>精神強力(20)=>瞬間移動(20)=>魔力吸收(20)=>毒霧(15)=>緩速術(1).(剩餘1點看自己喜好)配點建議:(專精毒系)魔力吸收(1).或.瞬間移動(1)=>毒霧(15)=>毒霧(30)=>瞬間移動(20)=>魔力吸收(20)=>精神強力(20)=>火燄箭(15)=>火燄箭(30)=>緩速術(1) .(剩餘1點看自己喜好)
配點建議:(火毒雙修)魔力吸收(1).或.瞬間移動(1)=>火燄箭(15)=>火燄箭(30)=>毒霧(15)=>毒霧(30)=>瞬間移動(20)=>魔力吸收(20) =>精神強力(20)=>緩速術(1).(剩餘1點看自己喜好) 二轉冰雷巫師技能配點
配點建議:(專精冰系)<方法1>魔力吸收(1).或.瞬間移動(1)=>冰錐術(15)=>冰錐術(30)=>魔力吸收(3)=>精神強力(20)=>瞬間移動(20)<方法2>瞬間移動(20)=>電閃雷鳴(15)=>電閃雷鳴(30)=>緩速術(1)(剩餘1點看自己喜好)
配點建議:(專精雷系)魔力吸收(1).或.瞬間移動(1)=>電閃雷鳴(15)=>電閃雷鳴(30)=>瞬間移動(20)=>魔力吸收(3)=>精神強力(20)=>瞬間移動(20)=>魔力吸收(20)=>冰錐術(15)=>冰錐術(30)=> 精神強力(20)
配點建議:(冰雷雙修)魔力吸收(1).或.瞬間移動(1)=>冰錐術(15)=>冰錐術(30)=>電閃雷鳴(15)=>電閃雷鳴(30)=>瞬間移動(20)=>魔力吸收(20)=>精神強力(20)=>緩速術(1). (剩餘1點看自己喜好) 三轉祭師技能配點 配點建議:(單練型)聖光(30)=>神聖祈禱(30)=>魔法抵抗(30)=>淨化(3)=>時空門(1)=>聖龍召喚(30).(其他自行分配)
配點建議:(組隊型)淨化(3)=>時空門(1)=>神聖祈禱(30)=>聖光(30)=>聖龍召喚(30) =>魔法抵抗(30) .(其他自行分配) 三轉火毒魔導士技能配點 魔力激發(3)=>極速詠唱(3)=>魔力激發(30)=>火毒合擊(30)=>極速詠唱(10)=>末日烈燄(30) 三轉冰雷魔導士技能配點 魔力激發(3)=>極速詠唱(3)=>魔力激發(30)=>冰風暴(15)=>冰雷合擊(30)=>冰風暴(30)=>極速詠唱(10)=>落雷凝聚(30) (其餘自行分配)
2008年8月5日
2008年7月28日
笨小孩
笨小孩 - 劉德華／柯受良／吳宗憲
曲︰高楓
詞︰劉德華
編︰江建民
哦 寧靜的小村外 有一個笨小孩
出生在陸零年代
十來歲到城市 不怕那太陽曬
努力在柒零年代
發現呀城市裡 朋友們不用去灌溉
花自然會開
哦 轉眼間那麼快 這一個笨小孩
又到了捌零年代
三十歲到頭來 不算好也不壞
經過了玖零年代
最無奈他自己 總是會慢人家一拍
沒有錢在那口袋
＊哎喲往著胸口拍一拍呀 勇敢站起來
不用心情太壞
哎喲向著天空拜一拜呀 別想不開
老天自有安排
哦 他們說城市裡 男不壞女不愛
怎麼想也不明白
媽媽說真心愛 會愛得很精彩
結果我沒有女孩
笨小孩依然是堅強得像石頭一塊
只是晚上寂寞難耐
重唱 ＊
哎喲往著胸口拍一拍呀 勇敢站起來
管它上山下海
哎喲向著天空拜一拜呀 別想不開
老天自有安排
老天愛笨小孩
曲︰高楓
詞︰劉德華
編︰江建民
哦 寧靜的小村外 有一個笨小孩
出生在陸零年代
十來歲到城市 不怕那太陽曬
努力在柒零年代
發現呀城市裡 朋友們不用去灌溉
花自然會開
哦 轉眼間那麼快 這一個笨小孩
又到了捌零年代
三十歲到頭來 不算好也不壞
經過了玖零年代
最無奈他自己 總是會慢人家一拍
沒有錢在那口袋
＊哎喲往著胸口拍一拍呀 勇敢站起來
不用心情太壞
哎喲向著天空拜一拜呀 別想不開
老天自有安排
哦 他們說城市裡 男不壞女不愛
怎麼想也不明白
媽媽說真心愛 會愛得很精彩
結果我沒有女孩
笨小孩依然是堅強得像石頭一塊
只是晚上寂寞難耐
重唱 ＊
哎喲往著胸口拍一拍呀 勇敢站起來
管它上山下海
哎喲向著天空拜一拜呀 別想不開
老天自有安排
老天愛笨小孩
2008年7月22日
一杯奶茶150元的啟示
資料來源處： http://tw.money.yahoo.com/special_article/adbf/d_a_071105_41_od47
一杯奶茶150元的啟示
( 2007/11/05 王鈺棻 )
鄰居小女孩佳佳是家中的獨生女，爸媽對她疼愛有加，從牙牙學語到現在已是小一的學生，對於想買的東西，爸媽多是應許。有回我們全家、和佳佳及另一隔壁鄰居三家人一同出遊，到了一個遊樂區附近的餐廳吃飯，一看菜單，一份小火鍋要280元，心想不便宜也就沒再點其他飲料及點心了。
吃完了中餐，大夥正聊得起勁，怎見五個小孩人手一杯飲料喝得津津有味的走過來，當佳佳把10元硬幣放到她爸爸手中時，只見一向闊手的爸爸一臉疑惑的問：「給妳1000元買飲料，怎麼只剩10元回來?」佳佳回答說：「買了五杯奶茶和四塊蛋糕，總共990元。奶茶一杯150元，蛋糕一個60元。」當下六個為人父母者都瞪大眼睛說：「一杯奶茶150元！」會令人吃驚的原因是因為，這杯150元的奶茶和早餐店一杯15元的奶茶沒有差別，連杯子都一樣，一點也看不出有比較高級的感覺。
錢付出去了，奶茶也喝下肚了，除了責備孩子亂花錢之外，我想如何讓孩子更有金錢概念，才不枉費那一杯奶茶150元的代價。平時雖然已教導小孩買東西時要分辨「需要」與「想要」，但缺乏消費實務經驗的孩子在面對誘惑和集體消費時，就沒了克制力；而且對於金錢價值也常有模糊的概念。
為了避免重蹈覆轍，我給孩子設計了認識金錢三部曲的活動。這三部曲活動最好在孩子上小學前就做，讓小孩儘早發現金錢的價值。首部曲叫「一元小小功用大」，當你給孩子一元時，可能有不少孩子會說「少」或根本不屑拿，這時要設計些活動，讓孩子體驗一元的妙用。有回假日我上市場買菜，就特地帶著兩個孩子一同前往，並給他們每人２個１元銅板帶在身上，買到最後一樣的雞肉是156元，我就跟孩子說，媽媽只剩155元，不夠１元怎麼辦，這時孩子口袋裡的１元可以發揮作用了，老大馬上說「我這裡有１元。」於是我拿了哥哥的１元付給了老板，把雞肉放進菜藍裡，還不忘跟孩子說「幸好有你那一塊錢，不然就買不成雞肉了。」後來我又跟孩子說，媽媽買了很多菜提不回去，要請爸爸來接我們，但卻忘了帶手機，要打公用電話才行，打公用電話要２塊錢，剛看過哥哥表現的弟弟這時馬上說「我有２塊。」我讓老二撥了電話回家請爸爸開車來接，還跟老二說「幸好有你的2塊錢，要不然我們就回不去了。」兩兄弟幫了媽媽的忙，心情好得很，上車時，老大還不忘說：「媽，我口袋裡還有一塊，還有什麼要我幫忙嗎？」我的心情也好極了。
二部曲是「10元逛超商」，有了首部曲的經驗後，過了幾天我給兩個孩子一人10元，讓他們去便利商店買自己喜歡的東西，有了首部曲的欣喜，兩兄弟拿著比１元硬幣大的１０元銅板，興高采烈地前往商店，先前我已叮嚀他們買東西前要看清楚標價，看看自己的錢夠不夠，不能喜歡就拿。這回他們到便利商店流連了快半個小時，原因是看了很多喜歡的東西但比10元貴不能買，10元以下的東西雖不多，但還要從中選擇較喜歡的。我看到兩個孩子比價、思索什麼能買什麼不能買、到互相討論商量買什麼，這樣的過程才是值得的。
三部曲「150元有多大」，用意是讓孩子了解「等量」的觀念。當兩個小孩高高興興地吃著用10元買來的「乖乖」和「飛壘口香糖」時，我拿出了15個10元銅板，跟兩個小孩說，「這些錢可以買15包乖乖或15條飛壘口香糖或你們剛看到的玩具，可是你們上次跟佳佳出去玩買的是一杯奶茶」，哥哥馬上說：「哇！奶茶好貴喔！」我想我的目的達到了。
一杯奶茶150元的啟示
( 2007/11/05 王鈺棻 )
鄰居小女孩佳佳是家中的獨生女，爸媽對她疼愛有加，從牙牙學語到現在已是小一的學生，對於想買的東西，爸媽多是應許。有回我們全家、和佳佳及另一隔壁鄰居三家人一同出遊，到了一個遊樂區附近的餐廳吃飯，一看菜單，一份小火鍋要280元，心想不便宜也就沒再點其他飲料及點心了。
吃完了中餐，大夥正聊得起勁，怎見五個小孩人手一杯飲料喝得津津有味的走過來，當佳佳把10元硬幣放到她爸爸手中時，只見一向闊手的爸爸一臉疑惑的問：「給妳1000元買飲料，怎麼只剩10元回來?」佳佳回答說：「買了五杯奶茶和四塊蛋糕，總共990元。奶茶一杯150元，蛋糕一個60元。」當下六個為人父母者都瞪大眼睛說：「一杯奶茶150元！」會令人吃驚的原因是因為，這杯150元的奶茶和早餐店一杯15元的奶茶沒有差別，連杯子都一樣，一點也看不出有比較高級的感覺。
錢付出去了，奶茶也喝下肚了，除了責備孩子亂花錢之外，我想如何讓孩子更有金錢概念，才不枉費那一杯奶茶150元的代價。平時雖然已教導小孩買東西時要分辨「需要」與「想要」，但缺乏消費實務經驗的孩子在面對誘惑和集體消費時，就沒了克制力；而且對於金錢價值也常有模糊的概念。
為了避免重蹈覆轍，我給孩子設計了認識金錢三部曲的活動。這三部曲活動最好在孩子上小學前就做，讓小孩儘早發現金錢的價值。首部曲叫「一元小小功用大」，當你給孩子一元時，可能有不少孩子會說「少」或根本不屑拿，這時要設計些活動，讓孩子體驗一元的妙用。有回假日我上市場買菜，就特地帶著兩個孩子一同前往，並給他們每人２個１元銅板帶在身上，買到最後一樣的雞肉是156元，我就跟孩子說，媽媽只剩155元，不夠１元怎麼辦，這時孩子口袋裡的１元可以發揮作用了，老大馬上說「我這裡有１元。」於是我拿了哥哥的１元付給了老板，把雞肉放進菜藍裡，還不忘跟孩子說「幸好有你那一塊錢，不然就買不成雞肉了。」後來我又跟孩子說，媽媽買了很多菜提不回去，要請爸爸來接我們，但卻忘了帶手機，要打公用電話才行，打公用電話要２塊錢，剛看過哥哥表現的弟弟這時馬上說「我有２塊。」我讓老二撥了電話回家請爸爸開車來接，還跟老二說「幸好有你的2塊錢，要不然我們就回不去了。」兩兄弟幫了媽媽的忙，心情好得很，上車時，老大還不忘說：「媽，我口袋裡還有一塊，還有什麼要我幫忙嗎？」我的心情也好極了。
二部曲是「10元逛超商」，有了首部曲的經驗後，過了幾天我給兩個孩子一人10元，讓他們去便利商店買自己喜歡的東西，有了首部曲的欣喜，兩兄弟拿著比１元硬幣大的１０元銅板，興高采烈地前往商店，先前我已叮嚀他們買東西前要看清楚標價，看看自己的錢夠不夠，不能喜歡就拿。這回他們到便利商店流連了快半個小時，原因是看了很多喜歡的東西但比10元貴不能買，10元以下的東西雖不多，但還要從中選擇較喜歡的。我看到兩個孩子比價、思索什麼能買什麼不能買、到互相討論商量買什麼，這樣的過程才是值得的。
三部曲「150元有多大」，用意是讓孩子了解「等量」的觀念。當兩個小孩高高興興地吃著用10元買來的「乖乖」和「飛壘口香糖」時，我拿出了15個10元銅板，跟兩個小孩說，「這些錢可以買15包乖乖或15條飛壘口香糖或你們剛看到的玩具，可是你們上次跟佳佳出去玩買的是一杯奶茶」，哥哥馬上說：「哇！奶茶好貴喔！」我想我的目的達到了。
2008年7月21日
長期投資不等於高檔套牢
資料來源處： http://tw.money.yahoo.com/special_article/adbf/d_a_080721_41_122qx
長期投資不等於高檔套牢
( 2008/07/21 Yahoo!奇摩理財特約作家 王鈺棻 )
最近常聽到在520總統就職前進場的股民及基民說：「套牢了，只好當作長期投資。」其實說這話是透露著無奈、沒辦法，只能出此下策的心情。
長期投資之所以被鼓勵，主要的目的是要運用「時間」優勢來獲取報酬，但卻是很多投資人被套牢後不得不的作為。我們要用時間來「賺錢」，不是用時間來「解套」。
當你有了長期投資的概念，做法也要正確，雖然理財文章常說，只要進行長期投資多半會獲利。既然投入了時間，當然就要獲取相對高的報酬才值得，因此進行長期投資的投入時點就非常重要，判斷的方式其實很簡單，就是當你週遭的人或媒體都看壞後市的時候，就是長期投資的進場時機；還有一點要注意，就是如果您抱定長期投資的理念，只要投資標的的前景及投資價值依舊看好，遇到市場下殺時，一定要沉住氣，不然鐡定破功。
長期投資最常被運用於投資共同基金，舉一個例子來說，台灣於2003年時發生SARS危機，股市重挫，如果當年初進場投資統一大滿貫基金，且無懼SARS威脅，則2007年底贖回時，報酬率可達244.16%，若因害怕股市持續下挫而於當年中贖回，反而倒賠2.52%，所以說獲利的果實是留給堅持的投資人。
或許您會問，若市場持續下挫，能進場嗎？我想連股神巴菲特都沒法買在最低點，所以投資人千萬不要抱持著要買到最低點的想法，因為長期投資並不是要獲取短線利益，只要進場的時點不是市場火熱時刻，長期下來的報酬率差別不會太大。
近來股市受到油價上漲及通膨升高的影響而下挫，讓許多投資人住進套房，也嚷著不要看盤了，眼不見為淨。其實投資人應把握這個機會，檢視手中的投資標的，企業體質是否良好，在逆境時最容易顯現出來，所以要先判斷手中套牢的股票還有沒有續抱的價值，也就是有沒有長期投資的空間，有的話就續抱；如果沒有的話，就等待反彈時出脫持股，轉進其他更具投資價值的標的，如此才不會鄉愿的把高檔套牢當作長期投資。
若您是空手的投資人，在這時更要積極尋找投資標的，現階段台股已超跌，在上市上櫃的1200多家企業中，有近400家的公司股價低於淨值，是進場檢便宜的時機。以長期投資來說，投資人要從基本面著手，對產業特性及產業景氣循環有所了解，並設定停損、停利點，跌到停損點就賣出、漲到停利點就賣掉，不必為了短期的價差波動而傷神。本人比較推薦選擇高殖利率的股票，不僅可享股市上漲時的資本利得，即使股市不佳，每年的股股配息也能讓財富「增增日上」。
長期投資不等於高檔套牢
( 2008/07/21 Yahoo!奇摩理財特約作家 王鈺棻 )
最近常聽到在520總統就職前進場的股民及基民說：「套牢了，只好當作長期投資。」其實說這話是透露著無奈、沒辦法，只能出此下策的心情。
長期投資之所以被鼓勵，主要的目的是要運用「時間」優勢來獲取報酬，但卻是很多投資人被套牢後不得不的作為。我們要用時間來「賺錢」，不是用時間來「解套」。
當你有了長期投資的概念，做法也要正確，雖然理財文章常說，只要進行長期投資多半會獲利。既然投入了時間，當然就要獲取相對高的報酬才值得，因此進行長期投資的投入時點就非常重要，判斷的方式其實很簡單，就是當你週遭的人或媒體都看壞後市的時候，就是長期投資的進場時機；還有一點要注意，就是如果您抱定長期投資的理念，只要投資標的的前景及投資價值依舊看好，遇到市場下殺時，一定要沉住氣，不然鐡定破功。
長期投資最常被運用於投資共同基金，舉一個例子來說，台灣於2003年時發生SARS危機，股市重挫，如果當年初進場投資統一大滿貫基金，且無懼SARS威脅，則2007年底贖回時，報酬率可達244.16%，若因害怕股市持續下挫而於當年中贖回，反而倒賠2.52%，所以說獲利的果實是留給堅持的投資人。
或許您會問，若市場持續下挫，能進場嗎？我想連股神巴菲特都沒法買在最低點，所以投資人千萬不要抱持著要買到最低點的想法，因為長期投資並不是要獲取短線利益，只要進場的時點不是市場火熱時刻，長期下來的報酬率差別不會太大。
近來股市受到油價上漲及通膨升高的影響而下挫，讓許多投資人住進套房，也嚷著不要看盤了，眼不見為淨。其實投資人應把握這個機會，檢視手中的投資標的，企業體質是否良好，在逆境時最容易顯現出來，所以要先判斷手中套牢的股票還有沒有續抱的價值，也就是有沒有長期投資的空間，有的話就續抱；如果沒有的話，就等待反彈時出脫持股，轉進其他更具投資價值的標的，如此才不會鄉愿的把高檔套牢當作長期投資。
若您是空手的投資人，在這時更要積極尋找投資標的，現階段台股已超跌，在上市上櫃的1200多家企業中，有近400家的公司股價低於淨值，是進場檢便宜的時機。以長期投資來說，投資人要從基本面著手，對產業特性及產業景氣循環有所了解，並設定停損、停利點，跌到停損點就賣出、漲到停利點就賣掉，不必為了短期的價差波動而傷神。本人比較推薦選擇高殖利率的股票，不僅可享股市上漲時的資本利得，即使股市不佳，每年的股股配息也能讓財富「增增日上」。
2008年7月2日
2008年6月28日
[.NET] 圓餅圖
作者 MOONRAKER (㊣烏笨禿，又笨又禿) 看板 Visual_Basic
標題 Re: [.NET] 圓餅圖
時間 Sat Jun 28 00:57:43 2008
───────────────────────────────────────
一時興起寫了以下的code，就算是範例吧
獻醜了
http://dpaste.com/hold/59527/
---
NAME
drawpie - 簡易圓餅圖繪製工具
SYNOPSIS
drawpie(g, pieLeft, pieTop, pieWidth, pieHeight, colors(), slices())
PARAMETERS
g 要畫圖的graphics
pieLeft 圓餅圖的左上角Ｘ座標（想像一個圓的外接正方形的左上方頂點）
pieTop 圓餅圖的左上角Ｙ座標
pieWidth 圓餅圖寬度
pieHeight 圓餅圖高度
colors() brush陣列，畫圓餅圖各塊要用的顏色
slices() integer陣列，圓餅圖各塊的百分比。是百分比喔！不是角度喔！
REMARKS
* 本sub不檢查slices()中各項總和是否為100，所以使用者要自己注意。
（不過這樣可以玩點花樣，例如畫不從正上方開始的圓餅圖）
* colors可以包含任意數量的brush，不會發生錯誤。如果brush比slice多，
那麼多出來的就不會用到；如果brush比slice少，那麼slice會重覆使用
顏色。如果colors中只有一個brush那麼所有的slice都是同一個顏色。
* 本sub會自動給每個slice加白邊，還沒有寫給每個slice畫不同邊的code，
但是很容易改出來。
* 還有以前很多商業圖範例都會做的某一塊pie外推若干pixels，目前也沒
寫，不過自己寫也很容易，用一點cos()和sin()就可以了。
Public Class Form1
Private Sub drawpie(ByRef g As Graphics, ByVal pieLeft As Integer, ByVal pieTop As Integer, _
ByVal pieWidth As Integer, ByVal pieHeight As Integer, _
ByRef colors As Brush(), ByRef slices As Integer())
Dim i As Integer, j As Integer, startAngle As Integer = -90
Dim borderPen As Pen = New Pen(Color.AntiqueWhite, 2.5)
Dim sliceDeg As Integer
Try
j = LBound(colors)
For i = LBound(slices) To UBound(slices)
sliceDeg = slices(i) * 360 / 100
g.FillPie(colors(j), pieLeft, pieTop, pieWidth, pieHeight, startAngle, sliceDeg)
g.DrawPie(borderPen, pieLeft, pieTop, pieWidth, pieHeight, startAngle, sliceDeg)
startAngle += sliceDeg
j += 1
If j > UBound(colors) Then j = LBound(colors)
Next i
Catch ex As Exception
End Try
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim b As Bitmap = New Bitmap(Pic1.Width, Pic1.Height)
Dim g As Graphics = Graphics.FromImage(b)
g.Clear(Color.Gray)
g.SmoothingMode = Drawing2D.SmoothingMode.AntiAlias
Dim pieleft As Integer = 10, pieTop As Integer = 10
Dim pieWidth As Integer = Pic1.Width - pieleft - 10
Dim pieHeight As Integer = Pic1.Height - pieTop - 10
Dim piecolors As Brush() = {Brushes.RoyalBlue, Brushes.Lime, Brushes.Turquoise, Brushes.SaddleBrown}
Dim pieslices As Integer() = {34, 19, 16, 10, 9, 7, 5}
drawpie(g, pieleft, pieTop, pieWidth, pieHeight, piecolors, pieslices)
Pic1.Image = b
End Sub
End Class
標題 Re: [.NET] 圓餅圖
時間 Sat Jun 28 00:57:43 2008
───────────────────────────────────────
一時興起寫了以下的code，就算是範例吧
獻醜了
http://dpaste.com/hold/59527/
---
NAME
drawpie - 簡易圓餅圖繪製工具
SYNOPSIS
drawpie(g, pieLeft, pieTop, pieWidth, pieHeight, colors(), slices())
PARAMETERS
g 要畫圖的graphics
pieLeft 圓餅圖的左上角Ｘ座標（想像一個圓的外接正方形的左上方頂點）
pieTop 圓餅圖的左上角Ｙ座標
pieWidth 圓餅圖寬度
pieHeight 圓餅圖高度
colors() brush陣列，畫圓餅圖各塊要用的顏色
slices() integer陣列，圓餅圖各塊的百分比。是百分比喔！不是角度喔！
REMARKS
* 本sub不檢查slices()中各項總和是否為100，所以使用者要自己注意。
（不過這樣可以玩點花樣，例如畫不從正上方開始的圓餅圖）
* colors可以包含任意數量的brush，不會發生錯誤。如果brush比slice多，
那麼多出來的就不會用到；如果brush比slice少，那麼slice會重覆使用
顏色。如果colors中只有一個brush那麼所有的slice都是同一個顏色。
* 本sub會自動給每個slice加白邊，還沒有寫給每個slice畫不同邊的code，
但是很容易改出來。
* 還有以前很多商業圖範例都會做的某一塊pie外推若干pixels，目前也沒
寫，不過自己寫也很容易，用一點cos()和sin()就可以了。
Public Class Form1
Private Sub drawpie(ByRef g As Graphics, ByVal pieLeft As Integer, ByVal pieTop As Integer, _
ByVal pieWidth As Integer, ByVal pieHeight As Integer, _
ByRef colors As Brush(), ByRef slices As Integer())
Dim i As Integer, j As Integer, startAngle As Integer = -90
Dim borderPen As Pen = New Pen(Color.AntiqueWhite, 2.5)
Dim sliceDeg As Integer
Try
j = LBound(colors)
For i = LBound(slices) To UBound(slices)
sliceDeg = slices(i) * 360 / 100
g.FillPie(colors(j), pieLeft, pieTop, pieWidth, pieHeight, startAngle, sliceDeg)
g.DrawPie(borderPen, pieLeft, pieTop, pieWidth, pieHeight, startAngle, sliceDeg)
startAngle += sliceDeg
j += 1
If j > UBound(colors) Then j = LBound(colors)
Next i
Catch ex As Exception
End Try
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim b As Bitmap = New Bitmap(Pic1.Width, Pic1.Height)
Dim g As Graphics = Graphics.FromImage(b)
g.Clear(Color.Gray)
g.SmoothingMode = Drawing2D.SmoothingMode.AntiAlias
Dim pieleft As Integer = 10, pieTop As Integer = 10
Dim pieWidth As Integer = Pic1.Width - pieleft - 10
Dim pieHeight As Integer = Pic1.Height - pieTop - 10
Dim piecolors As Brush() = {Brushes.RoyalBlue, Brushes.Lime, Brushes.Turquoise, Brushes.SaddleBrown}
Dim pieslices As Integer() = {34, 19, 16, 10, 9, 7, 5}
drawpie(g, pieleft, pieTop, pieWidth, pieHeight, piecolors, pieslices)
Pic1.Image = b
End Sub
End Class
2008年6月9日
認識甲狀線疾病
資料來源處：http://www.ccue.com/forum/redirect.php?tid=2613&goto=lastpost
認識甲狀線疾病
正常人都有甲狀腺，其作用乃是合成、分泌甲狀腺激素而影響全身之新陳代謝。甲狀腺的位置在頸部的前下方，左右各有一葉而中間以峽部相連，外觀類似一隻蝴蝶的形狀。一般人的甲狀腺約重10到20公克，在吞嚥時會隨著氣管上下移動，但是除非甲狀腺發生瀰漫腫大或局部明顯的腫塊，否則是不易從體表外觸摸其腺體的存在。
甲狀腺疾病一般可略分為以功能異常為主、或以形態異常為主。在功能方面，如發生亢進則大多為葛瑞夫茲氏病﹝Graves’disease﹞；如發生低下則多為橋本氏甲狀腺炎﹝Hashimoto’sthyroiditis﹞或甲狀腺曾做過切除手術。功能亢進者的症狀常見有緊張、多汗、怕熱、心悸、體重減輕、手抖、失眠、容易腹瀉、月經減少；功能低下者的症狀則有怕冷、流汗減少、疲倦、行動遲緩、體重增加、便秘、心跳變慢等現象。葛瑞夫茲氏病和橋本氏甲狀腺炎皆為自體免疫疾病，甲狀腺在外觀可呈現瀰漫性腫大，臨床治療上則視其功能的變化而施以抗甲狀腺藥物或補充甲狀腺激素。
在形態方面，若甲狀腺冒出如腫塊般的異常變化，便稱之為甲狀腺結節﹝Thyroid nodule﹞。結節有可能是單一性或多發性；其內容物有可能是液態而稱為囊腫﹝Cyst﹞或為實心的細胞聚集所組成。常見的結節性病灶茲介紹如下：
1.亞急性甲狀腺炎：臨床上病人會表示先前有上呼吸道感染的症狀，接著在甲狀腺部位發生腫硬疼痛，嚴重者甚至會出現發燒、畏寒、心悸等不適。可測定血中之紅血球沈降速率﹝ESR﹞發現數值偏高，而超音波檢查可看到低回音度之局部病灶。治療上常須合用類固醇和消炎止痛藥。
2.出血性囊腫：即甲狀腺內的血管出血所造成。病人常發現它是一下子大起來，有時會伴隨局部的壓痛不適，治療上可嘗試用注射針筒將囊腫之內容物抽出。
3.良性結節腫：通常是指局部良性細胞增殖或膠體積聚所形成。治療上可服用甲狀腺激素來對病灶產生抑制性的效果。但若病灶實在太大而壓迫呼吸或外觀上對病人產生很大的心理障礙，則可考慮以手術做甲狀腺部份的切除。
4.甲狀腺癌：即指結節為惡性細胞的增殖，其種類包恬濾泡癌、乳突癌、髓質癌、未分化癌等。若為濾泡癌或乳突癌，則以手術切除為優先考慮，並於手術後再追加放射碘治療，以後終生服用甲狀腺激素並定期抽血檢驗甲狀腺球蛋白﹝Thyroglobulin﹞以追蹤是否有癌症復發的可能。若為髓質癌，則在手術切除後服甲狀腺激素，而後續追蹤以檢驗抑鈣素﹝Calcitonin﹞為主。未分化癌則好發年紀較大之病人，若合併發炎時則局部會有發紅疼痛之情況。一般而言，未分化癌很難以手術完全切除乾淨，故可考慮電療或化學治療，但其預後遠比其他甲狀腺癌差而易造成死亡。
所以一旦病人發現有甲狀腺方面的問題，則應抽血檢驗是否有功能異常或自體免疫的體質存在。而超音波檢查則可察知甲狀腺形態的異常變化，包括是否有瀰漫性腫大或囊腫、實心結節之存在。而以細針抽吸則可用嘗試將囊腫內含之液體抽出，也可抽出少量病灶細胞做化驗以判別良性或惡性，做為進一步治療之依據。
認識甲狀線疾病
正常人都有甲狀腺，其作用乃是合成、分泌甲狀腺激素而影響全身之新陳代謝。甲狀腺的位置在頸部的前下方，左右各有一葉而中間以峽部相連，外觀類似一隻蝴蝶的形狀。一般人的甲狀腺約重10到20公克，在吞嚥時會隨著氣管上下移動，但是除非甲狀腺發生瀰漫腫大或局部明顯的腫塊，否則是不易從體表外觸摸其腺體的存在。
甲狀腺疾病一般可略分為以功能異常為主、或以形態異常為主。在功能方面，如發生亢進則大多為葛瑞夫茲氏病﹝Graves’disease﹞；如發生低下則多為橋本氏甲狀腺炎﹝Hashimoto’sthyroiditis﹞或甲狀腺曾做過切除手術。功能亢進者的症狀常見有緊張、多汗、怕熱、心悸、體重減輕、手抖、失眠、容易腹瀉、月經減少；功能低下者的症狀則有怕冷、流汗減少、疲倦、行動遲緩、體重增加、便秘、心跳變慢等現象。葛瑞夫茲氏病和橋本氏甲狀腺炎皆為自體免疫疾病，甲狀腺在外觀可呈現瀰漫性腫大，臨床治療上則視其功能的變化而施以抗甲狀腺藥物或補充甲狀腺激素。
在形態方面，若甲狀腺冒出如腫塊般的異常變化，便稱之為甲狀腺結節﹝Thyroid nodule﹞。結節有可能是單一性或多發性；其內容物有可能是液態而稱為囊腫﹝Cyst﹞或為實心的細胞聚集所組成。常見的結節性病灶茲介紹如下：
1.亞急性甲狀腺炎：臨床上病人會表示先前有上呼吸道感染的症狀，接著在甲狀腺部位發生腫硬疼痛，嚴重者甚至會出現發燒、畏寒、心悸等不適。可測定血中之紅血球沈降速率﹝ESR﹞發現數值偏高，而超音波檢查可看到低回音度之局部病灶。治療上常須合用類固醇和消炎止痛藥。
2.出血性囊腫：即甲狀腺內的血管出血所造成。病人常發現它是一下子大起來，有時會伴隨局部的壓痛不適，治療上可嘗試用注射針筒將囊腫之內容物抽出。
3.良性結節腫：通常是指局部良性細胞增殖或膠體積聚所形成。治療上可服用甲狀腺激素來對病灶產生抑制性的效果。但若病灶實在太大而壓迫呼吸或外觀上對病人產生很大的心理障礙，則可考慮以手術做甲狀腺部份的切除。
4.甲狀腺癌：即指結節為惡性細胞的增殖，其種類包恬濾泡癌、乳突癌、髓質癌、未分化癌等。若為濾泡癌或乳突癌，則以手術切除為優先考慮，並於手術後再追加放射碘治療，以後終生服用甲狀腺激素並定期抽血檢驗甲狀腺球蛋白﹝Thyroglobulin﹞以追蹤是否有癌症復發的可能。若為髓質癌，則在手術切除後服甲狀腺激素，而後續追蹤以檢驗抑鈣素﹝Calcitonin﹞為主。未分化癌則好發年紀較大之病人，若合併發炎時則局部會有發紅疼痛之情況。一般而言，未分化癌很難以手術完全切除乾淨，故可考慮電療或化學治療，但其預後遠比其他甲狀腺癌差而易造成死亡。
所以一旦病人發現有甲狀腺方面的問題，則應抽血檢驗是否有功能異常或自體免疫的體質存在。而超音波檢查則可察知甲狀腺形態的異常變化，包括是否有瀰漫性腫大或囊腫、實心結節之存在。而以細針抽吸則可用嘗試將囊腫內含之液體抽出，也可抽出少量病灶細胞做化驗以判別良性或惡性，做為進一步治療之依據。
2008年5月10日
VB.NET與EXCEL整合
EXCEL的ActiveWorkbook.SaveAs如果已有文件存在，如何不要示提示框，直接覆？application.displayalerts=false
'保存
application.displayalerts=true
要達成你的要求應該不難
1.利用Sheets集合
2.每個Sheet要存成一個檔案,則需要將檔案存成Excel 4.0模式
以下是程式碼
Sub test()
Dim rSheet As Object
For Each rSheet In Sheets
rSheet.Select
ChDir "C:\test" '假設檔案要存檔的地方
ActiveWorkbook.SaveAs Filename:=rSheet.Name, FileFormat:=xlExcel4
Next rSheet
End Sub
要在檔案要存檔的地方建立如C:\test的目錄
********************************************
Sub test()
Dim rSheet As Object
Dim OldWorkBook As String, rDir As String
Application.ScreenUpdating = False
On Error Resume Next
ActiveWorkbook.Save
OldWorkBook = ActiveWorkbook.Name
rDir = ActiveWorkbook.Path
For Each rSheet In Sheets
rSheet.Select
ChDir "C:\test"
ActiveWorkbook.SaveAs Filename:=rSheet.Name, FileFormat:=xlExcel4
Next rSheet
ThisWorkbook.Saved = True
Application.OnTime Now + Time("00:00:1"), "closewin"
Workbooks.Open Filename:=rDir & "\" & OldWorkBook
Application.ScreenUpdating = True
End Sub
Sub closewin()
ThisWorkbook.Close
End Sub
'保存
application.displayalerts=true
要達成你的要求應該不難
1.利用Sheets集合
2.每個Sheet要存成一個檔案,則需要將檔案存成Excel 4.0模式
以下是程式碼
Sub test()
Dim rSheet As Object
For Each rSheet In Sheets
rSheet.Select
ChDir "C:\test" '假設檔案要存檔的地方
ActiveWorkbook.SaveAs Filename:=rSheet.Name, FileFormat:=xlExcel4
Next rSheet
End Sub
要在檔案要存檔的地方建立如C:\test的目錄
********************************************
Sub test()
Dim rSheet As Object
Dim OldWorkBook As String, rDir As String
Application.ScreenUpdating = False
On Error Resume Next
ActiveWorkbook.Save
OldWorkBook = ActiveWorkbook.Name
rDir = ActiveWorkbook.Path
For Each rSheet In Sheets
rSheet.Select
ChDir "C:\test"
ActiveWorkbook.SaveAs Filename:=rSheet.Name, FileFormat:=xlExcel4
Next rSheet
ThisWorkbook.Saved = True
Application.OnTime Now + Time("00:00:1"), "closewin"
Workbooks.Open Filename:=rDir & "\" & OldWorkBook
Application.ScreenUpdating = True
End Sub
Sub closewin()
ThisWorkbook.Close
End Sub
2008年4月28日
訂閱：
意見 (Atom)