เปิดบอทหลายจอ

2. ===================================
3. 1. วิธีเปิดบอทหลายตัวโดยใช้โฟลเดอร์บอทหลักแค่ 1 โฟลเดอร์
4. ===================================
5. 1.1 ให้เอาไฟล์ profiles.pl ไปใส่ในโฟลเดอร์ plugins\
6. 1.2 สร้างโฟลเดอร์ใหม่ชื่อ profiles\ ไว้ในโฟลเดอร์ของบอทหลัก (สร้างไว้ข้างๆโฟลเดอร์ control\ นั่นแหละ)
7. 1.3 เข้าไปข้างในโฟลเดอร์ชื่อ profiles\ แล้วทำการสร้างโฟลเดอร์ย่อย หลายๆโฟลเดอร์ ตามจำนวนบอทที่จะสร้าง
8. 1.4 Copy ไฟล์จากโฟลเดอร์ control\ ก็คือพวกไฟล์ config / mon_control / pickupitems.txy / timeouts / อื่นๆ
9. 1.5 เอาไป Paste ใส่ลงในโฟลเดอร์บอทแต่ละตัว (แล้วก็เซ็ตบอทแต่ละตัวให้เสร็จ)
10. 1.6 เวลาจะเปิดบอทให้กด Run ไฟล์ start.exe หรือ wxstart.exe แล้วมันจะมีให้เราเลือกชื่อบอทตัวที่เราต้องการ Run
11.         - start.exe > ต้องพิมพ์ตัวเลขข้างหน้าชื่อบอทตัวที่เราจะเปิด แล้วค่อยกด Enter
12.         - wxstart.exe > จะมีหน้าต่างเด้งขึ้นมา เอาเม้าส์ไปดับเบิ้ลคลิกที่ชื่อบอทตัวที่เราจะเปิดได้เลย
16. ===================================
17. 2. วิธีทำให้บอทสามารถเลือก map เริ่มต้นได้ (กรณี map มีปัญหา)
18. ===================================
20. 2.1 เพิ่มคำสั่ง escapeMap ใน config.txt (Copy 3 บรรทัดข้างล่างใส่ลงใน config.txt)
22. #รายชื่อเมืองที่สามารถเลือกไปโผล่ได้ ในกรณีที่แผนที่เดิมมีคนออนไลน์เยอะเกินไป หรือเกิดปัญหาไม่สามารถเข้าได้
23. #1.prontera / 2.payon / 3.geffen / 4.aldebaran / 5.comodo / 6.veins / 7.ayothaya / 8.lighthalzen / 9.mora
24. escapeMap geffen
26. 2.2 เปิดไฟล์ src\network\receive\ServerType0.pm ขึ้นมา
27. - ให้ Copy บรรทัดข้างล่างไปใส่เพิ่มลงในส่วนของ Packet List
29.         '0840' => ['escape_map_select', 'v a*', [qw(len mapInfo)]],
31. - แล้ว Copy ฟังก์ชั่น escape ข้างล่างไปใส่ลงในช่วงล่างสุดของไฟล์
33. sub escape_map_select {
34.         return if ($net->getState() == Network::IN_GAME);
35.         my ($self, $args) = @_;
36.         my @cities;
37.         my $Odr = 0;
38.         my $idx = 0;
39.         my $nSav = -1;
40.         my $mlist = '';
41.         return unless exists $args->{mapInfo};
43.         for (my $i = $args->{RAW_MSG_SIZE} % 20; $i < $args->{RAW_MSG_SIZE}; $i += 20) {
44.                 my ($flag, $baseName) = unpack('V Z*', substr($args->{RAW_MSG}, $i, 20));
45.                 if ($flag == 0) {
46.                         $baseName =~ s/\.gat$//;
47.                         $nSav = $idx if ($config{'escapeMap'} && $config{'escapeMap'} eq $baseName);
48.                         my $mapName = (defined $maps_lut{$baseName.'.rsw'} ? $maps_lut{$baseName.'.rsw'} : T('Unknown Area'));
49.                         push @cities, $Odr;
50.                         $idx++;
51.                         $mlist .= TF("%2d. %s\n", $idx, $mapName);
52.                 }
53.                 $Odr++;
54.         }
55.         if ($idx > 0) {
56.                 message TF("---------------- Map List ----------------\n" .
57.                 "%s" .
58.                 "------------------------------------------\n", $mlist);
59.                 $nSav = int(rand($idx)) if ($nSav < 0);
61.                 # Send the select back to RO server
62.                 my $msg = pack("C*", 0x41, 0x08, $config{char}, $cities[$nSav]);
63.                 $messageSender->sendToServer($msg);
64.         }
65. }
69. ===================================
70. 3. วิธีทำให้บอทมองเห็นผู้เล่นใช้สกิล Snap หรือ Jump เคลื่อนที่
71. ===================================
73. 3.1 เปิดไฟล์ src\network\receive\ServerType0.pm ขึ้นมา
75. หาบรรทัด                '08D2' => ['high_jump', 'a4 v2', [qw(ID x y)]],
77. แก้เป็น           '08D2' => ['player_jump', 'a4 v2', [qw(ID x y)]],
79. 3.2 แล้ว Copy ฟังก์ชั่น ข้างล่างไปใส่ลงในช่วงล่างสุดของไฟล์
81. sub player_jump {
82.         my ($self, $args) = @_;
83.         my $actor = Actor::get($args->{ID});
84.         message TF("%s jump to (%d, %d)\n", $actor, $args->{x}, $args->{y});
85. }
89. ===================================