<![CDATA[唔好巨集]]> 2013-04-14T18:38:13+08:00 http://openkorer.github.com/ Octopress <![CDATA[利用debug觸發巨集]]> 2013-04-14T17:47:00+08:00 http://openkorer.github.com/blog/2013/04/14/debug 應該很多人知道在config.txt中有一個叫debug的設定，如果把它設成1 openkore就會多出很多訊息。

  • 其他人物的移動
  • 其他人物望向的方向
  • 其他人物登出跟登入

當中比較有用的資料是其他人物的移動，因為就算人物偽裝或潛遁中，你也會收到他的位置。

    Player Moved: 好事多研究員 (17) Level 2 男孩 Novice - (116, 74) -> (116, 84)

因為我個人用英文版所以會跟中文版有點出入，以上資料你可以看到LV2的男初心者由116 74準備移動到116 84

這些資料可以幫我在PVP或GVG發揮無窮可能，只需配合automacro的console就可以觸發。

以下是我用過的例子

  • 當有修羅進入我身邊14x14就人孔他或做其他動作
  • 當有指定偽裝人物移到我身邊5x5就隨機後退迴避
  • 用修羅一直弓身彈影對方作追殺人

至於如何寫我就不公開了，看你個人創意。

使用條件及注意事項:

  • config.txt中debug設1是為了方便你寫巨集，寫好後建議設回0，因為就算設0 automacro一樣也可以觸發，避免收到太多資訊做成Lag。
  • config.txt中macro_allowDebug必須設 1，沒有請自行加入。
]]> <![CDATA[利用Perl Sub產生excel報告]]> 2013-04-07T21:52:00+08:00 http://openkorer.github.com/blog/2013/04/07/write2file

爬塔結束時大家最想知道什麼，大概是以下三點吧?

  1. 誰撿了什麼？
  2. 什麼時侯撿？
  3. 撿了多少次？

今天教大家利用perl sub產生excel報告

巨集使用條件及注意事項:

  • 隊伍成員撿取了物品有效，好像只對有貴重物或裝備才有效。
  • 必須與隊員同一地圖

partyitemlog
1
2
3
4
5
6

automacro partyitemlog {
  console /隊伍成員 (.*) 撿取了物品 (.*)/
  call {
    write2file("$.map","$.lastMatch1","$.lastMatch2")   #　呼叫perl sub並連帶地圖人物物品資料
  }
}

write2file
1
2
3
4
5
6
7
8
9
10
11
12
13

sub write2file {
  my ($map, $name, $desc) = @_;          # 把partyitemlog送來的資料代入$map,$name,$desc
  open(FILE, ">>:utf8", "$Settings::logs_folder/partyitem.csv"); # 打開logs資料夾下的csv檔，如沒有會自動產生。
  my @date  = localtime time;                # 讀取這一刻日期跟時間
  $date[5] += 1900;
  $date[4] += 1;
  my $time = sprintf(
  "%04d-%02d-%02d %02d:%02d:%02d",        # 自訂格式，個人比較喜歡用YYYY-MM-DD HH:MM:SS
  $date[5],$date[4],$date[3],$date[2],$date[1],$date[0]);     # 對應格式
  my $log = "$time,$map,$name,$desc\n"; # 自訂資料格式跟次序
  print FILE $log;                       # 把資料寫入檔案
  close(FILE);                           # 關閉檔案
}

以下是利用notepad打開partyitem.csv檔案的範本，符號,是csv檔用作分隔。

    2013-04-05 18:42:47,1@tower23,隊員A,變形長靴
    2013-04-05 18:42:56,1@tower23,隊員B,血斧
    2013-04-05 18:42:58,1@tower55,隊員A,獸人英雄卡片

用excel直接開會如圖下，如出現亂碼請用notepad打開partyitem.csv再儲存一次就解決。做一次以後就再不會出現亂碼。

只要在第一行加入標題然後選擇，再按filter。

成功後就如下圖標題尾多了一個向下三角型按鈕，然後可以根據人物地圖物品過濾資料。

假如我沒有excel怎麼辦? 改回用普通文字檔就可以，只需修write2file的第3,10行就可以。

    open(FILE, ">>:utf8", "$Settings::logs_folder/partyitem.txt");
    my $log = "$time\t$name\t$cate\t$desc\n";

修改後partyitem.txt內容如下，\t在perl語言是tab分隔，\n是換行。

    2013-04-05 18:44:45 1@tower23   隊員A 變形長靴
    2013-04-05 18:44:53 1@tower23   隊員B 血斧
    2013-04-05 18:44:55 1@tower55   隊員A 獸人英雄卡片
]]> <![CDATA[創造者-寬廣配藥]]> 2013-04-06T16:44:00+08:00 http://openkorer.github.com/blog/2013/04/06/pharmacy 這教學只製作鹽酸瓶跟火煙瓶，並不包括其他合成物品。分別由6個automacro組成。功能請看以下清單。

  • tp3get 從倉儲取出1份寬廣配藥的材料
  • tp3make 用寬廣配藥1次製作鹽酸瓶,火煙瓶,酒精各50份
  • demoget 從倉儲取出100份火煙瓶的材料
  • demomake 用配藥製作火煙瓶100次
  • acidget 從倉儲取出500份鹽酸瓶的材料
  • acidmake 用寬廣配藥1次製作50份鹽酸瓶，分10次製作。

巨集共同使用條件及注意事項:

  • 如果6個automacro都放在macros.txt建議次序是:
    1. tp3get
    2. tp3make 寬廣配藥做火煙瓶+酒精+鹽酸瓶
    3. demoget
    4. demomake 配藥單做火煙瓶，善用多出的酒精
    5. acidget
    6. acidmake 寬廣配藥做鹽酸瓶
  • 必須為開倉狀態才會觸發拿取出材料巨集
  • 開倉後就會自動開始，如果沒有自動開始先清空身上材料。
  • 如果想中途停止可以用坐下sit或關閉倉庫storage close即可
  • 必須修改tp3make,demomake,acidmake中的人物後int,後dex,後luk數值，如果你有各種對int,dex,luk有加成的技能和裝備，請用上後抄下並修改。確保製作時以最高成功率製作。
  • 建議酒精製作說明書，火煙瓶製作說明書，鹽酸瓶製作說明書都放身上
  • 巨集只對創造者有效，如想改用鍊金術師或基因學者請修改或刪除每個巨集的第2行。

tp3get
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31

automacro tp3get {
  class Creator
  status not EFST_SIT
  inventory "藥缽" == 0
  inventory "空瓶" == 0
  inventory "空試管" == 0
  inventory "植物梗" == 0
  inventory "毒魔菇芽孢" == 0
  inventory "透明之布" == 0
  inventory "不死心臟" == 0
  storage "藥缽" >= 200
  storage "空瓶" >= 200
  storage "空試管" >= 100
  storage "植物梗" >= 500
  storage "毒魔菇芽孢" >= 500
  storage "透明之布" >= 50
  storage "不死心臟" >= 50
  exclusive 1
  call {
  do storage add 鹽酸瓶
  do storage add 火煙瓶
  do storage add 酒精
  do storage get 藥缽 200
  do storage get 空瓶 200
  do storage get 空試管 100
  do storage get 植物梗 500
  do storage get 毒魔菇芽孢 500
  do storage get 透明之布 50
  do storage get 不死心臟 50
  }
}

tp3get使用條件及注意事項:

  • 身上所有材料的數量為0
  • 為開倉狀態
  • 倉庫有最少1份寬廣配藥的材料
    1. 藥缽 200
    2. 空瓶 200
    3. 空試管 100
    4. 植物梗 500
    5. 毒魔菇芽孢 500
    6. 透明之布 50
    7. 不死心臟 50

tp3make
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38

automacro tp3make {
  class Creator
  status not EFST_SIT
  status EFST_SOULLINK
  sp > 200
  eval $::char->{'int_bonus'} == 86
  eval $::char->{'dex_bonus'} == 103
  eval $::char->{'luk_bonus'} == 132
  inventory "酒精製作說明書" >= 1
  inventory "火煙瓶製作說明書" >= 1
  inventory "鹽酸瓶製作說明書" >= 1
  inventory "藥缽" >= 200
  inventory "空瓶" >= 200
  inventory "空試管" >= 100
  inventory "植物梗" >= 500
  inventory "毒魔菇芽孢" >= 500
  inventory "透明之布" >= 50
  inventory "不死心臟" >= 50
  exclusive 1
  call {
  $s1 = @storamount(藥缽)
  $s2 = @storamount(空瓶)
  $s3 = @storamount(空試管)
  $s4 = @storamount(植物梗)
  $s5 = @storamount(毒魔菇芽孢)
  $s6 = @storamount(透明之布)
  $s7 = @storamount(不死心臟)
  log 倉庫材料
  log 藥缽 $s1
  log 空瓶 $s2
  log 試管 $s3
  log 植物 $s4
  log 芽孢 $s5
  log 透布 $s6
  log 心臟 $s7
  do ss 498
  }
}

tp3make使用條件及注意事項:

  • 必須有靈魂狀態才能用寬廣配藥(靈悟士跟跆拳組隊再對創造者用靈魂就可以，之後跆拳下線也可以。但注意組拳聖是無效果的）
  • 身上有最少1份寬廣配藥的材料
  • 酒精製作說明書，火煙瓶製作說明書，鹽酸瓶製作說明書都放身上

demoget
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27

automacro demoget {
  class Creator
  status not EFST_SIT
  inventory "藥缽" == 0
  inventory "空瓶" == 0
  inventory "透明之布" == 0
  inventory "酒精" == 0
  storage "藥缽" >= 100
  storage "空瓶" >= 100
  storage "透明之布" >= 100
  storage "酒精" >= 100
  storage "植物梗" < 500
  storage "毒魔菇芽孢" < 500
  storage "火煙瓶" <= 29900
  inventory "空試管" == 0
  inventory "植物梗" == 0
  inventory "毒魔菇芽孢" == 0
  inventory "不死心臟" == 0
  exclusive 1
  call {
  do storage add 火煙瓶
  do storage get 藥缽 100
  do storage get 空瓶 100
  do storage get 透明之布 100
  do storage get 酒精 100
  }
}

demoget使用條件及注意事項:

  • 身上所有材料的數量為0
  • 為開倉狀態
  • 倉庫中植物梗跟毒魔菇芽孢不足500
  • 倉庫有最少100份火煙瓶的材料
    1. 藥缽 100
    2. 空瓶 100
    3. 透明之布 100
    4. 酒精 100

demomake
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33

automacro demomake {
  class Creator
  status not EFST_SIT
  sp > 20
  eval $::char->{'int_bonus'} == 86
  eval $::char->{'dex_bonus'} == 103
  eval $::char->{'luk_bonus'} == 132
  inventory "火煙瓶製作說明書" == 1
  inventory "藥缽" >= 1
  inventory "空瓶" >= 1
  inventory "空試管" == 0
  inventory "植物梗" == 0
  inventory "毒魔菇芽孢" == 0
  inventory "透明之布" >= 1
  inventory "不死心臟" == 0
  inventory "酒精" >= 1
  storage "火煙瓶" <= 29900
  exclusive 1
  call {
  $s1 = @storamount(藥缽)
  $s2 = @storamount(空瓶)
  $s6 = @storamount(透明之布)
  $s8 = @storamount(酒精)
  log 倉庫材料
  log 藥缽 $s1
  log 空瓶 $s2
  log 透布 $s6
  log 酒精 $s8
  do ss 228 10
  pause 1
    do send 8E 01 DF 1B 00 00 00 00 00 00
  }
}

demomake使用條件及注意事項:

  • 身上有最少100份火煙瓶的材料
  • 火煙瓶製作說明書放身上
  • 單獨做火煙瓶100次

acidget
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24

automacro acidget {
  class Creator
  status not EFST_SIT
  inventory "藥缽" == 150
  inventory "空瓶" == 150
  inventory "空試管" == 0
  inventory "植物梗" == 0
  inventory "毒魔菇芽孢" == 0
  inventory "透明之布" == 0
  inventory "不死心臟" == 0
  storage "藥缽" >= 500
  storage "空瓶" >= 500
  storage "鹽酸瓶" <= 29500
  storage "植物梗" < 0
  storage "毒魔菇芽孢" < 0
  storage "不死心臟" >= 500
  exclusive 1
  call {
  do storage add 鹽酸瓶
  do storage get 藥缽 500
  do storage get 空瓶 500
  do storage get 不死心臟 500
  }
}

acidget使用條件及注意事項:

  • 身上藥缽,空瓶數量為150,其他材料的數量為0
  • 為開倉狀態
  • 倉庫中植物梗跟毒魔菇芽孢不足500，而鹽酸瓶材料有500份或以上。
  • 倉庫有最少500份鹽酸瓶的材料
    1. 藥缽 500
    2. 空瓶 500
    3. 不死心臟 500

acidmake
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28

automacro acidmake {
  class Creator
  status not EFST_SIT
  status EFST_SOULLINK
  sp > 200
  eval $::char->{'int_bonus'} == 86
  eval $::char->{'dex_bonus'} == 103
  eval $::char->{'luk_bonus'} == 132
  inventory "鹽酸瓶製作說明書" >= 1
  inventory "藥缽" >= 200
  inventory "空瓶" >= 200
  inventory "空試管" == 0
  inventory "植物梗" == 0
  inventory "毒魔菇芽孢" == 0
  inventory "透明之布" == 0
  inventory "不死心臟" >= 50
  exclusive 1
  call {
  $s1 = @storamount(藥缽)
  $s2 = @storamount(空瓶)
  $s7 = @storamount(不死心臟)
  log 倉庫材料
  log 藥缽 $s1
  log 空瓶 $s2
  log 心臟 $s7
  do ss 498
  }
}

acidmake使用條件及注意事項:

  • 必須有靈魂狀態才能用寬廣配藥(靈悟士跟跆拳組隊再對創造者用靈魂就可以，之後跆拳下線也可以。但注意組拳聖是無效果的）
  • 身上有最少50份鹽酸瓶的材料
  • 鹽酸瓶製作說明書都放身上
  • 注意這是用寬廣配藥做鹽酸瓶
]]> <![CDATA[同盟公會頻道互通]]> 2013-04-04T08:08:00+08:00 http://openkorer.github.com/blog/2013/04/04/guildmsg 當你想跟分會或者同盟公會的朋友聊天時，很多時候都只是利用密頻，但只能一對一，有點可惜。 很久之前有人找我幫他寫了一個公會頻道互通的巨集，今天跟大家說一下原理跟寫法。

首先兩個公會都要有一個人物專門做通訊員，當A公會通訊員收到A公會的任何聊天信息就會通過密頻把A公會的聊天信息傳給B公會通訊員，當B公會通訊員收到後就在B公會發言，相反B對A也相同原理，先看以下模擬聊天記錄會比較容易理解。

    [A公會] A測試員 : B測試員在嗎?
    [B公會] B通訊員 : A測試員: B測試員在嗎?
    [B公會] B測試員 : 我在呀
    [A公會] A通訊員 : B測試員: 我在呀

巨集使用條件及注意事項:

  • 兩個公會也要有一人當通訊員才能互通
  • 通訊員密頻要開
  • 必須修改gmsg第5,6行，pmsg第2行的通訊員名稱。
  • 兩個公會的通訊員都要有gmsg，pmsg兩個巨集
  • 這版本只支持兩個公會
  • 假如同時(秒)出現大量聊天信息有機會出現遺留情況

使用方法:
如果設定沒出錯，正常用公會頻道聊天就OK

gmsg
1
2
3
4
5
6
7
8
9
10
11

automacro gmsg {
  guild /(.*)/
  call {
  [
  $me = 通訊員A # 本公會通訊員名稱
  $to = 通訊員B # 對方公會通訊員名稱
  if ($.lastguild = $me) stop
  do pm $to $.lastguild:$.lastguildMsg;stop
  ]
  }
}

pmsg
1
2
3
4
5
6

automacro pmsg {
  pm /(.*)/,通訊員B # 對方公會通訊員名稱
  call {
  do g $.lastpmMsg;stop
  }
}
]]> <![CDATA[查詢及平均分配金錢]]> 2013-04-02T22:20:00+08:00 http://openkorer.github.com/blog/2013/04/02/sharezeny 有些活動好像命運? 機會? 塔羅占卜師幫你解惑！每次都要轉錢是不是很煩？假如你人物多花的時間相對多，而且容易出錯。
往往大量金錢都集中在一個人物身上，而其他人物都只有少量。一旦到了需要金錢的活動或任務就變得麻煩。針對這問題寫了一個金錢交易巨集。先看看什麼情況下適用。

了解後我們來看一看整個交易流程，先準備一個人物作派錢員跟數個收錢的人物，把他們移動到同一格，這是為了確保不超過交易距離。很簡單，一同轉換地圖時就會重疊在一起。集體移動可參考這篇文章一次控制多個openkore。 然後利用隊頻或公會頻說出今次想要的金額，getzeny就會開始計算減去身上的差額，如果身上的金錢比想要的多就沒有動作，相反就會利用密頻通知派錢員派發多少錢，然後派錢員addzeny就會點缺錢的人物作交易並把差額加上。

巨集使用條件及注意事項:

  • 派錢員必須有足夠金錢
  • 派錢員密頻要開
  • 建議利用隊伍或公會頻道
  • 跟派錢員距離不超過**2((格
  • 建議找一個比較少人的地方
  • 必須修改派錢員的名稱，getzeny第3,7行，名稱包含特別符號可能會出問題！
  • config.txt中dealAuto改2
  • config.txt中dealAuto_names加上派錢員的名字，如果本身是空的就不用加！
  • 每7秒會密一次派錢員直到指定金錢才會停止。

使用方法:
e.g. 要求每人身上都要有10000000zeny (一千萬)
openkore: 隊伍用p z g 10000000 公會用g z g 10000000
官方遊戲程式: 在隊伍頻道直接輸入z g 10000000或在公會頻道輸入z g 10000000

getzeny
1
2
3
4
5
6
7
8
9
10
11
12
13

automacro getzeny {
  console /\[(隊伍|公會)\] (.*) \: z g (\d+)/
  player "派錢員",3
  call {
  while ($.zeny < $.lastMatch3) as loop        # 比較身上的金錢
  $z = @eval($.lastMatch3 - $.zeny)         # 計算差額
  $n = 派錢員
  do eval foreach my $_player (@{$::playersList->getItems()}) { next if $_player->{'name'} eq ""; next if $_player->{actorType} ne "Player"; if ($_player->{'name'} eq "$n") {$::Macro::Data::varStack{name} = $_player->{'name'}; $::Macro::Data::varStack{id} = $_player->{'binID'};}}
  do pm $n z a $z         # 通知派錢員派錢
  pause 7                  # 密一次派錢員的相隔秒數
  end loop
  }
}

addzeny
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

automacro addzeny {
  pm /z a (\d+)/
  exclusive 1
  call {
  if ($.zeny < $.lastMatch1) stop         # 比較身上跟要派的金額
  $n = $.lastpm                           # 最後密我的人的名字
  do eval foreach my $_player (@{$::playersList->getItems()}) { next if $_player->{'name'} eq ""; next if $_player->{actorType} ne "Player"; if ($_player->{'name'} eq "$n") {$::Macro::Data::varStack{name} = $_player->{'name'}; $::Macro::Data::varStack{id} = $_player->{'binID'};}}
  do deal $id                               # 交易最後密我的人
  pause 3
  do deal add z $.lastMatch1             # 放上金額
  do deal
  pause 3
  do deal
  }
}

另外查詢openkore們身上的zeny

使用方法:
openkore: 隊伍用p zeny 公會用g zeny
官方遊戲程式: 在隊伍頻道直接輸入zeny或在公會頻道輸入zeny

zenycheck
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

automacro zenycheck {
  console /\[(公會|隊伍)\] (.*) \: zeny/
  call {
  if ($.lastMatch1 == "公會") goto g
  if ($.lastMatch1 == "隊伍") goto p
  stop
  
  :g
  do g $.zeny
  stop
  
  :p
  do p $.zeny
  stop
  }
}

以下是openkore例出隊伍金錢報告的範本

    [隊伍] op01 : 1400000
    [隊伍] op01 : 500000
    [隊伍] op02 : 100410
    .
    .
    .
    [隊伍] op11 : 241232
    [隊伍] op12 : 5831323
]]> <![CDATA[用巨集播放音效]]> 2013-04-01T23:41:00+08:00 http://openkorer.github.com/blog/2013/04/01/playsound 今日教大家用openkore播放音效，什麼意思？就是用openkore時利用巨集觸發來播放音效檔案。有什麼好處？ 看我以下的舉例！

  • 用openkore開聊天室收物品時有人進來叮一聲！
  • 用openkore開露天賣出貨物時叮一聲！
  • 有人在你openkore打怪時1:1密你叮一聲!
  • 有人在廣播賣或收你想要的東西時叮一聲！
  • 還有更多… 看個人創意！
  • 建議音效檔是從RO的data.grf用grftool解出來的，用回RO的音效比較有親切感。
  • 教學不包括音效檔，請自備。
  • 記得要開喇叭！

以上共同之處是確保你正打Battlefield3，看電影，玩facebook等等時不會錯任何一個重要時刻。

我簡單用1:1語密做個例子，很簡單，先在config資料夾同一層開一個叫wav的新資料夾，把ting.wav放進去就可以，當然名稱跟什麼音樂檔可以自己更改，只要修改playSound('wav\ting.wav')後的字串就可以。

pm
1
2
3
4
5
6
7

automacro pm {
  pm /(.*)/
  exclusive 1
  call {
  do eval Utils::Win32::playSound('wav\ting.wav');
  }
}

露天賣出東西喵叫一聲！

autocloseshop
1
2
3
4
5
6
7
8
9
10
11
12
13
14

automacro autocloseshop {
  soldout >= 1
  exclusive 1
  location prontera
  call {
  pause 7
  do eval Utils::Win32::playSound('wav\cat.wav');
  do closeshop
  pause 7
  do openshop
  release all
  stop
  }
}

指定玩家出現在你距離20格就喵一聲在關閉openkore

playernear
1
2
3
4
5
6
7
8

automacro playernear {
  player "GM03",20
  call {
  do eval Utils::Win32::playSound('wav\cat.wav');
  do quit
  }
  timeout 1
}

愚人節快樂！

]]> <![CDATA[查詢物品數量及列出報告]]> 2013-03-30T23:34:00+08:00 http://openkorer.github.com/blog/2013/03/30/itemamount 在眾多openkore的倉庫裡尋找一件道具是非常痛苦的事，相信很多人都有試過買了東西後才發現自己倉庫已經擁有的經驗。 這巨集是設計給我自己N個商人用的，可利用隊伍及公會頻道同時查詢所有openkore指定物品在身上(包括已裝備的)，手推車及倉庫的數量。實用又方便！

巨集使用條件及注意事項:

  • 因為要輸入中文的關係，下達指令的人物必須用XKore模式或官方遊戲程式，推薦用XKore模式，其他openkore不用。
  • 如要查詢倉庫的數量必須在開倉狀態，集體走到卡普拉附近跟開倉可參考此文章一次控制多個openkore。
  • 必須組隊或加入公會，巨集中已同時支持隊伍及公會頻道。
  • 倉庫數量為-1時代表沒有開倉
  • 同時可用配合一次控制多個openkore跟storage get或add達到同時存取物品，例如我要每人從倉庫取500個紅蘿蔔出來的指令是cmd storage get 紅蘿蔔 500

使用方法:
e.g. 查詢紅蘿蔔
官方遊戲程式: 在隊伍頻道直接輸入ia 紅蘿蔔 + Enter或在公會頻道輸入ia 紅蘿蔔 + Ctrl+G

其他例子:

  • ia 海神之憤怒
  • ia 鈽鐳金盾 [1]
  • ia +6 鈽鐳金盾 [異型卡片] [1]
  • ia 歐羅萊昂的制服 [VIT+3] [1]
itemamount
1
2
3
4
5
6
7
8
9
10
11
12
13
14

automacro itemamount {
  console /\[(隊伍|公會)\] (.*) \: ia (.*)/
  run-once 1
  call {
  $m = $.lastMatch3
  $i = @invamount($m)
  $c = @cartamount($m)
  $s = @storamount($m)
  $t = @eval($i+$c+$s)
  do p 物品欄($i)手推車($c)倉庫($s)總共($t)   # 如要轉用公會頻出報告請用do g
  release all
  stop
  }
}

以下是openkore例出隊伍物品報告的範本

    [隊伍] op01 : ia 紅蘿蔔
    [隊伍] op01 : 物品欄(100)手推車(0)倉庫(10414)總共(10514)
    [隊伍] op02 : 物品欄(0)手推車(0)倉庫(20414)總共(20414)
    .
    .
    .
    [隊伍] op11 : 物品欄(1)手推車(1)倉庫(0)總共(2)
    [隊伍] op12 : 物品欄(0)手推車(0)倉庫(14)總共(14)
]]> <![CDATA[精煉大量防具]]> 2013-03-30T01:01:00+08:00 http://openkorer.github.com/blog/2013/03/30/refine 這是一個半自動的防具精煉巨集，適用於所有防具。武器建議用鐵匠系自己精煉比較好。 先看一下運作，假如你有很多鈽鐳金盾 [1]又想把它精煉到+7，只要利用隊伍頻道輸入7次指就可以完成。當然機率還是看你自己人品跟NPC心情！

巨集使用條件及注意事項:

  • config.txt中XKore必須為1，先開啟openkore，再用官方遊戲程式登入。
  • config.txt中itemsMaxWeight，itemsMaxWeight_sellOrStore，itemsMaxNum_sellOrStore設為99，這樣可防止負重而自動存倉。
  • 必須組隊，自己一人也可以。
  • 精煉地點為斐揚，必須看到NPC安東尼奧(payon 144 173)，如想找其他NPC請自行修改第4,13行。
  • 精煉前建議先把身上其他防具除下
  • 帶上足夠的鋁及金錢
  • 負重90%以下
  • 精煉物品必須為已鑒定
  • 可先在斐揚找卡普拉開倉，用開著倉的狀態走到安東尼奧附近，這樣就不用來回存取物品多次。
  • 適用於同隊伍的openkore同時進行精煉

使用方法:
請先細閱巨集使用條件及注意事項

e.g. 官方遊戲程式: 在隊伍頻道直接輸入refine 鈽鐳金盾 [1] resp 2或公開頻道直接輸入refine 鈽鐳金盾 [1] resp 2+Ctrl+P

resp後的數字代表各防具位置。請參照以下數值。

  • 0 頭
  • 1 衣服
  • 2 左手
  • 3 右手
  • 4 披肩
  • 5 鞋

refine 鈽鐳金盾 [1] resp 2指令是把身上所有未經精煉的鈽鐳金盾 [1]精煉上+1，完成後可輸入refine +1 鈽鐳金盾 [1] resp 2把身上的+1 鈽鐳金盾 [1]精煉上+2，如此類推，所以才叫半自動巨集。

其他例子：

  • refine +5 防水長靴 [1] resp 5把身上所有+5 防水長靴 [1]精煉上+6
  • refine +6 羊毛領巾 [1] resp 4把身上所有+6 羊毛領巾 [1]精煉上+7
refine
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24

automacro refine {
  party /refine (.*) resp (\d+)/
  #resp no. head 0,body 1,lefthand 2,righthand 3,robe 4,shoes 5
  location payon
    zeny >= 2000
    inventory "鋁" > 0
  call {
  $eq = $.lastMatch1
  $resp = $.lastMatch2
  while (@invamount($eq) >= 1 ) as loop
  if (@inventory(鋁) < 1 || $.zeny < 2000) goto notenough
  do eq $eq
  do talknpc 144 173 c r$resp c r0 c c r0 c n
  log $eq: @invamount($eq)
  end loop
  release all
  stop
  
  :notenough
  log "鋁" 或者 "金錢"不足
  release all
  stop
  }
}
]]> <![CDATA[管理儲存及倉庫位置]]> 2013-03-29T21:35:00+08:00 http://openkorer.github.com/blog/2013/03/29/save 有沒有試過每次轉換練功地點都要重新儲存位置跟修改storageAuto_npc都覺得麻煩? 這巨集可以簡易利用一句指令就可以完成多個openkore的設定！

巨集使用條件及注意事項:

  • 支援地點有prontera, payon, geffen, gef_fild10, izlude, morocc, alberta, alberta_in, aldebaran, yuno, comodo, rachel, einbech, lighthalzen, 其他地點請自行增加
  • 必須組隊或加入公會(須修改第2行)
  • 輸入英文地圖名稱必須正確

使用方法:
e.g. save prontera
openkore: 隊伍用p save prontera 公會用g save prontera
官方遊戲程式: 在隊伍頻道直接輸入save prontera或在公會頻道輸入save prontera

save
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145

automacro save {
  party /save (.*)/            # 如用公會頻請用 guild /save (.*)/
  run-once 1
  call {
  $savemap = $.lastMatch1
  $random = @rand(1,3)        # 走到儲存NPC附近的x,y隨機值
  if ($savemap = "alberta") goto alberta
  if ($savemap = "alberta_in") goto alberta_in
  if ($savemap = "aldebaran") goto aldebaran
  if ($savemap = "comodo") goto comodo
  if ($savemap = "einbech") goto einbech
  if ($savemap = "gef_fild10") goto gef_fild
  if ($savemap = "geffen") goto geffen
  if ($savemap = "izlude") goto izlude
  if ($savemap = "lighthalzen") goto lighthalzen
  if ($savemap = "morocc") goto morocc
  if ($savemap = "payon") goto payon
  if ($savemap = "prontera") goto prontera
  if ($savemap = "rachel") goto rachel
  if ($savemap = "veins") goto veins
  if ($savemap = "yuno") goto yuno
  release all
  stop
  
  :prontera
  do move $savemap @eval($random + 146) @eval($random + 89)
  do talknpc 146 89 r0 n
  do conf storageAuto_npc $savemap 146 89
  log 已經儲存好 $savemap
  release all
  stop
  
  :veins
  do move $savemap @eval($random + 208) @eval($random + 128)
  do talknpc 208 128 r0 n
  do conf storageAuto_npc $savemap 208 128
  log 已經儲存好 $savemap
  release all
  stop
  
  :aldebaran
  do move $savemap @eval($random + 143) @eval($random + 119)
  do talknpc 143 119 r0 n
  do conf storageAuto_npc $savemap 143 119
  log 已經儲存好 $savemap
  release all
  stop
  
  :alberta_in
  do move $savemap @eval($random + 21) @eval($random + 141)
  do talknpc 32 142 r0 n
  do conf storageAuto_npc $savemap 32 142
  log 已經儲存好 $savemap
  release all
  stop
  
  :alberta
  do move $savemap @eval($random + 113) @eval($random + 60)
  do talknpc 113 60 r0 n
  do conf storageAuto_npc $savemap 113 60
  log 已經儲存好 $savemap
  release all
  stop
  
  :payon
  do move $savemap @eval($random + 181) @eval($random + 104)
  do talknpc 181 104 r0 n
  do conf storageAuto_npc $savemap 181 104
  log 已經儲存好 $savemap
  release all
  stop
  
  :rachel
  do move $savemap @eval($random + 109) @eval($random + 138)
  do talknpc 109 138 r0 n
  do conf storageAuto_npc $savemap 109 138
  log 已經儲存好 $savemap
  release all
  stop
  
  :geffen
  do move $savemap @eval($random + 120) @eval($random + 62)
  do talknpc 120 62 r0 n
  do conf storageAuto_npc $savemap 120 62
  log 已經儲存好 $savemap
  release all
  stop
  
  :izlude
  do move $savemap @eval($random + 88) @eval($random + 88)
  do talknpc 134 88 r0 n
  do conf storageAuto_npc $savemap 134 88
  log 已經儲存好 $savemap
  release all
  stop
  
  :einbech
  do move $savemap @eval($random + 181) @eval($random + 132)
  do talknpc 181 132 r0 n
  do conf storageAuto_npc $savemap 181 132
  log 已經儲存好 $savemap
  release all
  stop
  
  :yuno
  do move $savemap @eval($random + 152) @eval($random + 187)
  do talknpc 152 187 r0 n
  do conf storageAuto_npc $savemap 152 187
  log 已經儲存好 $savemap
  release all
  stop
  
  :morocc
  do move $savemap @eval($random + 156) @eval($random + 97)
  do talknpc 156 97 r0 n
  do conf storageAuto_npc $savemap 156 97
  log 已經儲存好 $savemap
  release all
  stop
  
  :lighthalzen
  do move $savemap @eval($random + 164) @eval($random + 100)
  do talknpc 164 100 r0 n
  do conf storageAuto_npc $savemap 164 100
  log 已經儲存好 $savemap
  release all
  stop
  
  :gef_fild
  do move $savemap @eval($random + 73) @eval($random + 340)
  do talknpc 73 340 r0 n
  do conf storageAuto_npc $savemap 73 340
  log 已經儲存好 $savemap
  release all
  stop
  
  :comodo
  do move $savemap @eval($random + 195) @eval($random + 150)
  do talknpc 195 150 r0 n
  do conf storageAuto_npc $savemap 195 150
  log 已經儲存好 $savemap
  release all
  stop
  }
}
]]> <![CDATA[月影忍者-變形的上弦月]]> 2013-03-26T23:18:00+08:00 http://openkorer.github.com/blog/2013/03/26/zangetsu

先看一下DS的技能說明：
持續時間內依指定對象目前剩餘的HP和SP而變化ATK或MATK

剩餘HP偶數時：ATK+(指定對象Base等級/3)+(技能等級x20)
剩餘HP奇數時：ATK-(指定對象Base等級/3)+(技能等級x20)
剩餘SP偶數時：MATK+(指定對象Base等級/3)+(技能等級x20)
剩餘SP奇數時：MATK-(指定對象Base等級/3)+(技能等級x20)

所以使用變形的上弦月的時機是十分重要，如果在奇數時使用會有反效果，甚至比沒有使用更差。

不知道奇數跟偶數是什麼? 很簡單
奇數為1,3,5,7..
偶數為2,4,6,8..

巨集使用條件及注意事項:

  • openkore版本己支援日月影忍者。 就是不會把日月影忍者當成怪物來追殺！
  • 只對月影忍者(女)有效
  • 建議變形的上弦月等級3或以上才使用
  • 建議在第16個夜晚狀態下才使用，因為詠唱比較快，HP,SP回復變化比較少。成功率就比較高！
  • 如果巨集中的第16個夜晚狀態，變形的上弦月狀態字眼跟你的版本有出入，請自行修改。
  • 看個人需要修改第4,9行

以下巨集是以剩餘HP，SP同時為偶數作為觸發，如果只要其一請自行修改第10行。

zangetsu
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

automacro zangetsu {
  class Oboro
  sp > 100
  aggressives < 1
  status 第16個夜晚狀態
  status not 動作延遲
  status not 明鏡止水狀態
  status not 變形的上弦月狀態
  location man_fild02
  eval ($::char->{'hp'} == int($::char->{'hp'} / 2) * 2 && $::char->{'sp'} == int($::char->{'sp'} / 2) * 2)
  call {
  log HP:$.hp SP:$.sp;do ss 3026
  }
  timeout 30
}

成功觸發後openkore會顯示如下

    [macro] automacro zangetsu triggered.
    [macro log] HP:9828 SP:758
    You are casting 變形的上弦月 on yourself (Delay: 737ms)
    You use 變形的上弦月 (Lv: 5) on yourself (Delay: 520ms)
    You are now: 變形的上弦月狀態 (Duration: 120s)
    You use 變形的上弦月 on yourself (Lv: 5)
    You are now: 變形的上弦月技能延遲 (Duration: 30s)
    You are now: 動作延遲 (Duration: 1s)
]]> <![CDATA[皇家禁衛軍-盾咒ATK]]> 2013-03-26T00:20:00+08:00 http://openkorer.github.com/blog/2013/03/26/shieldspell

本巨集完全由automacro觸發，並無須修改其他檔案。

簡單說明一下運作，當在指定地圖時沒被怪打，後ATK低過某數值就會觸發。 假設你用正使在用長角槍ATK是150，裝備薔薇鋼盾(DEF130)盾咒成功後後ATK會變成150+130=280。 那觸發數值設280跟150之間就可以。

巨集使用條件及注意事項:

  • 最少已學習了盾咒LV1
  • 身上帶有薔薇鋼盾 [1]並在items_control.txt設不存倉
  • 身上帶有其他盾(盾咒後換用，看個人需要)
  • 看個人需要修改第8,9,17行
shieldspell
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

automacro shieldspell {
  class Royal Guard
  hp > 1
  sp > 50
  status not 卸除盾牌狀態
  status not 盾咒技能延遲
  status not 動作延遲
  eval $::char->{'attack_bonus'} < 180       # 數值設280跟150之間就可以
  location man_fild01,man_fild02              # 觸發地圖
  inventory "薔薇鋼盾 [1]" > 0
  aggressives < 1
  exclusive 1
  call {
  do eq @inventory(薔薇鋼盾 [1])
  do ss 2315 1
  pause 3
  do eq @inventory(巴基力亞鋼盾 [突變蛙卡片] [1])  # 如果不需要轉盾可刪除
  }
}
]]> <![CDATA[一次控制多個openkore]]> 2013-03-25T07:06:00+08:00 http://openkorer.github.com/blog/2013/03/25/sync 本教學可以對多個以上的openkore同時下達指令，並且支援所有openkore的Console Command。 我分別寫了partycmd同guildcmd兩個automacro。其實如果利用console作觸發只需一個automacro就可以，寫法如下。

cmd
1
2
3
4
5
6
7
8

automacro cmd {
  console /\[(隊伍|公會)\] (.*) \: cmd (.*)/   # 任何人在隊伍或公會頻道中以cmd開始的字串時觸發巨集
  exclusive 1
  call {
  $cmd = $.lastMatch3
  do $cmd
  }
}

但我不建議使用，因為並不安全，如果別人利用密頻對你說[隊伍] 別人 : cmd xxx也會被觸發。如果你正在用console就要考慮一下要不要繼續用。

partycmd
1
2
3
4
5
6
7
8

automacro partycmd {
  party /cmd (.*)/         # 隊伍頻道中有cmd字串時觸發巨集
  exclusive 1
  call {
  $cmd = $.lastMatch1         # 把cmd後的指令串代入$cmd中
  do $cmd                      # 執行指令串
  }
}

以上是利用隊伍頻道送出同步指令的巨集

巨集使用條件及注意事項:

  • 只要同一隊伍即可。
  • 最多支持12人。
  • 所有隊伍成員也會看到指令，還可以對你的openkore下達任何指令。

使用方法:
e.g. move prontera 移動到中央
openkore: p cmd move prontera
官方遊戲程式: 在隊伍頻道直接輸入cmd move prontera + Enter或在公開頻道輸入cmd move prontera + Ctrl+P

guildcmd
1
2
3
4
5
6
7
8

automacro guildcmd {
  guild /cmd (.*)/         # 公會頻道中有cmd字串時觸發巨集
  exclusive 1
  call {
  $cmd = $.lastMatch1         # 把cmd後的指令串代入$cmd中
  do $cmd                      # 執行指令串
  }
}

以上是利用公會頻道送出同步指令的巨集

巨集使用條件及注意事項:

  • 不需要同一隊伍，只需同一公會即可。
  • 最多支持50人，看公會擴充組合體制等級而定。
  • 所有公會成員也會看到指令，還可以對你的openkore下達任何指令。

使用方法：
e.g. autostorage 自動存倉
openkore: g cmd autostorage
官方遊戲程式: 在公會頻道直接輸入cmd autostorage + Enter或在公開頻道輸入cmd autostorage + Ctrl+G

最後建議把party，guild後的觸發字串cmd改成其他字串，並不要讓人知道。最安全做法是自創隊伍跟公會！

]]> <![CDATA[白色情人節活動 2013]]> 2013-03-13T16:00:00+08:00 http://openkorer.github.com/blog/2013/03/13/q2303

本巨集分別由gotogeffen,getitem,helpgirl和nextchar組成，推薦有6個20級或以上人物使用。

簡單說明一下運作，利用openkore登入後gotogeffen就會偵測任務限制時間是否到達了，如果現在位置不是在吉芬塔外就會前往。 然後getitem向賢者華倫泰領取10個愛情魔法棒，helpgirl再對失戀的少女使用愛情魔法棒將可以破除獸人女戰士的詛咒， 當身上的愛情魔法棒換完後nextchar就會自動把身上巧克力存倉，完成存倉後轉換上一個人物繼續，直至到第一人物也完成後自動關閉openkore。活動詳情請點我

巨集使用條件及注意事項:

  • 必須滿6個人物及20級以上
  • 身上有足夠金錢及正確路線前往吉芬
  • 最少解過一次這活動
  • 留意身上負重及倉儲空間
  • 盡量使用乾淨的config.txt，因為6個人物會共用同一個config.txt。建議不要用打怪的config.txt!
  • 如果吉芬塔外兩位少女在取得愛情魔法棒前已經是女獸人形態就用手動跟兩位分別對話一次。

以下是config.txt中要修改的地方

    char 5                      # 由第六(5)個人物到第一(0)人物，當第一(0)人物完成後會變回5。
    XKore 0                     # 如果XKore 1會卡住在人物選單
    follow 0                    # 防止跟主人亂走
    itemsGatherAuto 0           # 不撿別人掉地上的物品
    lockMap                     # 不設地圖
    route_randomWalk_inTown 0   # 防止在城中亂走
    statsAddAuto 0              # 防止點其他人物的素質
    skillsAddAuto 0             # 防止點其他人物的技能
    storageAuto_password xxx    # 正確倉庫密碼

gotogeffen
1
2
3
4
5
6
7
8
9
10

automacro gotogeffen {
  eval ($::questList->{'2303'}->{'active'} == 1 && $::questList->{'2303'}->{'time'} < time)
  location not geffen 120 110
  exclusive 1
  call {
  do move gef_tower 52 177
  pause 5
  do move geffen 120 110
  }
}

getitem
1
2
3
4
5
6
7
8

automacro getitem {
  eval ($::questList->{'2303'}->{'active'} == 1 && $::questList->{'2303'}->{'time'} < time)
  location geffen 120 110
  exclusive 1
  call {
  do talknpc 120 98 r0
  }
}

helpgirl
1
2
3
4
5
6
7
8
9
10
11
12
13

automacro helpgirl {
  eval ($::questList->{'2303'}->{'active'} == 1 && $::questList->{'2303'}->{'time'} > time)
  location geffen 120 110
  inventory "愛情魔法棒" >= 1
  exclusive 1
  console /失戀的女孩\#(.*) \((\d+)\): \*(天哪！|哭泣)\*/
  call {
  do talk $.lastMatch2
  pause 5
  do talk resp 0
  log 愛情魔法棒: @invamount(愛情魔法棒)
  }
}

nextchar
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31

automacro nextchar {
  inventory "愛情魔法棒" == 0
  inventory "愛情魔法棒" != -1
  eval ($::questList->{'2303'}->{'active'} == 1 && $::questList->{'2303'}->{'time'} > time)
  location geffen 120 110
  call {
  do move geffen @eval(@random("-2","-1","1","2") + 120) @eval(@random("-2","-1","1","2") + 65)
  do talknpc 120 62 r1 n
  pause 3
  do storage add 巧克力
  pause 1
  do storage add 白色情人巧克力
  pause 1
  do storage add 手製巧克力(黑)
  pause 1
  do storage add 手製巧克力(白)
  pause 1
  do storage add 巧克力飲料
  
  if (@config(char) == 0) goto char5
  do conf char @eval(@config(char) - 1)
  do charselect
  stop
  
  :char5
  do conf char 5
  do quit
  stop
  }
  timeout 15
}
]]>