Saturday, 24 January 2015

Thursday, 22 January 2015

Sistem Warna
1. RGB
2. CMYK

Parameter warna
1. Hue
Hue are all the basic primary and secondary color yang membuat pelangi.

2. Saturation
To desaturate the hue you must add the complementary color.

3. Value

4. Shades
Bayangan

Color table


Graphicswindow.BackgroudColor = "Black"
GraphicsWindow.Width = 200
GraphicsWindow.Height = 160
GraphicsWindow.Pencolor = "Blue"

For i = 1 To 10
GraphicsWindow.PenWidth = i
GraphicsWindow.DrawLine(20, i * 15, 180, i * 15)
endfor

Monday, 19 January 2015

Rahasia Pitagoras


Pada segitiga siku-siku terdapat 4 parameter yaitu x, y, r dan alfa.
Jika 3 dari 4 diketahui maka parameter yang lain bisa diketahui.

Rumah Developer Mode

<? Date ?>
Rumah Developer Mode hari ini menemukan warna.

Warna terdiri dari:
1. Red Color  = Merah
2. Pink Color = Merah Muda
3. Orange Color = Jingga
4. Yellow Color = Kuning
5. Purple Color = Ungu
6. Green Color = Hijau
7. Blue Color = Biru
8. Brown Color = Coklat
9. White Color = Putih
10. Gray Color = Abu-abu

Dengan masing-masing mempunyai anak-anak warna (children of color).

Strateginya: membeli baju masing-masing wakili 1 warna dari 10 warna diatas serta membeli celana mewakili 1 warna dari 10 warna itu juga.

Rumah Developer Mode hari ini berhasil menemukan obyek yang akan dijual:
1. Tas.
2. Sepatu.
3. Seprai.
4. Parfum.
5. Bahan Kebaya.
6. Sanggul.
7. Hiasan sanggul.
8. Kemeja dan Kaos lengan panjang dan lengan pendek untuk laki-laki.
9. Kemeja dan Kaos lengan panjang dan lengan pendek untuk wanita.
9. Celana pendek dan panjang.
10. Lapis bedak untuk make-up.

Rumah developer mode juga hari ini berhasil menemukan cara mewarnai pakaian dengan wantek(pewarna tekstil)
Link disini


Rumah developer mode hari ini menemukan ide untuk bekerja sebagai retail dari butik atau rumah mode yang lain.
Partner yang pertama Parnter yang kedua

Rumah developer mode hari ini mengerti bahwa pengelompokkan itu penting agar mudah diproses.

Sunday, 18 January 2015

Projek Warna Kulit


Projek 2: Pemecah cerita (space seperated value)

Screenshoot


Full Program (Small Basic):

Controls.ButtonClicked = bc
mlt = Controls.AddMultiLineTextBox(0,0)

button1 = Controls.AddButton("Proses", 200, 0)

i = 0



Sub bc
  if Controls.LastClickedButton = button1 Then
    takemlttext = Controls.GetTextBoxText(mlt)
    index = Text.GetIndexOf(takemlttext, " ")
    While index <> 0
      word[i] = Text.GetSubText(takemlttext, 1, index - 1)
      takemlttext = Text.GetSubTextToEnd(takemlttext, index + 1)
      index = Text.GetIndexOf(takemlttext, " ")
      TextWindow.WriteLine(word[i])
      i = i + 1
      EndWhile
    EndIf
EndSub