NEWS ARTICLES


    What's News in the PlayBasic world ? - Find out here.




 PlayBasic Tutorial: Intro To Functions - (2018-07-06)

By: Kevin Picone Added: July 7th, 2018

Category: All,Video,Beginner,Types,List,Functions,Variables,Getting Started,Tutorials

PlayBasic Tutorial: Intro To Functions - (2018-07-06)

     Hi welcome to our Intro to Functions tutorial. In this tutorial we start out with some revision of Gosub / Return statements, which are used to create a simple sub routine. Sub routines are changes in program flow, allowing the programmer to execute a chunk of code that's external to the section they may be writing, then upon completion the control returns to the caller. This is the same basic model that functions introduction to our programming, except functions are more formalized. Meaning they have some strict rules about syntax and intro a new concepts such as scope changes, which sub routines don't have.

The types of functions shown in video are very simple, initially we start by taking a sub routine that prints rows of text and convert that to function. Through this process we encounter our first problem which is variable scope and look at ways to solve it, such as making our variable global, or better yet passing a variable into the function as a parameter . Later in the video, we create our own custom distance function, as well building a function that does some simple string manipulation

NOTE: This video was recorded alive with only a few changes for length..




Example Code:
PlayBasic Code:
      print ProcessString( "-------Hello World-------")
         print ProcessString( "    1234     " )
         

         Dist# = CustomDistance( 100,100,700,300)
         
         print dist#


         for lp =0 to 10
               Print_Lines_function( lp )         
         next
         print "--------------------------------------------------"
         
         sync
         waitkey
   
         end      
      



function Print_Lines_function( LoopCounter )
         print "--------------------------------------------------"
         print "Loop Counter="+str$(LoopCounter)
endfunction 

         
         
Function CustomDistance( X1#,Y1# , X2#,Y2#)
   
         DX# = abs(X1#-X2#)
         DY# = abs(Y1#-Y2#)
         
         DistResult# = sqrt( DX# * DX# + Dy# * DY#)   
   
EndFunction DistResult#

         
         
Function ProcessString( MyString$)   

         MyString$ = trim$(MyString$,"-")

         MyString$ = Replace$( MyString$," ","~" )

EndFunction MyString$


COMMANDS USED: PRINT | SYNC | WAITKEY | STR$ | ABS | SQRT | TRIM$ | REPLACE$ |
Links:

     Get Source Code Example For This Tutorial





 PlayBasic Tutorial: From Arrays To Types (Intro To Types)

By: Kevin Picone Added: June 27th, 2018

Category: All,Video,Beginner,Types,List,Arrays,Variables,Getting Started,Tutorials

PlayBasic Tutorial: From Arrays To Types (Intro To Types) - (2018-06-12)

    This tutorial picks up where the previous variables to arrays tutorial left off, in that it takes the array code, demos that code then we set about converting the parallel array approach shown in the previous tutorial and we build a structure (TYPE) to hold each characters properties. Once the type has been defined that includes all the required properties, we then define a typed array that will house the collection of characters. Later in the video take a look at using typed lists also. So if your struggling with types this could be a good place to start.



Example #1 - Converting the Parallel Arrays To Typed Array

PlayBasic Code:
   Setfps 20

   Number_Of_Characters = 50

   type tCharacter
         Xpos#
         Ypos#
         Xspeed#
         Yspeed#
         Colour
         Size
   endtype


   dim Characters(Number_Of_Characters) as tCharacter 

   
   for lp = 1 to Number_Of_Characters

         ;  Allocate a newe tCharacter and place it's handle
         ;  into the Character(lp) array / container at this position         
         Characters(lp) = new tCharacter
                  
         Characters(lp).Xpos  = rnd(800)
         Characters(lp).Ypos  = rnd(600)
         Characters(lp).Size  = rndrange(16,50)
         Characters(lp).Xspeed = rndrange(-5, 5)
         Characters(lp).Yspeed = rndrange(-5,5)
         Characters(lp).Colour = rndrgb()
         
   next
   
  
  //-------------------------------------------------------
  //---[ MAIN LOOP ]---------------------------------------
  //-------------------------------------------------------
   
  do 
     
        Cls rgb(0,400,20)
        
        for lp = 1 to Number_Of_Characters
           Radius = Characters(lp).Size
            x#=Characters(lp).Xpos
            y#=Characters(lp).Ypos
   

           circlec X#,Y#,Radius,true,Characters(lp).Colour
                    
           x# = wrapvalue(x# + Characters(lp).Xspeed , -Radius, 800 + Radius)
           y# = wrapvalue(y# + Characters(lp).Yspeed , -Radius, 600 + Radius)
          
           Characters(lp).xpos= x#
           Characters(lp).ypos= y#             
        next
          
        Sync
     loop


COMMANDS USED: SETFPS | DIM | NEW | RND | RNDRANGE | RNDRGB | CLS | RGB | CIRCLEC | WRAPVALUE | SYNC |



Example #2 - Converting Typed Array To Typed List

PlayBasic Code:
   Setfps 20

   Number_Of_Characters = 50

   type tCharacter
         Xpos#
         Ypos#
         Xspeed#
         Yspeed#
         Colour
         Size
   endtype


   dim Characters as tCharacter  list 

   
   for lp = 1 to Number_Of_Characters
      
         Characters = new tCharacter
                  
         Characters.Xpos  = rnd(800)
         Characters.Ypos  = rnd(600)
         Characters.Size  = rndrange(16,50)
         Characters.Xspeed = rndrange(-5, 5)
         Characters.Yspeed = rndrange(-5,5)
         Characters.Colour = rndrgb()
         
   next
   
  
  //-------------------------------------------------------
  //---[ MAIN LOOP ]---------------------------------------
  //-------------------------------------------------------
   
  do 
     
        Cls rgb(0,400,20)
        
        for each Characters()
           
           Radius = Characters.Size
            x#=Characters.Xpos
            y#=Characters.Ypos
   

           circlec X#,Y#,Radius,true,Characters.Colour
                    
           x# = wrapvalue(x# + Characters.Xspeed , -Radius, 800 + Radius)
           y# = wrapvalue(y# + Characters.Yspeed , -Radius, 600 + Radius)
          
           Characters.xpos= x#
           Characters.ypos= y#             
        next
          
        Sync
     loop


 


COMMANDS USED: SETFPS | DIM | LIST | NEW | RND | RNDRANGE | RNDRGB | CLS | RGB | CIRCLEC | WRAPVALUE | SYNC |


Links:

    * PlayBasic Tutorial: From Arrays To Types (Intro To Types) Source Code





 PlayBasic LIVE: Creating a library (Xml Parser)

By: Kevin Picone Added: October 19th, 2017

Category: All,Tutorials,Video,Series,XML

     Welcome, in this series of videos I take a step by step approach to creating function library in PlayBasic. The created library loads and parses XML files and is largely build on the fly, with no planning, so it's warts and all, but the goal here is to give you a birds eye view of how you might go about building your own libraries. Have fun !

Watch On youTube PlayBasic LIVE: Creating a library (Xml Parser)

For Source codes and videos PlayBasic Live: Creating a library (XML Parser) Series





 PlayBasic Tutorial: From Variables To Arrays (Intro To Arrays)

By: Kevin Picone Added: September 21st, 2017

Category: All,Variables,Array,Tutorials,Beginner

PlayBasic Tutorial: From Variables To Arrays (Intro To Arrays) 2017-09-17

    Welcome programmers, in this tutorial we're going to introduce the concept of arrays starting out from variables. So first we build a simple game loop that controls two characters using only variables. The characters are represented on screen as filled circles. After we get up to speed with the variable version we then move onto how we can use parallel integer arrays to store the various properties of the characters. The array version can control as many or as few characters as you like, which is the benefit of Arrays over Variables

Want to learn 2D game programming ?


Video:



Example #1 - Variables Example

PlayBasic Code:
   Xpos1  = 400
   Ypos1  = 300
      
   Xpos2  = 100
   Ypos2  = 100

      
   setfps 20   
      
  do    

    cls rgb(10,20,40)

	; Draw circle 1        
     Circle Xpos1,Ypos1, 32, true
   
     Xpos1 = Xpos1 + 2
     Ypos1 = Ypos1 - 4
  
   	Xpos1 = WrapValue(Xpos1,0,800)	  
    	Ypos1 = WrapValue(Ypos1,0,600)	  
   
   

	; Draw circle 2      
     Circle Xpos2,Ypos2, 64, true
   
     Xpos2 = Xpos2 + 2
     Ypos2 = Ypos2 + 2
    	Xpos2 = WrapValue(Xpos2,0,800)	  
    	Ypos2 = WrapValue(Ypos2,0,600)	  
  
     sync
  loop
  
 

COMMANDS USED: SETFPS | CLS | RGB | CIRCLE | WRAPVALUE | SYNC |


Example #2 - Arrays Example - Using Parallel Arrays To Store Character Properties
PlayBasic Code:
 Setfps 20

   Number_Of_Characters = 50 

   dim Xpos( Number_Of_Characters  )
   dim Ypos( Number_Of_Characters  )
   dim size( Number_Of_Characters  )
   dim Xspeed( Number_Of_Characters )
   dim Yspeed( Number_Of_Characters )
   dim Colour( Number_Of_Characters )
   
   
   for lp = 1 to Number_Of_Characters
 	     Xpos(lp)  = rnd(800)
 		  Ypos(lp)  = rnd(600)
 		  Size(lp)  = rndrange(16,50)
  		 Xspeed(lp) = rndrange(-5, 5)
   	 Yspeed(lp) = rndrange(-5,5)
   	 Colour(lp) = rndrgb()
   next
   
   
  do 
  	
  	   Cls rgb(0,400,20)
  	   
  	   for lp=1 to Number_Of_Characters
  	      
  	      Radius = Size(lp)

  	      circlec xpos(lp),ypos(lp),Radius,true,Colour(lp)
  	      
  	    //  xpos(lp) = Xpos(lp) + Xspeed(lp)
  	    //  ypos(lp) = ypos(lp) + Yspeed(lp)
  	      
  	      xpos(lp) = wrapvalue(xpos(lp) + Xspeed(lp) , -Radius, 800 + Radius)
  	      ypos(lp) = wrapvalue(ypos(lp) + Yspeed(lp) , -Radius, 600 + Radius)
  	        	      
  		next
  	  	
  	   Sync
  	loop

COMMANDS USED: SETFPS | DIM | RND | RNDRANGE | RNDRGB | CLS | RGB | CIRCLEC | WRAPVALUE | SYNC |




 PlayBasic Live: 2D Optimization Tips (2 videos)

By: Kevin Picone Added: June 20th, 2017

Category: All,Tutorials,Video

PlayBasic Live: 2D Optimization Tips - Dirty Rects (2017-06-19)

     Welcome... Today we continue with some rendering optimization ideas, focusing on a concept known as dirty rectangles in programming circles. While there's a number of different methods, in this video we look through code that uses a map as background replacement, allowing the redraw code to selectively refresh parts of the backdrop each frame instead of the whole thing. The code computes the redraw percentage each frame, which is often lower than 50%, in the sprite scene saving not only processing time by lowering a games system requirements.



PlayBasic LIVE: Basic Optimization with overview of forums (2017-04-29)

     Here's a live video basically talking about the forums and code optimizations mainly.. I'm really just testing video recording on a different machine with a head set mic etc.. sadly the results are pretty sucky, but content is ok so here it is







 PlayBasic LIVE - Intro to G2d (openGL for PlayBasic)

By: Kevin Picone Added: May 9th, 2017

Category: All,Tutorials,Video,OpenGL,G2D

PlayBasic LIVE: Intro to G2D (openGL library for PlayBasic) 2017-05-07





 PlayBasic LIVE: Basic Optimization with overview of forums

By: Kevin Picone Added: April 30th, 2017

Category: All,Tutorials,Video

PlayBasic LIVE: Basic Optimization with overview of forums (2017-04-29)

Here's a live video basically talking about the forums and code optimizations mainly.. I'm really just testing video recording on a different machine with a head set mic etc.. sadly the results are pretty sucky, but content is ok so here it is

(NOTE: LOW AUDIO ) Watch On YouTube




 PlayBasic Tutorial: Learn BASIC Programming Tutorial Introduction

By: Kevin Picone Added: April 26th, 2017

Category: All,Tutorials,Video

PlayBasic Tutorial: Learn BASIC Programming Tutorial Introduction

Welcome... This video isn't a tutorial, but the introduction to our learn PlayBasic programming series for beginners. These videos take new user through some of the fundamentals of BASIC programming. Which is all the boring the stuff you need to learn, in order to make anything fun. We know it's not easy so our advice is to use these videos / help files and forums together. Don't just watch the videos, but sit down try to code something using the ideas. It might seem hard initially, but you will get it ! And most importantly have some fun





Watch Learn PlayBasic programming Tutorial Play list on youtube!






Viewing Page [1] of [2]



 

 
     
 
       

(c) Copyright 2002 / 2024 Kevin Picone , UnderwareDesign.com  - Privacy Policy   Site: V0.99a [Alpha]