Friday, 31 January 2014

LAB menghitung volume pori-pori tanah

Alat-alat:
1. Timbangan dijital untuk mendapatkan nilai timbangan yang lebih halus
2. Alat pemanas
3. Cawan porslen
4. Alat pengukur volume

Controlling the opacity of a shape using mousemove event

a = Shapes.AddEllipse(100,100)
GraphicsWindow.MouseMove = mousemove

Sub mousemove
  If GraphicsWindow.MouseX <= 100 Then
    Shapes.SetOpacity(a, 100)
  Else
    Shapes.SetOpacity(a,50)
    endif
EndSub

It used to be:
a = Shapes.AddEllipse(100,100)
Shapes.SetOpacity(a,50)
GraphicsWindow.MouseMove = mousemove

Sub mousemove
  If GraphicsWindow.MouseX <= 100 Then
    Shapes.SetOpacity(a, 100)
  Else
    Shapes.SetOpacity(a,50)
    endif
EndSub

Final:

Thursday, 30 January 2014

Ilmu Pertanian

Pertanian adalah usaha manusia dalam mengelola sumber daya hayati untuk menghasilkan bahan pangan, bahan baku industri, atau sumber energi.

Contoh bahan pangan: pertanian padi
Contoh bahan baku industri: pertanian karet sebagai bahan baku ban, pertanian sawit sebagai bahan baku mentega atau minyak makan.
Contoh sumber energi: pertanian tanaman jarak

Basic Electronic

Reading, writing, arithmatic and electronic

1. Bread board
2. Digital multimeter
3. Power supply: variabel power supply: 0 - 30v , dual power supply: -15 - + 15 v and fixed 0 to +5v power supply

Dissecting an engine

The basic parts and their function.

This concept can be applied to almost anything

16 DOHC (Dual Over Head Car) engine

Under the hood:
1. Four cylinder engine
2. Air filtering housing
3. Battery
4. Fuse boxes
5. Relay boxes
6. Alternator
7. Water pump
8. Radiator
9. Powersteering
10. Wipermotor
11. Horn
12. ABS

Menggambar bentuk dengan small basic

1. Menggambar elips dan bulat

a.  Menggambar elips
- dengan menggunakan parent shape
Shapes.AddEllipse(100,50)

Output:

- dengan menggunakan parent graphicswindow
GraphicsWindow.DrawEllipse(0,0,100,50)

Output:

b. Menggambar bulat
- dengan menggunakan parent shape
Shapes.AddEllipse(100,100)

Output:

- dengan menggunakan parent graphicswindow
GraphicsWindow.DrawEllipse(0,0,100,100)

Output:

2. Menggambar petak (rectangle)

- dengan menggunakan parent shape
Shapes.AddRectangle(100,100)

Output:

- dengan menggunakan parent graphicswindow
GraphicsWindow.DrawRectangle(0,0,100,100)

Output:

3. Menggambar segitiga

 - dengan menggunakan parent shape
Shapes.AddTriangle(0,100,50,0,100,100)

Output:


- dengan menggunakan parent graphicswindow
GraphicsWindow.DrawTriangle(0,100,50,0,100,100)

Output:




Kesimpulan

- Kamu lihat bahwa menggambar bulat dan menggambar elips sama-sama menggunakan perintah elips?
- Kamu lihat bahwa menggambar dengan graphic window tidak mengarsir dan menggambar dengan shape selalu mengarsir?


Tambahan sedikit:

GraphicsWindow.BrushColor = "Black"
GraphicsWindow.PenColor = "red"
Shapes.AddEllipse(100,100)

Output:

 




Distance vector routing protocol
- RIP is product that inherit distance vector specification.

Loop avoidance
- Split horizon: prevent route information packet received from one interface to go
- don't turn it off.

Specific distance vector
- route poisoning


RIP
- doesn't converged quickly; the routers don't agree quickly


Routing troubleshooting tools:
1. show ip protocols
2.