Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Module items 'items and the properties of said items
- Dim itemName As String
- Dim itemLVLReq, cost, resell As Integer
- Dim random As New Random()
- 'weapon data
- Public watk, wdef, wevd, wacc, wmagatk, wmagdef, wmagevd, wmagacc, wgan, wani, wrai, wrue, wvak, wjuk As Integer
- 'head data
- Public hdef, hmagdef, hmagacc, hmagatk, hmagevd, hatk, hacc, hevd, hgan, hani, hrai, hrue, hvak, hjuk As Integer
- 'body data
- Public adef, amagdef, amagacc, amagatk, amagevd, aatk, aacc, aevd, agan, aani, arai, arue, avak, ajuk As Integer
- 'hand data
- Public gdef, gmagdef, gmagacc, gmagatk, gmagevd, gatk, gacc, gevd, ggan, gani, grai, grue, gvak, gjuk As Integer
- 'feet data
- Public bdef, bmagdef, bmagacc, bmagatk, bmagevd, batk, bacc, bevd, bgan, bani, brai, brue, bvak, bjuk As Integer
- Public Function IDFix(ByVal itemID As Integer)
- 'first chance error fix
- If itemID >= 19 And itemID <= 100 Then 'helms
- itemID = random.Next(1, 19)
- ElseIf itemID >= 110 And itemID <= 200 Then 'boots
- itemID = random.Next(101, 110)
- ElseIf itemID >= 209 And itemID <= 300 Then 'armor
- itemID = random.Next(201, 209)
- ElseIf itemID >= 308 And itemID <= 400 Then 'gloves
- itemID = random.Next(301, 308)
- ElseIf itemID >= 431 And itemID <= 500 Then
- itemID = random.Next(401, 431)
- ElseIf itemID >= 531 And itemID <= 600 Then
- itemID = random.Next(501, 531)
- ElseIf itemID >= 1016 And itemID <= 2000 Then 'long arm
- itemID = random.Next(1001, 1016)
- ElseIf itemID >= 2055 And itemID <= 3000 Then 'blade master
- itemID = random.Next(2001, 2055)
- ElseIf itemID >= 3006 And itemID <= 4000 Then 'wave master
- itemID = random.Next(3001, 3006)
- ElseIf itemID >= 4006 And itemID <= 5000 Then '
- itemID = random.Next(4001, 4006)
- ElseIf itemID >= 5007 And itemID <= 6000 Then '
- itemID = random.Next(5001, 5007)
- ElseIf itemID >= 6031 And itemID <= 7000 Then '
- itemID = random.Next(6001, 6031)
- End If
- Return itemID
- End Function
- Public Function itemlist(ByVal itemID As Integer, ByVal varTrigger As Integer)
- cost = 0
- resell = 0
- If varTrigger = 3 Then
- itemStatReset()
- End If
- If itemID = 1 Then 'Helms
- itemName = "Bandanna"
- itemLVLReq = 1
- hmagdef = 2
- hmagevd = 6
- hgan = 1
- hani = 1
- hrai = 1
- hrue = 1
- hvak = 1
- hjuk = 1
- cost = 400
- resell = 200
- ElseIf itemID = 2 Then
- itemName = "Nomad's Hood"
- itemLVLReq = 2
- hdef = 1
- hevd = 1
- hmagdef = 1
- hmagevd = 1
- hgan = 1
- hani = 1
- hrai = 1
- hrue = 1
- hvak = 1
- hjuk = 1
- cost = 500
- resell = 250
- ElseIf itemID = 3 Then
- itemName = "Head Gear"
- itemLVLReq = 3
- hdef = 2
- hevd = 6
- hgan = 1
- hani = 1
- hrai = 1
- hrue = 1
- hvak = 1
- hjuk = 1
- cost = 600
- resell = 300
- ElseIf itemID = 4 Then
- itemName = "Ice Helm"
- itemLVLReq = 18
- hdef = 4
- hevd = 9
- hmagdef = 1
- hmagevd = 1
- hgan = 2
- hani = 2
- hrai = 2
- hrue = 4
- hjuk = 2
- cost = 1800
- resell = 900
- ElseIf itemID = 5 Then
- itemName = "Cougar Bandana"
- itemLVLReq = 11
- hmagdef = 3
- hmagevd = 8
- hgan = 1
- hani = 1
- hrai = 1
- hrue = 1
- hvak = 1
- hjuk = 1
- cost = 1200
- resell = 600
- ElseIf itemID = 6 Then
- itemName = "Hunter's Hood"
- itemLVLReq = 12
- hdef = 2
- hevd = 3
- hmagdef = 2
- hmagevd = 3
- hgan = 4
- hani = 1
- hrai = 1
- hrue = 1
- hvak = 1
- hjuk = 1
- ElseIf itemID = 7 Then
- itemName = "Mountain Helm"
- itemLVLReq = 13
- hdef = 3
- hevd = 8
- hgan = 1
- hani = 1
- hrai = 1
- hrue = 1
- hvak = 1
- hjuk = 1
- ElseIf itemID = 8 Then
- itemName = "Ice Hunter Cap"
- itemLVLReq = 17
- hdef = 2
- hevd = 4
- hmagdef = 2
- hmagevd = 4
- hgan = 2
- hani = 2
- hrai = 2
- hrue = 4
- hjuk = 2
- ElseIf itemID = 9 Then
- itemName = "Guard Cap"
- itemLVLReq = 7
- hdef = 1
- hevd = 2
- hmagdef = 1
- hmagevd = 2
- hgan = 1
- hani = 1
- hrai = 1
- hrue = 1
- hjuk = 1
- hvak = 1
- ElseIf itemID = 10 Then
- itemName = "Raccoon Earcap"
- itemLVLReq = 16
- hmagdef = 3
- hmagevd = 9
- hgan = 2
- hani = 2
- hrai = 2
- hrue = 4
- hjuk = 2
- cost = 1600
- resell = 800
- ElseIf itemID = 11 Then
- itemName = "Steel Cap"
- itemLVLReq = 6
- hmagdef = 3
- hmagevd = 7
- hgan = 1
- hani = 1
- hrai = 1
- hrue = 1
- hjuk = 1
- hvak = 1
- cost = 800
- resell = 400
- ElseIf itemID = 12 Then
- itemName = "Newt Necklace"
- itemLVLReq = 21
- hmagdef = 3
- hmagevd = 10
- hgan = 2
- hani = 2
- hrai = 2
- hjuk = 2
- hvak = 4
- cost = 2000
- resell = 1000
- ElseIf itemID = 13 Then
- itemName = "Scarab earring"
- itemLVLReq = 26
- hmagdef = 3
- hmagevd = 11
- hani = 2
- hrai = 2
- hrue = 2
- hjuk = 4
- hvak = 2
- cost = 2400
- resell = 1200
- ElseIf itemID = 14 Then
- itemName = "Thunder Torque"
- itemLVLReq = 31
- hmagdef = 3
- hmagevd = 12
- hgan = 2
- hrai = 4
- hrue = 2
- hjuk = 2
- hvak = 2
- cost = 2800
- resell = 1400
- ElseIf itemID = 15 Then
- itemName = "Bat Earrings"
- itemLVLReq = 36
- hacc = -2
- hdef = 1
- hevd = -2
- hmagdef = 4
- hmagevd = 12
- hgan = 2
- hani = 4
- hrue = 2
- hjuk = 2
- hvak = 2
- cost = 3200
- resell = 1600
- ElseIf itemID = 16 Then
- itemName = "gold Necklace"
- itemLVLReq = 41
- hacc = -3
- hdef = 2
- hevd = -4
- hmagacc = 1
- hmagdef = 4
- hmagevd = 13
- hgan = 1
- hani = 1
- hrue = 1
- hjuk = 1
- hvak = 1
- hrai = 1
- cost = 3600
- resell = 1800
- ElseIf itemID = 17 Then
- itemName = "War Headband"
- itemLVLReq = 46
- hacc = -4
- hdef = 1
- hevd = -7
- hmagacc = 1
- hmagdef = 5
- hmagevd = 13
- hgan = 1
- hani = 1
- hrue = 1
- hjuk = 1
- hvak = 1
- hrai = 1
- cost = 4000
- resell = 2000
- ElseIf itemID = 18 Then
- itemName = "Imp Earrings"
- itemLVLReq = 51
- hacc = -5
- hdef = 2
- hevd = -5
- hmagacc = 1
- hmagdef = 5
- hmagevd = 14
- hgan = 2
- hani = 2
- hrue = 2
- hjuk = 2
- hvak = 2
- hrai = 2
- cost = 4400
- resell = 2200
- ElseIf itemID = 101 Then 'Boots
- itemName = "Sandals"
- itemLVLReq = 1
- bdef = 1
- ElseIf itemID = 102 Then
- itemName = "Safety Shoes"
- itemLVLReq = 2
- bdef = 1
- bevd = 1
- bmagdef = 1
- bmagevd = 1
- bgan = 1
- bani = 1
- brai = 1
- brue = 1
- bvak = 1
- bjuk = 1
- ElseIf itemID = 103 Then
- itemName = "Used Greaves"
- itemLVLReq = 3
- bdef = 2
- bevd = 6
- bgan = 1
- bani = 1
- brai = 1
- brue = 1
- bvak = 1
- bjuk = 1
- ElseIf itemID = 104 Then
- itemName = "Mountain Boots"
- itemLVLReq = 12
- bdef = 2
- bevd = 3
- bmagdef = 2
- bmagevd = 3
- bgan = 4
- bani = 1
- brai = 1
- brue = 1
- bvak = 1
- bjuk = 1
- ElseIf itemID = 105 Then
- itemName = "Snow Panther"
- itemLVLReq = 17
- bdef = 2
- bevd = 4
- bmagdef = 2
- bmagevd = 4
- bgan = 2
- bani = 2
- brai = 2
- brue = 4
- bjuk = 2
- ElseIf itemID = 106 Then
- itemName = "Ceramic Anklet"
- itemLVLReq = 11
- bmagdef = 3
- bmagevd = 8
- bgan = 1
- bani = 1
- brai = 1
- brue = 1
- bvak = 1
- bjuk = 1
- ElseIf itemID = 107 Then
- itemName = "Mountain Guard"
- itemLVLReq = 12
- bdef = 3
- bevd = 8
- bgan = 4
- bani = 2
- brai = 2
- brue = 2
- bvak = 2
- ElseIf itemID = 108 Then
- itemName = "Iron Anklet"
- itemLVLReq = 21
- bmagdef = 3
- bmagevd = 10
- bgan = 2
- bani = 2
- brai = 2
- bvak = 4
- bjuk = 2
- ElseIf itemID = 109 Then
- itemName = "Aqua Guard"
- itemLVLReq = 18
- bdef = 4
- bevd = 9
- bmagdef = 1
- bmagevd = 1
- bgan = 2
- bani = 2
- brai = 2
- brue = 4
- bvak = 2
- ElseIf itemID = 201 Then 'Armor
- itemName = "Leather Coat"
- itemLVLReq = 1
- amagdef = 2
- amagevd = 6
- agan = 1
- aani = 1
- arai = 1
- arue = 1
- avak = 1
- ajuk = 1
- ElseIf itemID = 202 Then
- itemName = "Leather Armour"
- itemLVLReq = 2
- adef = 1
- aevd = 1
- amagdef = 1
- amagevd = 1
- agan = 1
- aani = 1
- arai = 1
- arue = 1
- avak = 1
- ajuk = 1
- ElseIf itemID = 203 Then
- itemName = "Brigandine"
- itemLVLReq = 2
- adef = 2
- aevd = 6
- agan = 1
- aani = 1
- arai = 1
- arue = 1
- avak = 1
- ajuk = 1
- ElseIf itemID = 204 Then
- itemName = "Firedrake Mail"
- itemLVLReq = 22
- adef = 2
- aevd = 5
- amagdef = 2
- amagevd = 5
- agan = 2
- aani = 2
- arai = 2
- avak = 4
- ajuk = 2
- ElseIf itemID = 205 Then
- itemName = "Grand Armour"
- itemLVLReq = 13
- adef = 3
- aevd = 8
- agan = 4
- aani = 2
- arai = 2
- avak = 2
- ElseIf itemID = 206 Then
- itemName = "Hiking Gear"
- itemLVLReq = 11
- amagdef = 3
- amagevd = 8
- agan = 1
- aani = 1
- arai = 1
- arue = 1
- avak = 1
- ajuk = 1
- ElseIf itemID = 207 Then
- itemName = "Thunder Cloak"
- itemLVLReq = 31
- amagdef = 3
- amagevd = 12
- agan = 2
- arai = 4
- arue = 2
- avak = 2
- ajuk = 2
- ElseIf itemID = 208 Then
- itemName = "Wyrm Hide"
- itemLVLReq = 12
- adef = 2
- aevd = 3
- amagdef = 2
- amagevd = 3
- agan = 4
- arai = 1
- aani = 1
- arue = 1
- avak = 1
- ajuk = 1
- ElseIf itemID = 209 Then
- itemName = "Winter Coat"
- itemLVLReq = 16
- amagdef = 3
- amagevd = 9
- agan = 2
- arai = 2
- arue = 4
- aani = 2
- ajuk = 2
- ElseIf itemID = 210 Then
- itemName = "Firedrake Mail"
- itemLVLReq = 22
- adef = 2
- aevd = 5
- amagdef = 2
- amagevd = 5
- agan = 2
- arai = 2
- aani = 2
- avak = 4
- ajuk = 2
- ElseIf itemID = 301 Then 'Gloves
- itemName = "Wrist Band"
- itemLVLReq = 1
- gmagdef = 2
- gmagevd = 6
- ggan = 1
- gani = 1
- grai = 1
- grue = 1
- gvak = 1
- gjuk = 1
- ElseIf itemID = 302 Then
- itemName = "Leather Gloves"
- itemLVLReq = 2
- gdef = 1
- gevd = 1
- gmagdef = 1
- gmagevd = 1
- ggan = 1
- gani = 1
- grai = 1
- grue = 1
- gvak = 1
- gjuk = 1
- ElseIf itemID = 303 Then
- itemName = "Rusted Hands"
- itemLVLReq = 3
- gdef = 2
- gevd = 6
- ggan = 1
- gani = 1
- grai = 1
- grue = 1
- gvak = 1
- gjuk = 1
- ElseIf itemID = 304 Then
- itemName = "Miner's Gloves"
- itemLVLReq = 12
- gdef = 2
- gevd = 3
- gmagdef = 2
- gmagevd = 3
- ggan = 4
- gani = 1
- grai = 1
- grue = 1
- gvak = 1
- gjuk = 1
- ElseIf itemID = 305 Then
- itemName = "Hands of Strom"
- itemLVLReq = 33
- gdef = 5
- gevd = 11
- gmagdef = 2
- gmagevd = 1
- ggan = 2
- grai = 4
- grue = 2
- gvak = 2
- gjuk = 2
- ElseIf itemID = 306 Then
- itemName = "Storm Bracer"
- itemLVLReq = 31
- gmagdef = 3
- gmagevd = 12
- ggan = 2
- grai = 4
- grue = 2
- gvak = 2
- gjuk = 2
- ElseIf itemID = 307 Then
- itemName = "Silver Hands"
- itemLVLReq = 8
- gdef = 3
- gevd = 7
- ggan = 1
- grai = 1
- grue = 1
- gvak = 1
- gjuk = 1
- gani = 1
- ElseIf itemID = 401 Then 'Consumables
- itemName = "Small Health Potion"
- itemLVLReq = 1
- cost = 25
- resell = 5
- ElseIf itemID = 402 Then
- itemName = "Small Health Potion x2"
- itemLVLReq = 1
- ElseIf itemID = 403 Then
- itemName = "Small Health Potion x3"
- itemLVLReq = 1
- ElseIf itemID = 404 Then
- itemName = "Small Health Potion x4"
- itemLVLReq = 1
- ElseIf itemID = 405 Then
- itemName = "Small Health Potion x5"
- itemLVLReq = 1
- ElseIf itemID = 406 Then
- itemName = "Small Health Potion x6"
- itemLVLReq = 1
- ElseIf itemID = 407 Then
- itemName = "Small Health Potion x7"
- itemLVLReq = 1
- ElseIf itemID = 408 Then
- itemName = "Small Health Potion x8"
- itemLVLReq = 1
- ElseIf itemID = 409 Then
- itemName = "Small Health Potion x9"
- itemLVLReq = 1
- ElseIf itemID = 410 Then
- itemName = "Small Health Potion x10"
- itemLVLReq = 1
- ElseIf itemID = 411 Then
- itemName = "Medium Health Potion"
- itemLVLReq = 30
- cost = 50
- resell = 20
- ElseIf itemID = 412 Then
- itemName = "Medium Health Potion x2"
- itemLVLReq = 30
- ElseIf itemID = 413 Then
- itemName = "Medium Health Potion x3"
- itemLVLReq = 30
- ElseIf itemID = 414 Then
- itemName = "Medium Health Potion x4"
- itemLVLReq = 30
- ElseIf itemID = 415 Then
- itemName = "Medium Health Potion x5"
- itemLVLReq = 30
- ElseIf itemID = 416 Then
- itemName = "Medium Health Potion x6"
- itemLVLReq = 30
- ElseIf itemID = 417 Then
- itemName = "Medium Health Potion x7"
- itemLVLReq = 30
- ElseIf itemID = 418 Then
- itemName = "Medium Health Potion x8"
- itemLVLReq = 30
- ElseIf itemID = 419 Then
- itemName = "Medium Health Potion x9"
- itemLVLReq = 30
- ElseIf itemID = 420 Then
- itemName = "Medium Health Potion x10"
- itemLVLReq = 30
- ElseIf itemID = 421 Then
- itemName = "Large Health Potion"
- itemLVLReq = 50
- cost = 100
- resell = 45
- ElseIf itemID = 422 Then
- itemName = "Large Health Potion x2"
- itemLVLReq = 50
- ElseIf itemID = 423 Then
- itemName = "Large Health Potion x3"
- itemLVLReq = 50
- ElseIf itemID = 424 Then
- itemName = "Large Health Potion x4"
- itemLVLReq = 50
- ElseIf itemID = 425 Then
- itemName = "Large Health Potion x5"
- itemLVLReq = 50
- ElseIf itemID = 426 Then
- itemName = "Large Health Potion x6"
- itemLVLReq = 50
- ElseIf itemID = 427 Then
- itemName = "Large Health Potion x7"
- itemLVLReq = 50
- ElseIf itemID = 428 Then
- itemName = "Large Health Potion x8"
- itemLVLReq = 50
- ElseIf itemID = 429 Then
- itemName = "Large Health Potion x9"
- itemLVLReq = 50
- ElseIf itemID = 430 Then
- itemName = "Large Health Potion x10"
- itemLVLReq = 50
- ElseIf itemID = 501 Then
- itemName = "Small Skill Potion"
- itemLVLReq = 1
- cost = 35
- resell = 10
- ElseIf itemID = 502 Then
- itemName = "Small Skill Potion x2"
- itemLVLReq = 1
- ElseIf itemID = 503 Then
- itemName = "Small Skill Potion x3"
- itemLVLReq = 1
- ElseIf itemID = 504 Then
- itemName = "Small Skill Potion x4"
- itemLVLReq = 1
- ElseIf itemID = 505 Then
- itemName = "Small Skill Potion x5"
- itemLVLReq = 1
- ElseIf itemID = 506 Then
- itemName = "Small Skill Potion x6"
- itemLVLReq = 1
- ElseIf itemID = 507 Then
- itemName = "Small Skill Potion x7"
- itemLVLReq = 1
- ElseIf itemID = 508 Then
- itemName = "Small Skill Potion x8"
- itemLVLReq = 1
- ElseIf itemID = 509 Then
- itemName = "Small Skill Potion x9"
- itemLVLReq = 1
- ElseIf itemID = 510 Then
- itemName = "Small Skill Potion x10"
- itemLVLReq = 1
- ElseIf itemID = 511 Then
- itemName = "Medium Skill Potion"
- itemLVLReq = 30
- cost = 70
- resell = 30
- ElseIf itemID = 512 Then
- itemName = "Medium Skill Potion x2"
- itemLVLReq = 30
- ElseIf itemID = 513 Then
- itemName = "Medium Skill Potion x3"
- itemLVLReq = 30
- ElseIf itemID = 514 Then
- itemName = "Medium Skill Potion x4"
- itemLVLReq = 30
- ElseIf itemID = 515 Then
- itemName = "Medium Skill Potion x5"
- itemLVLReq = 30
- ElseIf itemID = 516 Then
- itemName = "Medium Skill Potion x6"
- itemLVLReq = 30
- ElseIf itemID = 517 Then
- itemName = "Medium Skill Potion x7"
- itemLVLReq = 30
- ElseIf itemID = 518 Then
- itemName = "Medium Skill Potion x8"
- itemLVLReq = 30
- ElseIf itemID = 519 Then
- itemName = "Medium Skill Potion x9"
- itemLVLReq = 30
- ElseIf itemID = 520 Then
- itemName = "Medium Skill Potion x10"
- itemLVLReq = 30
- ElseIf itemID = 521 Then
- itemName = "Large Skill Potion"
- cost = 140
- resell = 55
- ElseIf itemID = 522 Then
- itemName = "Large Skill Potion x2"
- itemLVLReq = 50
- ElseIf itemID = 523 Then
- itemName = "Large Skill Potion x3"
- itemLVLReq = 50
- ElseIf itemID = 524 Then
- itemName = "Large Skill Potion x4"
- itemLVLReq = 50
- ElseIf itemID = 525 Then
- itemName = "Large Skill Potion x5"
- itemLVLReq = 50
- ElseIf itemID = 526 Then
- itemName = "Large Skill Potion x6"
- itemLVLReq = 50
- ElseIf itemID = 527 Then
- itemName = "Large Skill Potion x7"
- itemLVLReq = 50
- ElseIf itemID = 528 Then
- itemName = "Large Skill Potion x8"
- itemLVLReq = 50
- ElseIf itemID = 529 Then
- itemName = "Large Skill Potion x9"
- itemLVLReq = 50
- ElseIf itemID = 530 Then
- itemName = "Large Skill Potion x10"
- itemLVLReq = 50
- ElseIf itemID = 2001 Then
- itemName = "Basic Sword"
- itemLVLReq = 1
- watk = 2
- wacc = 1
- cost = 300
- resell = 150
- ElseIf itemID = 2002 Then
- itemName = "Brave Sword"
- itemLVLReq = 1
- watk = 4
- wacc = 2
- cost = 500
- resell = 250
- ElseIf itemID = 2003 Then
- itemName = "8 Phase Sword"
- itemLVLReq = 2
- watk = 5
- wacc = 4
- cost = 600
- resell = 300
- ElseIf itemID = 2004 Then
- itemName = "Strange Blade"
- itemLVLReq = 4
- watk = 5
- wacc = 6
- cost = 1200
- resell = 600
- ElseIf itemID = 2005 Then
- itemName = "Executioner"
- itemLVLReq = 5
- watk = 6
- wacc = 7
- cost = 1400
- resell = 700
- ElseIf itemID = 2006 Then
- itemName = "Corpse Blade"
- itemLVLReq = 6
- watk = 8
- wacc = 9
- cost = 1800
- resell = 900
- ElseIf itemID = 2007 Then
- itemName = "Oval Sword"
- itemLVLReq = 7
- watk = 9
- wacc = 10
- cost = 2000
- resell = 1000
- ElseIf itemID = 2008 Then
- itemName = "Houraiken"
- itemLVLReq = 10
- watk = 12
- wacc = 15
- cost = 3000
- resell = 1500
- ElseIf itemID = 2009 Then
- itemName = "Guillotine"
- itemLVLReq = 11
- watk = 13
- wacc = 16
- cost = 3200
- resell = 1600
- ElseIf itemID = 2010 Then
- itemName = "Patriot"
- itemLVLReq = 15
- watk = 18
- wacc = 16
- wgan = 2
- wrai = 2
- wjuk = 2
- wani = 2
- wrue = 2
- wvak = 2
- cost = 4200
- resell = 2100
- ElseIf itemID = 2011 Then
- itemName = "Siegfried"
- itemLVLReq = 16
- watk = 19
- wacc = 16
- wgan = 3
- wrai = 3
- wjuk = 3
- wani = 3
- wrue = 3
- wvak = 3
- cost = 4400
- resell = 2200
- ElseIf itemID = 2012 Then
- itemName = "Comet Blade"
- itemLVLReq = 18
- watk = 20
- wacc = 18
- cost = 5200
- resell = 2600
- ElseIf itemID = 2013 Then
- itemName = "Lions Blade"
- itemLVLReq = 21
- watk = 22
- wacc = 16
- wmagatk = 2
- wmagacc = 2
- wgan = 4
- wrai = 4
- wjuk = 4
- wani = 4
- wrue = 4
- wvak = 4
- cost = 6000
- resell = 3000
- ElseIf itemID = 2014 Then
- itemName = "Sword"
- itemLVLReq = 23
- watk = 23
- wacc = 10
- wmagatk = 5
- wmagacc = 10
- wrue = 20
- wvak = -20
- cost = 6400
- resell = 3200
- ElseIf itemID = 2015 Then
- itemName = "Rondo"
- itemLVLReq = 2
- watk = 5
- wacc = 3
- wgan = 5
- wjuk = -5
- cost = 700
- resell = 350
- ElseIf itemID = 2016 Then
- itemName = "Gakaku"
- itemLVLReq = 3
- watk = 5
- wacc = 5
- wrue = -5
- wvak = 5
- cost = 1000
- resell = 500
- ElseIf itemID = 2017 Then
- itemName = "Unicorn Blade"
- itemLVLReq = 5
- watk = 7
- wacc = 8
- wrai = -5
- wani = 5
- cost = 1600
- resell = 800
- ElseIf itemID = 2018 Then
- itemName = "Fugaku"
- itemLVLReq = 8
- watk = 11
- wacc = 12
- wgan = 7
- wjuk = -7
- cost = 2200
- resell = 1100
- ElseIf itemID = 2019 Then
- itemName = "Ensui"
- itemLVLReq = 9
- watk = 11
- wacc = 13
- wrue = 7
- wvak = -7
- cost = 2600
- resell = 1300
- ElseIf itemID = 2020 Then
- itemName = "Komura"
- itemLVLReq = 10
- watk = 11
- wacc = 14
- wrue = -7
- wvak = 7
- cost = 2800
- resell = 1400
- ElseIf itemID = 2021 Then
- itemName = "Dogmans Sword"
- itemLVLReq = 12
- watk = 14
- wacc = 17
- wrue = -7
- wvak = 7
- cost = 3400
- resell = 1700
- ElseIf itemID = 2022 Then
- itemName = "6 Side Blade"
- itemLVLReq = 20
- watk = 21
- wacc = 14
- wmagatk = 1
- wmagacc = 2
- wgan = 3
- wrai = 3
- wjuk = 3
- wani = 3
- wrue = 3
- wvak = 3
- cost = 5600
- resell = 2800
- ElseIf itemID = 2023 Then
- itemName = "Matoi"
- itemLVLReq = 23
- watk = 23
- wacc = 13
- wmagatk = 2
- wmagacc = 2
- wgan = 12
- wjuk = -12
- cost = 6400
- resell = 3200
- ElseIf itemID = 2024 Then
- itemName = "Heavenly Sword"
- itemLVLReq = 32
- watk = 23
- wacc = 13
- wmagatk = 5
- wmagacc = 5
- wrue = 12
- wvak = -12
- cost = 8000
- resell = 4000
- ElseIf itemID = 2025 Then
- itemName = "Nataku"
- itemLVLReq = 34
- watk = 23
- wacc = 14
- wmagatk = 2
- wmagacc = 2
- wrue = 12
- wvak = -5
- cost = 8400
- resell = 4200
- ElseIf itemID = 2026 Then
- itemName = "Soujin"
- itemLVLReq = 35
- watk = 24
- wacc = 15
- wmagatk = 2
- wmagacc = 2
- wrue = -5
- wvak = 12
- cost = 8600
- resell = 4300
- ElseIf itemID = 2027 Then
- itemName = "Bloody Pain"
- itemLVLReq = 37
- watk = 24
- wacc = 12
- wmagatk = 2
- wmagacc = 2
- wvak = 6
- wani = 6
- cost = 9000
- resell = 4500
- ElseIf itemID = 2028 Then
- itemName = "Oberon"
- itemLVLReq = 43
- watk = 26
- wacc = 12
- wmagatk = 3
- wmagacc = 3
- wgan = 3
- wrue = 3
- wvak = 3
- wjuk = 3
- wrai = 3
- wani = 3
- cost = 10200
- resell = 5100
- ElseIf itemID = 2029 Then
- itemName = "Mizuchi"
- itemLVLReq = 2
- watk = 5
- wacc = 4
- wrue = 5
- wvak = -5
- cost = 800
- resell = 400
- ElseIf itemID = 2030 Then
- itemName = "Gruntys Sword"
- itemLVLReq = 8
- watk = 10
- wacc = 11
- cost = 2400
- resell = 1200
- ElseIf itemID = 2031 Then
- itemName = "Souleater"
- itemLVLReq = 10
- watk = 12
- wacc = 15
- cost = 3000
- resell = 1500
- ElseIf itemID = 2032 Then
- itemName = "Singing Blade"
- itemLVLReq = 11
- watk = 13
- wacc = 16
- cost = 3200
- resell = 1600
- ElseIf itemID = 2033 Then
- itemName = "Glitter"
- itemLVLReq = 13
- watk = 16
- wacc = 19
- wmagatk = 10
- wmagacc = 10
- cost = 3800
- resell = 1900
- ElseIf itemID = 2034 Then
- itemName = "Steel Blade"
- itemLVLReq = 13
- watk = 15
- wacc = 23
- cost = 3600
- resell = 1800
- ElseIf itemID = 2035 Then
- itemName = "Demon Killer"
- itemLVLReq = 19
- watk = 20
- wacc = 19
- wmagatk = 1
- wmagacc = 1
- wrai = -10
- wani = 10
- cost = 5400
- resell = 2700
- ElseIf itemID = 2036 Then
- itemName = "Tenkafuubu"
- itemLVLReq = 40
- watk = 24
- wacc = 13
- wmagatk = 2
- wmagacc = 2
- wgan = 3
- wrue = 3
- wvak = 3
- wjuk = 3
- wrai = 3
- wani = 3
- cost = 9600
- resell = 4800
- ElseIf itemID = 2037 Then
- itemName = "Phantom Blade"
- itemLVLReq = 40
- watk = 25
- wacc = 11
- wmagatk = 3
- wmagacc = 3
- wgan = 2
- wrue = 2
- wvak = 2
- wjuk = 2
- wrai = -5
- wani = 13
- ElseIf itemID = 2038 Then
- itemName = "Rising Sun"
- itemLVLReq = 42
- watk = 25
- wacc = 13
- wmagatk = 3
- wmagacc = 3
- wgan = 2
- wrue = -5
- wvak = 13
- wjuk = 2
- wrai = 2
- wani = 2
- ElseIf itemID = 2039 Then
- itemName = "Pegasus Comet"
- itemLVLReq = 48
- watk = 27
- wacc = 10
- wmagatk = 3
- wmagacc = 3
- wgan = 4
- wrue = 4
- wvak = 4
- wjuk = 4
- wrai = 4
- wani = 4
- ElseIf itemID = 2040 Then
- itemName = "Seventh Seal"
- itemLVLReq = 50
- watk = 27
- wacc = 12
- wmagatk = 3
- wmagacc = 3
- wgan = 5
- wrue = 5
- wvak = 5
- wjuk = 5
- wrai = 5
- wani = 5
- ElseIf itemID = 2041 Then
- itemName = "Banished Blade"
- itemLVLReq = 44
- watk = 26
- wacc = 13
- wmagatk = 3
- wmagacc = 3
- wgan = 3
- wrue = 3
- wvak = 3
- wjuk = 3
- wrai = 3
- wani = 3
- ElseIf itemID = 2042 Then
- itemName = "Fair Soul"
- itemLVLReq = 52
- watk = 28
- wacc = 11
- wmagatk = 3
- wmagacc = 4
- wgan = 15
- wrue = 1
- wvak = 1
- wjuk = -5
- wrai = 1
- wani = 1
- ElseIf itemID = 2043 Then
- itemName = "Stream Sword"
- itemLVLReq = 55
- watk = 28
- wacc = 12
- wmagatk = 4
- wmagacc = 4
- wgan = 2
- wrue = 15
- wvak = -5
- wjuk = 2
- wrai = 2
- wani = 2
- ElseIf itemID = 2044 Then 'Rare Blade Master Weapons
- itemName = "Phoenixs Wing"
- itemLVLReq = 13
- watk = 16
- wacc = 19
- wmagatk = 10
- wmagacc = 10
- cost = 4000
- resell = 2000
- ElseIf itemID = 2045 Then
- itemName = "Seal Sword"
- itemLVLReq = 14
- watk = 17
- wacc = 20
- wgan = 3
- wrue = 3
- wvak = 3
- wjuk = 3
- wrai = 3
- wani = 3
- cost = 4000
- resell = 2000
- ElseIf itemID = 2046 Then
- itemName = "Jinsaran"
- itemLVLReq = 14
- watk = 18
- wacc = 22
- wmagatk = -10
- wmagacc = -10
- wrue = -15
- wvak = 15
- cost = 4000
- resell = 2000
- ElseIf itemID = 2047 Then
- itemName = "7 Star Sword"
- itemLVLReq = 21
- watk = 21
- wacc = 15
- wmagatk = 2
- wmagacc = 2
- wgan = 4
- wrue = 4
- wvak = 4
- wjuk = 4
- wrai = 4
- wani = 4
- cost = 5800
- resell = 2900
- ElseIf itemID = 2048 Then
- itemName = "Menhir Sword"
- itemLVLReq = 22
- watk = 22
- wacc = 17
- wmagatk = 2
- wmagacc = 2
- wgan = 5
- wrue = 5
- wvak = 5
- wjuk = 5
- wrai = 5
- wani = 5
- cost = 6200
- resell = 3100
- ElseIf itemID = 2049 Then
- itemName = "Bureido"
- itemLVLReq = 23
- watk = 24
- wacc = 14
- wdef = -15
- cost = 6500
- resell = 3250
- ElseIf itemID = 2050 Then
- itemName = "SKs Sword"
- itemLVLReq = 29
- watk = 25
- wacc = 11
- wmagatk = 2
- wmagacc = 2
- wgan = 1
- wrue = 1
- wvak = 1
- wjuk = 1
- wrai = 1
- wani = 1
- ElseIf itemID = 2051 Then
- itemName = "Sorrow"
- itemLVLReq = 40
- watk = -30
- wacc = 30
- wmagatk = -30
- wmagacc = 30
- ElseIf itemID = 2052 Then
- itemName = "Gimme Life"
- itemLVLReq = 51
- watk = 27
- wacc = 6
- wmagatk = 6
- wmagacc = 6
- wgan = 15
- wrue = 3
- wvak = 3
- wjuk = -5
- wrai = 3
- wani = 2
- ElseIf itemID = 2053 Then
- itemName = "Bears Sword"
- itemLVLReq = 53
- watk = 28
- wdef = 6
- wacc = 15
- wmagatk = 4
- wmagacc = 6
- wgan = 2
- wrue = 2
- wvak = 2
- wjuk = 2
- wrai = 2
- wani = 2
- ElseIf itemID = 2054 Then
- itemName = "Phoenixs Fire"
- itemLVLReq = 55
- watk = 29
- wacc = 15
- wevd = -10
- wmagatk = 2
- wmagacc = 2
- wgan = 4
- wrue = 4
- wvak = 4
- wjuk = 4
- wrai = 4
- wani = 4
- ElseIf itemID = 2055 Then
- itemName = "Chaos Sword"
- ElseIf itemID = 2056 Then 'Event and Quest Blade Master Weapons
- itemName = "Ends of Earth"
- itemLVLReq = 11
- watk = 30
- wacc = 28
- ElseIf itemID = 2057 Then
- itemName = "Heaven & Earth"
- itemLVLReq = 16
- watk = 40
- wdef = 3
- wacc = 35
- wevd = -5
- wmagdef = 10
- wmagevd = 10
- wgan = 15
- wani = -15
- resell = 2300
- ElseIf itemID = 2058 Then
- itemName = "Lake & Sea"
- itemLVLReq = 17
- watk = 35
- wdef = 1
- wacc = 30
- wevd = -10
- wmagatk = 5
- wmagacc = -5
- wrue = 20
- wvak = -20
- wrai = -20
- resell = 2400
- ElseIf itemID = 2059 Then
- itemName = "Fire & Sky"
- itemLVLReq = 18
- watk = 37
- wdef = 10
- wacc = 36
- wevd = 10
- wmagdef = -50
- wmagacc = -20
- wmagevd = -50
- wrue = -20
- wvak = 20
- wrai = 10
- resell = 2500
- ElseIf itemID = 2060 Then 'Other
- itemName = "Honours Breath"
- ElseIf itemID = 2061 Then
- itemName = "Scarlet Cross"
- ElseIf itemID = 2062 Then
- itemName = "God Slayer"
- ElseIf itemID = 2063 Then
- itemName = "Needle Blade"
- ElseIf itemID = 2064 Then
- itemName = "Shichiyou"
- ElseIf itemID = 2065 Then
- itemName = "Gold Sword"
- ElseIf itemID = 2066 Then
- itemName = "Trickster"
- ElseIf itemID = 2067 Then
- itemName = "Saturn Sword"
- ElseIf itemID = 2068 Then
- itemName = "Mercury Sword"
- ElseIf itemID = 2069 Then
- itemName = "Mars Sword"
- ElseIf itemID = 2070 Then
- itemName = "Phantom Pain"
- ElseIf itemID = 2071 Then
- itemName = "Skysweeper"
- ElseIf itemID = 2072 Then
- itemName = "Rugrats Nights"
- ElseIf itemID = 2073 Then
- itemName = "Evil Eyes"
- ElseIf itemID = 2074 Then
- itemName = "Jormungand"
- ElseIf itemID = 2075 Then
- itemName = "Eternity"
- ElseIf itemID = 1001 Then 'Long Arm Weapons
- itemName = "Bronze Spear"
- itemLVLReq = 1
- watk = 3
- wacc = 1
- ElseIf itemID = 1002 Then
- itemName = "Iron Spear"
- itemLVLReq = 1
- watk = 4
- wacc = 2
- ElseIf itemID = 1003 Then
- itemName = "Amazon Spear"
- itemLVLReq = 2
- watk = 8
- wacc = 2
- ElseIf itemID = 1004 Then
- itemName = "Relief Lance"
- itemLVLReq = 2
- watk = 8
- wacc = 3
- ElseIf itemID = 1005 Then
- itemName = "Water Spear"
- itemLVLReq = 2
- watk = 8
- wacc = 4
- wrue = 5
- wvak = -5
- ElseIf itemID = 1006 Then
- itemName = "Fire Spear"
- itemLVLReq = 3
- watk = 8
- wacc = 5
- wrue = -5
- wvak = 5
- ElseIf itemID = 1007 Then
- itemName = "Wooden Spear"
- itemLVLReq = 4
- watk = 8
- wacc = 6
- wgan = -5
- wjuk = 5
- ElseIf itemID = 1008 Then
- itemName = "Electric Spear"
- itemLVLReq = 4
- watk = 8
- wacc = 6
- wrai = 5
- wani = -5
- ElseIf itemID = 1009 Then
- itemName = "Glaive"
- itemLVLReq = 5
- watk = 8
- wacc = 8
- ElseIf itemID = 1010 Then
- itemName = "Gold Spear"
- itemLVLReq = 6
- watk = 13
- wacc = 9
- ElseIf itemID = 1011 Then
- itemName = "Nihonmaru"
- itemLVLReq = 7
- watk = 15
- wacc = 10
- ElseIf itemID = 1012 Then
- itemName = "Spear of Spell"
- itemLVLReq = 7
- watk = 15
- wacc = 11
- ElseIf itemID = 1013 Then
- itemName = "Bloody Lance"
- itemLVLReq = 8
- watk = 17
- wacc = 12
- wgan = 3
- wrue = 3
- wvak = 3
- wjuk = 3
- wrai = 3
- wani = 3
- ElseIf itemID = 1014 Then
- itemName = "Eternal Victor"
- itemLVLReq = 9
- watk = 17
- wacc = 13
- wgan = 1
- wrue = 1
- wvak = 1
- wjuk = 1
- wrai = 1
- wani = 1
- ElseIf itemID = 1015 Then
- itemName = "Merman Spear"
- itemLVLReq = 9
- watk = 17
- wacc = 13
- wrue = 10
- wvak = -10
- ElseIf itemID = 3001 Then 'Wave Master Weapons
- itemName = "Cypress Wand"
- itemLVLReq = 1
- watk = 2
- wacc = 1
- ElseIf itemID = 3002 Then
- itemName = "Iron Rod"
- itemLVLReq = 1
- wmagatk = 2
- wmagacc = 2
- ElseIf itemID = 3003 Then
- itemName = "Electric Wand"
- itemLVLReq = 4
- wmagatk = 4
- wmagacc = 7
- wrai = 5
- wani = -5
- ElseIf itemID = 3004 Then
- itemName = "Fire Wand"
- itemLVLReq = 3
- wmagatk = 4
- wmagacc = 5
- wvak = 5
- wrue = -5
- ElseIf itemID = 3005 Then
- itemName = "Water Wand"
- itemLVLReq = 2
- wmagatk = 4
- wmagacc = 4
- wrue = 5
- wvak = -5
- ElseIf itemID = 4001 Then 'Heavy Axe Weapons
- itemName = "Hatchet"
- itemLVLReq = 1
- watk = 3
- wacc = 1
- ElseIf itemID = 4002 Then
- itemName = "Water Axe"
- itemLVLReq = 3
- watk = 5
- wacc = 2
- wrue = 5
- wvak = -5
- ElseIf itemID = 4003 Then
- itemName = "Golden Axe"
- itemLVLReq = 1
- watk = 1
- ElseIf itemID = 4004 Then
- itemName = "Flame Axe"
- itemLVLReq = 4
- watk = 5
- wacc = 3
- ElseIf itemID = 4005 Then
- itemName = "Battle Axe"
- itemLVLReq = 2
- watk = 5
- wacc = 1
- wgan = 5
- wjuk = -5
- ElseIf itemID = 5001 Then 'Heavy Blade Weapons
- itemName = "Steel Blade"
- itemLVLReq = 1
- watk = 3
- wacc = 1
- ElseIf itemID = 5002 Then
- itemName = "Kikuichimonji"
- itemLVLReq = 1
- watk = 5
- wacc = 2
- ElseIf itemID = 5003 Then
- itemName = "Earth Sword"
- itemLVLReq = 2
- watk = 7
- wacc = 2
- wgan = 5
- wjuk = -5
- ElseIf itemID = 5004 Then
- itemName = "Slayer"
- itemLVLReq = 6
- watk = 8
- wacc = 5
- ElseIf itemID = 5005 Then
- itemName = "Stun Sword"
- itemLVLReq = 5
- watk = 7
- wacc = 6
- wrai = 5
- wani = -5
- ElseIf itemID = 5006 Then
- itemName = "Green Sword"
- itemLVLReq = 4
- watk = 7
- wacc = 5
- wjuk = 5
- wgan = -5
- ElseIf itemID = 6001 Then 'Twin Blade Weapons
- itemName = "Amateur Blades"
- itemLVLReq = 1
- watk = 2
- wacc = 1
- wmagatk = 1
- wmagacc = 1
- cost = 400
- resell = 200
- ElseIf itemID = 6002 Then
- itemName = "Phantom Blades"
- itemLVLReq = 2
- watk = 4
- wacc = 3
- wmagatk = 2
- wmagacc = 2
- cost = 800
- resell = 400
- ElseIf itemID = 6003 Then
- itemName = "Assassin"
- itemLVLReq = 3
- watk = 4
- wacc = 4
- wmagatk = 2
- wmagacc = 2
- cost = 1000
- resell = 500
- ElseIf itemID = 6004 Then
- itemName = "Steel Blades"
- itemLVLReq = 1
- watk = 3
- wacc = 2
- wmagatk = 1
- wmagacc = 2
- cost = 600
- resell = 300
- ElseIf itemID = 6005 Then
- itemName = "Lath Blades"
- itemLVLReq = 4
- watk = 4
- wacc = 6
- wmagatk = 2
- wmagacc = 2
- wgan = -5
- wjuk = 5
- cost = 1400
- resell = 700
- ElseIf itemID = 6006 Then
- itemName = "Shadow Blades"
- itemLVLReq = 6
- watk = 4
- wacc = 8
- wmagatk = 2
- wmagacc = 2
- wrai = -5
- wani = 5
- cost = 1800
- resell = 900
- ElseIf itemID = 6007 Then
- itemName = "Spark Blades"
- itemLVLReq = 3
- watk = 4
- wacc = 5
- wmagatk = 2
- wmagacc = 2
- wrue = -5
- wvak = 5
- cost = 1200
- resell = 600
- ElseIf itemID = 6008 Then
- itemName = "Sotetsu"
- itemLVLReq = 9
- watk = 9
- wacc = 13
- wmagatk = 2
- wmagacc = 2
- ElseIf itemID = 6009 Then
- itemName = "Fuse Blades"
- itemLVLReq = 5
- watk = 4
- wacc = 7
- wmagatk = 2
- wmagacc = 2
- wrai = -5
- wani = 5
- cost = 1600
- resell = 800
- ElseIf itemID = 6010 Then
- itemName = "Cats Blades"
- itemLVLReq = 6
- watk = 6
- wacc = 9
- wmagatk = 2
- wmagacc = 2
- wgan = 1
- wrue = 1
- wvak = 1
- wjuk = 1
- wrai = 1
- wani = 1
- cost = 2000
- resell = 1000
- ElseIf itemID = 6011 Then
- itemName = "Ronin Blads"
- itemLVLReq = 7
- watk = 7
- wacc = 10
- wevd = 10
- wmagatk = 2
- wmagacc = 1
- cost = 2200
- resell = 1100
- ElseIf itemID = 6012 Then
- itemName = "Spell Blades"
- itemLVLReq = 8
- watk = 8
- wacc = 11
- wmagatk = 2
- wmagacc = 2
- cost = 2400
- resell = 1200
- ElseIf itemID = 6013 Then
- itemName = "Bloody Blades"
- itemLVLReq = 8
- watk = 8
- wacc = 12
- wmagatk = 2
- wmagacc = 2
- cost = 2600
- resell = 1300
- ElseIf itemID = 6014 Then
- itemName = "Enou"
- itemLVLReq = 10
- watk = 9
- wacc = 14
- wmagatk = 2
- wmagacc = 2
- wvak = 10
- wrue = -10
- cost = 3000
- resell = 1500
- ElseIf itemID = 6015 Then
- itemName = "Ryokugun"
- itemLVLReq = 11
- watk = 9
- wacc = 15
- wmagatk = 2
- wmagacc = 2
- wjuk = 10
- wgan = -10
- cost = 3200
- resell = 1600
- ElseIf itemID = 6016 Then
- itemName = "Raitei"
- itemLVLReq = 11
- watk = 9
- wacc = 16
- wmagatk = 2
- wmagacc = 2
- wrai = 10
- wani = -10
- cost = 3400
- resell = 1700
- ElseIf itemID = 6017 Then
- itemName = "Anshou"
- itemLVLReq = 12
- watk = 9
- wacc = 17
- wmagatk = 4
- wmagacc = 4
- wani = 10
- wrai = -10
- cost = 3600
- resell = 1800
- ElseIf itemID = 6018 Then
- itemName = "Soul Blades"
- itemLVLReq = 12
- watk = 9
- wacc = 20
- wmagatk = -5
- wmagacc = -5
- wrai = 2
- wvak = 2
- wani = 2
- wjuk = 2
- cost = 3600
- resell = 1800
- ElseIf itemID = 6019 Then
- itemName = "Master Blades"
- itemLVLReq = 13
- watk = 11
- wacc = 18
- wmagatk = 4
- wmagacc = 4
- wrai = 2
- wvak = 2
- wani = 2
- wjuk = 2
- wrue = 2
- wgan = 2
- cost = 3800
- resell = 1900
- ElseIf itemID = 6020 Then
- itemName = "Dante's Blades"
- itemLVLReq = 14
- watk = 10
- wacc = 20
- wmagatk = 4
- wmagacc = 4
- cost = 4200
- resell = 2100
- ElseIf itemID = 6021 Then
- itemName = "Hell's Gate"
- itemLVLReq = 14
- watk = 12
- wacc = 19
- wmagatk = 4
- wmagacc = 4
- wrai = 3
- wvak = 3
- wani = 3
- wjuk = 3
- wrue = 3
- wgan = 3
- cost = 4000
- resell = 2000
- ElseIf itemID = 6022 Then
- itemName = "Sotetsu"
- itemLVLReq = 9
- watk = 9
- wacc = 13
- wmagatk = 2
- wmagacc = 2
- cost = 2800
- resell = 1400
- ElseIf itemID = 6023 Then
- itemName = "Shirogane"
- itemLVLReq = 15
- watk = 13
- wacc = 10
- wmagatk = 5
- wmagacc = 5
- wrai = 3
- wvak = 3
- wani = 3
- wjuk = 3
- wrue = 3
- wgan = 3
- cost = 4400
- resell = 2200
- ElseIf itemID = 6024 Then
- itemName = "Kurogane"
- itemLVLReq = 16
- watk = 13
- wacc = 20
- wmagatk = 4
- wmagacc = 5
- wrai = 4
- wvak = 4
- wani = 4
- wjuk = 4
- wrue = 4
- wgan = 4
- cost = 4600
- resell = 2300
- ElseIf itemID = 6025 Then
- itemName = "Yosetu & Fuyou"
- itemLVLReq = 16
- watk = 14
- wacc = 10
- wmagatk = 5
- wmagacc = 5
- wrai = 5
- wvak = 5
- wani = 5
- wjuk = 5
- wrue = 5
- wgan = 5
- cost = 4800
- resell = 2400
- ElseIf itemID = 6026 Then
- itemName = "Slayers"
- itemLVLReq = 17
- watk = 15
- wacc = 10
- wevd = 10
- wmagatk = 4
- wmagacc = 5
- wmagevd = 10
- cost = 5000
- resell = 2500
- ElseIf itemID = 6027 Then
- itemName = "Homura"
- itemLVLReq = 18
- watk = 15
- wacc = 5
- wmagatk = 6
- wmagacc = 6
- wrue = -12
- wvak = 12
- cost = 5200
- resell = 2600
- ElseIf itemID = 6028 Then
- itemName = "Tsumuji"
- itemLVLReq = 19
- watk = 15
- wacc = 10
- wmagatk = 4
- wmagacc = 6
- wgan = -12
- wjuk = 12
- cost = 5400
- resell = 2700
- ElseIf itemID = 6029 Then
- itemName = "Mikazuchi"
- itemLVLReq = 19
- watk = 15
- wacc = 5
- wmagatk = 6
- wmagacc = 6
- wrai = 10
- wani = -12
- cost = 5600
- resell = 2800
- ElseIf itemID = 6030 Then
- itemName = "Mukuro"
- itemLVLReq = 20
- watk = 16
- wacc = 10
- wmagatk = 4
- wmagacc = 6
- wrai = -12
- wani = 12
- cost = 5800
- resell = 2900
- ElseIf itemID = 9999 Then
- itemName = "Blade of Vengence"
- itemLVLReq = 1
- watk = 200
- wacc = 200
- wevd = 200
- wdef = 200
- wmagatk = 200
- wmagacc = 200
- wmagdef = 200
- wmagevd = 200
- wgan = 200
- wrue = 200
- wvak = 200
- wjuk = 200
- wrai = 200
- wani = 200
- End If
- If varTrigger = 1 Then
- Return itemName
- ElseIf varTrigger = 2 Then
- Return itemLVLReq
- ElseIf varTrigger = 3 Then 'return item stats
- With gamescreen
- If itemID >= 1 And itemID <= 100 Then
- statReset(1)
- '.equipedItems.Items.RemoveAt(0)
- '.equipedItems.Items.Insert(0, itemID)
- '.equipedItemsInv.Items.RemoveAt(0)
- '.equipedItemsInv.Items.Insert(0, .lsinv.SelectedIndex)
- .hatk = hatk
- .hacc = hacc
- .hevd = hevd
- .hdef = hdef
- .hmagatk = hmagatk
- .hmagacc = hmagacc
- .hmagdef = hmagdef
- .hmagevd = hmagevd
- .hgan = hgan
- .hrue = hrue
- .hvak = hvak
- .hjuk = hjuk
- .hrai = hrai
- .hani = hani
- ElseIf itemID >= 101 And itemID <= 200 Then
- statReset(2)
- '.equipedItems.Items.RemoveAt(1)
- '.equipedItems.Items.Insert(1, itemID)
- '.equipedItemsInv.Items.RemoveAt(1)
- '.equipedItemsInv.Items.Insert(1, .lsinv.SelectedIndex)
- .batk = batk
- .bacc = bacc
- .bevd = bevd
- .bdef = bdef
- .bmagatk = bmagatk
- .bmagacc = bmagacc
- .bmagdef = bmagdef
- .bmagevd = bmagevd
- .bgan = bgan
- .brue = brue
- .bvak = bvak
- .bjuk = bjuk
- .brai = brai
- .bani = bani
- ElseIf itemID >= 201 And itemID <= 300 Then
- statReset(3)
- '.equipedItems.Items.RemoveAt(2)
- '.equipedItems.Items.Insert(2, itemID)
- '.equipedItemsInv.Items.RemoveAt(2)
- '.equipedItemsInv.Items.Insert(2, .lsinv.SelectedIndex)
- .aatk = aatk
- .aacc = aacc
- .aevd = aevd
- .adef = adef
- .amagatk = amagatk
- .amagacc = amagacc
- .amagdef = amagdef
- .amagevd = amagevd
- .agan = agan
- .arue = arue
- .avak = avak
- .ajuk = ajuk
- .arai = arai
- .aani = aani
- ElseIf itemID >= 301 And itemID <= 400 Then
- statReset(4)
- '.equipedItems.Items.RemoveAt(3)
- '.equipedItems.Items.Insert(3, itemID)
- '.equipedItemsInv.Items.RemoveAt(3)
- '.equipedItemsInv.Items.Insert(3, .lsinv.SelectedIndex)
- .gatk = gatk
- .gacc = gacc
- .gevd = gevd
- .gdef = gdef
- .gmagatk = gmagatk
- .gmagacc = gmagacc
- .gmagdef = gmagdef
- .gmagevd = gmagevd
- .ggan = ggan
- .grue = grue
- .gvak = gvak
- .gjuk = gjuk
- .grai = grai
- .gani = gani
- Else
- statReset(5)
- '.equipedItems.Items.RemoveAt(4)
- '.equipedItems.Items.Insert(4, itemID)
- '.equipedItemsInv.Items.RemoveAt(4)
- '.equipedItemsInv.Items.Insert(4, .lsinv.SelectedIndex)
- .watk = watk
- .wacc = wacc
- .wevd = wevd
- .wdef = wdef
- .wmagatk = wmagatk
- .wmagacc = wmagacc
- .wmagdef = wmagdef
- .wmagevd = wmagevd
- .wgan = wgan
- .wrue = wrue
- .wvak = wvak
- .wjuk = wjuk
- .wrai = wrai
- .wani = wani
- End If
- End With
- ElseIf varTrigger = 4 Then
- Return cost
- ElseIf varTrigger = 5 Then
- Return resell
- End If
- End Function
- Public Sub statReset(ByVal trigger As Integer)
- With gamescreen
- If trigger = 1 Then
- .hatk = 0
- .hacc = 0
- .hevd = 0
- .hdef = 0
- .hmagatk = 0
- .hmagacc = 0
- .hmagdef = 0
- .hmagevd = 0
- .hgan = 0
- .hrue = 0
- .hvak = 0
- .hjuk = 0
- .hrai = 0
- .hani = 0
- ElseIf trigger = 2 Then
- .batk = 0
- .bacc = 0
- .bevd = 0
- .bdef = 0
- .bmagatk = 0
- .bmagacc = 0
- .bmagdef = 0
- .bmagevd = 0
- .bgan = 0
- .brue = 0
- .bvak = 0
- .bjuk = 0
- .brai = 0
- .bani = 0
- ElseIf trigger = 3 Then
- .aatk = 0
- .aacc = 0
- .aevd = 0
- .adef = 0
- .amagatk = 0
- .amagacc = 0
- .amagdef = 0
- .amagevd = 0
- .agan = 0
- .arue = 0
- .avak = 0
- .ajuk = 0
- .arai = 0
- .aani = 0
- ElseIf trigger = 4 Then
- .gatk = 0
- .gacc = 0
- .gevd = 0
- .gdef = 0
- .gmagatk = 0
- .gmagacc = 0
- .gmagdef = 0
- .gmagevd = 0
- .ggan = 0
- .grue = 0
- .gvak = 0
- .gjuk = 0
- .grai = 0
- .gani = 0
- Else
- .watk = 0
- .wacc = 0
- .wevd = 0
- .wdef = 0
- .wmagatk = 0
- .wmagacc = 0
- .wmagdef = 0
- .wmagevd = 0
- .wgan = 0
- .wrue = 0
- .wvak = 0
- .wjuk = 0
- .wrai = 0
- .wani = 0
- End If
- End With
- End Sub
- Private Sub itemStatReset()
- watk = 0
- wacc = 0
- wdef = 0
- wevd = 0
- wmagacc = 0
- wmagatk = 0
- wmagdef = 0
- wmagevd = 0
- wgan = 0
- wjuk = 0
- wani = 0
- wvak = 0
- wrai = 0
- wrue = 0
- hacc = 0
- hatk = 0
- hevd = 0
- hdef = 0
- hmagacc = 0
- hmagatk = 0
- hmagdef = 0
- hmagevd = 0
- hgan = 0
- hvak = 0
- hrue = 0
- hrai = 0
- hjuk = 0
- hani = 0
- gacc = 0
- gatk = 0
- gevd = 0
- gdef = 0
- gmagacc = 0
- gmagatk = 0
- gmagdef = 0
- gmagevd = 0
- ggan = 0
- gvak = 0
- grue = 0
- grai = 0
- gjuk = 0
- gani = 0
- aacc = 0
- aatk = 0
- aevd = 0
- adef = 0
- amagacc = 0
- amagatk = 0
- amagdef = 0
- amagevd = 0
- agan = 0
- avak = 0
- arue = 0
- arai = 0
- ajuk = 0
- aani = 0
- bacc = 0
- batk = 0
- bevd = 0
- bdef = 0
- bmagacc = 0
- bmagatk = 0
- bmagdef = 0
- bmagevd = 0
- bgan = 0
- bvak = 0
- brue = 0
- brai = 0
- bjuk = 0
- bani = 0
- End Sub
- End Module
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
