.vs/ProductVerifier/v17/DocumentLayout.backup.json

@@ -0,0 +1,53 @@
+{
+  "Version": 1,
+  "WorkspaceRootPath": "C:\\Users\\JOMT-NOTE-PC\\SECUDRIVE DG\\programs\\MAXIMUM_FUNCTION_PROGRAM_ver 10\\",
+  "Documents": [
+    {
+      "AbsoluteMoniker": "D:0:0:{B545B75D-B4ED-4A10-BA59-6D3F2BD082CF}|MAXIMUM_FUNCTION_PROGRAM\\MAXIMUM_FUNCTION_PROGRAM.vbproj|c:\\users\\jomt-note-pc\\secudrive dg\\programs\\maximum_function_program_ver 10\\maximum_function_program\\mainform.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
+      "RelativeMoniker": "D:0:0:{B545B75D-B4ED-4A10-BA59-6D3F2BD082CF}|MAXIMUM_FUNCTION_PROGRAM\\MAXIMUM_FUNCTION_PROGRAM.vbproj|solutionrelative:maximum_function_program\\mainform.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
+    },
+    {
+      "AbsoluteMoniker": "D:0:0:{B545B75D-B4ED-4A10-BA59-6D3F2BD082CF}|MAXIMUM_FUNCTION_PROGRAM\\MAXIMUM_FUNCTION_PROGRAM.vbproj|C:\\Users\\JOMT-NOTE-PC\\SECUDRIVE DG\\programs\\MAXIMUM_FUNCTION_PROGRAM_ver 10\\maximum_function_program\\mainform.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{B545B75D-B4ED-4A10-BA59-6D3F2BD082CF}|MAXIMUM_FUNCTION_PROGRAM\\MAXIMUM_FUNCTION_PROGRAM.vbproj|solutionrelative:maximum_function_program\\mainform.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+    }
+  ],
+  "DocumentGroupContainers": [
+    {
+      "Orientation": 0,
+      "VerticalTabListWidth": 256,
+      "DocumentGroups": [
+        {
+          "DockedWidth": 200,
+          "SelectedChildIndex": 1,
+          "Children": [
+            {
+              "$type": "Document",
+              "DocumentIndex": 1,
+              "Title": "mainForm.vb",
+              "DocumentMoniker": "C:\\Users\\JOMT-NOTE-PC\\SECUDRIVE DG\\programs\\MAXIMUM_FUNCTION_PROGRAM_ver 10\\MAXIMUM_FUNCTION_PROGRAM\\mainForm.vb",
+              "RelativeDocumentMoniker": "MAXIMUM_FUNCTION_PROGRAM\\mainForm.vb",
+              "ToolTip": "C:\\Users\\JOMT-NOTE-PC\\SECUDRIVE DG\\programs\\MAXIMUM_FUNCTION_PROGRAM_ver 10\\MAXIMUM_FUNCTION_PROGRAM\\mainForm.vb",
+              "RelativeToolTip": "MAXIMUM_FUNCTION_PROGRAM\\mainForm.vb",
+              "ViewState": "AgIAABkMAAAAAAAAAAAUwDUMAAAAAAAAAAAAAA==",
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
+              "WhenOpened": "2025-04-02T06:33:14.851Z",
+              "EditorCaption": ""
+            },
+            {
+              "$type": "Document",
+              "DocumentIndex": 0,
+              "Title": "mainForm.vb [\uB514\uC790\uC778]",
+              "DocumentMoniker": "C:\\Users\\JOMT-NOTE-PC\\SECUDRIVE DG\\programs\\MAXIMUM_FUNCTION_PROGRAM_ver 10\\MAXIMUM_FUNCTION_PROGRAM\\mainForm.vb",
+              "RelativeDocumentMoniker": "MAXIMUM_FUNCTION_PROGRAM\\mainForm.vb",
+              "ToolTip": "C:\\Users\\JOMT-NOTE-PC\\SECUDRIVE DG\\programs\\MAXIMUM_FUNCTION_PROGRAM_ver 10\\MAXIMUM_FUNCTION_PROGRAM\\mainForm.vb [\uB514\uC790\uC778]",
+              "RelativeToolTip": "MAXIMUM_FUNCTION_PROGRAM\\mainForm.vb [\uB514\uC790\uC778]",
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
+              "WhenOpened": "2025-04-02T06:33:15.114Z",
+              "EditorCaption": " [\uB514\uC790\uC778]"
+            }
+          ]
+        }
+      ]
+    }
+  ]
+}

.vs/ProductVerifier/v17/DocumentLayout.json

@@ -0,0 +1,53 @@
+{
+  "Version": 1,
+  "WorkspaceRootPath": "C:\\Users\\JOMT-NOTE-PC\\SECUDRIVE DG\\programs\\MAXIMUM_FUNCTION_PROGRAM_ver 10\\",
+  "Documents": [
+    {
+      "AbsoluteMoniker": "D:0:0:{B545B75D-B4ED-4A10-BA59-6D3F2BD082CF}|MAXIMUM_FUNCTION_PROGRAM\\MAXIMUM_FUNCTION_PROGRAM.vbproj|c:\\users\\jomt-note-pc\\secudrive dg\\programs\\maximum_function_program_ver 10\\maximum_function_program\\mainform.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
+      "RelativeMoniker": "D:0:0:{B545B75D-B4ED-4A10-BA59-6D3F2BD082CF}|MAXIMUM_FUNCTION_PROGRAM\\MAXIMUM_FUNCTION_PROGRAM.vbproj|solutionrelative:maximum_function_program\\mainform.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
+    },
+    {
+      "AbsoluteMoniker": "D:0:0:{B545B75D-B4ED-4A10-BA59-6D3F2BD082CF}|MAXIMUM_FUNCTION_PROGRAM\\MAXIMUM_FUNCTION_PROGRAM.vbproj|C:\\Users\\JOMT-NOTE-PC\\SECUDRIVE DG\\programs\\MAXIMUM_FUNCTION_PROGRAM_ver 10\\maximum_function_program\\mainform.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
+      "RelativeMoniker": "D:0:0:{B545B75D-B4ED-4A10-BA59-6D3F2BD082CF}|MAXIMUM_FUNCTION_PROGRAM\\MAXIMUM_FUNCTION_PROGRAM.vbproj|solutionrelative:maximum_function_program\\mainform.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
+    }
+  ],
+  "DocumentGroupContainers": [
+    {
+      "Orientation": 0,
+      "VerticalTabListWidth": 256,
+      "DocumentGroups": [
+        {
+          "DockedWidth": 200,
+          "SelectedChildIndex": 1,
+          "Children": [
+            {
+              "$type": "Document",
+              "DocumentIndex": 1,
+              "Title": "mainForm.vb",
+              "DocumentMoniker": "C:\\Users\\JOMT-NOTE-PC\\SECUDRIVE DG\\programs\\MAXIMUM_FUNCTION_PROGRAM_ver 10\\MAXIMUM_FUNCTION_PROGRAM\\mainForm.vb",
+              "RelativeDocumentMoniker": "MAXIMUM_FUNCTION_PROGRAM\\mainForm.vb",
+              "ToolTip": "C:\\Users\\JOMT-NOTE-PC\\SECUDRIVE DG\\programs\\MAXIMUM_FUNCTION_PROGRAM_ver 10\\MAXIMUM_FUNCTION_PROGRAM\\mainForm.vb",
+              "RelativeToolTip": "MAXIMUM_FUNCTION_PROGRAM\\mainForm.vb",
+              "ViewState": "AgIAABkMAAAAAAAAAAAUwDUMAAAAAAAAAAAAAA==",
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
+              "WhenOpened": "2025-04-02T06:33:14.851Z",
+              "EditorCaption": ""
+            },
+            {
+              "$type": "Document",
+              "DocumentIndex": 0,
+              "Title": "mainForm.vb [\uB514\uC790\uC778]",
+              "DocumentMoniker": "C:\\Users\\JOMT-NOTE-PC\\SECUDRIVE DG\\programs\\MAXIMUM_FUNCTION_PROGRAM_ver 10\\MAXIMUM_FUNCTION_PROGRAM\\mainForm.vb",
+              "RelativeDocumentMoniker": "MAXIMUM_FUNCTION_PROGRAM\\mainForm.vb",
+              "ToolTip": "C:\\Users\\JOMT-NOTE-PC\\SECUDRIVE DG\\programs\\MAXIMUM_FUNCTION_PROGRAM_ver 10\\MAXIMUM_FUNCTION_PROGRAM\\mainForm.vb [\uB514\uC790\uC778]",
+              "RelativeToolTip": "MAXIMUM_FUNCTION_PROGRAM\\mainForm.vb [\uB514\uC790\uC778]",
+              "Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
+              "WhenOpened": "2025-04-02T06:33:15.114Z",
+              "EditorCaption": " [\uB514\uC790\uC778]"
+            }
+          ]
+        }
+      ]
+    }
+  ]
+}

MAXIMUM_FUNCTION_PROGRAM/bin/Debug/Config/Standard_MaxAlpha.ini

@@ -1 +0,0 @@
-1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1.0.1^4.5^3.5^35^10^35^10^2^0^35^20^3^1^35^20^4^2^35^20^5^3^1^70^60^5^4^2^70^60^5^5^3^70^60^01234

MAXIMUM_FUNCTION_PROGRAM/bin/Debug/MAXIMUM_FUNCTION_PROGRAM.exe.config

@@ -0,0 +1,6 @@
+<?xml version="1.0" encoding="utf-8" ?>
+<configuration>
+    <startup>
+        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.8" />
+    </startup>
+</configuration>

MAXIMUM_FUNCTION_PROGRAM/bin/Debug/MAXIMUM_FUNCTION_PROGRAM.xml

@@ -0,0 +1,26 @@
+<?xml version="1.0"?>
+<doc>
+<assembly>
+<name>
+MAXIMUM_FUNCTION_PROGRAM
+</name>
+</assembly>
+<members>
+<member name="T:MAXIMUM_FUNCTION_PROGRAM.My.Resources.Resources">
+<summary>
+  A strongly-typed resource class, for looking up localized strings, etc.
+</summary>
+</member>
+<member name="P:MAXIMUM_FUNCTION_PROGRAM.My.Resources.Resources.ResourceManager">
+<summary>
+  Returns the cached ResourceManager instance used by this class.
+</summary>
+</member>
+<member name="P:MAXIMUM_FUNCTION_PROGRAM.My.Resources.Resources.Culture">
+<summary>
+  Overrides the current thread's CurrentUICulture property for all
+  resource lookups using this strongly typed resource class.
+</summary>
+</member>
+</members>
+</doc>

MAXIMUM_FUNCTION_PROGRAM/mainForm.Designer.vb

@@ -32,7 +32,6 @@ Partial Class mainForm
         Me.lbProdSerial = New System.Windows.Forms.Label()
         Me.gbData = New System.Windows.Forms.GroupBox()
         Me.gbMaximum = New System.Windows.Forms.GroupBox()
-        Me.monthCal = New System.Windows.Forms.MonthCalendar()
         Me.pnButton = New System.Windows.Forms.Panel()
         Me.btnFuncRun = New System.Windows.Forms.Button()
         Me.txbRunState = New System.Windows.Forms.TextBox()
@@ -66,6 +65,7 @@ Partial Class mainForm
         Me.lbRDate_M1 = New System.Windows.Forms.Label()
         Me.txbRDate_M1 = New System.Windows.Forms.TextBox()
         Me.gbHIFU_M1 = New System.Windows.Forms.GroupBox()
+        Me.monthCal = New System.Windows.Forms.MonthCalendar()
         Me.pnHHifu_M1 = New System.Windows.Forms.Panel()
         Me.lbHHifu_M1 = New System.Windows.Forms.Label()
         Me.txbHHifu_M1 = New System.Windows.Forms.TextBox()
@@ -174,7 +174,6 @@ Partial Class mainForm
         Me.nowTimer = New System.Windows.Forms.Timer(Me.components)
         Me.pnStandard = New System.Windows.Forms.Panel()
         Me.gbOpChange = New System.Windows.Forms.GroupBox()
-        Me.rdbMaxAlpha = New System.Windows.Forms.RadioButton()
         Me.rdbEffect = New System.Windows.Forms.RadioButton()
         Me.rdbAlto = New System.Windows.Forms.RadioButton()
         Me.rdbMax = New System.Windows.Forms.RadioButton()
@@ -943,16 +942,6 @@ Partial Class mainForm
         Me.gbMaximum.TabStop = False
         Me.gbMaximum.Text = "MAXIMUM 데이터"
         '
-        'monthCal
-        '
-        Me.monthCal.Location = New System.Drawing.Point(1272, 390)
-        Me.monthCal.Margin = New System.Windows.Forms.Padding(10, 11, 10, 11)
-        Me.monthCal.MaxSelectionCount = 1
-        Me.monthCal.MinDate = New Date(2018, 1, 1, 0, 0, 0, 0)
-        Me.monthCal.Name = "monthCal"
-        Me.monthCal.TabIndex = 119
-        Me.monthCal.Visible = False
-        '
         'pnButton
         '
         Me.pnButton.Controls.Add(Me.btnFuncRun)
@@ -1082,7 +1071,7 @@ Partial Class mainForm
         '
         Me.cboCsvProd.Font = New System.Drawing.Font("함초롬바탕", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
         Me.cboCsvProd.FormattingEnabled = True
-        Me.cboCsvProd.Items.AddRange(New Object() {"MAXIMUM", "ALTO", "EFFECT", "MAXIMUM ALPHA"})
+        Me.cboCsvProd.Items.AddRange(New Object() {"MAXIMUM", "ALTO", "EFFECT"})
         Me.cboCsvProd.Location = New System.Drawing.Point(65, 1)
         Me.cboCsvProd.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
         Me.cboCsvProd.Name = "cboCsvProd"
@@ -1316,6 +1305,16 @@ Partial Class mainForm
         Me.gbHIFU_M1.TabStop = False
         Me.gbHIFU_M1.Text = "출력값 측정"
         '
+        'monthCal
+        '
+        Me.monthCal.Location = New System.Drawing.Point(1272, 390)
+        Me.monthCal.Margin = New System.Windows.Forms.Padding(10, 11, 10, 11)
+        Me.monthCal.MaxSelectionCount = 1
+        Me.monthCal.MinDate = New Date(2018, 1, 1, 0, 0, 0, 0)
+        Me.monthCal.Name = "monthCal"
+        Me.monthCal.TabIndex = 119
+        Me.monthCal.Visible = False
+        '
         'pnHHifu_M1
         '
         Me.pnHHifu_M1.Controls.Add(Me.lbHHifu_M1)
@@ -2471,37 +2470,23 @@ Partial Class mainForm
         '
         'gbOpChange
         '
-        Me.gbOpChange.Controls.Add(Me.rdbMaxAlpha)
         Me.gbOpChange.Controls.Add(Me.rdbEffect)
         Me.gbOpChange.Controls.Add(Me.rdbAlto)
         Me.gbOpChange.Controls.Add(Me.rdbMax)
         Me.gbOpChange.Font = New System.Drawing.Font("함초롬바탕", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
-        Me.gbOpChange.Location = New System.Drawing.Point(948, 4)
+        Me.gbOpChange.Location = New System.Drawing.Point(1291, 4)
         Me.gbOpChange.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
         Me.gbOpChange.Name = "gbOpChange"
         Me.gbOpChange.Padding = New System.Windows.Forms.Padding(3, 4, 3, 4)
-        Me.gbOpChange.Size = New System.Drawing.Size(766, 112)
+        Me.gbOpChange.Size = New System.Drawing.Size(423, 112)
         Me.gbOpChange.TabIndex = 4
         Me.gbOpChange.TabStop = False
         Me.gbOpChange.Text = "기준 설정"
         '
-        'rdbMaxAlpha
-        '
-        Me.rdbMaxAlpha.AutoSize = True
-        Me.rdbMaxAlpha.Checked = True
-        Me.rdbMaxAlpha.Location = New System.Drawing.Point(478, 48)
-        Me.rdbMaxAlpha.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
-        Me.rdbMaxAlpha.Name = "rdbMaxAlpha"
-        Me.rdbMaxAlpha.Size = New System.Drawing.Size(269, 39)
-        Me.rdbMaxAlpha.TabIndex = 3
-        Me.rdbMaxAlpha.TabStop = True
-        Me.rdbMaxAlpha.Text = "MAXIMUM ALPHA"
-        Me.rdbMaxAlpha.UseVisualStyleBackColor = True
-        '
         'rdbEffect
         '
         Me.rdbEffect.AutoSize = True
-        Me.rdbEffect.Location = New System.Drawing.Point(320, 47)
+        Me.rdbEffect.Location = New System.Drawing.Point(287, 48)
         Me.rdbEffect.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
         Me.rdbEffect.Name = "rdbEffect"
         Me.rdbEffect.Size = New System.Drawing.Size(141, 39)
@@ -2512,7 +2497,7 @@ Partial Class mainForm
         'rdbAlto
         '
         Me.rdbAlto.AutoSize = True
-        Me.rdbAlto.Location = New System.Drawing.Point(198, 48)
+        Me.rdbAlto.Location = New System.Drawing.Point(184, 48)
         Me.rdbAlto.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
         Me.rdbAlto.Name = "rdbAlto"
         Me.rdbAlto.Size = New System.Drawing.Size(108, 39)
@@ -7490,7 +7475,6 @@ Partial Class mainForm
     Friend WithEvents txbReCount As TextBox
     Friend WithEvents Label3 As Label
     Friend WithEvents rdbEffect As RadioButton
-    Friend WithEvents rdbMaxAlpha As RadioButton
     Friend WithEvents Panel3 As Panel
     Friend WithEvents txbDate As TextBox
     Friend WithEvents lbDate As Label

MAXIMUM_FUNCTION_PROGRAM/mainForm.vb

@@ -214,15 +214,6 @@ Public Class mainForm
     Private cartSerial(prodTypeList.cartEtc) As String
     Private TDUseCompare As Boolean
     Private searchType As Int16
-    Private Enum maxAlphaColorList
-        Ruby_Red = 0
-        Topaz_Orange = 2
-        Emerald_Green = 3
-        Sapphire_Blue = 4
-        Topaz_Brown = 5
-        Sitrin_Gold = 7
-    End Enum
-    Private colorTypeMaxAlpha As Int16
 
     Private Enum maxColorList
         White = 0
@@ -232,41 +223,19 @@ Public Class mainForm
         Yellow = 5
         Mint = 7
         Purple = 8
-        Black_Gold = 9
+        blackGold = 9
     End Enum
-    Private colorTypeMax As Int16
-
-    Private Enum altoColorList
-        White = 0
-        Purple = 8
-        Black_Gold = 9
-    End Enum
-    Private colorTypeAlto As Int16
+    Private colorType As Int16
 
     Private Enum eftColorList
         White_Pink = 1
         White_Sky = 2
         White_Brown = 3
+
+        Max_Effect_Color
     End Enum
     Private colorTypeEft As Int16
 
-    Private Enum alphaColorList
-        Black = 1
-    End Enum
-    Private colorTypeAlpha As Int16
-
-    Private Enum luxColorList
-        White = 0
-        Black = 1
-    End Enum
-    Private colorTypeLux As Int16
-
-    Private Enum proColorList
-        White = 0
-        Black = 1
-    End Enum
-    Private colorTypePro As Int16
-
     Private Enum prodModelList
         prodPro = 1
         prodLux
@@ -274,7 +243,6 @@ Public Class mainForm
         prodAlpha
         prodAlto
         prodEffect
-        prodMaxAlpha
     End Enum
     Private modelType As Int16
 
@@ -357,7 +325,7 @@ Public Class mainForm
 
     Private Sub startSetting()
         Const programName As String = "MAXIMUM FUNCTION DATA INFO VER."
-        Const programVer As String = "1.1.3"
+        Const programVer As String = "1.1.0"
         Me.Text = programName & programVer
         Me.Size = New Size(1920, 1060)
         Me.Location = New Point(0, 0)
@@ -695,14 +663,8 @@ Public Class mainForm
                 Dim colorName As String
                 If modelName = "EFFECT" Then
                     colorName = fileColorComareForEffectModel()
-                ElseIf modelName = "ALTO" Then
-                    colorName = fileColorComareForAltoModel()
-                ElseIf modelName = "MAXIMUM" Then
-                    colorName = fileColorComareForMaxModel()
-                ElseIf modelName = "MAXIMUM AlPHA" Then
-                    colorName = fileColorComareForMaxAlphaModel()
                 Else
-                    MsgBox("모델이 없습니다.")
+                    colorName = fileColorCompare()
                 End If
 
                 Dim fileName As String = filePath & "\" & saveYear & "-" & saveMonth & "-" & saveDay & "(" & modelName & "_" & typeName & "_" & colorName & ")" & ".csv"
@@ -840,21 +802,6 @@ Public Class mainForm
                 Return "ALTO"
             Case prodModelList.prodEffect
                 Return "EFFECT"
-            Case prodModelList.prodMaxAlpha
-                Return "MAXIMUM ALPHA"
-            Case Else
-                Return "ETC"
-        End Select
-    End Function
-
-    Private Function fileColorComareForAltoModel() As String 'Alto model color'
-        Select Case colorTypeAlto
-            Case altoColorList.White
-                Return "White"
-            Case altoColorList.Purple
-                Return "Purple"
-            Case altoColorList.Black_Gold
-                Return "BlackGold"
             Case Else
                 Return "ETC"
         End Select
@@ -872,27 +819,9 @@ Public Class mainForm
                 Return "ETC"
         End Select
     End Function
-    Private Function fileColorComareForMaxAlphaModel() As String 'Maximum alpha model color'
-        Select Case colorTypeMaxAlpha
-            Case maxAlphaColorList.Ruby_Red
-                Return "RubyRed"
-            Case maxAlphaColorList.Topaz_Orange
-                Return "TopazOrange"
-            Case maxAlphaColorList.Emerald_Green
-                Return "EmeraldGreen"
-            Case maxAlphaColorList.Sapphire_Blue
-                Return "SapphireBlue"
-            Case maxAlphaColorList.Topaz_Brown
-                Return "TopazBrown"
-            Case maxAlphaColorList.Sitrin_Gold
-                Return "SitrinGold"
-            Case Else
-                Return "ETC"
-        End Select
-    End Function
 
-    Private Function fileColorComareForMaxModel() As String 'Maximum model color'
-        Select Case colorTypeMax
+    Private Function fileColorCompare() As String
+        Select Case colorType
             Case maxColorList.White
                 Return "White"
             Case maxColorList.ShineMint
@@ -907,57 +836,13 @@ Public Class mainForm
                 Return "Mint"
             Case maxColorList.Purple
                 Return "Purple"
-            Case maxColorList.Black_Gold
+            Case maxColorList.blackGold
                 Return "BlackGold"
             Case Else
                 Return "etc"
         End Select
     End Function
 
-    Private Function fileColorCompareAltoModel() As String
-        Select Case colorTypeAlto
-            Case altoColorList.White
-                Return "White"
-            Case altoColorList.Purple
-                Return "Purple"
-            Case altoColorList.Black_Gold
-                Return "BlackGold"
-            Case Else
-                Return "etc"
-        End Select
-    End Function
-
-    Private Function fileColorCompareAlphaModel() As String
-        Select Case colorTypeAlpha
-            Case alphaColorList.Black
-                Return "Black"
-            Case Else
-                Return "etc"
-        End Select
-    End Function
-
-    Private Function fileColorCompareLuxModel() As String
-        Select Case colorTypeLux
-            Case luxColorList.White
-                Return "White"
-            Case luxColorList.Black
-                Return "Black"
-            Case Else
-                Return "etc"
-        End Select
-    End Function
-
-    Private Function fileColorCompareProModel() As String
-        Select Case colorTypePro
-            Case proColorList.White
-                Return "White"
-            Case proColorList.Black
-                Return "Black"
-            Case Else
-                Return "etc"
-        End Select
-    End Function
-
     Private Function lastQCDBReg(prodSerial As String) As Boolean
 
         If ckbopTD.Checked = True Then
@@ -1601,8 +1486,6 @@ DataFail:
                 Return "ALTO"
             Case prodModelList.prodEffect
                 Return "EFFECT"
-            Case prodModelList.prodMaxAlpha
-                Return "MAXIMUM ALPHA"
             Case Else
                 Return "FAIL"
         End Select
@@ -1701,14 +1584,8 @@ DataFail:
         Dim tmpColor = Mid(prodSerial, 11, 1)
         If (modelType = prodModelList.prodEffect) Then
             colorTypeEft = tmpColor
-        ElseIf (modelType = prodModelList.prodMaxAlpha) Then
-            colorTypeMaxAlpha = tmpColor
-        ElseIf (modelType = prodModelList.prodMax) Then
-            colorTypeMax = tmpColor
-        ElseIf (modelType = prodModelList.prodAlto) Then
-            colorTypeAlto = tmpColor
         Else
-            MsgBox("시리얼 넘버 확인")
+            colorType = tmpColor
         End If
 
         If modelType = prodModelList.prodPro Or modelType = prodModelList.prodLux Or modelType = prodModelList.prodAlpha Then
@@ -1744,22 +1621,6 @@ DataFail:
                     Case Else
                         cartSerial(prodTypeList.cartEtc) = prodSerial
                 End Select
-            ElseIf modelType = prodModelList.prodMaxAlpha Then
-                TDUseCompare = True
-                Select Case searchType
-                    Case prodTypeList.cartSet_V1
-                        cartSerial(prodTypeList.cartSet_V1) = prodSerial
-                    Case Else
-                        cartSerial(prodTypeList.cartEtc) = prodSerial
-                End Select
-            ElseIf modelType = prodModelList.prodAlto Then
-                TDUseCompare = True
-                Select Case searchType
-                    Case prodTypeList.cartSet_V1
-                        cartSerial(prodTypeList.cartSet_V1) = prodSerial
-                    Case Else
-                        cartSerial(prodTypeList.cartEtc) = prodSerial
-                End Select
             Else
                 TDUseCompare = False
                 Select Case searchType
@@ -1944,8 +1805,6 @@ DataFail:
                 Return "ALTO"
             Case 2
                 Return "EFFECT"
-            Case 3
-                Return "MAXIMUM ALPHA"
             Case Else
                 Return "ETC"
         End Select
@@ -2509,12 +2368,6 @@ finishFunc:
 
             If rdbEffect.Checked = True Then
                 fileName = filePath & "\Standard_EFFECT.ini"
-            ElseIf rdbMaxAlpha.Checked = True Then
-                fileName = filePath & "\Standard_MaxAlpha.ini"
-            ElseIf rdbMax.Checked = True Then
-                fileName = filePath & "\Standard_Max.ini"
-            ElseIf rdbAlto.Checked = True Then
-                fileName = filePath & "\Standard_Alto.ini"
             Else
                 fileName = filePath & "\Standard.ini"
             End If
@@ -2574,16 +2427,12 @@ finishFunc:
 
             If rdbEffect.Checked = True Then
                 fileName = filePath & "\Standard_EFFECT.ini"
-            ElseIf rdbMaxAlpha.Checked = True Then
-                fileName = filePath & "\Standard_MaxAlpha.ini"
-            ElseIf rdbMax.Checked = True Then
-                fileName = filePath & "\Standard_Max.ini"
-            ElseIf rdbAlto.Checked = True Then
-                fileName = filePath & "\Standard_Alto.ini"
             Else
                 fileName = filePath & "\Standard.ini"
             End If
 
+            'Dim fileName As String = filePath & "\Standard.ini"
+
             If File.Exists(fileName) Then
                 Dim readData As String = File.ReadAllText(fileName, System.Text.Encoding.UTF8)
 
@@ -3244,11 +3093,6 @@ WR_File_Error:
 
     Private Sub rdbAlto_CheckedChanged(sender As Object, e As EventArgs) Handles rdbAlto.CheckedChanged
         If rdbAlto.Checked = True Then
-            gbStandard.Text = "Alto 합격기준"
-
-            dataSetting()
-            configLoad()
-
             gbStandard.Visible = False
             gbStandard_AT.Visible = True
         End If
@@ -3266,18 +3110,6 @@ WR_File_Error:
         End If
     End Sub
 
-    Private Sub rdbMaxAlpha_CheckedChanged(sender As Object, e As EventArgs) Handles rdbMaxAlpha.CheckedChanged
-        If rdbMaxAlpha.Checked = True Then
-            gbStandard.Text = "MAXIMUM ALPHA 합격기준"
-
-            dataSetting()
-            configLoad()
-
-            gbStandard.Visible = True
-            gbStandard_AT.Visible = False
-        End If
-    End Sub
-
     Private Sub btnReturn_Click(sender As Object, e As EventArgs) Handles btnReturn.Click
         If txbProdSerial.Text = String.Empty Then
             MsgBox("입력할 정보가 존재하지 않습니다. 데이터를 읽어주십시오,", vbExclamation)

MAXIMUM_FUNCTION_PROGRAM/obj/Debug/MAXIMUM_FUNCTION_PROGRAM.xml

@@ -0,0 +1,26 @@
+<?xml version="1.0"?>
+<doc>
+<assembly>
+<name>
+MAXIMUM_FUNCTION_PROGRAM
+</name>
+</assembly>
+<members>
+<member name="T:MAXIMUM_FUNCTION_PROGRAM.My.Resources.Resources">
+<summary>
+  A strongly-typed resource class, for looking up localized strings, etc.
+</summary>
+</member>
+<member name="P:MAXIMUM_FUNCTION_PROGRAM.My.Resources.Resources.ResourceManager">
+<summary>
+  Returns the cached ResourceManager instance used by this class.
+</summary>
+</member>
+<member name="P:MAXIMUM_FUNCTION_PROGRAM.My.Resources.Resources.Culture">
+<summary>
+  Overrides the current thread's CurrentUICulture property for all
+  resource lookups using this strongly typed resource class.
+</summary>
+</member>
+</members>
+</doc>

README.md

@@ -60,10 +60,8 @@
 
 **모델별 설정 관리**:
 
+- MAXIMUM/ALTO: `Standard.ini` 파일 사용
 - EFFECT: `Standard_EFFECT.ini` 파일 사용
-- MAXIMUM ALPHA: `Standard_MaxAlpha.ini` 파일 사용
-- ALTO: `Standard_Alto.ini` 파일 사용
-- MAXIMUM: `Standard_Max.ini` 파일 사용
 - 모델 선택 시 자동으로 해당 설정 파일 로드
 
 **DB 연동 설정** (체크박스로 선택 가능):

업데이트 내용.txt

@@ -1 +1 @@
-MAXIMUM ALPHA
+이펙트 추가