CUMA APP ISENG2 NE
+4
c...J
t0k3k
Ayu
off_stupid
8 posters
Halaman 1 dari 2
Halaman 1 dari 2 • 1, 2
CUMA APP ISENG2 NE
RAJIN MENULIS DENGAN MENULIS PASTI MEMBACA DENGAN MEMBACA PASTI DPT MEMAHAMI DENGAN MEMAHAMI PASTI ANDA DAPAT BERKREASI
MAAF KAMI LAGI SIBUK NGOPI
MAAF KAMI LAGI SIBUK NGOPI
Terakhir diubah oleh off_stupid tanggal Fri Dec 19, 2008 6:25 am, total 2 kali diubah
off_stupid- TheLovers
-
Jumlah posting : 97
Age : 37
Nick mig33 : off_stupid
Registration date : 08.12.08
Re: CUMA APP ISENG2 NE
jyahhh
ka mate Qe..
im cit lah:p
ka mate Qe..
im cit lah:p
Ayu- MyTeam
-
Jumlah posting : 177
Age : 35
Lokasi : UnNamed world
Job/hobbies : Ke pantai,baca,n0ntn dvd,maen GUitarhero ps2.,chat,ng0mp0rin org brantem di mig
Humor : Hag,hum0r adalah gw
Nick mig33 : yuuuu
Registration date : 01.09.08
Re: CUMA APP ISENG2 NE
jah ...
kiraen apa knapa ada apa mau apa n mengapa gtu....
wekz...
kiraen apa knapa ada apa mau apa n mengapa gtu....
wekz...
t0k3k- Member
-
Jumlah posting : 28
Nick mig33 : mido1
Registration date : 10.09.08
Re: CUMA APP ISENG2 NE
- 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
Terakhir diubah oleh off_stupid tanggal Thu Dec 18, 2008 4:53 pm, total 2 kali diubah
off_stupid- TheLovers
-
Jumlah posting : 97
Age : 37
Nick mig33 : off_stupid
Registration date : 08.12.08
Re: CUMA APP ISENG2 NE
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- TheLovers
-
Jumlah posting : 97
Age : 37
Nick mig33 : off_stupid
Registration date : 08.12.08
Re: CUMA APP ISENG2 NE
CUKUP NE JA DULU COBA D BENAHI TUK SCRIP PAKE NOTPAD++ n AUTOHOTKEY
off_stupid- TheLovers
-
Jumlah posting : 97
Age : 37
Nick mig33 : off_stupid
Registration date : 08.12.08
Re: CUMA APP ISENG2 NE
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---------------------------------------------........................................................................
CUMA KALO DAH MASUK BGAN ACCCI AGAK REPOT KARNA BNYK MENGGUNAKAN BHS SIMBOL---------------------------------------------........................................................................
off_stupid- TheLovers
-
Jumlah posting : 97
Age : 37
Nick mig33 : off_stupid
Registration date : 08.12.08
Re: CUMA APP ISENG2 NE
bljar,,,,,,,,,, dlu ya.... :study:
t0k3k- Member
-
Jumlah posting : 28
Nick mig33 : mido1
Registration date : 10.09.08
Re: CUMA APP ISENG2 NE
gakda yg posssssssssssssssssssssssssssssssssssssssss
off_stupid- TheLovers
-
Jumlah posting : 97
Age : 37
Nick mig33 : off_stupid
Registration date : 08.12.08
Re: CUMA APP ISENG2 NE
gak da yg pos coz g ngerti:D
mau blajar dubd:D
minta no.hape nya sini:D
hehehehe
nyeraaaaaaaaah dah
mau blajar dubd:D
minta no.hape nya sini:D
hehehehe
nyeraaaaaaaaah dah
Ayu- MyTeam
-
Jumlah posting : 177
Age : 35
Lokasi : UnNamed world
Job/hobbies : Ke pantai,baca,n0ntn dvd,maen GUitarhero ps2.,chat,ng0mp0rin org brantem di mig
Humor : Hag,hum0r adalah gw
Nick mig33 : yuuuu
Registration date : 01.09.08
Re: CUMA APP ISENG2 NE
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- TheLovers
-
Jumlah posting : 97
Age : 37
Nick mig33 : off_stupid
Registration date : 08.12.08
CLIK D SINE
ne app-a tuk edit scrip+complikasi-a
heeeeeeeeeeeeeeeeeeeeeeeeee
dunlut
MAAF KAMI LAGI SIBUK NGOPIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII ...
CKCKCKCKCKCKCKCKCKCKCKCKCKCKCKCK
heeeeeeeeeeeeeeeeeeeeeeeeee
dunlut
MAAF KAMI LAGI SIBUK NGOPIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII ...
CKCKCKCKCKCKCKCKCKCKCKCKCKCKCKCK
off_stupid- TheLovers
-
Jumlah posting : 97
Age : 37
Nick mig33 : off_stupid
Registration date : 08.12.08
Re: CUMA APP ISENG2 NE
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:
Wkwk ane s7 ma ayu,
stuf org ne ga repost cz emank ga ngerti :p
ane tak mangan ruti jg sih:p
:malu:
Re: CUMA APP ISENG2 NE
- 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- TheLovers
-
Jumlah posting : 97
Age : 37
Nick mig33 : off_stupid
Registration date : 08.12.08
Re: CUMA APP ISENG2 NE
CKCKCKCKCKCKCKCKCKCKCKCKCKCKC
off_stupid- TheLovers
-
Jumlah posting : 97
Age : 37
Nick mig33 : off_stupid
Registration date : 08.12.08
Re: CUMA APP ISENG2 NE
;bagusnya u buka script ini pake Notepad++,pilih language AutoIt (karena masih serumpun) ato pake scite yang emang khusus wat AutoIt...
;cuma sekedar tambahan belajar...
;w juga bkan jago ahk,sama2 belajar lah...
;dibawah ini ada beberapa code yang sering keluar..
;daripada jelasin terus2an,mending w kasi maksudnya sekarang...
;SetWorkingDir %A_ScriptDir% : tu mangsudnya wat ngeset tempat script bekerja,kalo disini brati ditempat script itu disimpan...
;kalo u pake subfolder,tambahin aja di belakangnya "\nama folder"
;SetWinDelay, -1 : set jeda per window.. angka di belakang koma berati nilainya..disini -1 brati nyaris ga ada jeda...
;SetControlDelay : set jeda per control.. angka di belakang koma berati nilainya..disini -1 brati nyaris ga ada jeda...
;button migpro
;masalah konfigurasi tombol perlu hati2.. u harus tau di migpro yg u pake mana tombol1,mana tomol2,dst.. n fungsi2 tmbl tu wat apa...
;kalo mau liat tu tombol apa... coba pake Windows Spy..
;msgbox
;nilai 0 dibelakang koma setelah msgbox (msgbox,0,x,x,x) tu wat nampilin msgbox u tu jnis apa...
;beberapa nilai msgbox yang sering w pake...
;0 : ini msgbox standar dengan satu button OK di bawahnya...
;1 : msgbox nampilin 2 tombol,yaitu tombol OK dan Cancel
;2 : msgbox nampilin 3 tombol,yaitu tombol Abort,Retry dan Ignore
;3 : msgbox nampilin 3 tombol,yaitu tombol Yes,No dan Cancel..
;4 : msgbox nampilin 2 tombol, Yes or No doank...
;16 : ini msgbox wat nampilin error/stop ,ntar msgbox jadi ada gambar silang merah.. +tombol OK
;64 : ini wat nampilin information,ntar msgbox ada gambar I nya...bonus tombol OK juga...
;sebenere masih banyak,cuma jarang make ajah :he:
;di script ini,ada 2 tombol yg punya fungsi nyaris sama,kaya tmbl open1 ma open2,send1 ma send2,dll....so keterangan yang dikasi cukup satu kali ajah =p
;pada intinya,programming cuma maen logika aja. jika ini maka ini.. kalo gini ntar gini.. dll
;so,sering2 berkhayal aja,trus ntar hasil imajinasi u,catet di kertas,tulis script nya.. gampang kan?
ckckckckckckckkckckckckck
;cuma sekedar tambahan belajar...
;w juga bkan jago ahk,sama2 belajar lah...
;dibawah ini ada beberapa code yang sering keluar..
;daripada jelasin terus2an,mending w kasi maksudnya sekarang...
;SetWorkingDir %A_ScriptDir% : tu mangsudnya wat ngeset tempat script bekerja,kalo disini brati ditempat script itu disimpan...
;kalo u pake subfolder,tambahin aja di belakangnya "\nama folder"
;SetWinDelay, -1 : set jeda per window.. angka di belakang koma berati nilainya..disini -1 brati nyaris ga ada jeda...
;SetControlDelay : set jeda per control.. angka di belakang koma berati nilainya..disini -1 brati nyaris ga ada jeda...
;button migpro
;masalah konfigurasi tombol perlu hati2.. u harus tau di migpro yg u pake mana tombol1,mana tomol2,dst.. n fungsi2 tmbl tu wat apa...
;kalo mau liat tu tombol apa... coba pake Windows Spy..
;msgbox
;nilai 0 dibelakang koma setelah msgbox (msgbox,0,x,x,x) tu wat nampilin msgbox u tu jnis apa...
;beberapa nilai msgbox yang sering w pake...
;0 : ini msgbox standar dengan satu button OK di bawahnya...
;1 : msgbox nampilin 2 tombol,yaitu tombol OK dan Cancel
;2 : msgbox nampilin 3 tombol,yaitu tombol Abort,Retry dan Ignore
;3 : msgbox nampilin 3 tombol,yaitu tombol Yes,No dan Cancel..
;4 : msgbox nampilin 2 tombol, Yes or No doank...
;16 : ini msgbox wat nampilin error/stop ,ntar msgbox jadi ada gambar silang merah.. +tombol OK
;64 : ini wat nampilin information,ntar msgbox ada gambar I nya...bonus tombol OK juga...
;sebenere masih banyak,cuma jarang make ajah :he:
;di script ini,ada 2 tombol yg punya fungsi nyaris sama,kaya tmbl open1 ma open2,send1 ma send2,dll....so keterangan yang dikasi cukup satu kali ajah =p
;pada intinya,programming cuma maen logika aja. jika ini maka ini.. kalo gini ntar gini.. dll
;so,sering2 berkhayal aja,trus ntar hasil imajinasi u,catet di kertas,tulis script nya.. gampang kan?
ckckckckckckckkckckckckck
off_stupid- TheLovers
-
Jumlah posting : 97
Age : 37
Nick mig33 : off_stupid
Registration date : 08.12.08
Re: CUMA APP ISENG2 NE
WADUH SALH TEKAN ILANG MUA TU SCRIP-A
off_stupid- TheLovers
-
Jumlah posting : 97
Age : 37
Nick mig33 : off_stupid
Registration date : 08.12.08
Re: CUMA APP ISENG2 NE
- 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<BG>\d+)\|(?P<TX>\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)
}
off_stupid- TheLovers
-
Jumlah posting : 97
Age : 37
Nick mig33 : off_stupid
Registration date : 08.12.08
Re: CUMA APP ISENG2 NE
besok pos lg teunegt
ckckckckckckckck
ckckckckckckckck
off_stupid- TheLovers
-
Jumlah posting : 97
Age : 37
Nick mig33 : off_stupid
Registration date : 08.12.08
Re: CUMA APP ISENG2 NE
STOPWAY ckckckckckckckckckc
- Code:
#NoTrayIcon
SetTitleMatchMode, 3
DetectHiddenWindows, On
Gui, Color, BLUE
Gui, Font, S10 CBLANK Bold,
Gui, Add, GroupBox, x6 y0 w210 h170 ,
Gui, Font, S40 CBLANK Bold,
Gui, Add, Edit, x16 y30 w190 h85 +Center,
Gui, Font, S10 CBLANK Bold,
Gui, Add, Button, x16 y120 w190 h40 , STAR
Gui, Add, Edit, x6 y180 w210 h30 vdwn gdwn,
Gui, Add, Button, x6 y210 w210 h30 , Plus
Gui, Show, x789 y11 h180 w223, STOPWAY
Return
dwn:
Gui, Submit, NoHide
Return
ButtonPlus:
i += 1
SetControlDelay, %dwn%
{
ControlSetText, Edit1, %i%, STOPWAY
}
Return
ButtonSTAR:
i = 1
Loop, 60000
{
SetControlDelay, %dwn%
{
ControlClick, Button3, STOPWAY
}
}
Return
GuiClose:
ExitApp
off_stupid- TheLovers
-
Jumlah posting : 97
Age : 37
Nick mig33 : off_stupid
Registration date : 08.12.08
Re: CUMA APP ISENG2 NE
eh stupid..
notepad++ emang beda ma notepad yg bwaan wndowsnya??
autohotkey tu yg dirimu suruh donlod kan??
tutorial kok seribed ini yak...
truzz....
tu code untuk buat aplikasi apa??
kalo dah dimasukin notepad, disimpennya format apa??
.txt
.css
.danlainnya
kekekek
mau coba nih..
truz autohotekey buat apa??
notepad++ emang beda ma notepad yg bwaan wndowsnya??
autohotkey tu yg dirimu suruh donlod kan??
tutorial kok seribed ini yak...
truzz....
tu code untuk buat aplikasi apa??
kalo dah dimasukin notepad, disimpennya format apa??
.txt
.css
.danlainnya
kekekek
mau coba nih..
truz autohotekey buat apa??
Ayu- MyTeam
-
Jumlah posting : 177
Age : 35
Lokasi : UnNamed world
Job/hobbies : Ke pantai,baca,n0ntn dvd,maen GUitarhero ps2.,chat,ng0mp0rin org brantem di mig
Humor : Hag,hum0r adalah gw
Nick mig33 : yuuuu
Registration date : 01.09.08
Re: CUMA APP ISENG2 NE
bu ayu coba pelajari saucode ne ja
FMPC:
FMPC:
- Code:
#NoTrayIcon
SetTitleMatchMode, 3
DetectHiddenWindows, On
IPs =100
Gui, Add, Tab, x0 y0 w200 h470 , DATA|Action
gui, tab, DATA ;Isi Tab DATA
Gui, Add, GroupBox, x526 y-53 w-90 h150 ,
Gui, Add, GroupBox, x6 y17 w180 h340 ,
Gui, Add, Edit, x36 y97 w140 h20 vteks01 gteks01,
Gui, Add, Edit, x36 y117 w140 h20 vteks02 gteks02 ,
Gui, Add, Edit, x36 y137 w140 h20 vteks03 gteks03 ,
Gui, Add, Edit, x36 y157 w140 h20 vteks04 gteks04 ,
Gui, Add, Edit, x36 y177 w140 h20 vteks05 gteks05 ,
Gui, Add, Edit, x36 y197 w140 h20 vteks06 gteks06 ,
Gui, Add, Edit, x36 y217 w140 h20 vteks07 gteks07 ,
Gui, Add, Edit, x36 y237 w140 h20 vteks08 gteks08 ,
Gui, Add, Edit, x36 y257 w140 h20 vteks09 gteks09 ,
Gui, Add, Edit, x36 y277 w140 h20 vteks10 gteks10 ,
Gui, Add, Edit, x36 y297 w140 h20 vPw gPw +Password,
Gui, Add, Button, x16 y37 w40 h30 , Load
Gui, Add, Button, x56 y37 w40 h30 , Save
Gui, Add, Button, x96 y37 w40 h30 , Clear
Gui, Add, Button, x136 y37 w40 h30 , About
Gui, Add, Button, x16 y67 w40 h30 , QLd
Gui, Add, Button, x56 y67 w40 h30 , QSv
Gui, Add, Button, x96 y67 w40 h30 , Open
Gui, Add, Button, x136 y67 w40 h30 , Close
Gui, Add, Text, x16 y97 w20 h20 +Center, 01
Gui, Add, Text, x16 y117 w20 h20 +Center, 02
Gui, Add, Text, x16 y137 w20 h20 +Center, 03
Gui, Add, Text, x16 y157 w20 h20 +Center, 04
Gui, Add, Text, x16 y177 w20 h20 +Center, 05
Gui, Add, Text, x16 y197 w20 h20 +Center, 06
Gui, Add, Text, x16 y217 w20 h20 +Center, 07
Gui, Add, Text, x16 y237 w20 h20 +Center, 08
Gui, Add, Text, x16 y257 w20 h20 +Center, 09
Gui, Add, Text, x16 y277 w20 h20 +Center, 10
Gui, Add, Text, x16 y297 w20 h20 , Pw
Gui, Add, ComboBox, x36 y327 w140 h10 r5 vIP gIP,
Gui, Add, Text, x16 y327 w20 h20 +Center, IP
Gui, Add, GroupBox, x6 y357 w180 h100 ,
Gui, Add, Text, x16 y377 w160 h70 +Center,
Gui, Tab, Action
Gui, Add, GroupBox, x6 y17 w180 h440 ,
Gui, Add, Button, x16 y37 w40 h30 , enter
Gui, Add, Button, x56 y37 w40 h30 , Leave
Gui, Add, Button, x96 y37 w40 h30 , LClear
Gui, Add, Edit, x16 y67 w160 h40 vSends gSends,
Gui, Add, Button, x136 y37 w40 h30 , Send
Gui, Add, Edit, x16 y127 w160 h21 vChat gChat, ChatRoom Name
Gui, Add, ListBox, x16 y177 w160 h266 vTarget gTarget,
Gui, Add, Text, x16 y157 w160 h20 +Center, Target list
Gui, Add, Edit, x220 y6 w140 h20 vCur gCur,
Gui, Add, Button, x220 y27 w140 h30, Add
Gui, Add, Text, x220 y58 w140 h140 +Center,
Loop, 10
{
IPs += 1
GuiControl,, ComboBox1, 66.151.149.%IPs%|
}
IfExist, %A_Scriptdir%\MPC\Retriever.exe
{
Run, %A_Scriptdir%\MPC\Retriever.exe
WinWait, Retriever,, 1
WinHide, Retriever
}
Gui, Show,w380 h460, FMPC SAMPLE
Return
teks01:
Gui, Submit, NoHide
Return
teks02:
Gui, Submit, NoHide
Return
teks03:
Gui, Submit, NoHide
Return
teks04:
Gui, Submit, NoHide
Return
teks05:
Gui, Submit, NoHide
Return
teks06:
Gui, Submit, NoHide
Return
teks07:
Gui, Submit, NoHide
Return
teks08:
Gui, Submit, NoHide
Return
teks09:
Gui, Submit, NoHide
Return
teks10:
Gui, Submit, NoHide
Return
Pw:
Gui, Submit, NoHide
Return
IP:
Gui, Submit, NoHide
IniWrite, %IP%, setup.ini, FMPC, address
Return
Chat:
Gui, Submit, NoHide
IniWrite, %Chat%, setup.ini, FMPC, chatroom
Return
Target:
Gui, Submit, NoHide
IniWrite, %Target%, setup.ini, FMPC, kickuname
SetControlDelay, -1
{
IfWinExist, FMPC01-1
ControlClick, Button2, FMPC01-1
IfWinExist, FMPC02-1
ControlClick, Button2, FMPC02-1
IfWinExist, FMPC03-1
ControlClick, Button2, FMPC03-1
IfWinExist, FMPC04-1
ControlClick, Button2, FMPC04-1
IfWinExist, FMPC05-1
ControlClick, Button2, FMPC05-1
IfWinExist, FMPC06-1
ControlClick, Button2, FMPC06-1
IfWinExist, FMPC07-1
ControlClick, Button2, FMPC07-1
IfWinExist, FMPC08-1
ControlClick, Button2, FMPC08-1
IfWinExist, FMPC09-1
ControlClick, Button2, FMPC09-1
IfWinExist, FMPC10-1
ControlClick, Button2, FMPC10-1
}
Return
Sends:
Gui, Submit, NoHide
Return
Cur:
Gui, Submit, NoHide
Return
ButtonSend:
ControlGetText, sends, Edit13, FMPC SAMPLE
SetControlDelay, -1
{
IfNotEqual, sends,
{
IfWinExist, FMPC01-1
{
ControlSetText, Edit1, %sends%, FMPC01-1
ControlClick, Button3, FMPC01-1
}
IfWinExist, FMPC02-1
{
ControlSetText, Edit1, %sends%, FMPC02-1
ControlClick, Button3, FMPC02-1
}
IfWinExist, FMPC03-1
{
ControlSetText, Edit1, %sends%, FMPC03-1
ControlClick, Button3, FMPC03-1
}
IfWinExist, FMPC04-1
{
ControlSetText, Edit1, %sends%, FMPC04-1
ControlClick, Button3, FMPC04-1
}
IfWinExist, FMPC05-1
{
ControlSetText, Edit1, %sends%, FMPC05-1
ControlClick, Button3, FMPC05-1
}
IfWinExist, FMPC06-1
{
ControlSetText, Edit1, %sends%, FMPC06-1
ControlClick, Button3, FMPC06-1
}
IfWinExist, FMPC07-1
{
ControlSetText, Edit1, %sends%, FMPC07-1
ControlClick, Button3, FMPC07-1
}
IfWinExist, FMPC08-1
{
ControlSetText, Edit1, %sends%, FMPC08-1
ControlClick, Button3, FMPC08-1
}
IfWinExist, FMPC09-1
{
ControlSetText, Edit1, %sends%, FMPC09-1
ControlClick, Button3, FMPC09-1
}
IfWinExist, FMPC10-1
{
ControlSetText, Edit1, %sends%, FMPC10-1
ControlClick, Button3, FMPC10-1
}
ControlSetText, Edit13,, FMPC SAMPLE
ControlFocus , Edit13, FMPC SAMPLE
}
}
Return
ButtonLoad:
FileSelectFile, FileName, , %A_ScriptDir%, Load Trooper, *.frz ;muculkan kotak dialog Open/Save dam masukan nama File yang dipilih kedalam variable "FileName"
IfNotEqual, FileName,
{
SetControlDelay, -1
{
IniRead, Id01, %FileName%, FMPC, user1
IniRead, Id02, %FileName%, FMPC, user2
IniRead, Id03, %FileName%, FMPC, user3
IniRead, Id04, %FileName%, FMPC, user4
IniRead, Id05, %FileName%, FMPC, user5
IniRead, Id06, %FileName%, FMPC, user6
IniRead, Id07, %FileName%, FMPC, user7
IniRead, Id08, %FileName%, FMPC, user8
IniRead, Id09, %FileName%, FMPC, user9
IniRead, Id10, %FileName%, FMPC, user10
IniRead, Pass, %FileName%, FMPC, pass1
ControlSetText, Edit1, %Id01%, FMPC SAMPLE
ControlSetText, Edit2, %Id02%, FMPC SAMPLE
ControlSetText, Edit3, %Id03%, FMPC SAMPLE
ControlSetText, Edit4, %Id04%, FMPC SAMPLE
ControlSetText, Edit5, %Id05%, FMPC SAMPLE
ControlSetText, Edit6, %Id06%, FMPC SAMPLE
ControlSetText, Edit7, %Id07%, FMPC SAMPLE
ControlSetText, Edit8, %Id08%, FMPC SAMPLE
ControlSetText, Edit9, %Id09%, FMPC SAMPLE
ControlSetText, Edit10, %Id10%, FMPC SAMPLE
ControlSetText, Edit11, %Pass%, FMPC SAMPLE
IniWrite, %Id01%, setup.ini, FMPC, user1
IniWrite, %Id02%, setup.ini, FMPC, user2
IniWrite, %Id03%, setup.ini, FMPC, user3
IniWrite, %Id04%, setup.ini, FMPC, user4
IniWrite, %Id05%, setup.ini, FMPC, user5
IniWrite, %Id06%, setup.ini, FMPC, user6
IniWrite, %Id07%, setup.ini, FMPC, user7
IniWrite, %Id08%, setup.ini, FMPC, user8
IniWrite, %Id09%, setup.ini, FMPC, user9
IniWrite, %Id10%, setup.ini, FMPC, user10
Loop, 10
{
IniWrite, %Pass%, setup.ini, FMPC, pass%A_Index%
}
}
}
Return
ButtonSave:
FileSelectFile, FileName, S24, %A_ScriptDir%, Save Trooper, *frz
IfInString, FileName, .frz
{
StringReplace, Filename, Filename, .frz,
}
IfNotEqual, FileName,
{
SetControlDelay, -1
{
IniWrite, %teks01%, %FileName%.frz, FMPC, user1
IniWrite, %teks02%, %FileName%.frz, FMPC, user2
IniWrite, %teks03%, %FileName%.frz, FMPC, user3
IniWrite, %teks04%, %FileName%.frz, FMPC, user4
IniWrite, %teks05%, %FileName%.frz, FMPC, user5
IniWrite, %teks06%, %FileName%.frz, FMPC, user6
IniWrite, %teks07%, %FileName%.frz, FMPC, user7
IniWrite, %teks08%, %FileName%.frz, FMPC, user8
IniWrite, %teks09%, %FileName%.frz, FMPC, user9
IniWrite, %teks10%, %FileName%.frz, FMPC, user10
IniWrite, %Pw%, %FileName%.frz, FMPC, pass1
IniWrite, %teks01%, setup.ini, FMPC, user1
IniWrite, %teks02%, setup.ini, FMPC, user2
IniWrite, %teks03%, setup.ini, FMPC, user3
IniWrite, %teks04%, setup.ini, FMPC, user4
IniWrite, %teks05%, setup.ini, FMPC, user5
IniWrite, %teks06%, setup.ini, FMPC, user6
IniWrite, %teks07%, setup.ini, FMPC, user7
IniWrite, %teks08%, setup.ini, FMPC, user8
IniWrite, %teks09%, setup.ini, FMPC, user9
IniWrite, %teks10%, setup.ini, FMPC, user10
Loop, 10
{
IniWrite, %Pw%, setup.ini, FMPC, pass%A_Index%
}
}
}
Return
ButtonClear:
SetControlDelay, -1
{
ControlSetText, Edit1,, FMPC SAMPLE
ControlSetText, Edit2,, FMPC SAMPLE
ControlSetText, Edit3,, FMPC SAMPLE
ControlSetText, Edit4,, FMPC SAMPLE
ControlSetText, Edit5,, FMPC SAMPLE
ControlSetText, Edit6,, FMPC SAMPLE
ControlSetText, Edit7,, FMPC SAMPLE
ControlSetText, Edit8,, FMPC SAMPLE
ControlSetText, Edit9,, FMPC SAMPLE
ControlSetText, Edit10,, FMPC SAMPLE
ControlSetText, Edit11,, FMPC SAMPLE
}
Return
ButtonQLd:
SetControlDelay, -1
{
IniRead, Id01, setup.ini, FMPC, user1
IniRead, Id02, setup.ini, FMPC, user2
IniRead, Id03, setup.ini, FMPC, user3
IniRead, Id04, setup.ini, FMPC, user4
IniRead, Id05, setup.ini, FMPC, user5
IniRead, Id06, setup.ini, FMPC, user6
IniRead, Id07, setup.ini, FMPC, user7
IniRead, Id08, setup.ini, FMPC, user8
IniRead, Id09, setup.ini, FMPC, user9
IniRead, Id10, setup.ini, FMPC, user10
IniRead, Pass, setup.ini, FMPC, pass1
ControlSetText, Edit1, %Id01%, FMPC SAMPLE
ControlSetText, Edit2, %Id02%, FMPC SAMPLE
ControlSetText, Edit3, %Id03%, FMPC SAMPLE
ControlSetText, Edit4, %Id04%, FMPC SAMPLE
ControlSetText, Edit5, %Id05%, FMPC SAMPLE
ControlSetText, Edit6, %Id06%, FMPC SAMPLE
ControlSetText, Edit7, %Id07%, FMPC SAMPLE
ControlSetText, Edit8, %Id08%, FMPC SAMPLE
ControlSetText, Edit9, %Id09%, FMPC SAMPLE
ControlSetText, Edit10, %Id10%, FMPC SAMPLE
ControlSetText, Edit11, %Pass%, FMPC SAMPLE
MsgBox, 0, Konfirmasi, Data Udah Di-Load, 1
}
Return
ButtonQSv:
SetControlDelay, -1
{
IniWrite, %teks01%, setup.ini, FMPC, user1
IniWrite, %teks02%, setup.ini, FMPC, user2
IniWrite, %teks03%, setup.ini, FMPC, user3
IniWrite, %teks04%, setup.ini, FMPC, user4
IniWrite, %teks05%, setup.ini, FMPC, user5
IniWrite, %teks06%, setup.ini, FMPC, user6
IniWrite, %teks07%, setup.ini, FMPC, user7
IniWrite, %teks08%, setup.ini, FMPC, user8
IniWrite, %teks09%, setup.ini, FMPC, user9
IniWrite, %teks10%, setup.ini, FMPC, user10
Loop, 10
{
IniWrite, %Pw%, setup.ini, FMPC, pass%A_Index%
}
MsgBox, 0, Konfirmasi, Data Udah Di-Save, 1
}
Return
ButtonOpen:
SetWinDelay, -1
{
IfNotEqual, Pw,
{
IfNotEqual, teks01,
{
IfWinNotExist, FMPC01-1
Run, %A_ScriptDir%\MPC\1.exe
}
IfNotEqual, teks02,
{
IfWinNotExist, FMPC02-1
Run, %A_ScriptDir%\MPC\2.exe
}
IfNotEqual, teks03,
{
IfWinNotExist, FMPC03-1
Run, %A_ScriptDir%\MPC\3.exe
}
IfNotEqual, teks04,
{
IfWinNotExist, FMPC04-1
Run, %A_ScriptDir%\MPC\4.exe
}
IfNotEqual, teks05,
{
IfWinNotExist, FMPC05-1
Run, %A_ScriptDir%\MPC\5.exe
}
IfNotEqual, teks06,
{
IfWinNotExist, FMPC06-1
Run, %A_ScriptDir%\MPC\6.exe
}
IfNotEqual, teks07,
{
IfWinNotExist, FMPC07-1
Run, %A_ScriptDir%\MPC\7.exe
}
IfNotEqual, teks08,
{
IfWinNotExist, FMPC08-1
Run, %A_ScriptDir%\MPC\8.exe
}
IfNotEqual, teks09,
{
IfWinNotExist, FMPC09-1
Run, %A_ScriptDir%\MPC\9.exe
}
IfNotEqual, teks10,
{
IfWinNotExist, FMPC10-1
Run, %A_ScriptDir%\MPC\10.exe
}
}
}
Return
ButtonClose:
SetWinDelay, -1
{
IfWinExist, FMPC01-1
WinClose, FMPC01-1
IfWinExist, FMPC02-1
WinClose, FMPC02-1
IfWinExist, FMPC03-1
WinClose, FMPC03-1
IfWinExist, FMPC04-1
WinClose, FMPC04-1
IfWinExist, FMPC05-1
WinClose, FMPC05-1
IfWinExist, FMPC06-1
WinClose, FMPC06-1
IfWinExist, FMPC07-1
WinClose, FMPC07-1
IfWinExist, FMPC08-1
WinClose, FMPC08-1
IfWinExist, FMPC09-1
WinClose, FMPC09-1
IfWinExist, FMPC10-1
WinClose, FMPC10-1
}
Return
ButtonEnter:
SetControlDelay, -1
{
IfWinExist, FMPC01-1
ControlClick, Button1, FMPC01-1
IfWinExist, FMPC02-1
ControlClick, Button1, FMPC02-1
IfWinExist, FMPC03-1
ControlClick, Button1, FMPC03-1
IfWinExist, FMPC04-1
ControlClick, Button1, FMPC04-1
IfWinExist, FMPC05-1
ControlClick, Button1, FMPC05-1
IfWinExist, FMPC06-1
ControlClick, Button1, FMPC06-1
IfWinExist, FMPC07-1
ControlClick, Button1, FMPC07-1
IfWinExist, FMPC08-1
ControlClick, Button1, FMPC08-1
IfWinExist, FMPC09-1
ControlClick, Button1, FMPC09-1
IfWinExist, FMPC10-1
ControlClick, Button1, FMPC10-1
IfWinExist, Retriever
ControlClick, Button1, Retriever
}
Return
ButtonLeave:
SetControlDelay, -1
{
IfWinExist, FMPC01-1
ControlClick, Button4, FMPC01-1
IfWinExist, FMPC02-1
ControlClick, Button4, FMPC02-1
IfWinExist, FMPC03-1
ControlClick, Button4, FMPC03-1
IfWinExist, FMPC04-1
ControlClick, Button4, FMPC04-1
IfWinExist, FMPC05-1
ControlClick, Button4, FMPC05-1
IfWinExist, FMPC06-1
ControlClick, Button4, FMPC06-1
IfWinExist, FMPC07-1
ControlClick, Button4, FMPC07-1
IfWinExist, FMPC08-1
ControlClick, Button4, FMPC08-1
IfWinExist, FMPC09-1
ControlClick, Button4, FMPC09-1
IfWinExist, FMPC10-1
ControlClick, Button4, FMPC10-1
IfWinExist, Retriever
ControlClick, Button4, Retriever
}
Return
ButtonLClear:
GuiControl,, ListBox1, |
Return
ButtonAdd:
ControlGetText, user, Edit15, FMPC SAMPLE
GuiControl,, ListBox1, %user%|
Return
GuiClose:
SetWinDelay, -1
{
IfWinExist, FMPC01-1
WinClose, FMPC01-1
IfWinExist, FMPC02-1
WinClose, FMPC02-1
IfWinExist, FMPC03-1
WinClose, FMPC03-1
IfWinExist, FMPC04-1
WinClose, FMPC04-1
IfWinExist, FMPC05-1
WinClose, FMPC05-1
IfWinExist, FMPC06-1
WinClose, FMPC06-1
IfWinExist, FMPC07-1
WinClose, FMPC07-1
IfWinExist, FMPC08-1
WinClose, FMPC08-1
IfWinExist, FMPC09-1
WinClose, FMPC09-1
IfWinExist, FMPC10-1
WinClose, FMPC10-1
IfWinExist, Retriever
WinClose, Retriever
}
ExitApp
off_stupid- TheLovers
-
Jumlah posting : 97
Age : 37
Nick mig33 : off_stupid
Registration date : 08.12.08
Re: CUMA APP ISENG2 NE
Retrieve tuk autolist-a
- Code:
SetTitleMatchMode, 3
DetectHiddenWindows, On
Gui, Add, Button, x6 y6 w40 h30, Go
Gui, Show,, Retriever
Return
ButtonGo:
SetControlDelay, -1
{
Loop, 1000 ;Loop/ulang sebanyak 1000 kali. ini dikasi 1000 biar ga terjadi infinite loop (pengulangan tak terbatas) yang mana akan memberatkan kerja kompi lo.
{
IfWinExist, FMPC01-1
{
ControlGetText, txt, Static1, FMPC01-1
IfInString , txt, Currently in the room "Currently in the room" maka
{
Goto Retrieve
Break
}
}
IfWinExist, FMPC02-1
{
ControlGetText, txt, Static1, FMPC02-1
IfInString, txt, Currently in the room
{
Goto Retrieve
Break
}
}
IfWinExist, FMPC03-1
{
ControlGetText, txt, Static1, FMPC03-1
IfInString, txt, Currently in the room
{
Goto Retrieve
Break
}
}
IfWinExist, FMPC04-1
{
ControlGetText, txt, Static1, FMPC04-1
IfInString, txt, Currently in the room
{
Goto Retrieve
Break
}
}
IfWinExist, FMPC05-1
{
ControlGetText, txt, Static1, FMPC05-1
IfInString, txt, Currently in the room
{
Goto Retrieve
Break
}
}
IfWinExist, FMPC06-1
{
ControlGetText, txt, Static1, FMPC06-1
IfInString, txt, Currently in the room
{
Goto Retrieve
Break
}
}
IfWinExist, FMPC07-1
{
ControlGetText, txt, Static1, FMPC07-1
IfInString, txt, Currently in the room
{
Goto Retrieve
Break
}
}
IfWinExist, FMPC08-1
{
ControlGetText, txt, Static1, FMPC08-1
IfInString, txt, Currently in the room
{
Goto Retrieve
Break
}
}
IfWinExist, FMPC09-1
{
ControlGetText, txt, Static1, FMPC09-1
IfInString, txt, Currently in the room
{
Goto Retrieve
Break
}
}
IfWinExist, FMPC10-1
{
ControlGetText, txt, Static1, FMPC10-1
IfInString, txt, Currently in the room
{
Goto Retrieve
Break
}
}
sleep 100 ;jeda 100 mili detik per loop (biar ga berat ke kompi lo
}
}
Return
Retrieve:
SetControlDelay, 0 ;Set delay pada 0, artinya delay normal
{
ControlClick, Button15, FMPC SAMPLE ;Click tombol clear, untuk membersihkan daftar sebelomnya
StringTrimLeft, txt, txt, 23 ;Potong string txt dari kiri sebanyak 23 karakter/huruf
StringReplace, txt, txt, %A_Space%,,all ;ganti/hilangkan semua "Spasi"
Loop, Parse, txt,`, ;loop dan pisahkan string txt jadi string2 baru dengan batasan koma
{
IfNotEqual, A_LoopField, ;jika string loop tidak kosong maka
{
ControlSetText, Edit16, %A_LoopField%, FMPC SAMPLE ;masukan kedalam kotak Edit16 pada window FMPC SAMPLE
ControlClick, Button17, FMPC SAMPLE ;klik tombol 17 pada window FMPC SAMPLE
}
}
}
Return
GuiClose:
ExitApp
off_stupid- TheLovers
-
Jumlah posting : 97
Age : 37
Nick mig33 : off_stupid
Registration date : 08.12.08
Re: CUMA APP ISENG2 NE
PAK ADMIN SAPA ENAK Y BLJR BUAT APP OR CS?
CKCKCKCKCKCCKCKCKCKCKCKCKCKCKCKCKCKKCCKCKKC
CKCKCKCKCKCCKCKCKCKCKCKCKCKCKCKCKCKKCCKCKKC
off_stupid- TheLovers
-
Jumlah posting : 97
Age : 37
Nick mig33 : off_stupid
Registration date : 08.12.08
Halaman 1 dari 2 • 1, 2
Similar topics
» CONTOH APP MIG CUMA PROJECT
» MIG33 KUJUMER (Cuma screenshoot ya :P)
» New mig33messenger v3.0 (cuma screen shoot)
» [INFO] XL Internet Unlimited Prabayar cuma Rp. 100Rb/bln
» MIG33 KUJUMER (Cuma screenshoot ya :P)
» New mig33messenger v3.0 (cuma screen shoot)
» [INFO] XL Internet Unlimited Prabayar cuma Rp. 100Rb/bln
Halaman 1 dari 2
Permissions in this forum:
Anda tidak dapat menjawab topik