Compare commits

..

No commits in common. "ac748723fca5758ec64c481e56577d246545670a" and "040f8081972af009b41e42566c2a9303a7332816" have entirely different histories.

2 changed files with 17 additions and 38 deletions

File diff suppressed because one or more lines are too long

View File

@ -161,15 +161,10 @@
Dayshot2
Elixir
Elixirpremium
Emsbeltcontrollset
FabricBag
Goldshopbag
End Enum
Public comDBCount(comDB.Goldshopbag) As Integer ''DB 저장
Public comInCount(comDB.Goldshopbag) As Integer '' 패킹 저장 32 + 10 = 42 - 1 = 41
Public comComCount(comDB.Goldshopbag) As Integer '' 로컬 저장
Public comDBCount(comDB.Elixirpremium) As Integer ''DB 저장
Public comInCount(comDB.Elixirpremium) As Integer '' 패킹 저장 32 + 10 = 42 - 1 = 41
Public comComCount(comDB.Elixirpremium) As Integer '' 로컬 저장
Public countCommand(prodInCount.Length + comInCount.Length - 1) As String
@ -405,12 +400,6 @@
comInCount(comDB.Elixir) = ckCount
Case comDB.Elixirpremium
comInCount(comDB.Elixirpremium) = ckCount
Case comDB.Emsbeltcontrollset
comInCount(comDB.Emsbeltcontrollset) = ckCount
Case comDB.FabricBag
comInCount(comDB.FabricBag) = ckCount
Case comDB.Goldshopbag
comInCount(comDB.Goldshopbag) = ckCount
Case Else
MsgBox("잘못된 데이터가 개입되었습니다", vbCritical)
@ -525,9 +514,6 @@
countCommand(prodInCount.Length + comDB.Dayshot2) = "Dayshot2cnt"
countCommand(prodInCount.Length + comDB.Elixir) = "Elixircnt"
countCommand(prodInCount.Length + comDB.Elixirpremium) = "Elixirpremiumcnt"
countCommand(prodInCount.Length + comDB.Emsbeltcontrollset) = "Emsbeltcontrollsetcnt"
countCommand(prodInCount.Length + comDB.FabricBag) = "FabricBagcnt"
countCommand(prodInCount.Length + comDB.Goldshopbag) = "Goldshopbagcnt"
Case countSaveList.autopack
@ -629,10 +615,6 @@
countCommand(prodInCount.Length + comDB.Dayshot2) = "APDayshot2cnt"
countCommand(prodInCount.Length + comDB.Elixir) = "APElixircnt"
countCommand(prodInCount.Length + comDB.Elixirpremium) = "APElixirpremiumcnt"
countCommand(prodInCount.Length + comDB.Emsbeltcontrollset) = "APEmsbeltcontrollsetcnt"
countCommand(prodInCount.Length + comDB.FabricBag) = "APFabricBagcnt"
countCommand(prodInCount.Length + comDB.Goldshopbag) = "APGoldshopbagcnt"
Case countSaveList.autoWeight
@ -736,9 +718,6 @@
countCommand(prodInCount.Length + comDB.Dayshot2) = "AWDayshot2cnt"
countCommand(prodInCount.Length + comDB.Elixir) = "AWElixircnt"
countCommand(prodInCount.Length + comDB.Elixirpremium) = "AWElixirpremiumcnt"
countCommand(prodInCount.Length + comDB.Emsbeltcontrollset) = "AWEmsbeltcontrollsetcnt"
countCommand(prodInCount.Length + comDB.FabricBag) = "AWFabricBagcnt"
countCommand(prodInCount.Length + comDB.Goldshopbag) = "AWGoldshopbagcnt"
End Select
End Sub