diff options
author | shennetsind <shennetsind@users.noreply.github.com> | 2013-10-24 09:27:15 -0700 |
---|---|---|
committer | shennetsind <shennetsind@users.noreply.github.com> | 2013-10-24 09:27:15 -0700 |
commit | 418dd821c91ae19723a7b7b531e64b9c4565d555 (patch) | |
tree | b361a1823a08e654e5969dcdea97da05f4f7cd90 /npc/other/hugel_bingo.txt | |
parent | 835d55b07858202198564bc6c2ff0888a7f78d31 (diff) | |
parent | e3afdc2af4c5e50c79237ee092e25f39b7428e47 (diff) | |
download | hercules-418dd821c91ae19723a7b7b531e64b9c4565d555.tar.gz hercules-418dd821c91ae19723a7b7b531e64b9c4565d555.tar.bz2 hercules-418dd821c91ae19723a7b7b531e64b9c4565d555.tar.xz hercules-418dd821c91ae19723a7b7b531e64b9c4565d555.zip |
Merge pull request #201 from Michieru/master
Super-Mega Thanks to Michieru!
NPC Changelog (might be incomplete, did my best)
- npc/battleground/bg_common.txt
-- 1.4 Added GM management function. [Euphy]
- npc/battleground/flavius/flavius01.txt
-- 1.4 Label standardization. [Euphy]
-- 1.5 Added GM management function. [Euphy]
- npc/battleground/flavius/flavius02.txt
-- 1.5 Label standardization. [Euphy]
-- 1.6 Added GM management function. [Euphy]
- npc/battleground/tierra/tierra01.txt
-- 1.4 Label standardization. [Euphy]
-- 1.5 Added GM management function. [Euphy]
- npc/battleground/tierra/tierra02.txt
-- 1.3 Label standardization. [Euphy]
-- 1.4 Added GM management function. [Euphy]
- npc/cities/ayothaya.txt
-- 1.9 Updated Renewal warp coordinates.
- npc/cities/izlude.txt
-- 1.9a A part of Kylick's dialogue is Pre-Renewal only. [Euphy]
- npc/cities/yuno.txt
-- 1.5 Added Renewal coordinates for Payon and Izlude. [Euphy]
- npc/events/bossnia.txt
-- 1.2 Moved spawns and warps (by Masao) to this file. [Euphy]
- npc/events/easter_2010.txt
-- 1.0 First version. [Euphy]
- npc/events/gdevent_aru.txt
-- 1.2 Added GM management function. [Euphy]
- npc/events/gdevent_sch.txt
-- 1.2 Added GM management function. [Euphy]
- npc/events/god_se_festival.txt
-- 1.1 Added GM management function. [Euphy]
- npc/jobs/2-2/rogue.txt
-- impossible get a Gladius [3]. (bugreport:481) [Samuray22]
- npc/jobs/2-2e/SoulLinker.txt
-- 1.6 Updated to match the latest official script. [Euphy]
- npc/kafras/kafras.txt
-- 1.1a Fixed Pre-RE Call and some leftovers. [Lemongrass]
-- 1.1b Enabled saving in Izlude duplicates (RE). [Euphy]
- npc/merchants/alchemist.txt
-- 1.8 Moved Craft Book Merchant to Renewal path. [Euphy]
- npc/mobs/citycleaners.txt
-- 1.2 Split spawns into Pre-RE/RE and Town files. [Euphy]
- npc/mobs/towns.txt
-- 1.0 First version.
- npc/other/Global_Functions.txt
-- 2.17 Renamed 'F_RandMes' to 'F_Rand'. [Euphy]
-- 2.18 Removed useless 'getJobName' function. [Euphy]
- npc/other/acolyte_warp.txt
-- 1.0 First version. [Euphy]
- npc/other/arena/arena_aco.txt
-- 1.3 Label standardization. [Euphy]
-- 1.4 Script updates, and removed two level restrictions. [Euphy]
-- 1.5 Added GM management function. [Euphy]
- npc/other/arena/arena_lvl50.txt
-- 1.2 Label standardization. [Euphy]
-- 1.3 Script updates. [Euphy]
- npc/other/arena/arena_lvl60.txt
-- 1.3 Label standardization. [Euphy]
-- 1.4 Script updates. [Euphy]
- npc/other/arena/arena_lvl70.txt
-- 1.2 Label standardization. [Euphy]
-- 1.3 Script updates. [Euphy]
- npc/other/arena/arena_lvl80.txt
-- 1.2 Label standardization. [Euphy]
-- 1.3 Script updates, and removed a level restriction. [Euphy]
- npc/other/arena/arena_party.txt
-- 1.4 Label standardization and bug fixes. [Euphy]
-- 1.5 Script updates, and removed a level restriction. [Euphy]
- npc/other/arena/arena_room.txt
-- 1.2 Label standardization, disabled GM NPCs. [Euphy]
-- 1.2a Added Renewal level checksk. [Euphy]
-- 1.3 Script updates. [Euphy]
-- 1.4 Added GM management function. [Euphy]
- npc/other/hugel_bingo.txt
-- 1.9 Some optimization/standardization. [Euphy]
- npc/other/marriage.txt
-- 1.3 Changed permanent global variables to temporary ones. [Euphy]
-- 1.4 Added GM management function. [Euphy]
- npc/other/pvp.txt
-- 2.4 Fixed incorrect use of 'close' and some cleaning. [Joseph]
-- 2.5 Renewal/Pre-Renewal split. [Euphy]
- npc/other/turbo_track.txt
-- 1.1 Updated RE/Pre-RE EXP. [Euphy]
-- 1.2 Added Renewal features. [Euphy]
- npc/pre-re/cities/yuno.txt
-- 1.0 First version.
- npc/pre-re/kafras/kafras.txt
-- 1.0 First version.
- npc/pre-re/merchants/ammo_boxes.txt
-- 1.0 First version, Pre-Renewal duplicates.
- npc/pre-re/merchants/ammo_dealer.txt
-- 1.0 First version, Pre-Renewal duplicates.
- npc/pre-re/merchants/shops.txt
-- 1.1 Moved Izlude shops to pre-re/re paths. [Streusel]
- npc/pre-re/mobs/citycleaners.txt
-- 1.0 First version, Pre-Renewal spawns.
- npc/pre-re/other/bulletin_boards.txt
-- 1.0 Moved Izlude NPCs to Pre-RE/RE paths.
- npc/pre-re/other/msg_boards.txt
-- 1.0 Moved Izlude NPCs to Pre-RE path.
- npc/pre-re/other/pvp.txt
-- 1.0 First version, Pre-Renewal.
- npc/pre-re/other/resetskill.txt
-- 1.0 First version. [L0ne_W0lf]
- npc/pre-re/other/turbo_track.txt
-- 1.0 Split Peco Peco Manager NPC.
- npc/pre-re/quests/first_class/tu_archer.txt
-- 1.0 First version. [Euphy]
- npc/pre-re/quests/monstertamers.txt
-- 1.0 Moved Izlude NPC to pre-re/re paths.
- npc/pre-re/quests/quests_13_1.txt
-- 1.0 Moved Izlude NPC to pre-re/re paths. [Euphy]
- npc/pre-re/quests/quests_nameless.txt
-- 1.0 Moved Dorian to pre-re/re paths.
- npc/pre-re/quests/quests_veins.txt
-- 1.0 First version.
- npc/pre-re/warps/other/arena.txt
-- 1.0 First version, Pre-Renewal warps.
- npc/quests/dandelion_request.txt
-- 1.3 Added GM management function. [Euphy]
- npc/quests/eye_of_hellion.txt
-- 2.0 Updated EXP rewards.
-- 2.1 Updated RE/Pre-RE EXP. [Euphy]
- npc/quests/first_class/tu_archer.txt
-- 1.1 optimized [Lupus]
-- 1.2 fixed Weight check
- npc/quests/first_class/tu_magician01.txt
-- 1.4 Updated to match the official script. [Euphy]
- npc/quests/first_class/tu_merchant.txt
-- 1.1 Fixed bugs, optimized [Lupus]
-- 1.2 fixed Weight check
- npc/quests/first_class/tu_sword.txt
-- 1.5 Added Renewal Izlude coordinates.
-- 1.6 Added Pre-Renewal support. [Euphy]
- npc/quests/first_class/tu_thief01.txt
-- 1.5 Added Pre-Renewal support. [Euphy]
- npc/quests/mage_solution.txt
-- 1.0 Split from Pre-Renewal Mage job quest. [Zopokx]
- npc/quests/okolnir.txt
-- 1.1 Some bug fixes. [Toshiro90/Euphy]
- npc/quests/partyrelay.txt
-- 1.2 Updated RE/Pre-RE EXP. [Euphy]
- npc/quests/quests_13_1.txt
-- 3.1 Updated RE/Pre-RE EXP. [Euphy]
-- 3.2 Updated ep13_start and dialog to match official script. [Joseph]
-- 3.3 Updated to match the latest official script. [Euphy]
-- 3.3a Added Izlude RE coordinates. [Euphy]
-- 3.4 Added GM management function and NPC. [Euphy]
- npc/quests/quests_alberta.txt
-- 2.6 Updated RE/Pre-RE EXP. [Euphy]
- npc/quests/quests_amatsu.txt
-- 1.5 Added questlog support. [Euphy]
- npc/quests/quests_geffen.txt
-- 1.5 Added Number Match Game. [Euphy]
- npc/quests/quests_juperos.txt
-- 1.8 Updated RE/Pre-RE EXP. [Euphy]
-- 1.9 Added GM management NPC. [Euphy]
- npc/quests/quests_niflheim.txt
-- Updated to Aegis 10.3 Standed, added Message Delivery Quest.
-- 1.6 Added questlog support. [Euphy]
- npc/quests/quests_veins.txt
-- Added Veins Thor Volcano Base Quest NPC. [L0ne_W0lf]
- npc/quests/seals/god_global.txt
-- 1.2 Renewal script update. [Euphy]
- npc/quests/seals/god_weapon_creation.txt
-- 1.3 Renewal script update. [Euphy]
- npc/quests/seals/seal_status.txt
-- 1.0 Translated from the official. [L0ne_W0lf]
-- 1.1 Now checks proper char vars. [L0ne_W0lf]
-- 1.2 Cleaning. [Euphy]
-- 1.3 Renewal script update. [Euphy]
- npc/quests/seals/sleipnir_seal.txt
-- 1.4 Renewal script update. [Euphy]
- npc/quests/skills/novice_skills.txt
-- 1.8 Added Baby support. [Zopokx]
- npc/quests/skills/rogue_skills.txt
-- 1.8 Some cleaning. [Euphy]
- npc/quests/skills/sage_skills.txt
-- 1.5 Optimized. [Euphy]
- npc/re/airports/izlude.txt
-- 1.0 Updated to match the new Izlude Map. [Masao]
-- 1.1 Added Izlude duplicates. [Euphy]
- npc/re/cities/dicastes.txt
-- 1.3 Updated to match official script. [SkittleNugget]
- npc/re/cities/izlude.txt
-- 1.1 Updated to match the official script. [Euphy]
-- 1.2 Added Channel Warper and Izlude duplicates. [Euphy]
- npc/re/cities/jawaii.txt
-- 1.1 Moved "Honeymoon Helper" NPC.
-- 1.2 Added Izlude duplicates. [Euphy]
- npc/re/cities/malangdo.txt
-- 1.2 Moved "Odgnalam" coordinates.
-- 1.3 Fixed dialogues.
-- 1.4 Dialogue edits, source iRO.
-- 1.5 Added Izlude duplicates.
- npc/re/cities/malaya.txt
-- 0.1 Alberta sailors only. [Euphy]
-- 0.2 Adapted from Masao's conversion.
-- 1.0 Added remaining NPCs.
- npc/re/cities/yuno.txt
-- 1.0 First version.
- npc/re/guides/guides_alberta.txt
-- 1.1 Navigation system update. [Euphy]
- npc/re/guides/guides_aldebaran.txt
-- 1.1 Navigation system update. [Euphy]
- npc/re/guides/guides_amatsu.txt
-- 1.2 Navigation system update. [Euphy]
- npc/re/guides/guides_ayothaya.txt
-- 1.2 Navigation system update. [Euphy]
- npc/re/guides/guides_brasilis.txt
-- 1.2 Navigation system update. [Euphy]
- npc/re/guides/guides_comodo.txt
-- 1.2 Navigation system update. [Euphy]
- npc/re/guides/guides_dewata.txt
-- 1.1 Navigation system update. [Euphy]
- npc/re/guides/guides_dicastes.txt
-- 1.2 Navigation system update. [Euphy]
- npc/re/guides/guides_einbroch.txt
-- 1.1 Navigation system update. [Euphy]
- npc/re/guides/guides_geffen.txt
-- 1.2 Navigation system update. [Euphy]
- npc/re/guides/guides_gonryun.txt
-- 1.2 Navigation system update. [Euphy]
- npc/re/guides/guides_hugel.txt
-- 1.2 Navigation system update. [Euphy]
- npc/re/guides/guides_izlude.txt
-- 1.2 Added Renewal Izlude viewpoint coordinates.
-- 1.3 Navigation system update. [Euphy]
-- 1.4 Added Izlude duplicates. [Euphy]
- npc/re/guides/guides_juno.txt
-- 1.2 Navigation system update. [Euphy]
- npc/re/guides/guides_lighthalzen.txt
-- 1.2 Navigation system update. [Euphy]
- npc/re/guides/guides_louyang.txt
-- 1.1 Navigation system update. [Euphy]
- npc/re/guides/guides_lutie.txt
-- 1.2 Navigation system update. [Euphy]
- npc/re/guides/guides_malaya.txt
-- 1.0 First version. [Euphy]
-- 1.1 Navigation system update. [Euphy]
- npc/re/guides/guides_mora.txt
-- 1.1 Navigation system update. [Euphy]
- npc/re/guides/guides_morroc.txt
-- 1.2 Navigation system update. [Euphy]
- npc/re/guides/guides_moscovia.txt
-- 1.2 Navigation system update. [Euphy]
- npc/re/guides/guides_niflheim.txt
-- 1.2 Navigation system update. [Euphy]
- npc/re/guides/guides_payon.txt
-- 1.2 Navigation system update. [Euphy]
- npc/re/guides/guides_prontera.txt
-- 1.1 Navigation system update. [Euphy]
- npc/re/guides/guides_rachel.txt
-- 1.1 Navigation system update. [Euphy]
- npc/re/guides/guides_umbala.txt
-- 1.1 Navigation system update. [Euphy]
- npc/re/guides/guides_veins.txt
-- 1.1 Navigation system update. [Euphy]
- npc/re/guides/navigation.txt
-- 1.0 First version.
- npc/re/guild/invest_main.txt
-- 1.1 Added GM management function. [Euphy]
- npc/re/jobs/3-1/guillotine_cross.txt
-- 1.4 Added missing labels. [Joseph]
-- 1.5 Added GM management function. [Euphy]
- npc/re/jobs/3-2/royal_guard.txt
-- 1.2 Added GM management function. [Euphy]
- npc/re/jobs/3-2/sura.txt
-- 1.3 Added GM management function. [Euphy]
- npc/re/jobs/novice/novice.txt
-- 1.0 First version, hand scripted from iRO. [Kisuka]
-- 1.5 Replaced with the official kRO scripts. [Euphy]
- npc/re/jobs/repair.txt
-- 1.0 First version.
-- 1.1 Added GM management function. [Euphy]
- npc/re/kafras/kafras.txt
-- 1.2 Added Port Malaya Kafras. [Euphy]
-- 1.3 Added Eden Group Kafra. [Euphy]
-- 1.3a Moved Rune Knight Kafra from job file. [Euphy]
-- 1.4 Added Izlude duplicates. [Euphy]
- npc/re/merchants/3rd_trader.txt
-- 1.3 Added Malangdo/Mora Points NPC. [Euphy]
-- 1.4 Updated to match the official scripts. [Euphy]
-- 1.5 Added Izlude duplicates. [Euphy]
- npc/re/merchants/advanced_refiner.txt
-- 1.0 Added Malangdo Refiner "Holink". [Euphy]
- npc/re/merchants/alchemist.txt
-- 1.0 Split Geneticist shop from main file. [Euphy]
- npc/re/merchants/ammo_boxes.txt
-- 1.0 First version, Renewal duplicates.
-- 1.1 Added Izlude duplicates. [Euphy]
- npc/re/merchants/ammo_dealer.txt
-- 1.0 First version, Renewal duplicates.
-- 1.1 Added Izlude duplicates. [Euphy]
- npc/re/merchants/card_separation.txt
-- 1.1 Added "Richard" NPC. [Euphy]
- npc/re/merchants/enchan_mora.txt
-- 1.2 Bug fixes (bugreport:7930) [DeadlySilence]
- npc/re/merchants/enchan_upg.txt
-- 1.0 First version.
-- 1.1 Standardizing, grammar and bug fixes. [Euphy]
- npc/re/merchants/flute.txt
-- 1.2a Fixed some conditions. [Euphy]
- npc/re/merchants/renters.txt
-- 2.2 Updated to match the official scripts. [Euphy]
- npc/re/merchants/shops.txt
-- 1.7 Added Izlude duplicates. [Euphy]
- npc/re/mobs/citycleaners.txt
-- 1.0 First version, Renewal spawns.
- npc/re/mobs/dungeons/ecl_tdun.txt
-- 1.0 First version. [Euphy]
- npc/re/mobs/dungeons/mal_dun.txt
-- 1.2 Added Pouring spawn, source iRO. [Euphy]
- npc/re/mobs/fields/eclage.txt
-- 1.0 First version. [Euphy]
- npc/re/mobs/towns.txt
-- 1.0 First version, Renewal spawns.
- npc/re/other/bulletin_boards.txt
-- 1.0 Moved Izlude NPCs to Pre-RE/RE paths.
- npc/re/other/item_merge.txt
-- 1.0 First version, currently useless/disabled.
- npc/re/other/mail.txt
-- 1.0 First version, Renewal duplicates.
- npc/re/other/mercenary_rent.txt
-- 1.1 Added Izlude duplicates. [Euphy]
- npc/re/other/pvp.txt
-- 1.0 First version, Renewal.
- npc/re/other/resetskill.txt
-- 1.0 First version, Renewal script.
-- 1.1 Added Izlude duplicates. [Euphy]
- npc/re/other/stone_change.txt
-- 1.0 First version.
- npc/re/other/turbo_track.txt
-- 1.0 Split Mount Manager NPC.
- npc/re/quests/eden/71-85.txt
-- 1.3 Updated to match the official scripts. [Euphy]
- npc/re/quests/eden/eden_iro.txt
-- 1.0 First version.
-- 1.1 Edited and added more NPCs, lots of placeholders. [Euphy]
- npc/re/quests/eden/eden_quests.txt
-- 1.5 Added GM management function. [Euphy]
- npc/re/quests/first_class/tu_archer.txt
-- 1.0 First version. [Euphy]
- npc/re/quests/homun_s.txt
-- Genetic quest to mutate a level 99 evolved Homunculus
-- 1.0 First Version, entirely custom. [Masao]
- npc/re/quests/magic_books.txt
-- 1.1 Optimized. [Euphy]
-- 1.1a Updated NPC name to "Master Velofos". [Euphy]
- npc/re/quests/monstertamers.txt
-- 1.0 Moved Izlude NPC to pre-re/re paths.
- npc/re/quests/mrsmile.txt
-- 1.1 Added Izlude duplicates. [Euphy]
- npc/re/quests/quests_13_1.txt
-- 1.0 Moved Izlude NPC to pre-re/re paths. [Euphy]
-- 1.1 Added Izlude duplicates. [Euphy]
- npc/re/quests/quests_izlude.txt
-- 1.1 Added Izlude duplicates. [Euphy]
- npc/re/quests/quests_lighthalzen.txt
-- 1.2 Added Izlude duplicates. [Euphy]
- npc/re/quests/quests_malangdo.txt
-- 1.4a Dialogue edits, source iRO.
-- 1.5 Added Cat Gamers.
-- 1.6 Added GM management function.
- npc/re/quests/quests_malaya.txt
-- 0.4 Added "Cautious Village" and subsequent quests [DeadlySilence]
-- 0.5 Added "Bakonawa Extermination" quest. [Euphy]
-- 1.0 Added "Nurse in Port Malaya" and "Pintados Festival" quests. [Euphy]
-- 1.1 Added GM management function and NPC. [Euphy]
- npc/re/quests/quests_mora.txt
-- 1.1 Added GM management function and NPCs. [Euphy]
- npc/re/quests/quests_morocc.txt
-- 1.1 Added new warpers for Satan Morroc maps. [Euphy]
- npc/re/quests/quests_nameless.txt
-- 1.0 Moved Dorian to pre-re/re paths.
- npc/re/warps/cities/eclage.txt
-- 1.0a Disabled quest warp. [Euphy]
- npc/re/warps/cities/izlude.txt
-- 1.7 Updated to match the official scripts. [Euphy]
-- 1.8 Added Izlude & Prontera Field 8 duplicates. [Euphy]
- npc/re/warps/cities/malaya.txt
-- 1.1 Updated to match official scripts. [Masao]
-- 1.2 Added official Jeepney warp scripts. [Euphy]
- npc/re/warps/fields/prontera_fild.txt
-- 1.3a Moved Izlude warp to other file. [Euphy]
-- 1.4 Commented moc_fild20 warps replaced with new NPCs. [Euphy]
-- 1.5 Added Prontera Field 8 duplicates. [Euphy]
- npc/re/warps/other/arena.txt
-- 1.0 First version, Renewal warps.
- npc/re/warps/other/jobquests.txt
-- 2.3 Added exit warps (job_exit) for 2nd class quests. [Euphy]
- npc/warps/fields/glastheim.txt
-- 1.5 Fixed random warp coordinates. [Euphy]
- npc/warps/other/arena.txt
-- 1.3 Split Izlude warps into Pre-Renewal/Renewal paths. [Euphy]
-- 1.4 Added GM management function. [Euphy]
Diffstat (limited to 'npc/other/hugel_bingo.txt')
-rw-r--r-- | npc/other/hugel_bingo.txt | 396 |
1 files changed, 106 insertions, 290 deletions
diff --git a/npc/other/hugel_bingo.txt b/npc/other/hugel_bingo.txt index 6cec1b9ae..23ef06b93 100644 --- a/npc/other/hugel_bingo.txt +++ b/npc/other/hugel_bingo.txt @@ -3,31 +3,30 @@ //===== By: ================================================== //= SinSloth //===== Current Version: ===================================== -//= 1.8 +//= 1.9 //===== Description: ========================================= //= Hugel Bingo game //===== Additional Comments: ================================= -//= 1.0 - First version. Please report bugs you find out. [SinSloth] -//= 1.1 - Fixed a minor bug. [SinSloth] -//= 1.2 - Added some Bingo Staff NPCs. [SinSloth] -//= 1.3 - Fixed a bug where an AFK-player wasn't warped out of the game, -//= preventing players from launching another. [SinSloth] -//= 1.4 - Fixed a minor bug added in the last revision. [SinSloth] -//= 1.5 - Applied a fix to players locations which were not rotating properly. [SinSloth] -//= 1.6 - Removed nescesity to win to proceed with quest [Yommy] -//= 1.7 - Replaced effect numerics with constants. [Samuray22] +//= 1.0 First version. Please report bugs you find out. [SinSloth] +//= 1.1 Fixed a minor bug. [SinSloth] +//= 1.2 Added some Bingo Staff NPCs. [SinSloth] +//= 1.3 Fixed a bug where an AFK-player wasn't warped out of the game, +//= preventing players from launching another. [SinSloth] +//= 1.4 Fixed a minor bug added in the last revision. [SinSloth] +//= 1.5 Applied a fix to players locations which were not rotating properly. [SinSloth] +//= 1.6 Removed nescesity to win to proceed with quest [Yommy] +//= 1.7 Replaced effect numerics with constants. [Samuray22] //= 1.8 Updated 'waitingroom' to support required zeny/lvl. [Kisuka] +//= 1.9 Some optimization/standardization. [Euphy] //============================================================ que_bingo,48,84,5 script Bingo Waiting Room 124,{ end; OnInit: - set $hu_bingoa,0; - set $hu_bingob,0; waitingroom "Bingo Waiting Room - 5 People",50,"Bingo Waiting Room::OnWarp",5,1000; end; - + OnWarp: warpwaitingpc "que_bingo",46,141; donpcevent "start#bingo::OnStart"; @@ -38,7 +37,7 @@ OnWarp: enablenpc "plate5#bingo"; disablewaitingroomevent; end; - + OnStart: enablewaitingroomevent; end; @@ -83,16 +82,13 @@ OnTouch: set @bingo_case,1; L_Fill: set @bingo_fill,callfunc("Func_Bingo",@bingo_case); - if(!@bingo_fill) - { + if (!@bingo_fill) { mes "The numbers you have entered"; mes "exceed the limit, or you have"; mes "already entered these numbers."; mes "Please enter your numbers again."; next; - } - else if(@bingo_fill) - { + } else if (@bingo_fill) { if(@bingoplate[25] < 10) set @bingo_e5$,"0"+@bingoplate[25]+""; else set @bingo_e5$,@bingoplate[25]; donpcevent "start#bingo::OnEnter"; mes "["+@bingo_a1$+"] ["+@bingo_a2$+"] ["+@bingo_a3$+"] ["+@bingo_a4$+"] ["+@bingo_a5$+"]"; @@ -104,7 +100,6 @@ L_Fill: } goto L_Fill; - } que_bingo,53,121,0 duplicate(plate1#bingo) plate2#bingo 139,1,1 @@ -117,38 +112,37 @@ que_bingo,51,51,0 script start#bingo 139,{ OnStart: initnpctimer; end; - + OnEnter: - if($hu_bingoa == 4) - { - set $hu_bingoa,5; + if ($@hu_bingoa == 4) { + set $@hu_bingoa,5; donpcevent "start2#bingo::OnStart"; stopnpctimer; end; } - set $hu_bingoa,$hu_bingoa +1; + set $@hu_bingoa,$@hu_bingoa +1; end; - + OnTimer1000: mapannounce "que_bingo","Eukran: Hello, everyone! I'm Eukran, your Bingo Guide~",1,0xFFAB54; end; - + OnTimer6000: mapannounce "que_bingo","Eukran: Game participants, please enter the Warp Portal at the bottom of your screen and choose a Bingo Plate by entering a number.",1,0xFFAB54; end; - + OnTimer11000: mapannounce "que_bingo","Eukran: All participants must choose their Bingo Plates within 3 minutes, or the game will be canceled.",1,0xFFAB54; end; - + OnTimer192000: mapannounce "que_bingo","Eukran: Please enter a number in 5 seconds, or the game will be canceled.",1,0xFFAB54; end; - + OnTimer200000: mapannounce "que_bingo","Eukran: I'm sorry, but the game has been canceled. Please come again and enjoy a game of Bingo with us!",1,0xFFAB54; end; - + OnTimer202000: disablenpc "plate1#bingo"; disablenpc "plate2#bingo"; @@ -156,7 +150,7 @@ OnTimer202000: disablenpc "plate4#bingo"; disablenpc "plate5#bingo"; end; - + OnTimer203000: areawarp "que_bingo",44,115,54,126,"que_bingo",40,124; enablenpc "out3#bingo"; @@ -165,8 +159,8 @@ OnTimer203000: OnTimer204000: areawarp "que_bingo",44,115,54,126,"que_bingo",40,121; disablenpc "out3#bingo"; - set $hu_bingoa,0; - set $hu_bingob,0; + set $@hu_bingoa,0; + set $@hu_bingob,0; donpcevent "Bingo Waiting Room::OnStart"; end; } @@ -176,11 +170,11 @@ que_bingo,52,52,0 script start2#bingo 139,{ OnStop: stopnpctimer; end; - + OnStart: initnpctimer; end; - + OnTimer2000: mapannounce "que_bingo","Eukran: Great, everyone seems to be ready~",1,0xFFAB54; disablenpc "plate1#bingo"; @@ -189,234 +183,95 @@ OnTimer2000: disablenpc "plate4#bingo"; disablenpc "plate5#bingo"; end; - + OnTimer5000: mapannounce "que_bingo","Eukran: Now, let the game begin!",1,0xFFAB54; setarray $@bingoarray[0],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; set .@max_index, 24; - for(set .@i,0; .@i < 25; set .@i,.@i +1) - { + for(set .@i,0; .@i < 25; set .@i,.@i +1) { set $@bingo0,rand(0,.@max_index); set $bingo[.@i],$@bingoarray[$@bingo0]; set $@bingoarray[$@bingo0], $@bingoarray[.@max_index]; set .@max_index, .@max_index - 1; } end; - + OnTimer8000: mapannounce "que_bingo","Eukran: I'll announce the Bingo Numbers. If you get 5 lines by matching 5 Bingo Numbers in a straight line on your Bingo Plate, yell out ''Bingo'' to win~",1,0xFFAB54; end; - + OnTimer10000: set $@bingoresult,1; callfunc "Func_BingoResult",$@bingoresult; end; - + OnTimer15000: +OnTimer25000: +OnTimer35000: +OnTimer45000: +OnTimer55000: +OnTimer65000: +OnTimer75000: +OnTimer85000: +OnTimer95000: +OnTimer105000: +OnTimer115000: +OnTimer125000: +OnTimer135000: +OnTimer145000: +OnTimer155000: +OnTimer179000: +OnTimer199000: +OnTimer219000: +OnTimer239000: +OnTimer259000: +OnTimer279000: +OnTimer299000: +OnTimer319000: +OnTimer339000: donpcevent "1a#bingo::OnInit"; end; OnTimer20000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer25000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer30000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer35000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer40000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer45000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer50000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer55000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer60000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer65000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer70000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer75000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer80000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer85000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer90000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer95000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer100000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer105000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer110000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer115000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer120000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer125000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer130000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer135000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer140000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer145000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer150000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer155000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer160000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer179000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer180000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer199000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer200000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer219000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer220000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer239000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer240000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer259000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer260000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer279000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer280000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer299000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer300000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer319000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer320000: - callfunc "Func_BingoResult",$@bingoresult; - end; - -OnTimer339000: - donpcevent "1a#bingo::OnInit"; - end; - OnTimer340000: callfunc "Func_BingoResult",$@bingoresult; end; - + OnTimer440000: mapannounce "que_bingo","Eukran: I've announced all of the selected numbers, but I haven't heard anyone yell ''Bingo.''",1,0xFFAB54; end; - + OnTimer445000: mapannounce "que_bingo","Eukran: I'll give you all 10 seconds to check if any of you have won. If no one can yell ''Bingo'' in 10 seconds, this game will end without a winner.",1,0xFFAB54; end; - + OnTimer460000: mapannounce "que_bingo","Eukran: I'm sorry, but this game has ended without a winner. Thanks for playing, everyone~",1,0xFFAB54; donpcevent "1a#bingo::OnInit"; areawarp "que_bingo",44,115,54,126,"que_bingo",40,121; - set $hu_bingoa,0; + set $@hu_bingoa,0; donpcevent "Bingo Waiting Room::OnStart"; end; } @@ -601,10 +456,8 @@ OnTouch: mes "["+@bingo_d1$+"] ["+@bingo_d2$+"] ["+@bingo_d3$+"] ["+@bingo_d4$+"] ["+@bingo_d5$+"]"; mes "["+@bingo_e1$+"] ["+@bingo_e2$+"] ["+@bingo_e3$+"] ["+@bingo_e4$+"] ["+@bingo_e5$+"]"; mes "[Currently Finished Lines - "+@bingowin+" ]"; - if($@bingoresult > 15) - { - if(@bingowin > 4) - { + if ($@bingoresult > 15) { + if (@bingowin > 4) { next; mes "We just have made 5 lines!"; mes "Say ^ff0000Bingo^000000!"; @@ -614,19 +467,15 @@ OnTouch: mes "Remember, you'll only"; mes "have one chance to say it!"; input @bingoyell$; - if(@bingoyell$ == "Bingo") - { - if($hu_bingoa == 5) - { - set $hu_bingoa,6; + if (@bingoyell$ == "Bingo") { + if ($@hu_bingoa == 5) { + set $@hu_bingoa,6; donpcevent "start2#bingo::OnStop"; set $@bingowinner$,strcharinfo(0); donpcevent "win1a#bingo::OnWin"; close; - } - else if($hu_bingoa == 6) - { + } else if ($@hu_bingoa == 6) { next; mes "Oh no! I'm sorry, but"; mes "someone already yelled"; @@ -636,9 +485,7 @@ OnTouch: mes "next time, alright?"; close; } - } - else - { + } else { next; mes "I'm sorry, but you"; mes "said it wrong. Next time,"; @@ -777,14 +624,13 @@ que_bingo,45,121,0 duplicate(1a#bingo) 23e#bingo 139,1,1 que_bingo,45,121,0 duplicate(1a#bingo) 24e#bingo 139,1,1 que_bingo,45,121,0 duplicate(1a#bingo) 25e#bingo 139,1,1 - que_bingo,79,19,0 script win1a#bingo 139,4,4,{ end; OnWin: initnpctimer; end; - + OnTimer1000: donpcevent "1a#bingo::OnInit"; enablenpc "win2a#bingo"; @@ -807,10 +653,10 @@ OnInit: end; OnTouch: - if($@bingowinner$ != strcharinfo(0)) end; + if ($@bingowinner$ != strcharinfo(0)) end; specialeffect EF_SUI_EXPLOSION; soundeffect "tming_success.wav",1; - if($@bingoresult == 16) getitem 7515,50; + if ($@bingoresult == 16) getitem 7515,50; else getitem 7515,1; initnpctimer; end; @@ -824,8 +670,10 @@ OnTimer5000: end; OnTimer10000: - if($@bingoresult == 16) mapannounce "que_bingo","Eukran: Congratulations, "+$@bingowinner$+"! You will be rewarded with 50 Marvelous Medals.",1,0xFFAB54; - else mapannounce "que_bingo","Eukran: Congratulations, "+$@bingowinner$+"! You will be rewarded with 1 Marvelous Medal.",1,0xFFAB54; + if ($@bingoresult == 16) + mapannounce "que_bingo","Eukran: Congratulations, "+$@bingowinner$+"! You will be rewarded with 50 Marvelous Medals.",1,0xFFAB54; + else + mapannounce "que_bingo","Eukran: Congratulations, "+$@bingowinner$+"! You will be rewarded with 1 Marvelous Medal.",1,0xFFAB54; end; OnTimer15000: @@ -865,7 +713,7 @@ OnTimer5000: disablenpc "end1d#bingo"; disablenpc "end1e#bingo"; areawarp "que_bingo",44,115,54,126,"que_bingo",40,121; - set $hu_bingoa,0; + set $@hu_bingoa,0; donpcevent "Bingo Waiting Room::OnStart"; end; } @@ -896,7 +744,7 @@ que_bingo,50,138,1 script out3#bingo 139,5,8,{ OnInit: disablenpc "out3#bingo"; end; - + OnTouch: warp "que_bingo",40,121; end; @@ -905,34 +753,28 @@ OnTouch: que_bingo,49,136,0 script go3#bingo 45,1,1,{ OnTouch: - switch($hu_bingob) - { - case 0: warp "que_bingo",49,125; break; - case 1: warp "que_bingo",53,121; break; - case 2: warp "que_bingo",51,116; break; - case 3: warp "que_bingo",46,116; break; - case 4: warp "que_bingo",45,121; break; + switch($@hu_bingob) { + case 0: warp "que_bingo",49,125; break; + case 1: warp "que_bingo",53,121; break; + case 2: warp "que_bingo",51,116; break; + case 3: warp "que_bingo",46,116; break; + case 4: warp "que_bingo",45,121; break; } - set $hu_bingob,$hu_bingob +1; - if($hu_bingob == 5) set $hu_bingob,0; + set $@hu_bingob,$@hu_bingob +1; + if ($@hu_bingob == 5) set $@hu_bingob,0; end; } function script Func_Bingo { - - - for( set .@i,getarg(0); .@i < 26; set .@i,.@i +1) - { + for(set .@i,getarg(0); .@i < 26; set .@i,.@i +1) { if(@bingoplate[1] < 10) set @bingo_a1$,"0"+@bingoplate[1]+""; else set @bingo_a1$,@bingoplate[1]; if(@bingoplate[2] < 10) set @bingo_a2$,"0"+@bingoplate[2]+""; else set @bingo_a2$,@bingoplate[2]; if(@bingoplate[3] < 10) set @bingo_a3$,"0"+@bingoplate[3]+""; else set @bingo_a3$,@bingoplate[3]; if(@bingoplate[4] < 10) set @bingo_a4$,"0"+@bingoplate[4]+""; else set @bingo_a4$,@bingoplate[4]; if(@bingoplate[5] < 10) set @bingo_a5$,"0"+@bingoplate[5]+""; else set @bingo_a5$,@bingoplate[5]; if(.@i > 5) mes "["+@bingo_a1$+"] ["+@bingo_a2$+"] ["+@bingo_a3$+"] ["+@bingo_a4$+"] ["+@bingo_a5$+"]"; - else - { - switch(.@i) - { + else { + switch(.@i) { case 1: mes "^ff0000[__]^000000 [ ] [ ] [ ] [ ]"; break; case 2: mes "["+@bingo_a1$+"] ^ff0000[__]^000000 [ ] [ ] [ ]"; break; case 3: mes "["+@bingo_a1$+"] ["+@bingo_a2$+"] ^ff0000[__]^000000 [ ] [ ]"; break; @@ -947,10 +789,8 @@ function script Func_Bingo { if(@bingoplate[10] < 10) set @bingo_b5$,"0"+@bingoplate[10]+""; else set @bingo_b5$,@bingoplate[10]; if(.@i > 10) mes "["+@bingo_b1$+"] ["+@bingo_b2$+"] ["+@bingo_b3$+"] ["+@bingo_b4$+"] ["+@bingo_b5$+"]"; else if(.@i < 6) mes "[ ] [ ] [ ] [ ] [ ]"; - else - { - switch(.@i) - { + else { + switch(.@i) { case 6: mes "^ff0000[__]^000000 [ ] [ ] [ ] [ ]"; break; case 7: mes "["+@bingo_b1$+"] ^ff0000[__]^000000 [ ] [ ] [ ]"; break; case 8: mes "["+@bingo_b1$+"] ["+@bingo_b2$+"] ^ff0000[__]^000000 [ ] [ ]"; break; @@ -965,10 +805,8 @@ function script Func_Bingo { if(@bingoplate[15] < 10) set @bingo_c5$,"0"+@bingoplate[15]+""; else set @bingo_c5$,@bingoplate[15]; if(.@i > 15) mes "["+@bingo_c1$+"] ["+@bingo_c2$+"] ["+@bingo_c3$+"] ["+@bingo_c4$+"] ["+@bingo_c5$+"]"; else if(.@i < 11) mes "[ ] [ ] [ ] [ ] [ ]"; - else - { - switch(.@i) - { + else { + switch(.@i) { case 11: mes "^ff0000[__]^000000 [ ] [ ] [ ] [ ]"; break; case 12: mes "["+@bingo_c1$+"] ^ff0000[__]^000000 [ ] [ ] [ ]"; break; case 13: mes "["+@bingo_c1$+"] ["+@bingo_c2$+"] ^ff0000[__]^000000 [ ] [ ]"; break; @@ -983,10 +821,8 @@ function script Func_Bingo { if(@bingoplate[20] < 10) set @bingo_d5$,"0"+@bingoplate[20]+""; else set @bingo_d5$,@bingoplate[20]; if(.@i > 20) mes "["+@bingo_d1$+"] ["+@bingo_d2$+"] ["+@bingo_d3$+"] ["+@bingo_d4$+"] ["+@bingo_d5$+"]"; else if(.@i < 16) mes "[ ] [ ] [ ] [ ] [ ]"; - else - { - switch(.@i) - { + else { + switch(.@i) { case 16: mes "^ff0000[__]^000000 [ ] [ ] [ ] [ ]"; break; case 17: mes "["+@bingo_d1$+"] ^ff0000[__]^000000 [ ] [ ] [ ]"; break; case 18: mes "["+@bingo_d1$+"] ["+@bingo_d2$+"] ^ff0000[__]^000000 [ ] [ ]"; break; @@ -999,10 +835,8 @@ function script Func_Bingo { if(@bingoplate[23] < 10) set @bingo_e3$,"0"+@bingoplate[23]+""; else set @bingo_e3$,@bingoplate[23]; if(@bingoplate[24] < 10) set @bingo_e4$,"0"+@bingoplate[24]+""; else set @bingo_e4$,@bingoplate[24]; if(.@i < 21) mes "[ ] [ ] [ ] [ ] [ ]"; - else - { - switch(.@i) - { + else { + switch(.@i) { case 21: mes "^ff0000[__]^000000 [ ] [ ] [ ] [ ]"; break; case 22: mes "["+@bingo_e1$+"] ^ff0000[__]^000000 [ ] [ ] [ ]"; break; case 23: mes "["+@bingo_e1$+"] ["+@bingo_e2$+"] ^ff0000[__]^000000 [ ] [ ]"; break; @@ -1013,10 +847,8 @@ function script Func_Bingo { next; input .@bingoinput; if(.@bingoinput < 1 || .@bingoinput > 25) { set @bingo_case,.@i; return 0; } - if(.@i > 1) - { - for(set .@j,.@i; .@j > 0; set .@j,.@j -1) - { + if(.@i > 1) { + for(set .@j,.@i; .@j > 0; set .@j,.@j -1) { if(.@bingoinput == @bingoplate[.@j -1]) { set @bingo_case,.@i; return 0; } } } @@ -1026,11 +858,11 @@ function script Func_Bingo { } function script Func_BingoResult { - - if(getarg(0) == 1 || getarg(0) == 21) mapannounce "que_bingo","Eukran: The "+getarg(0)+"st number is "+$bingo[getarg(0) -1]+". Please check your Bingo Plate.",4,0xFFAB54; - else if(getarg(0) == 2 || getarg(0) == 22) mapannounce "que_bingo","Eukran: The "+getarg(0)+"nd number is "+$bingo[getarg(0) -1]+". Please check your Bingo Plate.",4,0xFFAB54; - else if(getarg(0) == 3 || getarg(0) == 23) mapannounce "que_bingo","Eukran: The "+getarg(0)+"rd number is "+$bingo[getarg(0) -1]+". Please check your Bingo Plate.",4,0xFFAB54; - else mapannounce "que_bingo","Eukran: The "+getarg(0)+"th number is "+$bingo[getarg(0) -1]+". Please check your Bingo Plate.",4,0xFFAB54; + if (getarg(0) == 1 || getarg(0) == 21) set .@str$,"st"; + else if (getarg(0) == 2 || getarg(0) == 22) set .@str$,"nd"; + else if (getarg(0) == 3 || getarg(0) == 23) set .@str$,"rd"; + else set .@str$,"th"; + mapannounce "que_bingo","Eukran: The "+getarg(0)+.@str$+" number is "+$bingo[getarg(0) -1]+". Please check your Bingo Plate.",4,0xFFAB54; enablenpc ""+getarg(0)+"a#bingo"; enablenpc ""+getarg(0)+"b#bingo"; enablenpc ""+getarg(0)+"c#bingo"; @@ -1041,26 +873,15 @@ function script Func_BingoResult { } que_bingo,49,31,4 script Arcade Helper#1 47,{ - mes "[Helper]"; mes "If you'd like to play"; mes "a game of bingo, then"; mes "please proceed this way."; close; } - -que_bingo,42,31,4 script Arcade Helper#2 66,{ - - mes "[Helper]"; - mes "If you'd like to spectate"; - mes "a game of bingo, then"; - mes "please proceed this way."; - close; - -} +que_bingo,42,31,4 duplicate(Arcade Helper#1) Arcade Helper#2 66 que_bingo,54,17,5 script Arcade Owner 712,{ - mes "[Arcade Owner]"; mes "Welcome to the"; mes "Bingo Game Arcade."; @@ -1068,8 +889,7 @@ que_bingo,54,17,5 script Arcade Owner 712,{ mes "bingo? If you have any"; mes "questions, feel free to ask."; next; - switch( select( "Rules for Bingo:Bingo Room:Marvelous Medals" ) ) - { + switch(select("Rules for Bingo:Bingo Room:Marvelous Medals")) { case 1: mes "[Arcade Owner]"; mes "The rules for playing bingo"; @@ -1109,7 +929,6 @@ que_bingo,54,17,5 script Arcade Owner 712,{ mes "Anyway, it costs 1,000 zeny"; mes "to play each bingo game~"; close; - break; case 2: mes "[Arcade Owner]"; mes "Ah, if you want to join a"; @@ -1126,7 +945,6 @@ que_bingo,54,17,5 script Arcade Owner 712,{ mes "left door as a spectator"; mes "in the Bingo Room."; close; - break; case 3: mes "[Arcade Owner]"; mes "When you win a bingo"; @@ -1149,7 +967,5 @@ que_bingo,54,17,5 script Arcade Owner 712,{ mes "them for products in the Monster^FFFFFF ^000000 Racing Arena. I hear there's also"; mes "a place in Einbroch where you can^FFFFFF ^000000 use them, but I wouldn't know."; close; - break; } - } |