السلام عليكم 
اعرض عليكم مجموعة من الاكواد و المقاطع البرمجية الرائعه و الممتعة التي نستطيع استعمالها في برنامج السمول بيسك 

المقطع الاول 
التسلية في لغة Small Basic Do
PHP كود :

الكود:

GraphicsWindow.Show()
GraphicsWindow.Title="Basil"
GraphicsWindow.Width = 300
GraphicsWindow.Height = 200 
For x = 0 To 299 
  For y = 0 To 199 
    GraphicsWindow.SetPixel(y,x , GraphicsWindow.GetRandomColor())
  EndFor 
EndFor 
   





المقطع الثاني
التسلية في لغة Small Basic Do
PHP كود :

الكود:

GraphicsWindow.Show()
GraphicsWindow.BackgroundColor = "black"
GraphicsWindow .Width =300
GraphicsWindow.Height = 300 
GraphicsWindow.PenColor = "Blue"
For i = 1 To 10 
  GraphicsWindow.PenWidth = 1
  GraphicsWindow.DrawLine( 20 , i * 15 , 180 , i * 15 ) 
EndFor 










المقطع الثالث

التسلية في لغة Small Basic Do
PHP كود :

الكود:

sides = 50 
lenght = 400 / sides 
angle = 360 / sides 
Turtle.Speed = 100
For j = 1 To 20 
  For i = 1 To sides 
    Turtle.Move(lenght )
    Turtle.Turn(angle )
  EndFor 
  Turtle.Turn(18)
  EndFor