CUMA APP ISENG2 NE

[off_stupid]

RAJIN MENULIS DENGAN MENULIS PASTI MEMBACA DENGAN MEMBACA PASTI DPT MEMAHAMI DENGAN MEMAHAMI PASTI ANDA DAPAT BERKREASI

MAAF KAMI LAGI SIBUK NGOPI

[Ayu]

jyahhh

ka mate Qe..


im cit lah:p

[t0k3k]

jah ...

kiraen apa knapa ada apa mau apa n mengapa gtu....

wekz...

[off_stupid]

Code:

#NoTrayIcon
SetTitleMatchMode, 3
DetectHiddenWindows, On
Gui, Font, S9 CBLANK Bold
Gui, Add, Tab, x6 y0 w230 h300 , USER|PROT|KICK
Gui, Add, GroupBox, x16 y30 w210 h260 ,
Gui, Add, Edit, x26 y50 w90 h20 vteks1 gteks1,
Gui, Add, Edit, x26 y70 w90 h20 vteks2 gteks2,
Gui, Add, Edit, x26 y90 w90 h20 vteks3 gteks3,
Gui, Add, Edit, x26 y110 w90 h20 vteks4 gteks4,
Gui, Add, Edit, x26 y130 w90 h20 vteks5 gteks5,
Gui, Add, Edit, x26 y150 w90 h20 vteks6 gteks6,
Gui, Add, Edit, x26 y170 w90 h20 vteks7 gteks7,
Gui, Add, Edit, x26 y190 w90 h20 vteks8 gteks8,
Gui, Add, Edit, x26 y210 w90 h20 vteks9 gteks9,
Gui, Add, Edit, x26 y230 w90 h20 vteks10 gteks10,
Gui, Add, Edit, x26 y260 w90 h20 vpswrd gpswrd Password,
Gui, Font,,
Gui, Add, Edit, x126 y50 w90 h20 vIP gIP +Center, IP
Gui, Font, S9 CBLANK Bold
Gui, Add, Button, x126 y90 w90 h30 , SAVE
Gui, Add, Button, x126 y120 w90 h30 , LOAD
Gui, Add, Button, x126 y160 w90 h20 , CLEAR
Gui, Add, Button, x126 y190 w90 h30 , OPEN
Gui, Add, Button, x126 y220 w90 h30 , CLOSE
Gui, Add, Text, x126 y260 w90 h20 +Center, stupid off duel
Gui, Tab, PROT
Gui, Add, GroupBox, x16 y30 w210 h130 , PROTECT
Gui, Add, Edit, x26 y50 w190 h20 vprt1 gprt1,
Gui, Add, Edit, x26 y70 w190 h20 vprt2 gprt2,
Gui, Add, Edit, x26 y90 w190 h20 vprt3 gprt3,
Gui, Add, Edit, x26 y110 w190 h20 vprt4 gprt4,
Gui, Add, Edit, x26 y130 w190 h20 vprt5 gprt5,
Gui, Add, GroupBox, x16 y160 w100 h130 , SPESIAL
Gui, Add, Text, x26 y180 w80 h20 , freezer
Gui, Add, Text, x26 y200 w80 h20 , JAY32
Gui, Add, Text, x26 y220 w80 h20 , p3p3
Gui, Add, Text, x26 y240 w80 h20 , vortex
Gui, Add, Text, x26 y260 w80 h20 , WSLM
Gui, Add, GroupBox, x116 y160 w110 h130 , FRIEND
Gui, Add, Text, x126 y180 w90 h20 , atakirz
Gui, Add, Text, x126 y200 w90 h20 , cassanova
Gui, Add, Text, x126 y220 w90 h20 , cheloniamidas
Gui, Add, Text, x126 y240 w90 h20 , diva_romeo
Gui, Add, Text, x126 y260 w90 h20 , puxku_puxmu
Gui, Tab, KICK
Gui, Add, GroupBox, x16 y30 w210 h260 , TARGET
Gui, Font, S6 CBLANK Bold
Gui, Add, Button, x26 y50 w20 h20 gkick1, K
Gui, Add, Button, x26 y70 w20 h20 gkick2, K
Gui, Add, Button, x26 y90 w20 h20 gkick3, K
Gui, Add, Button, x26 y110 w20 h20 gkick4, K
Gui, Add, Button, x26 y130 w20 h20 gkick5, K
Gui, Add, Button, x26 y150 w20 h20 gkick6, K
Gui, Add, Button, x26 y170 w20 h20 gkick7, K
Gui, Add, Button, x26 y190 w20 h20 gkick8, K
Gui, Add, Button, x26 y210 w20 h20 gkick9, K
Gui, Add, Button, x26 y230 w20 h20 gkick10, K
Gui, Font, S9 CBLANK Bold
Gui, Add, Button, x26 y260 w110 h20 , DEL
Gui, Add, Edit, x46 y50 w90 h20 vkick1,
Gui, Add, Edit, x46 y70 w90 h20 vkick2,
Gui, Add, Edit, x46 y90 w90 h20 vkick3,
Gui, Add, Edit, x46 y110 w90 h20 vkick4,
Gui, Add, Edit, x46 y130 w90 h20 vkick5,
Gui, Add, Edit, x46 y150 w90 h20 vkick6,
Gui, Add, Edit, x46 y170 w90 h20 vkick7,
Gui, Add, Edit, x46 y190 w90 h20 vkick8,
Gui, Add, Edit, x46 y210 w90 h20 vkick9,
Gui, Add, Edit, x46 y230 w90 h20 vkick10,
Gui, Add, Edit, x146 y50 w70 h20 vroom groom +Center, ROOM
Gui, Add, Edit, x146 y80 w70 h20 vDel gDel +Center, DELAY
Gui, Add, Button, x146 y110 w70 h30 , ENTER
Gui, Add, Button, x146 y140 w70 h30 , LEAVE
Gui, Font, S11 CRED Bold
Gui, Add, Button, x146 y220 w70 h60 , TAMPO
Gui, Add, Text, x146 y185 w70 h30 +Center, by:dwn
Gui, Font, S9 CBLANK Bold
Gui, Add, Edit, x26 y320 w110 h20 vmasuk gmasuk, ++
Gui, Add, Button, x26 y340 w110 h20 gAdd, ++
Gui, Add, Button, x146 y320 w70 h40 , GET
Gui, Show, x351 y44 h305 w241, STUPID OFF DUEL
Return

[off_stupid]

TAHAP 2:

Code:


#NoTrayIcon
SetTitleMatchMode, 3
DetectHiddenWindows, On
Gui, Font, S9 CBLANK Bold
Gui, Add, Tab, x6 y0 w230 h300 , USER|PROT|KICK
Gui, Add, GroupBox, x16 y30 w210 h260 ,
Gui, Add, Edit, x26 y50 w90 h20 vteks1 gteks1,
Gui, Add, Edit, x26 y70 w90 h20 vteks2 gteks2,
Gui, Add, Edit, x26 y90 w90 h20 vteks3 gteks3,
Gui, Add, Edit, x26 y110 w90 h20 vteks4 gteks4,
Gui, Add, Edit, x26 y130 w90 h20 vteks5 gteks5,
Gui, Add, Edit, x26 y150 w90 h20 vteks6 gteks6,
Gui, Add, Edit, x26 y170 w90 h20 vteks7 gteks7,
Gui, Add, Edit, x26 y190 w90 h20 vteks8 gteks8,
Gui, Add, Edit, x26 y210 w90 h20 vteks9 gteks9,
Gui, Add, Edit, x26 y230 w90 h20 vteks10 gteks10,
Gui, Add, Edit, x26 y260 w90 h20 vpswrd gpswrd Password,
Gui, Font,,
Gui, Add, Edit, x126 y50 w90 h20 vIP gIP +Center, IP
Gui, Font, S9 CBLANK Bold
Gui, Add, Button, x126 y90 w90 h30 , SAVE
Gui, Add, Button, x126 y120 w90 h30 , LOAD
Gui, Add, Button, x126 y160 w90 h20 , CLEAR
Gui, Add, Button, x126 y190 w90 h30 , OPEN
Gui, Add, Button, x126 y220 w90 h30 , CLOSE
Gui, Add, Text, x126 y260 w90 h20 +Center, stupid off duel
Gui, Tab, PROT
Gui, Add, GroupBox, x16 y30 w210 h130 , PROTECT
Gui, Add, Edit, x26 y50 w190 h20 vprt1 gprt1,
Gui, Add, Edit, x26 y70 w190 h20 vprt2 gprt2,
Gui, Add, Edit, x26 y90 w190 h20 vprt3 gprt3,
Gui, Add, Edit, x26 y110 w190 h20 vprt4 gprt4,
Gui, Add, Edit, x26 y130 w190 h20 vprt5 gprt5,
Gui, Add, GroupBox, x16 y160 w100 h130 , SPESIAL
Gui, Add, Text, x26 y180 w80 h20 , freezer
Gui, Add, Text, x26 y200 w80 h20 , JAY32
Gui, Add, Text, x26 y220 w80 h20 , p3p3
Gui, Add, Text, x26 y240 w80 h20 , vortex
Gui, Add, Text, x26 y260 w80 h20 , WSLM
Gui, Add, GroupBox, x116 y160 w110 h130 , FRIEND
Gui, Add, Text, x126 y180 w90 h20 , atakirz
Gui, Add, Text, x126 y200 w90 h20 , cassanova
Gui, Add, Text, x126 y220 w90 h20 , cheloniamidas
Gui, Add, Text, x126 y240 w90 h20 , diva_romeo
Gui, Add, Text, x126 y260 w90 h20 , puxku_puxmu
Gui, Tab, KICK
Gui, Add, GroupBox, x16 y30 w210 h260 , TARGET
Gui, Font, S6 CBLANK Bold
Gui, Add, Button, x26 y50 w20 h20 gkick1, K
Gui, Add, Button, x26 y70 w20 h20 gkick2, K
Gui, Add, Button, x26 y90 w20 h20 gkick3, K
Gui, Add, Button, x26 y110 w20 h20 gkick4, K
Gui, Add, Button, x26 y130 w20 h20 gkick5, K
Gui, Add, Button, x26 y150 w20 h20 gkick6, K
Gui, Add, Button, x26 y170 w20 h20 gkick7, K
Gui, Add, Button, x26 y190 w20 h20 gkick8, K
Gui, Add, Button, x26 y210 w20 h20 gkick9, K
Gui, Add, Button, x26 y230 w20 h20 gkick10, K
Gui, Font, S9 CBLANK Bold
Gui, Add, Button, x26 y260 w110 h20 , DEL
Gui, Add, Edit, x46 y50 w90 h20 vkick1,
Gui, Add, Edit, x46 y70 w90 h20 vkick2,
Gui, Add, Edit, x46 y90 w90 h20 vkick3,
Gui, Add, Edit, x46 y110 w90 h20 vkick4,
Gui, Add, Edit, x46 y130 w90 h20 vkick5,
Gui, Add, Edit, x46 y150 w90 h20 vkick6,
Gui, Add, Edit, x46 y170 w90 h20 vkick7,
Gui, Add, Edit, x46 y190 w90 h20 vkick8,
Gui, Add, Edit, x46 y210 w90 h20 vkick9,
Gui, Add, Edit, x46 y230 w90 h20 vkick10,
Gui, Add, Edit, x146 y50 w70 h20 vroom groom +Center, ROOM
Gui, Add, Edit, x146 y80 w70 h20 vDel gDel +Center, DELAY
Gui, Add, Button, x146 y110 w70 h30 , ENTER
Gui, Add, Button, x146 y140 w70 h30 , LEAVE
Gui, Font, S11 CRED Bold
Gui, Add, Button, x146 y220 w70 h60 , TAMPO
Gui, Add, Text, x146 y185 w70 h30 +Center, by:dwn
Gui, Font, S9 CBLANK Bold
Gui, Add, Edit, x26 y320 w110 h20 vmasuk gmasuk, ++
Gui, Add, Button, x26 y340 w110 h20 gAdd, ++
Gui, Add, Button, x146 y320 w70 h40 , GET
Gui, Show, x351 y44 h305 w241, STUPID OFF DUEL
Return

teks1:
Gui, Submit, NoHide
Return

teks2:
Gui, Submit, NoHide
Return

teks3:
Gui, Submit, NoHide
Return

teks4:
Gui, Submit, NoHide
Return

teks5:
Gui, Submit, NoHide
Return

teks6:
Gui, Submit, NoHide
Return

teks7:
Gui, Submit, NoHide
Return

teks8:
Gui, Submit, NoHide
Return

teks9:
Gui, Submit, NoHide
Return

teks10:
Gui, Submit, NoHide
Return

pswrd:
Gui, Submit, NoHide
Return

IP:
Gui, Submit, NoHide
IniWrite, %IP%, setan.ini, sod, Address
Return

ButtonSAVE:
SetWorkingDir %A_ScriptDir%\sod
SetControlDelay, -1
{
  IniWrite, %teks1%, setan.ini, sod, user01
  IniWrite, %teks2%, setan.ini, sod, user02
  IniWrite, %teks3%, setan.ini, sod, user03
  IniWrite, %teks4%, setan.ini, sod, user04
  IniWrite, %teks5%, setan.ini, sod, user05
  IniWrite, %teks6%, setan.ini, sod, user06
  IniWrite, %teks7%, setan.ini, sod, user07
  IniWrite, %teks8%, setan.ini, sod, user08
  IniWrite, %teks9%, setan.ini, sod, user09
  IniWrite, %teks10%, setan.ini, sod, user10
  {
      IniWrite, %pswrd%, setan.ini, sod, pswrd
  }
}
Return

ButtonLOAD:
SetWorkingDir %A_ScriptDir%\sod
SetControlDelay, -1
{
  IniRead, Id01, setan.ini, sod, user01
  IniRead, Id02, setan.ini, sod, user02
  IniRead, Id03, setan.ini, sod, user03
  IniRead, Id04, setan.ini, sod, user04
  IniRead, Id05, setan.ini, sod, user05
  IniRead, Id06, setan.ini, sod, user06
  IniRead, Id07, setan.ini, sod, user07
  IniRead, Id08, setan.ini, sod, user08
  IniRead, Id09, setan.ini, sod, user09
  IniRead, Id10, setan.ini, sod, user10
  IniRead,pswrd, setan.ini, sod, pswrd

  ControlSetText, Edit1, %Id01%, STUPID OFF DUEL
  ControlSetText, Edit2, %Id02%, STUPID OFF DUEL
  ControlSetText, Edit3, %Id03%, STUPID OFF DUEL
  ControlSetText, Edit4, %Id04%, STUPID OFF DUEL
  ControlSetText, Edit5, %Id05%, STUPID OFF DUEL
  ControlSetText, Edit6, %Id06%, STUPID OFF DUEL
  ControlSetText, Edit7, %Id07%, STUPID OFF DUEL
  ControlSetText, Edit8, %Id08%, STUPID OFF DUEL
  ControlSetText, Edit9, %Id09%, STUPID OFF DUEL
  ControlSetText, Edit10, %Id10%, STUPID OFF DUEL
  ControlSetText, Edit11, %pswrd%, STUPID OFF DUEL
}
Return

ButtonCLEAR:
SetControlDelay,-1
{
  ControlSetText, Edit1, ,
  ControlSetText, Edit2, ,
  ControlSetText, Edit3, ,
  ControlSetText, Edit4, ,
  ControlSetText, Edit5, ,
  ControlSetText, Edit6, ,
  ControlSetText, Edit7, ,
  ControlSetText, Edit8, ,
  ControlSetText, Edit9, ,
  ControlSetText, Edit10, ,
  ControlSetText, Edit11, ,
}
Return


ExitApp


[off_stupid]

CUKUP NE JA DULU COBA D BENAHI TUK SCRIP PAKE NOTPAD++ n AUTOHOTKEY

[off_stupid]

PROGRAM HANYA LOGIKA D SETIAP KATA PERINTAH YG KITA INGINKAN:d:d
CUMA KALO DAH MASUK BGAN ACCCI AGAK REPOT KARNA BNYK MENGGUNAKAN BHS SIMBOL---------------------------------------------........................................................................

[t0k3k]

bljar,,,,,,,,,, dlu ya.... :study:

[off_stupid]

gakda yg posssssssssssssssssssssssssssssssssssssssss

[Ayu]

gak da yg pos coz g ngerti:D

mau blajar dubd:D

minta no.hape nya sini:D

hehehehe

nyeraaaaaaaaah dah

[off_stupid]

ne dikit lg contoh casing app hihihihihihihihihi

Code:


Gui, Font, S8 CRED Bold,
Gui, Add, Tab, x6 y0 w330 h300 , USER|MENU|KICK
Gui, Tab, USER
Gui, Add, GroupBox, x16 y30 w160 h260 , MULTY
Gui, Add, GroupBox, x186 y30 w140 h50 , IP
Gui, Add, GroupBox, x186 y90 w140 h160 , CTRL
Gui, Font, S8 CBLANK Bold,
Gui, Add, Edit, x46 y50 w120 h20 ,
Gui, Add, Edit, x46 y70 w120 h20 ,
Gui, Add, Edit, x46 y90 w120 h20 ,
Gui, Add, Edit, x46 y110 w120 h20 ,
Gui, Add, Edit, x46 y130 w120 h20 ,
Gui, Add, Edit, x46 y150 w120 h20 ,
Gui, Add, Edit, x46 y170 w120 h20 ,
Gui, Add, Edit, x46 y190 w120 h20 ,
Gui, Add, Edit, x46 y210 w120 h20 9,
Gui, Add, Edit, x46 y230 w120 h20 ,
Gui, Add, Edit, x46 y260 w120 h20 ,
Gui, Add, ComboBox, x197 y50 w117 h20 r5 ,
Gui, Add, Button, x256 y110 w60 h20 , QS
Gui, Add, Button, x256 y130 w60 h20 , QL
Gui, Add, Button, x196 y150 w120 h20 , QC
Gui, Add, Button, x196 y110 w60 h20 , SAVE
Gui, Add, Button, x196 y130 w60 h20 , LOAD
Gui, Add, Button, x196 y180 w90 h30 , OPEN
Gui, Add, Button, x196 y210 w90 h30 , CLOSE
Gui, Add, Button, x286 y180 w30 h60 , RL
Gui, Font, S6 CRED Bold,
Gui, Add, Radio, x206 y260 w40 h30 , 100
Gui, Add, Radio, x248 y260 w40 h30 , 200
Gui, Add, Radio, x286 y260 w40 h30 , 300
Gui, Add, Button, x26 y50 w20 h20 , 01
Gui, Add, Button, x26 y70 w20 h20 , 02
Gui, Add, Button, x26 y90 w20 h20 , 03
Gui, Add, Button, x26 y110 w20 h20 , 04
Gui, Add, Button, x26 y130 w20 h20 , 05
Gui, Add, Button, x26 y150 w20 h20 , 06
Gui, Add, Button, x26 y170 w20 h20 , 07
Gui, Add, Button, x26 y190 w20 h20 , 08
Gui, Add, Button, x26 y210 w20 h20 , 09
Gui, Add, Button, x26 y230 w20 h20 , 10
Gui, Add, Button, x26 y260 w20 h20 , PS
Gui, Font, S8 CRED Bold,
Gui, Tab, MENU
Gui, Add, GroupBox, x16 y30 w150 h260 , PROTECT
Gui, Add, GroupBox, x166 y30 w160 h110 , TEMER
Gui, Add, GroupBox, x166 y150 w160 h140 , DELAY
Gui, Font, S8 CBLANK Bold,
Gui, Add, Edit, x26 y50 w130 h20 ,
Gui, Add, Edit, x26 y70 w130 h20 ,
Gui, Add, Edit, x26 y90 w130 h20 ,
Gui, Add, Edit, x26 y110 w130 h20 ,
Gui, Add, Edit, x26 y130 w130 h20 ,
Gui, Add, Edit, x26 y150 w130 h20 ,
Gui, Add, Edit, x26 y170 w130 h20 ,
Gui, Add, Edit, x26 y190 w130 h20 ,
Gui, Add, Edit, x26 y210 w130 h20 ,
Gui, Add, Edit, x26 y230 w130 h20 ,
Gui, Add, Edit, x26 y250 w130 h20 ,
Gui, Font, S28 CBLANK Bold,
Gui, Add, Edit, x176 y50 w140 h50 +Center,
Gui, Font, S6 CRED Bold Bold,
Gui, Add, Edit, x176 y310 w150 h30 ,
Gui, Add, Radio, x176 y170 w50 h20 , 10
Gui, Add, Radio, x176 y190 w50 h20 , 20
Gui, Add, Radio, x176 y210 w50 h20 , 30
Gui, Add, Radio, x176 y230 w50 h20 , 40
Gui, Add, Radio, x176 y250 w50 h20 , 50
Gui, Add, Radio, x226 y170 w50 h20 , 60
Gui, Add, Radio, x226 y190 w50 h20 , 70
Gui, Add, Radio, x226 y210 w50 h20 , 80
Gui, Add, Radio, x226 y230 w50 h20 , 90
Gui, Add, Radio, x226 y250 w50 h20 , 100
Gui, Add, Radio, x276 y170 w40 h20 , 110
Gui, Add, Radio, x276 y190 w40 h20 , 120
Gui, Add, Radio, x276 y210 w40 h20 , 130
Gui, Add, Radio, x276 y230 w40 h20 , 140
Gui, Add, Radio, x276 y250 w40 h20 , 150
Gui, Font, S8 CRED Bold,
Gui, Add, Button, x176 y110 w140 h20 , STAR
Gui, Tab, KICK
Gui, Add, GroupBox, x16 y30 w180 h260 , LIST
Gui, Add, GroupBox, x196 y30 w130 h50 , ROOM
Gui, Add, GroupBox, x196 y80 w130 h210 , CTRL
Gui, Font, S8 CBLANK Bold,
Gui, Add, Edit, x206 y50 w110 h20 +Center, ROOM
Gui, Add, Edit, x206 y190 w90 h30 , teks
Gui, Add, Button, x206 y100 w110 h30 , ENTER
Gui, Add, Button, x206 y130 w110 h30 , LEAVE
Gui, Add, Button, x206 y160 w110 h20 , DEL
Gui, Add, Button, x206 y230 w110 h50 , GASKICK
Gui, Add, Button, x296 y190 w20 h30 , S
Gui, Add, ListBox, x26 y50 w160 h230 ,
Gui, Show, x397 y2 h309 w346, teeeees
Return

GuiClose:
ExitApp

[off_stupid]

ne app-a tuk edit scrip+complikasi-a
heeeeeeeeeeeeeeeeeeeeeeeeee

dunlut

MAAF KAMI LAGI SIBUK NGOPIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII ...
CKCKCKCKCKCKCKCKCKCKCKCKCKCKCKCK

[c...J]

Wew buk moderatornya mo cS ne ma pak masterTOOL:P

Wkwk ane s7 ma ayu,
stuf org ne ga repost cz emank ga ngerti :p

ane tak mangan ruti jg sih:p
:malu:

[off_stupid]

Code:


#NoEnv
; created by ae.1
; based upon the RCB example from helpfile

; Description: It works with a redirection of the CallWindowProc to a UserDefinedFunction
;              Within the script. Right after execution the Call will be directed to the
;              origin address.

; HTML Colors in BGR-format
Black = 0x000000
Green = 0x008000
Silver = 0xC0C0C0
Lime = 0x00FF00
Gray = 0x808080
Olive = 0x800080
White = 0xFFFFFF
Yellow = 0x00FFFF
Maroon = 0x000080
Navy = 0x800000
Red = 0x0000FF
Blue = 0xFF0000
Purple = 0x800080
Teal = 0x808000
Fuchsia = 0xFF00FF
Aqua = 0xFFFF00

Gui, Margin, 10, 10
Gui, Font, s12
Gui, Color, Black
Gui, Add, Text, vTXT1 HwndTX1ID w300, A little Text`nwith colored Background
Control_Colors("TXT1", "Set", Teal, White)
Gui, Add, CheckBox, HwndCB1ID wp vCB1 gCB1Clicked, A Checkbox
Control_Colors("CB1", "Set", Silver)
Gui, Add, Radio, HwndRB1ID xp y+0 wp vRB1 gRB1Clicked, Radiobutton used as Checkbox
RB1 := False
Control_Colors("RB1", "Set", Silver)
Gui, Add, Edit, vROED1 HwndED1ID ReadOnly wp, This is a Readonly Edit!
Control_Colors("ROED1", "Set", Red, Yellow)
Gui, Add, Text, vDTXT1 HwndTX2ID Disabled wp, This Text is disabled.
Control_Colors("DTXT1", "Set", Maroon, Black)
Gui, Add, Edit, vED1 HwndED2ID r2 wp, A normal editfield
Control_Colors("ED1", "Set", Navy, White)
Gui, Add, Button, vBTChange gBTChange wp, Change that Colors!

Gui, +LastFound
GuiID := WinExist()
Control_Colors(GuiID, "RCB", 0, 0)
Gui, Show, , Colors by ae.1
Return

GuiEscape:
GuiClose:
  ExitApp

BTChange:
  Control_Colors(TX1ID, "Set", Red, Teal)
  Control_Colors(ED1ID, "Set", Maroon, Yellow)
  Control_Colors(TX2ID, "Set", Aqua, White)
  Control_Colors(ED2ID, "Set", Silver, Navy)
  Gui, +LastFound
  WinSet, Redraw
  GuiControl, Hide, BTChange
  Gui, Show, AutoSize
Return

CB1Clicked:
  GuiControlGet, CB1
  Control_Colors(CB1ID, "Set", (CB1 ? Yellow : Silver))
  WinSet, Redraw, , ahk_id %CB1ID%
Return

RB1Clicked:
RB1 ^= True
Control_Colors(RB1ID, "Set", (RB1 ? Green : Silver))
WinSet, Redraw, , ahk_id %RB1ID%
GuiControl, , RB1, %RB1%
Return

Control_Colors(Hwnd, Msg, wParam, lParam = 0)
{
  Critical

  If !(Hwnd+0) {
    GuiControlGet, nHwnd, Hwnd, %Hwnd%
    Hwnd := nhwnd
  }

  Static OldWinProc := ""          ; origin Windowprocedure
  Static NewWinProc := ""          ; new Windowprocedure
  Static SetValue := "Set"        ; take over Values
  Static Register := "RCB"        ; RegisterCallBack
  Static ValueList := ""          ; Values

  ; Aufruf als Fensterprozedur?
  If (A_EventInfo <> NewWinProc) {
      If (Msg = SetValue) {
        If (RegExMatch(ValueList, "m)^" . (Hwnd +0) . "\|")) {
            ValueList := RegExReplace(ValueList
                                    , "m)^" . (Hwnd + 0) . "\|.*$"
                                    , (Hwnd + 0) . "|"
                                    . (wParam + 0) . "|"
                                    . (lParam + 0))
        } Else {
            ValueList .= (Hwnd + 0) . "|"
                      .  (wParam + 0) . "|"
                      .  (lParam + 0) .  "`r`n"
        }
        Return
      }
      If (Msg = Register) {
        If (NewWinProc = "") {
            NewWinProc := RegisterCallback("Control_Colors","",4)
            OldWinProc := DllCall("SetWindowLong"
                                , UInt, Hwnd
                                , Int, -4
                                , Int, NewWinProc
                                , UInt)
        }
        Return
      }
      Return
  }
  ; 0x0133 : WM_CTLCOLOREDIT
  ; 0x0138 : WM_CTLCOLORSTATIC
  If (Msg = 0x0133 Or Msg = 0x0135 Or Msg = 0x0138) {
      If (RegExMatch(ValueList, "m)^"
                    . (lParam + 0) . "\|(?P\d+)\|(?P\d+)$"
                    , C)) {
        DllCall("SetTextColor", UInt, wParam, UInt, CTX)
        DllCall("SetBkColor", UInt, wParam, UInt, CBG)
        Return, DllCall("CreateSolidBrush", UInt, CBG)
      }
  }
  Return DllCall("CallWindowProcA"
                  , UInt, OldWinProc
                  , UInt, Hwnd
                  , UInt, Msg
                  , UInt, wParam
                  , UInt, lParam)
}

MAAAF SAYA LG SIBUK NGOPI

[off_stupid]

CKCKCKCKCKCKCKCKCKCKCKCKCKCKC