Videomuzda gösterdiğim Small Basic komutu aşağıda yazıyor:
TextWindow.Write ("Öğrencinin İsmi: ")
öğrenci_adı=TextWindow.Read()
TextWindow.WriteLine ("Matematik")
TextWindow.Write ("1. Matematik Sınav Notu: ")
birinci_matematik_sınav_notu=TextWindow.Read()
TextWindow.Write ("2. Matematik Sınav Notu: ")
ikinci_matematik_sınav_notu=TextWindow.Read()
TextWindow.Write ("3. Matematik Sınav Notu: ")
üçüncü_matematik_sınav_notu=TextWindow.Read()
matematik_toplam_puan=(birinci_matematik_sınav_notu + ikinci_matematik_sınav_notu + üçüncü_matematik_sınav_notu)/3
TextWindow.WriteLine ("Türkçe")
TextWindow.Write ("1. Türkçe Sınav Notu: ")
birinci_türkçe_sınav_notu=TextWindow.Read()
TextWindow.Write ("2. Türkçe Sınav Notu: ")
ikinci_türkçe_sınav_notu=TextWindow.Read()
TextWindow.Write ("3. Türkçe Sınav Notu: ")
üçüncü_türkçe_sınav_notu=TextWindow.Read()
türkçe_toplam_puan=(birinci_türkçe_sınav_notu + ikinci_türkçe_sınav_notu + üçüncü_türkçe_sınav_notu)/3
TextWindow.WriteLine ("Fen")
TextWindow.Write ("1. Fen Sınav Notu: ")
birinci_fen_sınav_notu=TextWindow.Read()
TextWindow.Write ("2. Fen Sınav Notu: ")
ikinci_fen_sınav_notu=TextWindow.Read()
fen_toplam_puan=(birinci_fen_sınav_notu + ikinci_fen_sınav_notu)/2
TextWindow.WriteLine ("Sosyal")
TextWindow.Write ("1. Sosyal Sınav Notu: ")
birinci_sosyal_sınav_notu=TextWindow.Read()
TextWindow.Write ("2. Sosyal Sınav Notu: ")
ikinci_sosyal_sınav_notu=TextWindow.Read()
sosyal_toplam_puan=(birinci_sosyal_sınav_notu + ikinci_sosyal_sınav_notu)/2
TextWindow.WriteLine ("Yabancı Dil")
TextWindow.Write ("1. Yabancı Dil Sınav Notu: ")
birinci_yabancı_dil_sınav_notu=TextWindow.Read()
TextWindow.Write ("2. Yabancı Dil Sınav Notu: ")
ikinci_yabancı_dil_sınav_notu=TextWindow.Read()
yabancı_dil_toplam_puan=(birinci_yabancı_dil_sınav_notu + ikinci_yabancı_dil_sınav_notu)/2
TextWindow.WriteLine ("Din")
TextWindow.Write ("1. Din Sınav Notu: ")
birinci_din_sınav_notu=TextWindow.Read()
TextWindow.Write ("2. Din Sınav Notu: ")
ikinci_din_sınav_notu=TextWindow.Read()
din_toplam_puan=(birinci_din_sınav_notu + ikinci_din_sınav_notu)/2
karne_notu=(matematik_toplam_puan + türkçe_toplam_puan + fen_toplam_puan + sosyal_toplam_puan + yabancı_dil_toplam_puan + yabancı_dil_toplam_puan)/6
TextWindow.WriteLine (öğrenci_adı + " Toplam Karne Notun" + "=" + karne_notu)
Bu komutta istediğiniz değişiklikleri yapabilirsiniz. Ama Small Basic uygulamanız olmalı.
Small Basic Kurulum Sitesi: https://www.microsoft.com/en-US/download/details.aspx?id=46392
Gerekli işlemleri yaparak yukarıdaki siteden indirebilirsiniz.
BORA VE BATU'NUN DÜNYASI
İkiziz biz, dünyamızı size açtık. 'Çocuklar ne sever, ne yapar' merak edenlere...
BU BLOGDA ARAMAK İSTEDİKLERİNE HEMEN ULAŞ
ÇEVİRİ
1 Ağustos 2016 Pazartesi
Small Basic Test Komutu
Videomuzda gösterdiğim komutu yazacağımı söylemiştim. Komut aşağıda:
başla:
TextWindow.Clear()
TextWindow.WriteLine ("1. Test")
TextWindow.WriteLine ("Çıkmak için 'Q\q' tuşuna basınız.")
TextWindow.WriteLine ("Sorular")
TextWindow.WriteLine ("1. Soru-'Brain' ne demek?")
TextWindow.WriteLine ("A.Kalp")
TextWindow.WriteLine ("B.Akciğer")
TextWindow.WriteLine ("C.Beyin")
TextWindow.WriteLine ("D.Karaciğer")
TextWindow.Write("Cevap= ")
birinci_soru = TextWindow.Read()
if (birinci_soru = "q" Or birinci_soru = "Q") Then
Goto çık
EndIf
TextWindow.WriteLine ("2. Soru-Teraria 1.3.1'de kaç tane dünya modu var? (Dünya yaratırken karşına çıkan '... Mode' diye yazan seçenekler)")
TextWindow.WriteLine ("A.5")
TextWindow.WriteLine ("B.4")
TextWindow.WriteLine ("C.3")
TextWindow.WriteLine ("D.2")
TextWindow.Write("Cevap= ")
ikinci_soru = TextWindow.Read()
if (ikinci_soru = "q" Or ikinci_soru = "Q") Then
Goto çık
EndIf
TextWindow.WriteLine ("3. Soru-Terraria'da 'Hardmode'a geçmek için öldürülen boss hangisidir?")
TextWindow.WriteLine ("A.Moon Lord")
TextWindow.WriteLine ("B.Quen Bee")
TextWindow.WriteLine ("C.King Slime")
TextWindow.WriteLine ("D.Wall of Flesh")
TextWindow.Write("Cevap= ")
üçüncü_soru = TextWindow.Read()
if (üçüncü_soru = "q" Or üçüncü_soru = "Q") Then
Goto çık
EndIf
TextWindow.WriteLine ("4. Soru-Terraria'daki en sağdaki mavi yıldızların ismi nedir?")
TextWindow.WriteLine ("A.Mana")
TextWindow.WriteLine ("B.Star")
TextWindow.WriteLine ("C.Blue Star")
TextWindow.WriteLine ("D.Power")
TextWindow.Write("Cevap= ")
dördüncü_soru = TextWindow.Read()
if (dördüncü_soru = "q" Or dördüncü_soru = "Q") Then
Goto çık
EndIf
TextWindow.WriteLine ("5. Soru-Terraria'da Wither var mı?")
TextWindow.WriteLine ("A.Var")
TextWindow.WriteLine ("B.Yok")
TextWindow.Write("Cevap= ")
beşinci_soru = TextWindow.Read()
if (beşinci_soru = "q" Or beşinci_soru = "Q") Then
Goto çık
EndIf
TextWindow.WriteLine ("6. Soru-Terraria'da The Underworld'e nasıl gidilir?")
TextWindow.WriteLine ("A.Geçitle")
TextWindow.WriteLine ("B.Belirli Bir Noktaya Çıkarak (Yukarı Doğru)")
TextWindow.WriteLine ("C.Bir Lava Atlayarak")
TextWindow.WriteLine ("D.Belirli Bir Noktaya İnerek (Aşağı Doğru)")
TextWindow.Write("Cevap= ")
altıncı_soru = TextWindow.Read()
if (altıncı_soru = "q" Or altıncı_soru = "Q") Then
Goto çık
EndIf
TextWindow.WriteLine ("7. Soru-Terraria'daki Wall of Flesh hangi eşyayla, ne yaparak çağırılır?")
TextWindow.WriteLine ("A.Guide Voodoo Doll'u Lava Atarak")
TextWindow.WriteLine ("B.Spawn Bulup Spawn'ı Lava Atarak")
TextWindow.WriteLine ("C.Guide Voodoo Doll Elindeyken Sol Tıklayarak")
TextWindow.WriteLine ("D.NPC Öldürüp The Underworld'e İnip Lava Atlayarak")
TextWindow.Write("Cevap= ")
yedinci_soru = TextWindow.Read()
if (yedinci_soru = "q" Or yedinci_soru = "Q") Then
Goto çık
EndIf
TextWindow.WriteLine ("8. Soru-Terraria'daki Guide Voodoo Doll hangi canavardan çıkar?")
TextWindow.WriteLine ("A.Voodoo Demon")
TextWindow.WriteLine ("B.Queen Bee")
TextWindow.WriteLine ("C.Demon")
TextWindow.WriteLine ("D.King Slime")
TextWindow.Write("Cevap= ")
sekizinci_soru = TextWindow.Read()
if (sekizinci_soru = "q" Or sekizinci_soru = "Q") Then
Goto çık
EndIf
TextWindow.WriteLine ("9. Soru-Terraria'daki Baby Skeletron Head neyden çıkıyor?(Doğuyor.)")
TextWindow.WriteLine ("A.Dungeon Guardian")
TextWindow.WriteLine ("B.Bone Key")
TextWindow.WriteLine ("C.Old Mann")
TextWindow.WriteLine ("D.Skeletron")
TextWindow.Write("Cevap= ")
dokuzuncu_soru = TextWindow.Read()
if (dokuzuncu_soru = "q" Or dokuzuncu_soru = "Q") Then
Goto çık
EndIf
TextWindow.WriteLine ("10. Soru-Terraria'da Kaktüs Zırh var mı?")
TextWindow.WriteLine ("A.Var")
TextWindow.WriteLine ("B.Yok")
TextWindow.Write("Cevap= ")
onuncu_soru = TextWindow.Read()
if (onuncu_soru = "q" Or onuncu_soru = "Q") Then
Goto çık
EndIf
If (birinci_soru = "C" Or birinci_soru = "c") Then
TextWindow.WriteLine("1. Soru: Doğru")
Else
TextWindow.WriteLine("1. Soru: Yanlış | Cevap: C")
EndIf
If (ikinci_soru = "D" Or ikinci_soru = "d") Then
TextWindow.WriteLine("2. Soru: Doğru")
Else
TextWindow.WriteLine("2. Soru: Yanlış | Cevap: D")
EndIf
If (üçüncü_soru = "D" Or üçüncü_soru = "d") Then
TextWindow.WriteLine("3. Soru: Doğru")
Else
TextWindow.WriteLine("3. Soru: Yanlış | Cevap: D")
EndIf
If (dördüncü_soru = "A" Or dördüncü_soru = "a") Then
TextWindow.WriteLine("4. Soru: Doğru")
Else
TextWindow.WriteLine("4. Soru: Yanlış | Cevap: A")
EndIf
If (beşinci_soru = "B" Or beşinci_soru = "b") Then
TextWindow.WriteLine("5. Soru: Doğru")
Else
TextWindow.WriteLine("5. Soru: Yanlış | Cevap: B")
EndIf
If (altıncı_soru = "D" Or altıncı_soru = "d") Then
TextWindow.WriteLine("6. Soru: Doğru")
Else
TextWindow.WriteLine("6. Soru: Yanlış | Cevap: D")
EndIf
If (yedinci_soru = "A" Or yedinci_soru = "a") Then
TextWindow.WriteLine("7. Soru: Doğru")
Else
TextWindow.WriteLine("7. Soru: Yanlış | Cevap: A")
EndIf
If (sekizinci_soru = "A" Or sekizinci_soru = "a") Then
TextWindow.WriteLine("8. Soru: Doğru")
Else
TextWindow.WriteLine("8. Soru: Yanlış | Cevap: A")
EndIf
If (dokuzuncu_soru = "B" Or dokuzuncu_soru = "b") Then
TextWindow.WriteLine("9. Soru: Doğru")
Else
TextWindow.WriteLine("9. Soru: Yanlış | Cevap: B")
EndIf
If (onuncu_soru = "A" Or onuncu_soru = "a") Then
TextWindow.WriteLine("10. Soru: Doğru")
Else
TextWindow.WriteLine("10. Soru: Yanlış | Cevap: A")
EndIf
çık:
TextWindow.WriteLine("Çıkış Yapıyorsunuz...")
TextWindow.WriteLine("Bundan emin misiniz?(E\e= Evet | H\h= Hayır)")
TextWindow.Write("Cevap: ")
çıkış = TextWindow.Read()
If (çıkış = "e" Or çıkış = "E") Then
TextWindow.WriteLine("Bay Bay!")
Else
Goto başla
EndIf
Small Basic kullanan soruları, şıkları ve cevapları değiştirerek komutu yapıştırıp arkadaşlarına cevaplatabilir.
İndirmek için şu siteye gidin : https://www.microsoft.com/en-US/download/details.aspx?id=46392
Gerekli işlemleri yaparak Small Basic uygulamasını indirebilirsiniz.
başla:
TextWindow.Clear()
TextWindow.WriteLine ("1. Test")
TextWindow.WriteLine ("Çıkmak için 'Q\q' tuşuna basınız.")
TextWindow.WriteLine ("Sorular")
TextWindow.WriteLine ("1. Soru-'Brain' ne demek?")
TextWindow.WriteLine ("A.Kalp")
TextWindow.WriteLine ("B.Akciğer")
TextWindow.WriteLine ("C.Beyin")
TextWindow.WriteLine ("D.Karaciğer")
TextWindow.Write("Cevap= ")
birinci_soru = TextWindow.Read()
if (birinci_soru = "q" Or birinci_soru = "Q") Then
Goto çık
EndIf
TextWindow.WriteLine ("2. Soru-Teraria 1.3.1'de kaç tane dünya modu var? (Dünya yaratırken karşına çıkan '... Mode' diye yazan seçenekler)")
TextWindow.WriteLine ("A.5")
TextWindow.WriteLine ("B.4")
TextWindow.WriteLine ("C.3")
TextWindow.WriteLine ("D.2")
TextWindow.Write("Cevap= ")
ikinci_soru = TextWindow.Read()
if (ikinci_soru = "q" Or ikinci_soru = "Q") Then
Goto çık
EndIf
TextWindow.WriteLine ("3. Soru-Terraria'da 'Hardmode'a geçmek için öldürülen boss hangisidir?")
TextWindow.WriteLine ("A.Moon Lord")
TextWindow.WriteLine ("B.Quen Bee")
TextWindow.WriteLine ("C.King Slime")
TextWindow.WriteLine ("D.Wall of Flesh")
TextWindow.Write("Cevap= ")
üçüncü_soru = TextWindow.Read()
if (üçüncü_soru = "q" Or üçüncü_soru = "Q") Then
Goto çık
EndIf
TextWindow.WriteLine ("4. Soru-Terraria'daki en sağdaki mavi yıldızların ismi nedir?")
TextWindow.WriteLine ("A.Mana")
TextWindow.WriteLine ("B.Star")
TextWindow.WriteLine ("C.Blue Star")
TextWindow.WriteLine ("D.Power")
TextWindow.Write("Cevap= ")
dördüncü_soru = TextWindow.Read()
if (dördüncü_soru = "q" Or dördüncü_soru = "Q") Then
Goto çık
EndIf
TextWindow.WriteLine ("5. Soru-Terraria'da Wither var mı?")
TextWindow.WriteLine ("A.Var")
TextWindow.WriteLine ("B.Yok")
TextWindow.Write("Cevap= ")
beşinci_soru = TextWindow.Read()
if (beşinci_soru = "q" Or beşinci_soru = "Q") Then
Goto çık
EndIf
TextWindow.WriteLine ("6. Soru-Terraria'da The Underworld'e nasıl gidilir?")
TextWindow.WriteLine ("A.Geçitle")
TextWindow.WriteLine ("B.Belirli Bir Noktaya Çıkarak (Yukarı Doğru)")
TextWindow.WriteLine ("C.Bir Lava Atlayarak")
TextWindow.WriteLine ("D.Belirli Bir Noktaya İnerek (Aşağı Doğru)")
TextWindow.Write("Cevap= ")
altıncı_soru = TextWindow.Read()
if (altıncı_soru = "q" Or altıncı_soru = "Q") Then
Goto çık
EndIf
TextWindow.WriteLine ("7. Soru-Terraria'daki Wall of Flesh hangi eşyayla, ne yaparak çağırılır?")
TextWindow.WriteLine ("A.Guide Voodoo Doll'u Lava Atarak")
TextWindow.WriteLine ("B.Spawn Bulup Spawn'ı Lava Atarak")
TextWindow.WriteLine ("C.Guide Voodoo Doll Elindeyken Sol Tıklayarak")
TextWindow.WriteLine ("D.NPC Öldürüp The Underworld'e İnip Lava Atlayarak")
TextWindow.Write("Cevap= ")
yedinci_soru = TextWindow.Read()
if (yedinci_soru = "q" Or yedinci_soru = "Q") Then
Goto çık
EndIf
TextWindow.WriteLine ("8. Soru-Terraria'daki Guide Voodoo Doll hangi canavardan çıkar?")
TextWindow.WriteLine ("A.Voodoo Demon")
TextWindow.WriteLine ("B.Queen Bee")
TextWindow.WriteLine ("C.Demon")
TextWindow.WriteLine ("D.King Slime")
TextWindow.Write("Cevap= ")
sekizinci_soru = TextWindow.Read()
if (sekizinci_soru = "q" Or sekizinci_soru = "Q") Then
Goto çık
EndIf
TextWindow.WriteLine ("9. Soru-Terraria'daki Baby Skeletron Head neyden çıkıyor?(Doğuyor.)")
TextWindow.WriteLine ("A.Dungeon Guardian")
TextWindow.WriteLine ("B.Bone Key")
TextWindow.WriteLine ("C.Old Mann")
TextWindow.WriteLine ("D.Skeletron")
TextWindow.Write("Cevap= ")
dokuzuncu_soru = TextWindow.Read()
if (dokuzuncu_soru = "q" Or dokuzuncu_soru = "Q") Then
Goto çık
EndIf
TextWindow.WriteLine ("10. Soru-Terraria'da Kaktüs Zırh var mı?")
TextWindow.WriteLine ("A.Var")
TextWindow.WriteLine ("B.Yok")
TextWindow.Write("Cevap= ")
onuncu_soru = TextWindow.Read()
if (onuncu_soru = "q" Or onuncu_soru = "Q") Then
Goto çık
EndIf
If (birinci_soru = "C" Or birinci_soru = "c") Then
TextWindow.WriteLine("1. Soru: Doğru")
Else
TextWindow.WriteLine("1. Soru: Yanlış | Cevap: C")
EndIf
If (ikinci_soru = "D" Or ikinci_soru = "d") Then
TextWindow.WriteLine("2. Soru: Doğru")
Else
TextWindow.WriteLine("2. Soru: Yanlış | Cevap: D")
EndIf
If (üçüncü_soru = "D" Or üçüncü_soru = "d") Then
TextWindow.WriteLine("3. Soru: Doğru")
Else
TextWindow.WriteLine("3. Soru: Yanlış | Cevap: D")
EndIf
If (dördüncü_soru = "A" Or dördüncü_soru = "a") Then
TextWindow.WriteLine("4. Soru: Doğru")
Else
TextWindow.WriteLine("4. Soru: Yanlış | Cevap: A")
EndIf
If (beşinci_soru = "B" Or beşinci_soru = "b") Then
TextWindow.WriteLine("5. Soru: Doğru")
Else
TextWindow.WriteLine("5. Soru: Yanlış | Cevap: B")
EndIf
If (altıncı_soru = "D" Or altıncı_soru = "d") Then
TextWindow.WriteLine("6. Soru: Doğru")
Else
TextWindow.WriteLine("6. Soru: Yanlış | Cevap: D")
EndIf
If (yedinci_soru = "A" Or yedinci_soru = "a") Then
TextWindow.WriteLine("7. Soru: Doğru")
Else
TextWindow.WriteLine("7. Soru: Yanlış | Cevap: A")
EndIf
If (sekizinci_soru = "A" Or sekizinci_soru = "a") Then
TextWindow.WriteLine("8. Soru: Doğru")
Else
TextWindow.WriteLine("8. Soru: Yanlış | Cevap: A")
EndIf
If (dokuzuncu_soru = "B" Or dokuzuncu_soru = "b") Then
TextWindow.WriteLine("9. Soru: Doğru")
Else
TextWindow.WriteLine("9. Soru: Yanlış | Cevap: B")
EndIf
If (onuncu_soru = "A" Or onuncu_soru = "a") Then
TextWindow.WriteLine("10. Soru: Doğru")
Else
TextWindow.WriteLine("10. Soru: Yanlış | Cevap: A")
EndIf
çık:
TextWindow.WriteLine("Çıkış Yapıyorsunuz...")
TextWindow.WriteLine("Bundan emin misiniz?(E\e= Evet | H\h= Hayır)")
TextWindow.Write("Cevap: ")
çıkış = TextWindow.Read()
If (çıkış = "e" Or çıkış = "E") Then
TextWindow.WriteLine("Bay Bay!")
Else
Goto başla
EndIf
Small Basic kullanan soruları, şıkları ve cevapları değiştirerek komutu yapıştırıp arkadaşlarına cevaplatabilir.
İndirmek için şu siteye gidin : https://www.microsoft.com/en-US/download/details.aspx?id=46392
Gerekli işlemleri yaparak Small Basic uygulamasını indirebilirsiniz.
26 Mart 2016 Cumartesi
Bunu Biz Yaptık Beğenir Misiniz Bilmem (Beğenen Yorum Yazsın:) )
Bunda Biraz Hatalar Var Ama Beğeneceğinizi Farz Ediyoruz:
Bazı hatalar var. Mesela en başta ağaç dönüyor, bazı yazılar çok kısa sürüyor (gerçi bu bizim değil uygulamanın suçu :) ), bazı yazılar yerlerinden kaymış, bazı yerlerde kamera kaydığı için oynama var ve en önemlisi de bazı yerlerde parmak görünüyor...
Bunu yaptığımız uygulamanın adı:
Minecraft Stop-Motion Movie Creator
!En önemlisi bu uygulama bizim bildiğimiz birtek "APPLE"larda var!
15 Mart 2016 Salı
7 Ekim 2015 Çarşamba
Bu Video Animasyonlarını Seveceksiniz
Bu videoları biz beğendik. İzlemenizi tavsiye ederiz:
Batalha no Mega Walls - FILME (Minecraft Animation),
Warlords: Domination - Cinematic Trailer [Minecraft Animation],
Notch vs Herobrine - Minecraft Fight Animation,
♪ "Hunger Games Song" - A Minecraft Parody of Decisions by Borgore (Music Video),
♪ "Bajan Canadian Song" - A Minecraft Parody of Imagine Dragons (Music Video),
♪ Minecraft Song "Remember Our Love" Endstone - Parody (Music Video Top Minecraft Song 2015).
Bu müziklerin ismini kopyalayarak YouTube'un arama kutucuğuna yapıştırarak aratabilirsiniz.
19 Eylül 2015 Cumartesi
SİTEMİZE YENİ NELER GELECEK
Yukarıdan tema seçimi, (MİNECRAFT, MİNECRAFT MİNİ FİGÜRLERİ.) sağ kenarda önerdiğimiz videolar ya da bizim videolarımız, çok daha yeni yazılar, dil seçimi, sağ tarafta video çubuğu, (bu video çubuğu her sitemize girdiğinizde değişir.) vb.
17 Eylül 2015 Perşembe
MİNECRAFT MİNİ FİGÜRLERİ (SERİ 3)
Minecraft mini figürlerinin 3. serisi de aynı diğerleri gibi Minecrafta çok benzer. Bu seride Steve (elmas setli ve elmas kılıçlı), ahtapot, hortlak, mantar ineği, wither iskeleti, yanan zombi, blaze, zombi (demir setli), Steve (maden arabalı)(minecart), Alex (altın kazmalı), mağara örümceği, iskelet at, slime, endermite, koyun (siyah) ve gardiyan var. Şimdilik bu kadar. 4. seri çıkarsa tekrar yazacağım.
Bizde bir yanan zombi, ahtapot ve mantar ineği var.
Eğer beğendiyseniz başkalarına da bakmalarını önerin ve yorum yazın.
Bizde bir yanan zombi, ahtapot ve mantar ineği var.
Eğer beğendiyseniz başkalarına da bakmalarını önerin ve yorum yazın.
Kaydol:
Kayıtlar (Atom)