Code:
Func SetIds()
$count_effect = 0
$count_id = 0
If (GUICtrlRead($PS) = 1) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "0_old", "2000001")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "0_new", "2000008")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "0_old", "20101")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "0_new", "20107")
$count_effect = 1
$count_id = 1
EndIf
If (GUICtrlRead($PS) = 4) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "0_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "0_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "0_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "0_new", "1")
EndIf
If (GUICtrlRead($CS) = 1) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "1_old", "2000002")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "1_new", "2000009")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "1_old", "20201")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "1_new", "20207")
$count_effect = 2
$count_id = 2
EndIf
If (GUICtrlRead($CS) = 4) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "1_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "1_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "1_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "1_new", "1")
EndIf
If (GUICtrlRead($BAT) = 1) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "2_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "2_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "2_old", "20301")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "2_new", "20307")
$count_effect = 3
$count_id = 3
EndIf
If (GUICtrlRead($BAT) = 4) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "2_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "2_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "2_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "2_new", "1")
EndIf
If (GUICtrlRead($SMG) = 1) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "3_old", "2010001")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "3_new", "2010009")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "3_old", "21101")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "3_new", "21107")
$count_effect = 4
$count_id = 4
EndIf
If (GUICtrlRead($SMG) = 4) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "3_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "3_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "3_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "3_new", "1")
EndIf
If (GUICtrlRead($Revo) = 1) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "4_old", "2010002")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "4_new", "2010010")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "4_old", "21201")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "4_new", "21207")
$count_effect = 5
$count_id = 5
EndIf
If (GUICtrlRead($Revo) = 4) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "4_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "4_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "4_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "4_new", "1")
EndIf
If (GUICtrlRead($SR) = 1) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "5_old", "2010004")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "5_new", "2010011")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "5_old", "21401")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "5_new", "21407")
$count_effect = 6
$count_id = 6
EndIf
If (GUICtrlRead($SR) = 4) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "5_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "5_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "5_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "5_new", "1")
EndIf
If (GUICtrlRead($RG) = 1) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "6_old", "2030001")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "6_new", "2030003")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "6_old", "23101")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "6_new", "23107")
$count_effect = 7
$count_id = 7
EndIf
If (GUICtrlRead($RG) = 4) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "6_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "6_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "6_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "6_new", "1")
EndIf
If (GUICtrlRead($HG) = 1) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "7_old", "2010007")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "7_new", "2010014")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "7_old", "21701")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "7_new", "21707")
$count_effect = 8
$count_id = 8
EndIf
If (GUICtrlRead($HG) = 4) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "7_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "7_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "7_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "7_new", "1")
EndIf
If (GUICtrlRead($SD) = 1) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "8_old", "2000006")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "8_new", "2000011")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "8_old", "20601")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "8_new", "20607")
$count_effect = 9
$count_id = 9
EndIf
If (GUICtrlRead($SD) = 4) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "8_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "8_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "8_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "8_new", "1")
EndIf
If (GUICtrlRead($GR) = 1) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "9_old", "2020002")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "9_new", "2020003")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "9_old", "22201")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "9_new", "22307")
$count_effect = 10
$count_id = 10
EndIf
If (GUICtrlRead($GR) = 4) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "9_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "9_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "9_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "9_new", "1")
EndIf
If (GUICtrlRead($TB) = 1) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "10_old", "2000010")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "10_new", "2000012")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "10_old", "201001")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "10_new", "201007")
$count_effect = 11
$count_id = 11
EndIf
If (GUICtrlRead($TB) = 4) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "10_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "10_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "10_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "10_new", "1")
EndIf
if (GUICtrlRead($BS) = 1) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "11_old", "2010008")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "11_new", "2010022")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "11_old", "21801")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "11_new", "21807")
$count_effect = 12
$count_id = 12
EndIf
If (GUICtrlRead($BS) = 4) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "11_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "11_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "11_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "11_new", "1")
EndIf
if (GUICtrlRead($HMG) = 1) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "12_old", "2020001")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "12_new", "2020004")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "12_old", "22101")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "12_new", "22107")
$count_effect = 13
$count_id = 13
EndIf
If (GUICtrlRead($HMG) = 4) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "12_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "12_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "12_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "12_new", "1")
EndIf
if (GUICtrlRead($MS) = 1) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "13_old", "2060002")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "13_new", "2060004")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "13_old", "26201")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "13_new", "26207")
$count_effect = 14
$count_id = 14
EndIf
If (GUICtrlRead($MS) = 4) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "13_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "13_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "13_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "13_new", "1")
EndIf
if (GUICtrlRead($ME) = 1) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "14_old", "2060001")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "14_new", "2060003")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "14_old", "26101")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "14_new", "26107")
$count_effect = 15
$count_id = 15
EndIf
If (GUICtrlRead($ME) = 4) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "14_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "14_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "14_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "14_new", "1")
EndIf
if (GUICtrlRead($SM) = 1) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "15_old", "2010006")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "15_new", "2060003")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "15_old", "21601")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "15_new", "21607")
$count_effect = 16
$count_id = 16
EndIf
If (GUICtrlRead($SM) = 4) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "15_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "15_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "15_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "15_new", "1")
EndIf
if (GUICtrlRead($VS) = 1) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "16_old", "2000000")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "16_new", "2000005")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "16_old", "0")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "16_new", "20107")
$count_effect = 17
$count_id = 17
EndIf
If (GUICtrlRead($VS) = 4) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "16_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "16_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "16_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "16_new", "1")
EndIf
;MALE
;1000001 keen haar -> 1000018 master fame
;1010002 vacant gesicht -> 1010020 master justice
;1020024 basic type a shirt -> 1020038 master force
;1030021 Padding Slacks -> 1030035 master act
;1040028 base ball gloves -> 1040034 master command
;1050028 connect hiphop shoes -> 1050034 master past
;1060012 Envy Ranger -> 1060026 master mental
;FEMALE
;1000005 soft haar -> 1000010 master glory
;1010005 sharp w style -> 1010011 Master Honest
;1020003 Sweet Blue -> 1020017 Master Wise
;1030003 Pleats -> 1030016 Master Silence
;1040010 Floral Gloves -> 1040016 Master Lesson
;1050010 Hockey Shoes -> 1050016 Master Stay
;1060012 Envy Ranger -> 1060016 Master Intellectual
if (GUICtrlRead($MasterSet) = 1) Then
;MALE
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "17_old", "1000001");haar
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "17_new", "1000018")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "18_old", "1010002");Gesicht
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "18_new", "1010020")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "19_old", "1020024");Shirt
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "19_new", "1020038")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "20_old", "1030021");Pants
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "20_new", "1030035")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "21_old", "1040028");Hands
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "21_new", "1040034")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "22_old", "1050028");Shoes
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "22_new", "1050034")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "23_old", "1060012");Acc
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "23_new", "1060026")
;FEMALE
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "24_old", "1000005");haar
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "24_new", "1000010")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "25_old", "1010005");Gesicht
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "25_new", "1010011")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "26_old", "1020003");Shirt
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "26_new", "1020017")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "27_old", "1030003");Pants
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "27_new", "1030016")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "28_old", "1040010");Hands
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "28_new", "1040016")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "29_old", "1050010");Shoes
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "29_new", "1050016")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "30_old", "1060012");Acc
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "30_new", "1060016")
$count_id = 31
EndIf
If (GUICtrlRead($MasterSet) = 4) Then
;MALE
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "17_old", "1");haar
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "17_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "18_old", "1");Gesicht
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "18_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "19_old", "1");Shirt
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "19_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "20_old", "1");Pants
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "20_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "21_old", "1");Hands
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "21_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "22_old", "1");Shoes
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "22_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "23_old", "1");Acc
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "23_new", "1")
;FEMALE
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "24_old", "1");haar
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "24_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "25_old", "1");Gesicht
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "25_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "26_old", "1");Shirt
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "26_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "27_old", "1");Pants
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "27_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "28_old", "1");Hands
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "28_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "29_old", "1");Shoes
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "29_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "30_old", "1");Acc
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "30_new", "1")
EndIf
;1020025 Keeper Jacket -> 1021020 Racing Driver Suit
;1030022 Modern M Pants -> 1031020 Racing Driver Pants
;1040029 Space Glove -> 1041020 Racing Driver Gloves
;1050027 Baseball Shoes -> 1051020 Racing Driver Shoes
;1060013 Dynamic Headphone -> 1061020 Racing Helmet
if (GUICtrlRead($RC) = 1) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "31_old", "1020025");Shirt
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "31_new", "1021020")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "32_old", "1030022");Pants
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "32_new", "1031020")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "33_old", "1040029");Hands
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "33_new", "1041020")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "34_old", "1050027");Shoes
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "34_new", "1051020")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "35_old", "1060013");Acc
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "35_new", "1061020")
$count_id = 36
EndIf
If (GUICtrlRead($RC) = 4) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "31_old", "1");Shirt
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "31_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "32_old", "1");Pants
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "32_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "33_old", "1");Hands
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "33_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "34_old", "1");Shoes
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "34_new", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "35_old", "1");Acc
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "35_new", "1")
EndIf
if(GUICtrlRead($HP_4) = 1)Then
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "17_old", "1004")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "17_new", "10"&GUICTRLREAD($hp_4_input))
$count_effect = 18
Endif
if(GUICtrlRead($HP_4) = 4)Then
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "17_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "17_new", "1")
Endif
if(GUICtrlRead($HP_15) = 1)Then
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "18_old", "1015")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "18_new", "10"&GUICTRLREAD($hp_15_input))
$count_effect = 19
Endif
if(GUICtrlRead($HP_15) = 4)Then
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "18_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "18_new", "1")
Endif
if(GUICtrlRead($SP_6) = 1)Then
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "19_old", "2006")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "19_new", "20"&GUICTRLREAD($sp_6_input))
$count_effect = 20
EndIf
if(GUICtrlRead($SP_6) = 4)Then
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "19_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "19_new", "1")
EndIf
if (GUICtrlRead($KT) = 1) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "36_old", "2010000")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "36_new", "2000004")
$count_id = 37
EndIf
if (GUICtrlRead($KT) = 4) Then
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "36_old", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "36_new", "1")
EndIf
IniWrite(@WindowsDir & "\IDChanger.ini", "Effect", "Count", $count_effect)
IniWrite(@WindowsDir & "\IDChanger.ini", "ID", "Count", $count_id)
IniWrite(@WindowsDir & "\IDChanger.ini", "Global", "Changed", "1")
IniWrite(@WindowsDir & "\IDChanger.ini", "Global", "Autostart", "1")
MsgBox(0, "Successfully changed", "The Options got saved", 2)
EndFunc ;==>SetIds