
Sunday, 26 January 2014
Programan bergerak (animasi) dan small basic
1. Garis bergerak lurus
for i = 1 to 10000
x1 = i
y1 = 0
x2 = x1 + 1
y2 = 0
graphicswindow.drawline(x1, y1, x2, y2)
Program.Delay(100)
endfor
atau
For i = 0 To 1000
if i = 0 Then
x1 = i
Else
x1 = i * 10
EndIf
y1 = 10
x2 = x1 + 10
y2 = 10
Shapes.AddLine(x1, y1, x2, y2)
Program.Delay(10)
EndFor
2. Shape bergerak
- shape rectangle bergerak
- shape triangle bergerak
3.
for i = 1 to 10000
x1 = i
y1 = 0
x2 = x1 + 1
y2 = 0
graphicswindow.drawline(x1, y1, x2, y2)
Program.Delay(100)
endfor
atau
For i = 0 To 1000
if i = 0 Then
x1 = i
Else
x1 = i * 10
EndIf
y1 = 10
x2 = x1 + 10
y2 = 10
Shapes.AddLine(x1, y1, x2, y2)
Program.Delay(10)
EndFor
2. Shape bergerak
- shape rectangle bergerak
- shape triangle bergerak
3.
Saturday, 25 January 2014
Small basic: x, y, height, width, vertical, horizontal
y = height = vertical = atas-bawah
x = width = horizontal = kiri-kanan
Default grafik windows size
Width = 632
Height = 452
Contoh penggunaan pengetahuan ini:
graphicswindow.drawrectangle(x,y, width, height)
x = width = horizontal = kiri-kanan
Default grafik windows size
Width = 632
Height = 452
Contoh penggunaan pengetahuan ini:
graphicswindow.drawrectangle(x,y, width, height)
Thursday, 23 January 2014
Pembibitan sawit
Fase 1 - Polibek kecil
Masa: 3 Bulan
Treatment:
- Pupuk daun
- Pupuk hama
- Penyiraman = harian
Fase 2 - Polibek besar
Masa: 1 Tahun
Treatment:
- Penyiraman = harian
Masa: 3 Bulan
Treatment:
- Pupuk daun
- Pupuk hama
- Penyiraman = harian
Fase 2 - Polibek besar
Masa: 1 Tahun
Treatment:
- Penyiraman = harian
Subscribe to:
Posts (Atom)