[-CA-] 與 [Glamour Age] 方便買地小程式 - Facebook

記錄

Nov 17 配合 CA 改版也跟著改版。順便把程式的架構做大規模更動，
改為找尋而非讀死參數，這樣可以降低將來再改版的機率。

前言

因為這次程式碼做了變動，去除了新信沒讀或有新訊息時會造成小程式碼無效的 bug。

同時也把一次買一地、一次買五地、一次買十地三種系統內建買地模式程式碼一次列出。
請依照自己的需求使用。因為這三隻程式碼只有差一個數字，所以程式碼我只列出一段，
並注解怎麼改。

同時也加入了 Glamour Age 的賣地支援。Glamour Age 是同公司遊戲，
界面與 CA 類似，但題材是模特兒公司。

也把程式碼包成一個 anonymous function，避免污染 namespace。
這行看不懂沒關系。

以後更新一律修改此文。

基於以上更新，請大家容忍我再發一篇廢文，謝謝。


安裝方式

請參考 ●20308 m 411/10 B9 R: [心得] [-CA-] 方便買地的程式碼
┌─────────────────────────────────────┐
│ 文章代碼(AID): #1A-NGKAf (Facebook) [ptt.cc] Re: [心得] [-CA-] 方便買地? │
│ 文章網址: http://www.ptt.cc/bbs/Facebook/M.1257862164.A.2A9.html │
│ 這一篇文章值 241 元 │
└─────────────────────────────────────┘


使用方法

打開買地頁面，然後按那個已經安裝好的書簽。


小程式碼
/* 一次買一地，請複製並合並以下藍色部份，注意不要有空格。
javascript:(function(){var dh,dl,cx,ah,al;dh=document.getElementsByTagName("STR
ONG");dl=[];for(cx=0;cx<dh.length;cx++)if(dh[cx].className=="gold")dl.push(dh[c
x]);while(dl.length>14)dl.shift();ah=0;al=0;for(cx=0;cx<dl.length;cx+=2){dl[cx]
=dl[cx].innerHTML.replace(/\D/g,"")-0;dl[cx+1]=dl[cx+1].innerHTML.replace(/\D/g
,"")-0;if(ah<dl[cx]/dl[cx+1]){ah=dl[cx]/dl[cx+1];al=cx;}}dh=document.getElement
sByName("amount");dh[al].selectedIndex=0;dh=document.getElementsByTagName("INPU
T");dl=[];for(cx=0;cx<dh.length;cx++)if(dh[cx].value=="Buy"||dh[cx].value=="Bui
ld")dl.push(dh[cx]);dl[al/2].click();})();
*/

/* 一次買十地，請複製並合並以下藍色部份，注意不要有空格。
javascript:(function(){var dh,dl,cx,ah,al;dh=document.getElementsByTagName("STR
ONG");dl=[];for(cx=0;cx<dh.length;cx++)if(dh[cx].className=="gold")dl.push(dh[c
x]);while(dl.length>14)dl.shift();ah=0;al=0;for(cx=0;cx<dl.length;cx+=2){dl[cx]
=dl[cx].innerHTML.replace(/\D/g,"")-0;dl[cx+1]=dl[cx+1].innerHTML.replace(/\D/g
,"")-0;if(ah<dl[cx]/dl[cx+1]){ah=dl[cx]/dl[cx+1];al=cx;}}dh=document.getElement
sByName("amount");dh[al].selectedIndex=2;dh=document.getElementsByTagName("INPU
T");dl=[];for(cx=0;cx<dh.length;cx++)if(dh[cx].value=="Buy"||dh[cx].value=="Bui
ld")dl.push(dh[cx]);dl[al/2].click();})();
*/


程式碼
var dh, dl, cx, ah, al;
dh = document.getElementsByTagName("STRONG");
dl = [];
for (cx = 0; cx < dh.length; cx++)
if (dh[cx].className == "gold")
dl.push(dh[cx]);
while (dl.length > 14)
dl.shift();
ah = 0;
al = 0;
for (cx = 0; cx < dl.length; cx += 2)
{
dl[cx] = dl[cx].innerHTML.replace(/\D/g, "") - 0;
dl[cx + 1] = dl[cx + 1].innerHTML.replace(/\D/g, "") - 0;
if (ah < dl[cx] / dl[cx + 1])
{
ah = dl[cx] / dl[cx + 1];
al = cx;
}
}
dh = document.getElementsByName("amount");
// 0 買一地、1 買五地、2 買十地
dh[al].selectedIndex = 2;
dh = document.getElementsByTagName("INPUT");
dl = [];
for (cx = 0; cx < dh.length; cx++)
if (dh[cx].value == "Buy" || dh[cx].value == "Build")
dl.push(dh[cx]);
dl[al / 2].click();

--
大家好，我的 ID 是 B9，維他命 B9，也就是葉酸的意思，不過我不姓葉，也不是
因為喜歡葉酸才註冊 B9，是因為從 A0 試到 ZZ 只有 B9 沒人註冊，才註冊 B9。
你可以叫我 B9、嗶九、逼酒、酸、葉酸、葉酸酸或者酸酸。但我最喜歡的還是被
叫酸酸，請多多指教。如果我做錯事情，拜託請不要在我的暱稱前面加上臭字。歐對了
酸酸的味道是香的，並沒有酸酸的謝謝。
最後，貧血與孕婦記得要每日攝取足量葉酸，以防止貧血與胎兒兔唇。

--