[ New Updates · Members · Rules · Search · RSS ]
Page 1 of 11
Forum moderator: Nouris_Hamada_103 
Forum » DevCen (Developer Center) » AMS Studio » Coding Help » System Check with use Progress Object (Moga bisa jd HOT Thread xD)
System Check with use Progress Object
RandiDate: Tuesday, 03 Jun 2014, 7:25 PM | Message # 1
Junior Member
Group: Member
Messages: 62
Awards: 0
Reputation: 1
Status: Offline
Yang di butuhkan :
Code
1. Label Object
2. Progress Object
3. Button Object
4. INI file
5. 2 Page


Buat file .ini di (AutoPlay\\Docs\\) dan beri nama Check_File.ini , lalu isi .ini file nya itu kyak gini :
Code
[CheckFile]
1=p_ak47.mdl
2=p_aug.mdl
3=p_awp.mdl
4=p_c4.mdl
5=p_deagle.mdl
6=p_elite.mdl
7=p_famas.mdl
8=p_fiveseven.mdl
9=p_flashbang.mdl
10=p_g3sg1.mdl
11=p_galil.mdl


Page 1:
Buat 1 Button Object.

Script On Show / On Preload :
Code
Page.Jump("Page 2")


Page 2:
Buat 2 Progress Object, dan 1 Label Object.

Script On Show / On Preload :
Code
--[[
Script Created by Rahmat Efendi
Facebook : http://facebook.com/re29.me
]]--  

-- Check File 1 --
Label.SetText("Label1", INIFile.GetValue("AutoPlay\\Docs\\Check_File.ini", "CheckFile", "1"));

pos = 0;
min = 0;
max = 100;
for count = min, max do
     Progress.SetCurrentPos("Progress1", pos);
  Application.Sleep(3)  
  pos = pos + 1
end

pos = 0;
min = 0;
max = 10;
for count = min, max do
     Progress.SetCurrentPos("Progress2", pos);
  Application.Sleep(10)  
     pos = pos + 1
end

-- Check File 2 --
Label.SetText("Label1", INIFile.GetValue("AutoPlay\\Docs\\Check_File.ini", "CheckFile", "2"));

pos = 0;
min = 0;
max = 100;
for count = min, max do
     Progress.SetCurrentPos("Progress1", pos);
  Application.Sleep(3)  
     pos = pos + 1
end

pos = 10;
min = 10;
max = 20;
for count = min, max do
     Progress.SetCurrentPos("Progress2", pos);
  Application.Sleep(10)  
     pos = pos + 1
end

-- Check File 3 --
Label.SetText("Label1", INIFile.GetValue("AutoPlay\\Docs\\Check_File.ini", "CheckFile", "3"));

pos = 0;
min = 0;
max = 100;
for count = min, max do
     Progress.SetCurrentPos("Progress1", pos);
  Application.Sleep(3)  
     pos = pos + 1
end

pos = 20;
min = 20;
max = 30;
for count = min, max do
     Progress.SetCurrentPos("Progress2", pos);
  Application.Sleep(10)  
     pos = pos + 1
end

-- Check File 4 --
Label.SetText("Label1", INIFile.GetValue("AutoPlay\\Docs\\Check_File.ini", "CheckFile", "4"));

pos = 0;
min = 0;
max = 100;
for count = min, max do
     Progress.SetCurrentPos("Progress1", pos);
  Application.Sleep(3)  
     pos = pos + 1
end

pos = 30;
min = 30;
max = 40;
for count = min, max do
     Progress.SetCurrentPos("Progress2", pos);
  Application.Sleep(10)  
     pos = pos + 1
end

-- Check File 5 --
Label.SetText("Label1", INIFile.GetValue("AutoPlay\\Docs\\Check_File.ini", "CheckFile", "5"));

pos = 0;
min = 0;
max = 100;
for count = min, max do
     Progress.SetCurrentPos("Progress1", pos);
  Application.Sleep(3)  
     pos = pos + 1
end

pos = 40;
min = 40;
max = 50;
for count = min, max do
     Progress.SetCurrentPos("Progress2", pos);
  Application.Sleep(10)  
     pos = pos + 1
end

-- Check File 6 --
Label.SetText("Label1", INIFile.GetValue("AutoPlay\\Docs\\Check_File.ini", "CheckFile", "6"));

pos = 0;
min = 0;
max = 100;
for count = min, max do
     Progress.SetCurrentPos("Progress1", pos);
  Application.Sleep(3)  
     pos = pos + 1
end

pos = 50;
min = 50;
max = 60;
for count = min, max do
     Progress.SetCurrentPos("Progress2", pos);
  Application.Sleep(10)  
     pos = pos + 1
end

-- Check File 7 --
Label.SetText("Label1", INIFile.GetValue("AutoPlay\\Docs\\Check_File.ini", "CheckFile", "7"));

pos = 0;
min = 0;
max = 100;
for count = min, max do
     Progress.SetCurrentPos("Progress1", pos);
  Application.Sleep(3)  
     pos = pos + 1
end

pos = 60;
min = 60;
max = 70;
for count = min, max do
     Progress.SetCurrentPos("Progress2", pos);
  Application.Sleep(10)  
     pos = pos + 1
end

-- Check File 8 --
Label.SetText("Label1", INIFile.GetValue("AutoPlay\\Docs\\Check_File.ini", "CheckFile", "8"));

pos = 0;
min = 0;
max = 100;
for count = min, max do
     Progress.SetCurrentPos("Progress1", pos);
  Application.Sleep(3)  
     pos = pos + 1
end

pos = 70;
min = 70;
max = 80;
for count = min, max do
     Progress.SetCurrentPos("Progress2", pos);
  Application.Sleep(10)  
     pos = pos + 1
end

-- Check File 8 --
Label.SetText("Label1", INIFile.GetValue("AutoPlay\\Docs\\Check_File.ini", "CheckFile", "9"));

pos = 0;
min = 0;
max = 100;
for count = min, max do
     Progress.SetCurrentPos("Progress1", pos);
  Application.Sleep(3)  
     pos = pos + 1
end

pos = 80;
min = 80;
max = 90;
for count = min, max do
     Progress.SetCurrentPos("Progress2", pos);
  Application.Sleep(10)  
     pos = pos + 1
end

-- Check File 10 --
Label.SetText("Label1", INIFile.GetValue("AutoPlay\\Docs\\Check_File.ini", "CheckFile", "10"));

pos = 0;
min = 0;
max = 100;
for count = min, max do
     Progress.SetCurrentPos("Progress1", pos);
  Application.Sleep(3)  
     pos = pos + 1
end

pos = 90;
min = 90;
max = 100;
for count = min, max do
     Progress.SetCurrentPos("Progress2", pos);
  Application.Sleep(10)  
     pos = pos + 1
end

Page.Jump("Page1")
 
BujangDate: Wednesday, 24 Dec 2014, 1:39 AM | Message # 2
Active Member
Group: Member
Messages: 273
Awards: 0
Reputation: 11
Status: Offline
oh sistem cek mirip pebe ya, bagus gan

life is a choice...
Facebook
Blog
 
Forum » DevCen (Developer Center) » AMS Studio » Coding Help » System Check with use Progress Object (Moga bisa jd HOT Thread xD)
Page 1 of 11
Search:

Create a free website with uCoz