none
mahreen miangul MaRch 2018 RRS feed

  • Question

  • ' mahreen miangul
    '12th March 2018
    GraphicsWindow.penColor = "darkslategray"
    GraphicsWindow.DrawRectangle(100, 100, 70, 40)
    GraphicsWindow.DrawRectangle(120, 130, 26, 6)
    GraphicsWindow.DrawRectangle(94, 110, 6, 14)
    GraphicsWindow.DrawRectangle(170, 110, 6, 14)
    GraphicsWindow.BrushColor = "Gainsboro"
    GraphicsWindow.fillRectangle(100, 100, 70, 40)
    GraphicsWindow.fillRectangle(94, 110, 6, 14)
    GraphicsWindow.fillRectangle(170, 110, 6, 14)
    GraphicsWindow.penColor = "darkslategray"
    GraphicsWindow.Drawellipse(110, 108, 15, 15)
    GraphicsWindow.Drawellipse(140, 108, 15, 15)
    GraphicsWindow.BrushColor = "DarkOrange"
    GraphicsWindow.fillellipse(110, 108, 15, 15)
    GraphicsWindow.fillellipse(140, 108, 15, 15)
    GraphicsWindow.brushColor = "darkslategray"
    GraphicsWindow.fillRectangle(120, 130, 26, 6)

    will someone will draw the shape in a different way

    Sunday, March 11, 2018 3:32 PM

Answers

  • Here is my list of the unzip. I marked the two files which you have to copy to the SmallBasic/lib folder.

    Jan [ WhTurner ] The Netherlands

    • Marked as answer by mussamaina Tuesday, March 20, 2018 12:04 PM
    Monday, March 19, 2018 12:22 PM
    Answerer

All replies

  • ... shape in a different way  ???

    You want the face in a single Shape (or Image)?? ...

    then simply add following lines after your posted code.

    '' using LitDev ext ->  whole face/Shape is in 'shp' (w=84, h=44)
    img = LDGraphicsWindow.Capture("","")
    LDImage.Crop(img, 93,98, 84,44)
    LDImage.MakeTransparent(img, "White")
    GraphicsWindow.BrushColor = "Red"
    
    bg = Shapes.AddRectangle(100,50)  '*
    LDShapes.PenWidth(bg, 0)  '*
    
    shp = Shapes.AddImage(img)      'SHAPE/IMAGE WITH FACE
    
    ''Demo  *ff. below
    Shapes.Move(shp, 7,3)
    
    LDShapes.AnimateOpacity(bg, 500,4.5)  ' ending transp. , delay 500*4.5   + additional ~1000
    Program.Delay(3500)
    Shapes.Remove(bg)
    Shapes.Animate(shp, 93,98, 3000)    ' delay 3000  + additional 1000
    
    ' demonstrate it's a single object
    Program.Delay(4000)
    cur = LDCursors.CreateCursor(img, 0,0)
    LDCursors.SetUserCursor(cur)
    the lines marked with *  are not necessary and are only for demonstration

         ...  LDImage.SaveAs(img, Program.Directory +"\RoboFace.png")

    Monday, March 12, 2018 10:13 PM
    Answerer
  • Use LDShapes.AddPolygon

    GraphicsWindow.penColor = "darkslategray"
    GraphicsWindow.BrushColor = "Gainsboro"
    points="1=1\=100\;2\=100\;;2=1\=100\;2\=110\;;3=1\=95\;2\=110\;;4=1\=95\;2\=125\;;5=1\=100\;2\=125\;;6=1\=100\;2\=140\;;7=1\=170\;2\=140\;;8=1\=170\;2\=125\;;9=1\=175\;2\=125\;;10=1\=175\;2\=110\;;11=1\=170\;2\=110\;;12=1\=170\;2\=100\;;"
    LDShapes.AddPolygon(points)
    GraphicsWindow.BrushColor = "DarkOrange"
    ell1=Shapes.AddEllipse(15,15)
    Shapes.Move(ell1,110,108)
    ell2=Shapes.AddEllipse(15,15)
    Shapes.Move(ell2,140,108)
    GraphicsWindow.penwidth =3
    rec=Shapes.AddRectangle(26,6)
    Shapes.Move(rec,120,130)

    Tuesday, March 13, 2018 1:40 AM
    Answerer
  • with thnks i have downloaded LitDev_v1.2 but cant even open it  please need help with ld extantions 

    thankyou                                                                                               mahreen miangul

    Wednesday, March 14, 2018 6:34 AM
  • same help.

    see this will help you.

    https://social.msdn.microsoft.com/Forums/en-US/35da1c64-eea8-409d-966e-b4947ce21cae/unable-to-use-programs-with-extensions?forum=smallbasic

    Wednesday, March 14, 2018 8:06 AM
    Answerer
  • is it a website or what please explain in a simple way                                    mahreen miangul
    Friday, March 16, 2018 3:36 AM
  • 1)Download Litdev_ver1.2.zip    file from Litdev.uk site.
    2)Unzip  it
    3)Unblock LitDev.dll and LitDev.xml  ( see below photo)
    4)Copy them to C:\Program Files (x86)\Microsoft\Small Basic\Lib   folder

    Friday, March 16, 2018 4:20 AM
    Answerer
  • can not find litdev.dill properties-- in LitDev_v1.2 it must by another name                mahreen miangul
    Saturday, March 17, 2018 11:04 AM
  • It is not litdev.dill but litdev.dll (  .DLL ) without the i.

    Jan [ WhTurner ] The Netherlands

    Saturday, March 17, 2018 12:06 PM
    Answerer
  •  i have  Litdev_ver1.2.zip   and i have unzip it  but it has no folder--LitDev.dll and LitDev.xml  if you say i will post the unzip version here with thanks                                                                                  mahreen miangul
    Monday, March 19, 2018 11:49 AM
  • Here is my list of the unzip. I marked the two files which you have to copy to the SmallBasic/lib folder.

    Jan [ WhTurner ] The Netherlands

    • Marked as answer by mussamaina Tuesday, March 20, 2018 12:04 PM
    Monday, March 19, 2018 12:22 PM
    Answerer