有銀子閱讀腳本

① 紅樓夢 腳本

腳本？沒看懂，湊合點吧
●第二十一回
賢襲人嬌嗔箴寶玉 俏平兒軟語救賈璉
襲人對寶玉不滿訴諸寶釵，寶釵賞其識見志量。
賈璉趁巧姐出痘和多姑娘兒鬼混，被平兒抓住把柄，瞞過鳳姐；賈璉叫平兒不要怕鳳姐。
●第二十二回
聽曲文寶玉悟禪機 制燈迷賈政悲讖語
賈母要給寶釵做生日，鳳姐和賈璉商量要比林黛玉高出一等。
鳳姐說賈母喜愛的齡官象一個人，寶釵笑而不說，寶玉不敢說，湘雲說象黛玉。湘雲、黛玉和寶玉為此事鬧矛盾，寶玉心想目下兩人尚未應酬妥協，將來猶欲何為。襲人勸寶玉「大家隨和」，寶玉說自己是「赤條條來去無牽掛」。筆佔一偈，又填一《寄生草》，心中自得。寶釵說她是引起寶玉說瘋話的罪魁。
元妃送出燈迷讓猜，寶釵一猜就著，卻故作難猜之狀。賈母見元春喜悅，也命製作燈謎大家猜。賈母說「荔枝」（離枝）讓賈政猜。
賈政看了眾從姊妹不祥之謎，傷悲感慨。
●第二十三回
西廂記妙詞通戲語 牡丹亭艷曲警芳心
元妃下諭叫寶釵等去園中住。賈政傳來寶玉，當著王夫人的面，把往日嫌惡心減了八九；雖對所起「襲人」名字不滿，但又不讓改。
寶玉偷看《會真記》，抖花瓣於水中，遇見葬花之黛玉。寶玉用《西廂記》中詞句相戲，黛玉豎眉瞪眼，帶怒含嗔，說寶玉「欺負」她。
黛玉在梨香院聽《牡丹亭》，感慨纏綿，點頭自嘆，心動神搖，如醉如痴，眼中落淚。
●第二十四回
醉金剛輕財尚義俠 痴女兒遺帕惹相思
賈芸從賈璉處打聽得鳳姐把和尚的事給了賈芹便向母舅卜世仁要冰片麝香，准備給鳳姐行賄，卜世仁拒絕了。
頗有義俠之氣的醉金剛倪二不要文約不要利錢借十五兩三錢多銀子給賈芸。賈芸買冰麝奉承鳳姐。賈芸看寶玉未遇，遇見小紅。賈芸二次遇到鳳姐，鳳姐嫌他「揀遠路兒走」，不先求她，求了賈璉；但又說不是賈璉主情，她不管賈芸的事。
寶玉叫俏麗干凈的小紅遞茶。小紅因此被秋紋、碧痕罵了一頓；回家做夢，夢見賈芸拾了她的手帕。
●第二十五回
魘魔法姊弟逢五鬼 紅樓夢通靈遇雙真
寶玉乾娘馬道婆騙得賈母每日五斤油供奉菩薩，保寶玉無災。趙姨娘給馬道 婆說這一分家私要不都叫鳳姐搬送到娘家去，「我也不是個人」。並叫馬道婆設法絕了寶、鳳，「這家私不怕不是我環兒的」。給馬寫五百兩欠契一張，馬給了紙鉸的十個鬼和兩個紙人。
鳳姐給黛玉等送暹羅國進貢的茶葉。取笑說黛玉給她家作媳婦，黛玉罵她貧嘴賤舌討人嫌。鳳姐、黛玉正眼不看趙姨娘。
寶玉、鳳姐一齊發瘋。糊塗發燒。賈赦為寶、鳳尋僧覓道，賈政勸而不住。趙姨娘叫賈母給寶玉辦後事，被賈母連賈政一起罵了一頓。
和尚道士持誦「寶玉」，寶玉病癒，黛玉念佛，寶釵說如來佛管林姑娘姻緣，黛玉罵釵與鳳一樣是貧嘴爛舌。
●第二十六回
峰腰橋設言傳心事 瀟湘館春寧發幽情
紅玉、佳蕙有走心無留心，寶玉卻象幾百年的熬煎。寶玉傳賈芸說些沒要緊話。賈芸通過墜兒掉換了小紅羅帕。
寶玉來到「鳳尾森森，龍吟細細」的瀟湘館。寶玉用《西廂記》中詞曲相戲黛玉，黛玉變了臉，說寶玉拿她取笑。
薛蟠以賈政名義騙寶玉出來吃他生日的藕、瓜、鱘魚、熏暹豬。事後寶釵說寶玉吃了她家的新鮮東西了。
黛玉來看寶玉，晴雯不給開門，又聽釵、玉說笑，黛玉不禁傷心落淚。
●第二十七回
滴翠亭楊妃戲彩蝶 埋香冢飛燕泣殘紅
黛玉看到定釵從寶玉房中出來，心中不忿回家依欄悶坐，二更方睡。四月二十六日芒種節，閨閣興祭餞花神，眾女孩在園中玩耍，寶釵欲尋黛玉，看見主進了瀟湘館，一怕寶玉不便，二怕黛玉猜忌，便要回來，路遇蝴蝶，趕至滴翠亭，細聽小紅和墜兒正說那賈芸拾帕之事。
黛玉不理寶玉；探春在寶玉面罵趙姨娘，主動提出要給寶玉作鞋，被拒絕。黛玉葬花，寶玉痴倒。
●第二十八回
蔣玉菡情贈茜香羅 薛寶釵羞籠紅麝串
寶玉與黛玉葬花詩發生共鳴，慟倒山坡。寶玉說黛玉把外四路的寶姐姐、鳳姐姐主在心坎兒上，倒把他不理。寶玉、黛玉已清除誤會。
寶玉到馮紫有與薛蟠等飲酒行令。寶玉和蔣玉菡互贈禮物。襲人告訴寶玉端午節的禮元妃賜了，寶、釵一樣，黛玉心疑。寶玉卻還想著寶釵的膀子要長在黛玉身上就好了。
●第二十九回
享福人福深還禱福 痴情女情重愈斟情
黛玉用手帕打了呆看寶釵的寶玉眼睛。
鳳姐叫寶釵到清虛觀打醮看戲去，寶釵嫌熱不去。賈母要同鳳姐去。叫寶釵去，寶釵只好答應。王夫人笑說賈母「還是這么高興」。
鳳姐打上道士，賈母不叫唬著小道士。賈母婉言謝絕。張道士趁看「寶玉」之機奉承了許多寶貝，包括金麒麟。寶玉要散窮人，張道士攔阻。
馮紫英等來送禮，賈母後悔地說：「又不是什麼正經齋事，我們不過閑逛逛……」雖看了一天戲，下午便回來了，次日便懶怠去。第二天賈母、寶、黛再未去。寶、黛為張道士提親事鬧別扭。寶玉砸玉。黛玉「剪穗」。薛蟠生日，寶、黛、賈母等未去。寶玉對月長吁，黛玉臨風灑淚。賈母從中為難，說：「老冤家遇見小冤家」，「不是冤家不聚頭」，自己埋怨著也哭了。
●第三十回
寶釵借扇機帶雙敲 齡官劃薔痴及局外
寶玉給黛玉道歉，說就是自己死了，魂也要來一百遭。寶玉說黛玉死了他做和尚。黛玉用指戳寶玉額顱，又給寶玉綃帕叫擦淚，寶玉要拉黛玉去往老太太跟前。鳳姐跳了進來拉黛玉去見賈母，說兩人都扣了環了。寶玉比寶釵為楊妃，寶釵借靛兒來找扇子，發泄對寶、黛不滿。寶釵又借李逵負荊諷刺寶、黛。
盛暑，寶玉和金釧兒戲笑，王夫人打金釧兒一個嘴巴子。王夫人讓金釧兒的母親領之而去。寶玉看到薔薇架下齡官劃薔字，產生同情惻隱這心；片雲致雨，自己已濕，尚思女孩。寶玉淋雨回家踢了襲人一腳，襲人晚上吐血。
●第三十一回
撕扇子作千金一笑 因麒麟伏白首雙星
寶玉服侍襲人，向王太醫問葯。
端陽節王夫人治席請薛家母女賞午。眾人不歡而散。寶玉因此而回房中長吁短嘆，並因心情不好借情雯跌摺扇子股子還頂嘴而要攆他。襲人等跪求方免。晴雯諷刺襲人正經還沒混上個姑娘就稱起「我們」了。寶玉要情雯撕扇子，麝月出來干涉，寶玉說「千金難買一笑」。
釵、黛談說湘雲往日的調皮作為。王夫人說湘雲有了婆家，湘雲給襲人等帶來戒指。翠縷和湘雲論陰陽，最後歸結到麒麟也有陰陽，人亦有陰陽。兩人在薔薇架下拾到寶玉遺掉的金麒麟。
●第三十二回
訴肺腑心迷活寶玉 含恥辱情烈死金釧
湘雲在襲人面前褒釵貶黛；襲人求湘雲為寶玉做鞋，說林姑娘身材不好不能作。寶玉不願會雨村，湘雲勸他談講仕途經濟，寶玉對她下逐客令，說黛玉不說這些混帳活。黛玉怕寶玉因麒麟生出風流佳事，聽到寶玉贊她，不禁喜驚悲嘆。寶玉要黛玉放心，說黛玉皆因不放心才弄了一身病，但放心，病便會好。寶玉誤以襲人為黛玉傾訴肺腑。
金釧兒投井死，襲人同病相憐而流淚，寶釵卻去安慰王夫人，說金釧兒自己落井而死。
●第三十三回
手足耽耽小動唇舌 不肖種種大承笞撻
寶玉為金釧兒死而五內摧傷。受了父親一頓教訓，因為金釧兒感傷。竟不曾聽見，惹賈政。忠順府長史官來索琪官。賈環又進讒言，賈政面如金紙。賈政以流盪優伶，表贈私物，在家淫辱母婢，荒疏學業而笞撻。
●第三十四回
情中情因情感妹妹 錯里錯以錯勸哥哥
襲人說但凡聽他的話也不至如此若打出殘疾，叫人怎麼樣。寶釵手托丸葯來看。亦雲：「早聽人一句話也不至今日；老太太，太太心疼，我們看著心裡也疼」。寶玉心中為之大暢。黛玉來看。寶玉安慰黛玉說自己是裝出來給人看的。黛玉無聲而泣。勸說「你從此可都改了吧！」
王夫人叫襲人，襲人匯報寶玉情況，王夫人給了兩瓶進上的香露。
寶玉打發襲人去寶釵處借書，叫晴雯送舊帕兩塊給黛玉，黛玉神魄馳盪，自感可喜、可悲、可笑、可懼、可愧，題詩三首於其上。
●第三十五回
白玉釧親嘗蓮葉羹 黃金鶯巧結梅花絡
寶玉要吃小荷葉兒蓮蓬湯。鳳姐叫做十來碗大家吃，賈母說她拿官中錢做人情，她自告奮勇做東道，銀子在她帳上領。賈母對薛姨媽誇口說她有本事叫鳳姐弄來東西大家吃。鳳姐說賈母若不嫌肉酸，不然連她也吃。寶玉說襲人站乏了，拉她坐下。襲人叫寶玉請鶯兒打絡子。
鳳姐叫鶯兒和玉釧給寶玉送湯。玉釧兒叫婆子端湯，自己空手走。寶玉叫玉釧兒嘗湯。
寶釵提名給「寶玉」打絡子；襲人得了王夫人兩碗賞菜感到意外；寶玉不在乎；寶釵深明其意。
●第三十六回
綉鴛鴦夢兆絳芸軒 識分定情悟梨香院
賈母吩咐賈政的親隨小廝頭兒，以後賈政若喚寶玉以她的名義加以拒絕。寶玉甘為諸丫環充役，罵寶釵入了「國賊祿鬼」之流；除「四書」外，別書皆毀，深敬黛玉。
薛姨媽贊襲人，王夫人說襲人比寶玉強十倍。但不同意馬上收做屋裡人，「再過二三年再說」。
寶釵來到怡紅院。襲人正做鴛鴦戲蓮花樣的兜肚，襲人出去，寶釵坐在襲人的位子代做鴛鴦戲蓮花兜肚。
寶玉於夢中喊罵「和尚道士的話如何信得？什麼是金玉姻緣，我偏說是木石姻緣」，寶釵聽後「怔了」。鳳姐叫襲人向王夫人叩頭。寶玉喜不自禁。襲人說從此後她便是王夫人的人了。寶玉受齡官冷落，深悟人生情緣，各有分定。
●第三十七回
秋爽齋偶結海棠社 蘅鞠苑夜擬菊花題
探春向寶玉倡議創建詩社。適值賈芸送來海棠花兩盆，遂起名「海棠社」。探春給黛玉起名「瀟湘妃子」，寶釵給寶玉起號「無事忙」、「富貴閑人」。
湘雲補和詩，自願當東道。寶釵邀湘雲安歇，給湘雲出主意請老太太吃螃蟹賞桂花，並教湘雲紡績針黹為本。二人夜擬菊花題十二個。
●第三十八回
林瀟湘魁奪菊花詩 薛蘅蕪諷和螃蟹永
賈母帶王夫人、鳳姐及薛姨媽等進園。王夫人說賈母愛在那一處就在那一處。賈母誇寶釵細致，凡事想的妥當。
眾人作菊花詩。李紈評瀟湘妃子為魁，寶玉喜的拍手叫「極是，極公道」寶玉帶頭作詠螃蟹詩，寶釵小題寓大意。「只是諷刺世人太毒了些」。
●第三十九回
村姥姥是信口開合 情哥哥偏尋根究底
襲人問平兒這月月錢為什麼沒放，平兒告訴她，鳳姐早支了在外放債。
劉姥姥講女孩子雪地抽柴草，老太太因馬棚失火不讓說了；寶玉還在追問女孩兒凍出病來怎辦。劉姥姥又說神佛給人兒孫的幫事，吸引住了賈母、王夫人。寶玉卻記著女兒抽柴之事。派茗煙四處找女孩之廟。
●第四十回
史太君兩宴大觀園 金鴛鴦三宣牙牌令
賈母王夫人商議給史湘雲還席。李紈准備游園東西，劉姥姥上大觀樓綴錦閣觀看了一番。賈母揀大紅菊花簪於頭上，鳳姐給劉姥姥插了一頭菊花。
劉姥姥誇大觀園竟比畫兒還強十倍，賈母叫惜春畫大觀園。劉姥姥誇惜春能幹。
賈母領劉姥姥先來瀟湘館，劉姥姥誤認為是公子書房。來到蘅蕪苑，賈母誇寶釵太老實，要為寶釵收拾房子，叫鴛鴦取東西來放。在藕香榭吃酒行令。劉姥姥欲退席回家而不得。黛玉行令時無意說「牡丹亭」、「西湘記」中兩句詞曲。
●第四十一回
櫳翠庵茶品梅花雪 怡紅院劫遇母蝗蟲
賈母帶劉姥姥到櫳翠庵。妙玉用成窯五彩小蓋鍾招待賈母喝老君眉茶，劉姥姥喝了嫌淡。妙玉又私下招待寶、黛、釵喝茶。寶玉把妙玉不要的成窯茶杯要給劉姥姥。
賈母被小竹椅抬去歇息，王夫人在剛才賈母坐的榻上歪睡。鴛鴦帶劉姥姥遊玩供眾人取笑。姥姥醉卧怡紅院，襲人領他出來。
賈母覺得懶懶的，回房歇息。
●第四十二回
蘅蕪君蘭方解疑癖 瀟湘子雅謔補余香
王太醫給賈母診脈看病。鴛鴦叫劉姥姥看賈母送的一包袱東西。寶玉送了妙玉不要的成窯鍾子，更使她受寵若驚。鴛鴦送衣服。
寶釵「教導」黛玉不要被雜書移了性情，「就不可救了」。說得黛玉心下暗伏，「只有答應『是』的一字，」惜春告假一年畫大觀園。黛玉叫劉姥姥「母蝗蟲」。寶釵誇黛玉取笑兒淡而有味。
●第四十三回
閑取樂偶攢金慶壽 不了情暫撮土為香
賈母提出為鳳姐做生日。方法是湊份子。邢夫人也被叫來了。賈母帶頭二十兩。鳳姐對邢、王夫人各出二六兩不服，叫分別替兩位姐兒出了。又要周、趙姨娘也出份子。尤氏替周、趙抱打不平。共湊一百五十兩。鳳姐叫尤氏看老太太眼色行事。尤氏說鳳姐收著些好，太滿了就潑出來了。
寶玉在鳳姐生日時以給北靜王死妾探喪為名給金釧兒燒紙，茗煙跟著。借素日厭惡的水仙庵一用。回家後賈母用「叫你老子打你」相威嚇。
●第四十四回
變生不測鳳姐潑醋 喜出望外平兒理妝
鳳姐揚手打給賈璉放哨的小丫頭臉，小丫頭一栽，這邊臉上又一下，登時小丫頭兩腮紫脹起來。另一放哨丫頭被一揚手打了個趔趄。賈璉和鮑二家議論要扶正平兒，罵鳳姐是夜叉星。鳳姨打罵平兒。
寶釵勸平兒。襲人勸平兒。寶玉給平兒道歉，要平兒換衣服，幫平兒理妝。
寶玉思平兒供應俗璉威鳳，其命之薄比黛玉更甚，不禁為之落淚。
賈母坐陣，叫賈璉為鳳姐賠不是，又叫璉、鳳給平兒賠不是。賈璉說鳳姐「太要足了強也不是好事」。鮑二媳婦上吊，鳳姐趁願，賈璉給銀二百，又虧王子騰幫忙，方了此事。
●第四十五回
金蘭契互剖金蘭語 風雨夕悶制風雨詞
寶釵周到地應付各方面關系，黛玉則因病常接待不周。寶釵來看黛玉，叫她看病，黛玉說「死生有命，富貴在天」，非人力可強。寶釵勸黛玉每天早起喝燕窩粥。主感激寶釵，承認自己錯了，誤到如今。又說自己長了今年十五歲，竟沒一個人象寶釵前日那樣教導她，承認「我竟自誤了」。
秋霖脈脈，服晴不定，黛玉擬《春江花月夜》而作「秋窗風雨夕」。寶玉披蓑戴笠來看，黛玉說寶玉「漁翁」，後又說自己「漁婆」，感謝寶玉一天來幾次看她，下雨還來。黛玉送寶玉披璃綉球燈回去。寶釵又差婆子送來一大包上等燕窩，還有一包潔粉梅片雪花洋糖。黛玉感念寶釵，又心疑寶玉。
●第四十六回
尷尬人難免尷尬事 鴛鴦女誓絕鴛鴦偶
邢夫人叫過鳳姐，求她為賈赦求娶鴛鴦，鳳姐假賈母之口拒絕了。邢夫人只知承順賈赦以自保，一應大小事務，俱由賈赦擺布。鳳姐見邢夫人先贊鴛鴦扎花的針線好，又渾身打量鴛鴦；拉鴛鴦手為之道喜；說明原故，要拉鴛鴦回老太太；又到鳳姐處。鴛鴦則一直不說話，對平兒表示說即使作大老婆她也不幹。賈赦叫賈璉去南京找鴛鴦父金彩，賈璉未去被罵了一頓。賈赦親喚鴛鴦之兄金文翔吩咐，金文翔領鴛鴦回家，鴛鴦咬定牙不願意，到賈母面前剪發明誓。
●第四十七回
呆霸王調情遭苦打 冷郎君懼禍走他鄉
賈母訓邢夫人「三從四德」，「賢慧太過」，說明鴛鴦對自己、王夫人、鳳姐的重要性。
賈母叫薛姨媽、王夫人、鳳姐、鴛鴦打牌斗樂，鳳姐輸錢說笑逗賈母喜歡。賈璉替賈赦來請邢夫人，被賈母教訓了一頓。邢夫人訓賈璉不孝。賈赦忍氣花銀買了嫣紅做妾。自此告病，不敢再見賈母。
柳湘蓮誘薛蟠至郊外揍了一頓。賈珍派賈蓉至北門外橋下二里路葦塘處找到薛蟠。薛姨媽要告訴王夫人尋拿湘蓮，被寶釵勸阻了。
●第四十八回
濫情人情誤思游藝 慕雅女雅集苦呤詩
薛蟠要和老伙計張德輝南去販紙札香扇。薛蟠說母親，母親不允，薛賭氣睡。寶釵同意讓哥去，薛氏以用錢買乖而應允。香菱和寶釵搬來同住。香菱要寶釵教他作詩，寶釵和叫香菱從老太太起各處拜望拜望。
平兒向寶釵要棒瘡葯，說賈赦為石獃子二十把古扇之事把賈璉打了一頓，臉上兩處傷。
黛玉自願給香菱作老師教其寫詩。黛玉講作詩第一立意要緊，「不以詞害意」。和香菱一塊講究討論，指導香菱作詩。
●第四十九回
琉璃世界白雪紅梅 脂粉香娃割腥啖膻
眾姐妹商議在蘆雪庵賞雪作詩。寶玉第二天起來，出站見雪色皎潔，在櫳翠庵賞玩梅花。湘雲和寶玉向賈母要了一塊鹿肉。眾人吃鹿肉，平兒丟了一個鐲子。
●第五十回
蘆雪庵爭聯即景詩 暖香塢雅制春燈謎
鳳姐起頭聯句：「一夜北風緊」。眾人罰寶玉去櫳翠庵妙玉處乞梅。罰寶玉作乞梅詩。賈母也來了。吃糟鵪鶉，叫大家作燈謎正月里玩。
賈母欲求寶琴與寶玉為配，薛姨媽說已許與梅翰林家了，鳳姐裝作要說媒。

② 紅樓夢 44 回 腳本 一回要寫20頁 一頁四句話 速度來 分數 30 寫完立馬給你

第四十四回

變生不測鳳姐潑醋 喜出望外平兒理妝

話說眾人看演<<荊釵記>>,寶玉和姐妹一處坐著.林黛玉因看到<<男祭>>這一出
上, 便和寶釵說道:這王十朋也不通的很,不管在那裡祭一祭罷了,必定跑到江邊子
上來作什麼!俗語說,`睹物思人,天下的水總歸一源,不拘那裡的水舀一碗看著哭去
,也就盡情了.寶釵不答.寶玉回頭要熱酒敬鳳姐兒.
原來賈母說今日不比往日, 定要叫鳳姐痛樂一日.本來自己懶待坐席,只在里間
屋裡榻上歪著和薛姨媽看戲, 隨心愛吃的揀幾樣放在小幾上,隨意吃著說話兒,將自
己兩桌席面賞那沒有席面的大小丫頭並那應差聽差的婦人等, 命他們在窗外廊檐下
也只管坐著隨意吃喝, 不必拘禮.王夫人和邢夫人在地下高桌上坐著,外面幾席是他
姊妹們坐. 賈母不時吩咐尤氏等:讓鳳丫頭坐在上面,你們好生替我待東,難為他一
年到頭辛苦. 尤氏答應了,又笑回說道:他坐不慣首席,坐在上頭橫不是豎不是的,
酒也不肯吃.賈母聽了,笑道:你不會,等我親自讓他去.鳳姐兒忙也進來笑說:老
祖宗別信他們的話,我吃了好幾鍾了.賈母笑著,命尤氏:快拉他出去,按在椅子上,
你們都輪流敬他. 他再不吃,我當真的就親自去了.尤氏聽說,忙笑著又拉他出來坐
下,命人拿了台盞斟了酒,笑道:一年到頭難為你孝順老太太,太太和我.我今兒沒什
么疼你的, 親自斟杯酒,乖乖兒的在我手裡喝一口.鳳姐兒笑道:你要安心孝敬我,
跪下我就喝. 尤氏笑道:說的你不知是誰!我告訴你說,好容易今兒這一遭,過了後
兒, 知道還得象今兒這樣不得了?趁著盡力灌喪兩鍾罷.鳳姐兒見推不過,只得喝了
兩鍾.接著眾姊妹也來,鳳姐也只得每人的喝一口.賴大媽媽見賈母尚這等高興,也少
不得來湊趣兒,領著些嬤嬤們也來敬酒.鳳姐兒也難推脫,只得喝了兩口.鴛鴦等也來
敬,鳳姐兒真不能了,忙央告道:好姐姐們,饒了我罷,我明兒再喝罷.鴛鴦笑道:真
個的, 我們是沒臉的了?就是我們在太太跟前,太太還賞個臉兒呢.往常倒有些體面,
今兒當著這些人,倒拿起主子的款兒來了.我原不該來.不喝,我們就走.說著真個回
去了.鳳姐兒忙趕上拉住,笑道:好姐姐,我喝就是了.說著拿過酒來,滿滿的斟了一
杯喝乾.鴛鴦方笑了散去,然後又入席.
鳳姐兒自覺酒沉了,心裡突突的似往上撞,要往家去歇歇,只見那耍百戲的上來,
便和尤氏說:預備賞錢,我要洗洗臉去.尤氏點頭.鳳姐兒瞅人不防,便出了席,往房
門後檐下走來. 平兒留心,也忙跟了來,鳳姐兒便扶著他.才至穿廊下,只見他房裡的
一個小丫頭正在那裡站著,見他兩個來了,回身就跑.鳳姐兒便疑心忙叫.那丫頭先只
裝聽不見,無奈後面連平兒也叫,只得回來.鳳姐兒越發起了疑心,忙和平兒進了穿堂
, 叫那小丫頭子也進來,把К扇關了,鳳姐兒坐在小院子的台階上,命那丫頭子跪了,
喝命平兒:叫兩個二門上的小廝來,拿繩子鞭子,把那眼睛裡沒主子的小蹄子打爛了
! 那小丫頭子已經唬的魂飛魄散,哭著只管碰頭求饒.鳳姐兒問道:我又不是鬼,你
見了我, 不說規規矩矩站住,怎麼倒往前跑?小丫頭子哭道:我原沒看見奶奶來.我
又記掛著房裡無人,所以跑了.鳳姐兒道:房裡既沒人,誰叫你來的?你便沒看見我,
我和平兒在後頭扯著脖子叫了你十來聲,越叫越跑.離的又不遠,你聾了不成?你還和
我強嘴! 說著便揚手一掌打在臉上,打的那小丫頭一栽,這邊臉上又一下,登時小丫
頭子兩腮紫脹起來.平兒忙勸:奶奶仔細手疼.鳳姐便說:你再打著問他跑什麼.他
再不說,把嘴撕爛了他的!那小丫頭子先還強嘴,後來聽見鳳姐兒要燒了紅烙鐵來烙
嘴,方哭道:二爺在家裡,打發我來這里瞧著奶奶的,若見奶奶散了,先叫我送信兒去
的.不承望奶奶這會子就來了.鳳姐兒見話中有文章,叫你瞧著我作什麼?難道怕我
家去不成? 必有別的原故,快告訴我,我從此以後疼你.你若不細說,立刻拿刀子來割
你的肉.說著,回頭向頭上拔下一根簪子來,向那丫頭嘴上亂戳,唬的那丫頭一行躲,
一行哭求道:我告訴奶奶,可別說我說的.平兒一旁勸,一面催他,叫他快說.丫頭便
說道:二爺也是才來房裡的,睡了一會醒了,打發人來瞧瞧奶奶,說才坐席,還得好一
會才來呢. 二爺就開了箱子,拿了兩塊銀子,還有兩根簪子,兩匹緞子,叫我悄悄的送
與鮑二的老婆去,叫他進來.他收了東西就往咱們屋裡來了.二爺叫我來瞧著奶奶,底
下的事我就不知道了.
鳳姐聽了,已氣的渾身發軟,忙立起來一徑來家.剛至院門,只見又有一個小丫頭
在門前探頭兒, 一見了鳳姐,也縮頭就跑.鳳姐兒提著名字喝住.那丫頭本來伶俐,見
躲不過了, 越性跑了出來,笑道:我正要告訴奶奶去呢,可巧奶奶來了.鳳姐兒道:
告訴我什麼?那小丫頭便說二爺在家這般如此如此,將方才的話也說了一遍.鳳姐啐
道:你早作什麼了?這會子我看見你了,你來推干凈兒!說著也揚手一下打的那丫頭
一個趔趄,便攝手攝腳的走至窗前.往裡聽時,只聽里頭說笑.那婦人笑道:多早晚你
那閻王老婆死了就好了.賈璉道:他死了,再娶一個也是這樣,又怎麼樣呢?那婦人
道:他死了,你倒是把平兒扶了正,只怕還好些.賈璉道:如今連平兒他也不叫我沾
一沾了.平兒也是一肚子委曲不敢說.我命里怎麼就該犯了`夜叉星.
鳳姐聽了, 氣的渾身亂戰,又聽他倆都贊平兒,便疑平兒素日背地裡自然也有憤
怨語了, 那酒越發涌了上來,也並不忖奪,回身把平兒先打了兩下,一腳踢開門進去,
也不容分說,抓著鮑二家的撕打一頓.又怕賈璉走出去,便堵著門站著罵道:好淫婦!
你偷主子漢子, 還要治死主子老婆!平兒過來!你們淫婦忘八一條藤兒,多嫌著我,外
面兒你哄我! 說著又把平兒打幾下,打的平兒有冤無處訴,只氣得乾哭,罵道:你們
做這些沒臉的事,好好的又拉上我做什麼!說著也把鮑二家的撕打起來.賈璉也因吃
多了酒,進來高興,未曾作的機密,一見鳳姐來了,已沒了主意,又見平兒也鬧起來,把
酒也氣上來了. 鳳姐兒打鮑二家的,他已又氣又愧,只不好說的,今見平兒也打,便上
來踢罵道:好娼婦!你也動手打人!平兒氣怯,忙住了手,哭道:你們背地裡說話,為
什麼拉我呢?鳳姐見平兒怕賈璉,越發氣了,又趕上來打著平兒,偏叫打鮑二家的.平
兒急了, 便跑出來找刀子要尋死.外面眾婆子丫頭忙攔住解勸.這里鳳姐見平兒尋死
去, 便一頭撞在賈璉懷里,叫道:你們一條藤兒害我,被我聽見了,倒都唬起我來.你
也勒死我!賈璉氣的牆上拔出劍來,說道:不用尋死,我也急了,一齊殺了,我償了命
, 大家干凈.正鬧的不開交,只見尤氏等一群人來了,說:這是怎麼說,才好好的,就
鬧起來.賈璉見了人,越發倚酒三分醉,逞起威風來,故意要殺鳳姐兒.鳳姐兒見人
來了,便不似先前那般潑了,丟下眾人,便哭著往賈母那邊跑.
此時戲已散出,鳳姐跑到賈母跟前,爬在賈母懷里,只說:老祖宗救我!璉二爺要
殺我呢!賈母,邢夫人,王夫人等忙問怎麼了.鳳姐兒哭道:我才家去換衣裳,不防璉
二爺在家和人說話,我只當是有客來了,唬得我不敢進去.在窗戶外頭聽了一聽,原來
是和鮑二家的媳婦商議,說我利害,要拿毒葯給我吃了治死我,把平兒扶了正.我原氣
了, 又不敢和他吵,原打了平兒兩下,問他為什麼要害我.他臊了,就要殺我.賈母等
聽了,都信以為真,說:這還了得!快拿了那下流種子來!一語未完,只見賈璉拿著劍
趕來,後面許多人跟著.賈璉明仗著賈母素習疼他們,連母親嬸母也無礙,故逞強鬧了
來.邢夫人王夫人見了,氣的忙攔住罵道:這下流種子!你越發反了,老太太在這里呢
! 賈璉乜斜著眼,道:都是老太太慣的他,他才這樣,連我也罵起來了!邢夫人氣的
奪下劍來,只管喝他快出去!那賈璉撒嬌撒痴,涎言涎語的還只亂說.賈母氣的說道
:我知道你也不把我們放在眼睛裡,叫人把他老子叫來!賈璉聽見這話,方趔趄著腳
兒出去了,賭氣也不往家去,便往外書房來.
這里邢夫人王夫人也說鳳姐兒. 賈母笑道:什麼要緊的事!小孩子們年輕,饞嘴
貓兒似的,那裡保得住不這么著.從小兒世人都打這么過的.都是我的不是,他多吃了
兩口酒, 又吃起醋來.說的眾人都笑了.賈母又道:你放心,等明兒我叫他來替你賠
不是. 你今兒別要過去臊著他.因又罵:平兒那蹄子,素日我倒看他好,怎麼暗地裡
這么壞. 尤氏等笑道:平兒沒有不是,是鳳丫頭拿著人家出氣.兩口子不好對打,都
拿著平兒煞性子. 平兒委曲的什麼似的呢,老太太還罵人家.賈母道:原來這樣,我
說那孩子倒不象那狐媚魘道的. 既這么著,可憐見的,白受他們的氣.因叫琥珀來:
你出去告訴平兒,就說我的話:我知道他受了委曲,明兒我叫鳳姐兒替他賠不是.今兒
是他主子的好日子,不許他胡鬧.
原來平兒早被李紈拉入大觀園去了.平兒哭的哽咽難抬.寶釵勸道:你是個明白
人,素日鳳丫頭何等待你,今兒不過他多吃一口酒.他可不拿你出氣,難道倒拿別人出
氣不成?別人又笑話他吃醉了.你只管這會子委曲,素日你的好處,豈不都是假的了?
正說著, 只見琥珀走來,說了賈母的話.平兒自覺面上有了光輝,方才漸漸的好了,也
不往前頭來.寶釵等歇息了一回,方來看賈母鳳姐.
寶玉便讓平兒到怡紅院中來. 襲人忙接著,笑道:我先原要讓你的,只因大奶奶
和姑娘們都讓你,我就不好讓的了.平兒也陪笑說多謝.因又說道:好好兒的從那
里說起,無緣無故白受了一場氣.襲人笑道:二奶奶素日待你好,這不過是一時氣急
了. 平兒道:二奶奶倒沒說的,只是那淫婦治的我,他又偏拿我湊趣,況還有我們那
糊塗爺倒打我.說著便又委曲,禁不住落淚.寶玉忙勸道:好姐姐,別傷心,我替他兩
個賠不是罷. 平兒笑道:與你什麼相干?寶玉笑道:我們弟兄姊妹都一樣.他們得
罪了人,我替他賠個不是也是應該的.又道:可惜這新衣裳也沾了,這里有你花妹妹
的衣裳, 何不換了下來,拿些燒酒噴了熨一熨.把頭也另梳一梳,洗洗臉.一面說,一
面便吩咐了小丫頭子們舀洗臉水,燒熨斗來.平兒素習只聞人說寶玉專能和女孩兒們
接交,寶玉素日因平兒是賈璉的愛妾,又是鳳姐兒的心腹,故不肯和他廝近,因不能盡
心,也常為恨事.平兒今見他這般,心中也暗暗的ゅ�:果然話不虛傳,色色想的周到.
又見襲人特特的開了箱子,拿出兩件不大穿的衣裳來與他換,便趕忙的脫下自己的衣
服, 忙去洗了臉.寶玉一旁笑勸道:姐姐還該擦上些脂粉,不然倒象是和鳳姐姐賭氣
了似的. 況且又是他的好日子,而且老太太又打發了人來安慰你.平兒聽了有理,便
去找粉,只不見粉.寶玉忙走至妝台前,將一個宣窯瓷盒揭開,裡面盛著一排十根玉簪
花棒,拈了一根遞與平兒.又笑向他道:這不是鉛粉,這是紫茉莉花種,研碎了兌上香
料制的.平兒倒在掌上看時,果見輕白紅香,四樣俱美,攤在面上也容易勻凈,且能潤
澤肌膚, 不似別的粉青重澀滯.然後看見胭脂也不是成張的,卻是一個小小的白玉盒
子, 裡面盛著一盒,如玫瑰膏子一樣.寶玉笑道:那市賣的胭脂都不幹凈,顏色也薄.
這是上好的胭脂擰出汁子來, 淘澄凈了渣滓,配了花露蒸疊成的.只用細簪子挑一點
兒抹在手心裡,用一點水化開抹在唇上,手心裡就夠打頰腮了.平兒依言妝飾,果見鮮
艷異常, 且又甜香滿頰.寶玉又將盆內的一枝並蒂秋蕙用竹剪刀擷了下來,與他簪在
鬢上.忽見李紈打發丫頭來喚他,方忙忙的去了.
寶玉因自來從未在平兒前盡過心, ----且平兒又是個極聰明極清俊的上等女孩
兒, 比不得那起俗蠢拙物-----深為恨怨.今日是金釧兒的生日,故一日不樂.不想落
後鬧出這件事來,竟得在平兒前稍盡片心,亦今生意中不想之樂也.因歪在床上,心內
怡然自得. 忽又思及賈璉惟知以淫樂悅己,並不知作養脂粉.又思平兒並無父母兄弟
姊妹,獨自一人,供應賈璉夫婦二人.賈璉之俗,鳳姐之威,他竟能周全妥貼,今兒還遭
荼毒,想來此人薄命,比黛玉猶甚.想到此間,便又傷感起來,不覺灑然淚下.因見襲人
等不在房內,盡力落了幾點痛淚.復起身,又見方才的衣裳上噴的酒已半干,便拿熨斗
熨了疊好, 見他的手帕子忘去,上面猶有淚漬,又拿至臉盆中洗了晾上.又喜又悲,悶
了一回,也往稻香村來,說一回閑話,掌燈後方散.
平兒就在李紈處歇了一夜,鳳姐兒只跟著賈母.賈璉晚間歸房,冷清清的,又不好
去叫,只得胡亂睡了一夜.次日醒了,想昨日之事,大沒意思,後悔不來.邢夫人記掛著
昨日賈璉醉了, 忙一早過來,叫了賈璉過賈母這邊來.賈璉只得忍愧前來在賈母面前
跪下. 賈母問他:怎麼了?賈璉忙陪笑說:昨兒原是吃了酒,驚了老太太的駕了,今
兒來領罪. 賈母啐道:下流東西,灌了黃湯,不說安分守己的挺屍去,倒打起老婆來
了!鳳丫頭成日家
說嘴, 霸王似的一個人,昨兒唬得可憐.要不是我,你要傷了他的命,這會子怎麼
樣? 賈璉一肚子的委屈,不敢分辯,只認不是.賈母又道:那鳳丫頭和平兒還不是個
美人胎子? 你還不足!成日家偷雞摸狗,臟的臭的,都拉了你屋裡去.為這起淫婦打老
婆, 又打屋裡的人,你還虧是大家子的公子出身,活打了嘴了.若你眼睛裡有我,你起
來,我饒了你,乖乖的替你媳婦賠個不是,拉了他家去,我就喜歡了.要不然,你只管出
去,我也不敢受你的跪.賈璉聽如此說,又見鳳姐兒站在那邊,也不盛妝,哭的眼睛腫
著,也不施脂粉,黃黃臉兒,比往常更覺可憐可愛.想著:不如賠了不是,彼此也好了,
又討老太太的喜歡了.想畢,便笑道:老太太的話,我不敢不依,只是越發縱了他了.
賈母笑道:胡說!我知道他最有禮的,再不會沖撞人.他日後得罪了你,我自然也作
主,叫你降伏就是了.
賈璉聽說,爬起來,便與鳳姐兒作了一個揖,笑道:原來是我的不是,二奶奶饒過
我罷.滿屋裡的人都笑了.賈母笑道:鳳丫頭,不許惱了,再惱我就惱了.說著,又命
人去叫了平兒來,命鳳姐兒和賈璉兩個安慰平兒.賈璉見了平兒,越發顧不得了,所謂
妻不如妾,妾不如偷,聽賈母一說,便趕上來說道:姑娘昨日受了屈了,都是我的不
是. 奶奶得罪了你,也是因我而起.我賠了不是不算外,還替你奶奶賠個不是.說著,
也作了一個揖,引的賈母笑了,鳳姐兒也笑了.賈母又命鳳姐兒來安慰他.平兒忙走上
來給鳳姐兒磕頭, 說:奶奶的千秋,我惹了奶奶生氣,是我該死.鳳姐兒正自愧悔昨
日酒吃多了, 不念素日之情,浮躁起來,為聽了旁人的話,無故給平兒沒臉.今反見他
如此, 又是慚愧,又是心酸,忙一把拉起來,落下淚來.平兒道:我伏侍了奶奶這么幾
年, 也沒彈我一指甲.就是昨兒打我,我也不怨奶奶,都是那淫婦治的,怨不得奶奶生
氣. 說著,也滴下淚來了.賈母便命人將他三人送回房去,有一個再提此事,即刻來
回我,我不管是誰,拿拐棍子給他一頓.
三個人從新給賈母,邢王二位夫人磕了頭.老嬤嬤答應了,送他三人回去.至房中
,鳳姐兒見無人,方說道:我怎麼象個閻王,又象夜叉?那淫婦咒我死,你也幫著咒我.
千日不好, 也有一日好.可憐我熬的連個淫婦也不如了,我還有什麼臉來過這日子?
說著, 又哭了.賈璉道:你還不足?你細想想,昨兒誰的不是多?今兒當著人還是我跪
了一跪, 又賠不是,你也爭足了光了.這會子還叨叨,難道還叫我替你跪下才罷?太要
足了強也不是好事.說的鳳姐兒無言可對,平兒嗤的一聲又笑了.賈璉也笑道:又好
了!真真我也沒法了.
正說著,只見一個媳婦來回說:鮑二媳婦弔死了.賈璉鳳姐兒都吃了一驚.鳳姐
忙收了怯色, 反喝道:死了罷了,有什麼大驚小怪的!一時,只見林之孝家的進來悄
回鳳姐道:鮑二媳婦弔死了,他娘家的親戚要告呢.鳳姐兒笑道:這倒好了,我正想
要打官司呢!林之孝家的道:我才和眾人勸了他們,又威嚇了一陣,又許了他幾個錢
, 也就依了.鳳姐兒道:我沒一個錢!有錢也不給,只管叫他告去.也不許勸他,也不
用震嚇他,只管讓他告去.告不成倒問他個以屍訛詐!林之孝家的正在為難,見賈璉
和他使眼色兒,心下明白,便出來等著.賈璉道:我出去瞧瞧,看是怎麼樣.鳳姐兒道
: 不許給他錢.賈璉一徑出來,和林之孝來商議,著人去作好作歹,許了二百兩發送
才罷.賈璉生恐有變,又命人去和王子騰說,將番役仵作人等叫了幾名來,幫著辦喪事
.那些人見了如此,縱要復辨亦不敢辨,只得忍氣吞聲罷了.賈璉又命林之孝將那二百
銀子入在流年帳上, 分別添補開銷過去.又梯己給鮑二些銀兩,安慰他說:另日再挑
個好媳婦給你.鮑二又有體面,又有銀子,有何不依,便仍然奉承賈璉,不在話下.
裡面鳳姐心中雖不安, 面上只管佯不理論,因房中無人,便拉平兒笑道:我昨兒
灌喪了酒了,你別憤怨,打了那裡,讓我瞧瞧.平兒道:也沒打重.只聽得說,奶奶姑
娘都進來了.要知端的,下回分解.

③ 征服腳本在那裡找啊

征服掛機腳本
-本腳本可能不適合新游戲版本,我已經沒玩征服快一年了,這里僅僅是提供給初學者的腳本學習,不便之處,請大家原諒!! -每一步基本都有相關注釋 -聯系:[email protected] [replyview] vbs dim r0,l,m,k,dx,dy,x,y,a,b,starttime,sunhao2,xue2,color0,color//固定半徑r0=100VBS l=10 /圓半徑VBS m=5 /圓半徑VBS k=-90 /圓的漸變率vbs dx=1 /區的判斷值 goSub 注冊rem 注冊用戶goSub 加血提示goSub 損耗度提示gosub 半徑a,b /滑鼠初始坐標，開始時取得坐標值輸入// VBSCall Call GetCursorPos(a,b)@<stdlib.vbs>SaveMousePos///儲存此時坐標///////////////////////////////////開始主腳本rem beginIfExpression l<=r0While 1IfExpression k>-91 and k<270Gosub sub1 //獲得動態坐標EndIf IfExpression k>269 and k<630Gosub sub2 //獲得動態坐標EndIf gosub 注冊用戶打怪VBS k=k+1 /圓的漸變率k=k+0.3 IfExpression k=630VBS k=-90EndIf EndFor/////////////////對應開始的循環vbs l=l+10vbs k=k+10else RestoreMousePos delay 5000 VBSCall Call GetCursorPos(a,b)@<stdlib.vbs> SaveMousePos///儲存此時坐標 VBS l=10 /圓半徑 VBS m=5 /圓半徑 VBS k=-90 /圓的漸變率 endifgoto begin ////////以下為非注冊用戶 rem 非注冊用戶gosub 啟動時間goSub 加血提示goSub 損耗度提示 gosub 半徑a,b /滑鼠初始坐標，開始時取得坐標值輸入// VBSCall Call GetCursorPos(a,b)@<stdlib.vbs>SaveMousePos///儲存此時坐標///////////////////////////////////開始主腳本rem beginIfExpression l<=r0While 1IfExpression k>-91 and k<270Gosub sub1 //獲得動態坐標EndIf IfExpression k>269 and k<630Gosub sub2 //獲得動態坐標EndIf gosub 非注冊用戶打怪VBS k=k+1 /圓的漸變率k=k+0.3 IfExpression k=630VBS k=-90EndIf EndFor/////////////////對應開始的循環vbs l=l+10vbs k=k+10else RestoreMousePos delay 5000 VBSCall Call GetCursorPos(a,b)@<stdlib.vbs> SaveMousePos///儲存此時坐標 VBS l=10 /圓半徑 VBS m=5 /圓半徑 VBS k=-90 /圓的漸變率 endifgoto begin /////////////////////////////////////////////////以上為非注冊用戶代碼 Sub sub1VBS x=a+cos((k*3.1415926)/180)*lVBS y=b+sin((k*3.1415926)/180)*lReturn Sub sub2VBS x=a+cos((k*3.1415926)/180)*mVBS y=b+sin((k*3.1415926)/180)*mReturn /////////////////////////////////////////////////////////一下是件東西命令 Sub 撿東西vbs dim gx,gy,cx,xy VBSCall Call GetCursorPos(cx,cy)@<stdlib.vbs> //獲得當前坐標，方便回到以前軌跡 VBSCall Call FindColor(x-100,y+100,x+100,y-100,"8CE3FF",gx,gy)@<stdlib.vbs> //撿金子 If gx>0 VBSCall Call SetCursorPos(gx,gy)@<stdlib.vbs> LeftClick 1 Delay 3000 VBSCall Call SetCursorPos(cx,cy)@<stdlib.vbs> LeftClick 1 Delay 1000 EndIf VBSCall Call FindColor(x-100,y+100,x+100,y-100,"EFE3EF",gx,gy)@<stdlib.vbs>/////撿銀子 If gx>0 VBSCall Call SetCursorPos(gx,gy)@<stdlib.vbs> LeftClick 1 Delay 3000 VBSCall Call SetCursorPos(cx,cy)@<stdlib.vbs> LeftClick 1 Delay 1000 EndIf VBSCall Call FindColor(x-100,y+100,x+100,y-100,"FF55F7",gx,gy)@<stdlib.vbs>/////撿流星 If gx>0 VBSCall Call SetCursorPos(gx,gy)@<stdlib.vbs> LeftClick 1 Delay 3000 VBSCall Call SetCursorPos(cx,cy)@<stdlib.vbs> LeftClick 1 Delay 1000 EndIf VBSCall Call FindColor(x-100,y+100,x+100,y-100,"FF75CE",gx,gy)@<stdlib.vbs>/////撿龍豬 If gx>0 VBSCall Call SetCursorPos(gx,gy)@<stdlib.vbs> LeftClick 1 Delay 3000 VBSCall Call SetCursorPos(cx,cy)@<stdlib.vbs> LeftClick 1 Delay 1000 EndIf Return ///////////////////////////////////////////一下是退出遊戲命令 sub 死後回城退出IfColor 63 729 5a7584 0 KeyPress 115 1 Delay 3000 MoveTo 464 709 LeftClick 1 Delay 10000 SayString 大家玩好，我下了，先！！ KeyPress 13 1 Delay 100 MoveTo 671 757 LeftClick 1 Delay 10000 MoveTo 621 481 LeftClick 1 Delay 10000 MoveTo 469 413 LeftClick 1 Delay 100 gosub 關機 EndIf return ////////////////////////////////////////////下面是關機命令 sub 關機Delay 4000KeyDown 91 1KeyPress 82 1KeyUp 91 1Delay 50KeyPress 8 1Delay 100SayString Shutdown.exe -s -t 0Delay 1000KeyPress 13 1return /////////////////////////////////////////////////下面是加血以及損耗度命令 Sub 加血提示vbs dim xue2 VBSCall xue2=InputBox("請輸入補血最低值:") KeyDown 18 1 KeyPress 9 1 KeyUp 18 1 Delay 1000 If cint(xue2)>=5000 VBSCall Call MessageBox("注意您補血設定值"&xue2&" 太高！")@<stdlib.vbs> ElseIf cint(xue2)<=50 VBSCall Call MessageBox("注意您補血設定值"&xue2&" 太低！")@<stdlib.vbs> EndIf EndIf ReturnSub 加血vbs dim xue1,xue2 VBSCall Call ReadMemory(&h00E50CC0,2,xue1) If cint(xue1)<=cint(xue2) KeyPress 112 1 EndIf Return Sub 損耗度提示vbs dim sunhao2 VBSCall sunhao2=InputBox("請輸入損耗度允許的最低值:") KeyDown 18 1 KeyPress 9 1 KeyUp 18 1 Delay 1000 If cint(sunhao2)>=100 VBSCall Call MessageBox("注意您損耗度設定值："&sunhao2&" ;設置太高呀！！！")@<stdlib.vbs> ElseIf cint(sunhao2)<=10 VBSCall Call MessageBox("注意您損耗度設定值："&sunhao2&" ;設置太低呀！！！")@<stdlib.vbs> EndIf EndIf Return Sub 損耗度低退出vbs dim sunhao1,sunhao2 VBSCall Call ReadMemory(&h0504D52A,2,sunhao1) If cint(sunhao1)<=cint(sunhao2) KeyPress 115 1 Delay 100 MoveTo 671 757 LeftClick 1 Delay 2000 MoveTo 621 481 LeftClick 1 Delay 2000 MoveTo 469 413 LeftClick 1 Delay 100 gosub 關機 EndIf Return Sub 技能 vbs dim xf VBSCall Call ReadMemory(&h0053ACA8,2,xf) If cint(xf)=100 KeyPress 121 1 EndIf Return Sub 限時 vbs dim stoptime,starttime VBS stoptime=timer VBS t=stoptime-starttime If t>=600000 VBSCall Call MessageBox("使用時間已到，請注冊，謝謝使用！聯系：[email protected]") MoveTo 671 757 LeftClick 1 Delay 400 MoveTo 621 481 LeftClick 1 Delay 400 MoveTo 469 413 LeftClick 1 Delay 80 KeyDown 91 1 KeyPress 82 1 KeyUp 91 1 Delay 20 KeyPress 8 1 Delay 50 SayString Shutdown.exe -s -t 0 Delay 10 KeyPress 13 1 Gosub 終止腳本 EndIf Return Sub 注冊 VBS dim sn1,sn2,sn3 VBSCall sn1=InputBox("請輸入帳號:") KeyDown 18 1 KeyPress 9 1 KeyUp 18 1 VBS sn3="ascii"+sn1 VBSCall sn2=InputBox("請輸入注冊碼:") KeyDown 18 1 KeyPress 9 1 KeyUp 18 1 If StrComp(sn2,sn3)=0 VBSCall Call MessageBox("謝謝使用！請注冊！未注冊用戶試用10分鍾,聯系：[email protected]") Goto 非注冊用戶 elseif StrComp(sn2,sn3)=1 VBSCall Call MessageBox("謝謝您的注冊和支持，請關注我們為您提供的升級服務！聯系：[email protected]") Goto 注冊用戶 EndIf Return sub 葯少退出vbs dim yaoVBSCall Call ReadMemory(&h00F92ABC,2,yao) If cint(yao)<=3 KeyPress 115 1 Delay 100 MoveTo 671 757 LeftClick 1 Delay 10000 MoveTo 621 481 LeftClick 1 Delay 10000 MoveTo 469 413 LeftClick 1 Delay 100 gosub 關機 EndIf Return sub 半徑vbs dim roVBSCall ro=InputBox("請輸入掛機范圍（建議：100~150）:")Return Sub 血少退出vbs dim blood VBSCall Call ReadMemory(&h00E50CC0,2,blood) If cint(blood)<=800 KeyPress 115 1 Delay 100 MoveTo 671 757 LeftClick 1 Delay 10000 MoveTo 621 481 LeftClick 1 Delay 10000 MoveTo 469 413 LeftClick 1 Delay 100 gosub 關機 EndIf Return sub 終止腳本 VBSCall Call MessageBox("謝謝使用！請提出建議並注冊，聯系：[email protected] 再見！")EndScriptReturn sub 啟動時間vbs dim starttimeVBS starttime=timerReturn Sub 注冊用戶打怪///////////////////////////////////可以做成打怪子程序VBSCall color0=GetPixelColor(x,y) //在滑鼠移動之前，獲取目標點色值並賦值給color0VBSCall Call SetCursorPos(x,y)@<stdlib.vbs> //馬上移動滑鼠到目標點VBSCall color=GetPixelColor(x,y) //獲取滑鼠移動後該點色值並賦值給color IfExpression color<>color0 //同一點取得的兩次色值比較，不同，則執行以下的打怪腳本 LeftClick 1 //左鍵單擊 goSub 損耗度低退出 gosub 技能 Delay 900 //打怪延時 RightClick 1 gosub 加血 Delay 900 //打怪延時 goSub 限時 goSub 撿東西 gosub 技能 goSub 損耗度低退出 Delay 900 //打怪延時 gosub 加血 gosub 葯少退出 Delay 900 gosub 技能 goSub 血少退出 gosub 死後回城退出 Delay 500 goSub 限時 goSub 撿東西 EndIf //該點判斷結束 Delay 10 //循環延時///////////////////////////////////////////while dx>0VBSCall Call FindcenterColor(x-100,y+100,x+100,y-100,「0000BD」,dx,dy)@<stdlib.vbs>IfExpression dx>0 VBSCall Call SetCursorPos(dx,dy)@<stdlib.vbs> LeftClick 1 //左鍵單擊 goSub 損耗度低退出 gosub 技能 Delay 900 //打怪延時 RightClick 1 gosub 加血 Delay 900 //打怪延時 goSub 限時 goSub 撿東西 gosub 技能 goSub 損耗度低退出 Delay 900 //打怪延時 gosub 加血 gosub 葯少退出 Delay 900 gosub 技能 goSub 血少退出 gosub 死後回城退出 Delay 500 goSub 限時 goSub 撿東西 endifendfor/////////////////////////////////////////////vbs dx=1 ///////////////////////回到原始位置再次判斷VBSCall Call SetCursorPos(x,y)@<stdlib.vbs>//回到原始設定的軌跡上LeftClick 1Delay 1000VBSCall color0=GetPixelColor(x,y) //在滑鼠移動之前，獲取目標點色值並賦值給color0VBSCall Call SetCursorPos(x,y)@<stdlib.vbs> //馬上移動滑鼠到目標點VBSCall color=GetPixelColor(x,y) //獲取滑鼠移動後該點色值並賦值給color IfExpression color<>color0 //同一點取得的兩次色值比較，不同，則執行以下的打怪腳本 LeftClick 1 //左鍵單擊 goSub 損耗度低退出 gosub 技能 Delay 900 //打怪延時 RightClick 1 gosub 加血 Delay 900 //打怪延時 goSub 限時 goSub 撿東西 gosub 技能 goSub 損耗度低退出 Delay 900 //打怪延時 gosub 加血 gosub 葯少退出 Delay 900 gosub 技能 goSub 血少退出 gosub 死後回城退出 Delay 500 goSub 限時 goSub 撿東西 //打怪延時 EndIf //該點判斷結束 Delay 10 //循環延時VBSCall Call SetCursorPos(x,y)@<stdlib.vbs>//回到原始設定的軌跡上LeftClick 1Delay 1000 return //////////////////////////////////// Sub 注冊用戶打怪///////////////////////////////////可以做成打怪子程序VBSCall color0=GetPixelColor(x,y) //在滑鼠移動之前，獲取目標點色值並賦值給color0VBSCall Call SetCursorPos(x,y)@<stdlib.vbs> //馬上移動滑鼠到目標點VBSCall color=GetPixelColor(x,y) //獲取滑鼠移動後該點色值並賦值給color IfExpression color<>color0 //同一點取得的兩次色值比較，不同，則執行以下的打怪腳本 LeftClick 1 //左鍵單擊 goSub 損耗度低退出 gosub 技能 Delay 900 //打怪延時 RightClick 1 gosub 加血 Delay 900 //打怪延時 goSub 撿東西 gosub 技能 goSub 損耗度低退出 Delay 900 //打怪延時 gosub 加血 gosub 葯少退出 Delay 900 gosub 技能 goSub 血少退出 gosub 死後回城退出 Delay 500 goSub 撿東西 EndIf //該點判斷結束 Delay 10 //循環延時///////////////////////////////////////////while dx>0VBSCall Call FindcenterColor(x-100,y+100,x+100,y-100,「0000BD」,dx,dy)@<stdlib.vbs>IfExpression dx>0 VBSCall Call SetCursorPos(dx,dy)@<stdlib.vbs> LeftClick 1 //左鍵單擊 goSub 損耗度低退出 gosub 技能 Delay 900 //打怪延時 RightClick 1 gosub 加血 Delay 900 //打怪延時 goSub 撿東西 gosub 技能 goSub 損耗度低退出 Delay 900 //打怪延時 gosub 加血 gosub 葯少退出 Delay 900 gosub 技能 goSub 血少退出 gosub 死後回城退出 Delay 500 goSub 撿東西 endifendfor/////////////////////////////////////////////vbs dx=1 ///////////////////////回到原始位置再次判斷VBSCall Call SetCursorPos(x,y)@<stdlib.vbs>//回到原始設定的軌跡上LeftClick 1Delay 1000VBSCall color0=GetPixelColor(x,y) //在滑鼠移動之前，獲取目標點色值並賦值給color0VBSCall Call SetCursorPos(x,y)@<stdlib.vbs> //馬上移動滑鼠到目標點VBSCall color=GetPixelColor(x,y) //獲取滑鼠移動後該點色值並賦值給color IfExpression color<>color0 //同一點取得的兩次色值比較，不同，則執行以下的打怪腳本 LeftClick 1 //左鍵單擊 goSub 損耗度低退出 gosub 技能 Delay 900 //打怪延時 RightClick 1 gosub 加血 Delay 900 //打怪延時 goSub 撿東西 gosub 技能 goSub 損耗度低退出 Delay 900 //打怪延時 gosub 加血 gosub 葯少退出 Delay 900 gosub 技能 goSub 血少退出 gosub 死後回城退出 Delay 500 goSub 撿東西 //打怪延時 EndIf //該點判斷結束 Delay 10 //循環延時VBSCall Call SetCursorPos(x,y)@<stdlib.vbs>//回到原始設定的軌跡上LeftClick 1Delay 1000 return[/replyview]