| Welcome, Guest |
You have to register before you can post on our site.
|
| Online Users |
There are currently 61 online users.
» 0 Member(s) | 59 Guest(s)
Applebot, Bing
|
| Latest Threads |
Example Program
Forum: Extensions
Last Post: martmen
03-13-2026, 04:15 PM
» Replies: 0
» Views: 30
|
BASIC Jam 7 is in progres...
Forum: Discussion
Last Post: eddylo
03-11-2026, 12:40 AM
» Replies: 3
» Views: 117
|
LitDev extension
Forum: Extensions
Last Post: martmen
02-24-2026, 07:20 AM
» Replies: 2
» Views: 168
|
Button with icons
Forum: Extensions
Last Post: martmen
02-09-2026, 06:33 PM
» Replies: 6
» Views: 290
|
How to think correctly?
Forum: Discussion
Last Post: litdev
02-06-2026, 04:20 PM
» Replies: 47
» Views: 17,221
|
Draw sample
Forum: Extensions
Last Post: martmen
01-29-2026, 06:51 PM
» Replies: 13
» Views: 662
|
Drawing
Forum: Extensions
Last Post: AbsoluteBeginner
01-29-2026, 10:53 AM
» Replies: 1
» Views: 180
|
ZScript
Forum: Discussion
Last Post: z-s
01-22-2026, 03:31 AM
» Replies: 0
» Views: 140
|
I think that no more Smal...
Forum: Discussion
Last Post: eddylo
01-20-2026, 11:02 PM
» Replies: 0
» Views: 118
|
Small Basic Coder-A New G...
Forum: Discussion
Last Post: AbsoluteBeginner
01-17-2026, 07:57 PM
» Replies: 1
» Views: 512
|
|
|
| How Does Slider Work ? |
|
Posted by: ata - 07-16-2024, 06:51 AM - Forum: Challenges
- Replies (6)
|
 |
Hi everybody  The following does not work properly.Could you please help me understand the slider logic?
Code: x[1]= Shapes.AddText(1)
Shapes.Zoom(x[1],7,7)
Shapes.Move(x[1],600,120)
For i= 2 To 12
x[i]= Shapes.AddText(i)
Shapes.Zoom(x[i],7,7)
y= Shapes.GetTop(x[i-1])
Shapes.Move(x[i],600,y+105)
y= Shapes.GetTop(x[i])
EndFor
LDControls.SliderMaximum= 2
Slider= LDControls.AddSlider(40,600,"V")
Shapes.Move(slider,500,100)
t= LDControls.SliderGetValue(slider)
Stack.PushValue("t",t)
LDControls.SliderChanged= change
Sub change
t= Stack.PopValue("t")
z= LDControls.SliderGetValue(slider)
If z>t Or z=t Then
For i= 1 To 12
Shapes.Move(x[i],600,Shapes.GetTop(x[i])-2)
EndFor
v= LDControls.SliderGetValue(Slider)
Stack.PushValue("t",v)
ElseIf z<t then
For i= 1 To 12
Shapes.Move(x[i],600,Shapes.GetTop(x[i])+2)
EndFor
v= LDControls.SliderGetValue(Slider)
Stack.PushValue("t",v)
EndIf
EndSub
|
|
|
| Extension updates |
|
Posted by: litdev - 07-15-2024, 09:30 AM - Forum: Extensions
- Replies (6)
|
 |
Updated a couple extensions available through SB-Prime Extension Manager.
SmallBasicANN - Added intellisense and some additional reporting during (through ANNProgress event) and after training (GetWeights). The main ANN algorithm is unchanged.
LitDev - Added methods to detect text and images within another larger image, examples (text in image JLVQ434.000, uses pre-trained ANN by tesseract OCR) (image in image VXDM285.000).
|
|
|
|
| 3D Programming in SB |
|
Posted by: litdev - 07-08-2024, 09:29 AM - Forum: Discussion
- Replies (12)
|
|
(07-07-2024, 06:22 PM)AbsoluteBeginner Wrote: I am surprised by the 3D capabilities of Small Basic that SB received from the LD extension. 
It seems to me that if I see a few more such expressive examples of 3D applications, then I will also have different ideas so that I can test myself in 3D programming. 
To be honest, most of the effort writing this kind of thing is all the extra bits that make a game such as intro screen, scoring, levels, level editor (VLFW776.000-0), testing etc.
There is also a bit of learning about the basics of 3D - You can see I just use squashed cubes and used spheres which are single commands in SB - you then build objects by having several of them (created and positioned in a for loop). You need to understand the 3D coordinate system X,Y,Z how to position and point things like objects, lights and the camera and that's about it.
As I say, if you look at the code, the actual 3D stuff is minimal, the rest is just making a game around it. I am very happy to help you guys get started with this (this is what I hope this forum can be for) - the process is to create small test programs to gain understanding first, just like with your AI game or ZS's extension - its step by step and the magic comes when you put all the little bits together!
Ideally, if a few of you are interested we can start at the beginning and work on 3D, physics or game design. Otherwise I can only share bits of code occasionally which I don't think gets things so much further forward and may put people off.
How about a 'game of life' in 3D using Elzaimer's idea (https://litdev.uk/mybb/showthread.php?tid=95)?
|
|
|
|
| ZSCmd Extension |
|
Posted by: z-s - 07-01-2024, 09:35 AM - Forum: Extensions
- Replies (3)
|
 |
I Made A Small Extension For SmallBasic In SharpDevelop As My First Extension In CSharp.
It Is ZSCmd Contain Only One Method For Execute Of Any Cmd Command.
Here You Can Download It : https://www.mediafire.com/file/ftwbu27mv...d.zip/file
I Will Be Very Grateful To Litdev If This Extension Will Be Added In Extension Manager.
Here Is Sample Code To Try
Code: result = ZSCmd.Execute("dir")
TextWindow.WriteLine(result)
|
|
|
|
| Is it possible to run a SB program on an internet navigator ? |
|
Posted by: Elzaimer - 06-30-2024, 08:41 PM - Forum: Standard Small Basic
- Replies (2)
|
 |
I don't think it is possible but... can I use a SB BASIC program, such as my Concentration test, on a navigator such as Chrome ?
I have seen on the "Publish" button that we can install Microsoft Silverlight.
It is to be able to execute à SB program on a navigator ?
Even more, would it be possible on Chrome or Safari on a smartphone ?
Thanks
|
|
|
|
ZSDesk |
|
Posted by: z-s - 06-27-2024, 03:28 PM - Forum: Discussion
- No Replies
|
|
So Many Projects Working In Our Community So I Started A New Project.
ZSDesk
In This Project I Am Using LDClient And LDServer To Control Graphic Window On Another Computer From Another Computer So That Friends Can Write On Each Other Screen , Draw Text , Add Buttons.
But Everyone Will Have Their Own Code To Communicate (Basically IP : Port of Server).
I Will Soon Provide First Version Of The Program.
I Named This Project ZSDesk (A Small Competitor Of Anydesk).
Any Ideas Are Welcome
I Made first Version With Only One Function DrawBoundText On Client Try It.
Send This Input From Server : GW.DrawBoundText,x-position,y-position,width,text
Example : GW.DrawBoundText,0,0,100,HII SB
Client : JFBB226.000
Server : SSWQ838.000
|
|
|
|
|
