Sorry your browser is not supported!

//
// Project: sorting problem 
// Created: 23-03-12

// show all errors

SetErrorMode(2)

// set window properties
SetWindowTitle( "sorting problem" )
SetWindowSize( 1024, 768, 0 )
SetWindowAllowResize( 1 ) // allow the user to resize the window

// set display properties
SetVirtualResolution( 1024, 768 ) // doesn't have to match the window
SetOrientationAllowed( 1, 1, 1, 1 ) // allow both portrait and landscape on mobile devices
SetSyncRate( 30, 0 ) // 30fps instead of 60 to save battery
SetScissor( 0,0,0,0 ) // use the maximum available screen space, no black borders
UseNewDefaultFonts( 1 )

a as integer:b as integer:c as integer:d as integer:e as integer

a = random(1,100)
b = random(1,100)
c = random(1,100)
d = random(1,100)
e = random(1,100)



type myType
    ID as integer
    name as integer
endtype
myArray as myType[5]
myArray[0].ID = 1 : myArray[0].name = a
myArray[1].ID = 2 : myArray[1].name = b
myArray[2].ID = 3 : myArray[2].name = c
myArray[3].ID = 4 : myArray[3].name = d
myArray[3].ID = 5 : myArray[3].name = e

myArray.sort() //********************

do
print( myArray[0].name) 	
print( myArray[1].name)
print( myArray[2].name)
print( myArray[3].name)
print( myArray[4].name)	
	
	Sync()
loop

global a as integer:b as integer:c as integer:d as integer:e as integer
 
a = random(1,100)
b = random(1,100)
c = random(1,100)
d = random(1,100)
e = random(1,100)


type MyType
    ID as integer
    name as integer
    
endtype

global myArray as MyType[5]
myArray[0].ID = 1 : myArray[0].name = a
myArray[1].ID = 2 : myArray[1].name = b
myArray[2].ID = 3 : myArray[2].name = c
myArray[3].ID = 4 : myArray[3].name = d
myArray[4].ID = 5 : myArray[4].name = e

Sort(myArray)

do
	print(myArray[0].ID)     
	print(myArray[1].ID)
	print(myArray[2].ID)
	print(myArray[3].ID)
	print(myArray[4].ID) 
   
   Sync()
   
loop


function Sort(this ref as MyType[])
	local go as integer
	
	repeat
		go = 0
		
		for i = 0 to this.length - 1
			if this[i].ID > this[i + 1].ID
				this.swap(i, i + 1)
				
				go = 1
				
			endif
			
		next i
		
	until go = 0
	
endfunction

global a as integer:b as integer:c as integer:d as integer:e as integer
 
a = random(1,100)
b = random(1,100)
c = random(1,100)
d = random(1,100)
e = random(1,100)


type MyType
    ID as integer
    name as integer
    
endtype

global myArray as MyType[5]
myArray[0].ID = 1 : myArray[0].name = a
myArray[1].ID = 2 : myArray[1].name = b
myArray[2].ID = 3 : myArray[2].name = c
myArray[3].ID = 4 : myArray[3].name = d
myArray[4].ID = 5 : myArray[4].name = e

Sort(myArray)

do
	print(myArray[0].name)     
	print(myArray[1].name)
	print(myArray[2].name)
	print(myArray[3].name)
	print(myArray[4].name) 
   
   Sync()
   
loop


function Sort(this ref as MyType[])
	local go as integer
	
	repeat
		go = 0
		
		for i = 0 to this.length - 1
			if this[i].name > this[i + 1].name
				this.swap(i, i + 1)
				
				go = 1
				
			endif
			
		next i
		
	until go = 0
	
endfunction

// Project: sortarray 
// Created: 2023-03-12

// show all errors
SetErrorMode(2)

// set window properties
SetWindowTitle( "sortarray" )
SetWindowSize( 1024, 768, 0 )
SetWindowAllowResize( 1 ) // allow the user to resize the window

// set display properties
SetVirtualResolution( 1024, 768 ) // doesn't have to match the window
SetOrientationAllowed( 1, 1, 1, 1 ) // allow both portrait and landscape on mobile devices
SetSyncRate( 30, 0 ) // 30fps instead of 60 to save battery
SetScissor( 0,0,0,0 ) // use the maximum available screen space, no black borders
UseNewDefaultFonts( 1 ) // since version 2.0.22 we can use nicer default fonts

global a as integer:b as integer:c as integer:d as integer:e as integer
  
a = random(1,100)
b = random(1,100)
c = random(1,100)
d = random(1,100)
e = random(1,100)
 
 
type MyType
    ID as integer
    name as integer
     
endtype
 
global myArray as MyType[5]
myArray[0].ID = 1 : myArray[0].name = a
myArray[1].ID = 2 : myArray[1].name = b
myArray[2].ID = 3 : myArray[2].name = c
myArray[3].ID = 4 : myArray[3].name = d
myArray[4].ID = 5 : myArray[4].name = e
 
Sort(myArray)
 
do
    Print(a)
    Print(b)
    Print(c)
    Print(d)
    Print(e)
    Print(myArray.length) 
    print(Str(myArray[0].name) + " " + Str(myArray[0].ID))     
    print(Str(myArray[1].name) + " " + Str(myArray[1].ID))
    print(Str(myArray[2].name) + " " + Str(myArray[2].ID))
    print(Str(myArray[3].name) + " " + Str(myArray[3].ID))
    print(Str(myArray[4].name) + " " + Str(myArray[4].ID)) 
   Sync()
    
loop
 
 
function Sort(this ref as MyType[])
    local go as integer
    Local loptime as Float
    
    repeat
      go = 0
        
        for i = 0 to this.length - 2
            if this[i].name > this[i + 1].name
                this.swap(i, i + 1)
                go = 1
                 
            endif
            loptime = Timer()
            Repeat
				print(Str(myArray[0].name) + " " + Str(myArray[0].ID))     
				print(Str(myArray[1].name) + " " + Str(myArray[1].ID))
				print(Str(myArray[2].name) + " " + Str(myArray[2].ID))
				print(Str(myArray[3].name) + " " + Str(myArray[3].ID))
				print(Str(myArray[4].name) + " " + Str(myArray[4].ID)) 
				Print(i)
				Sync()
            Until GetPointerReleased() = 1 And loptime + 0.25 < Timer()
             
        next i
    until go = 0
     
endfunction

type myType
    ID as integer // This is sorted
    name as integer
endtype

global names as string[]
global ages as integer[]


InsertEntry("Bulbz", 48)
InsertEntry("Howard", 47)
InsertEntry("Cheesy", 70)
InsertEntry("Bob", 57)
InsertEntry("DeeDee", 41)
InsertEntry("Jason", 48)
InsertEntry("Steve", 56)
InsertEntry("Charlotte", 22)
InsertEntry("Lee", 21)




do
	if GetRawKeyPressed(27) then exit
	
	ShowTheData()
	
    Sync()
    
loop

end




function InsertEntry(name as string, age as integer)
	names.insert(name)
	ages.insert(age)
	
	Sort()
	
endfunction


function Sort()
	local go as integer
	
	repeat
		go = 0
		
		for i = 0 to names.length - 1
			if names[i] > names[i + 1]
				names.swap(i, i + 1)
				ages.swap(i, i + 1)
				
				go = 1
				
			endif
			
		next i
		
	until go = 0
	
endfunction


function ShowTheData()
	for i = 0 to names.length
		print(names[i] + ": " + str(ages[names.find(names[i])]))
		
	next i
	
endfunction

 print(myArray[1].ID )

    print(myArray[2].ID )
    print(myArray[3].ID )
    print(myArray[4].ID )
    print(myArray[5].ID )

global a as integer:b as integer:c as integer:d as integer:e as integer
  
a = random(1,100)
b = random(1,100)
c = random(1,100)
d = random(1,100)
e = random(1,100)
 
 
type MyType
    ID as integer
    name as integer
     
endtype
 
global myArray as MyType[5]
myArray[0].ID = 1 : myArray[0].name = a
myArray[1].ID = 2 : myArray[1].name = b
myArray[2].ID = 3 : myArray[2].name = c
myArray[3].ID = 4 : myArray[3].name = d
myArray[4].ID = 5 : myArray[4].name = e
 
Sort(myArray)
 
do
    print(myArray[0].name)     
    print(myArray[1].name)
    print(myArray[2].name)
    print(myArray[3].name)
    print(myArray[4].name) 
    
   Sync()
    
loop
 
 
function Sort(this ref as MyType[])
    local go as integer
     
    repeat
        go = 0
         
        for i = 0 to this.length - 1
            if this[i].name > this[i + 1].name
                this.swap(i, i + 1)
                 
                go = 1
                 
            endif
             
        next i
         
    until go = 0
     
endfunction

SetErrorMode(2)

myArray as integer[5]
myArray[0]=10
myArray[1]=10
myArray[2]=10
myArray[3]=10
myArray[4]=10

myArray.sort()

do
	
	print( myArray[0]) 	
	print( myArray[1])
	print( myArray[2])
	print( myArray[3])
	print( myArray[4])	
	print( myArray.length)
	
	Sync()
loop

a as integer:b as integer:c as integer:d as integer:e as integer
   
a = random(1,100)
b = random(1,100)
c = random(1,100)
d = random(1,100)
e = random(1,100)
  
  
type MyType
    ID as integer
    name as integer
      
endtype
  
global myArray as MyType[5]
myArray[0].ID = 1 : myArray[0].name = a
myArray[1].ID = 2 : myArray[1].name = b
myArray[2].ID = 3 : myArray[2].name = c
myArray[3].ID = 4 : myArray[3].name = d
myArray[4].ID = 5 : myArray[4].name = e
  
Sort(myArray)
 `print ascending numbers: 
do
    print(myArray[1].name)     
    print(myArray[2].name)
    print(myArray[3].name)
    print(myArray[4].name)
    print(myArray[5].name) 
     
//print corresponding variable names: (a,b,c,d,e) in order of which they are to be used- 
// on this, i simply put a letter 'c' in front of the numbers and I extrapolate  the final variables as c1,c2,c3,c4 and c5
// which are used in the main game program.
 
   print("") 
    print(myArray[1].ID )
    print(myArray[2].ID )
    print(myArray[3].ID )
    print(myArray[4].ID )
    print(myArray[5].ID )
     Sync()
loop
  
  
function Sort(this ref as MyType[])
    local go as integer
      
    repeat
        go = 0
          
        for i = 0 to this.length - 1
            if this[i].name > this[i + 1].name
                this.swap(i, i + 1)
                  
                go = 1
                  
            endif
              
        next i
          
    until go = 0
      
endfunction

global myArray as string[]
global replacementArray as string[]

myArray = ["A", "B", "C"]
replacementArray = ["D", "E", "F"]

myArray = ModifyArray(replacementArray)

do
    for i = 0 to myArray.length
    	print(myArray[i])
    	
    next i
    
    Sync()
    
loop


function ModifyArray(replacementData as string[])
	// No internal stuff needed as this just returns an array of strings.
	
endfunction replacementData

global myArray as string[]
global replacementArray as string[]

myArray = ["A", "B", "C"]
replacementArray = ["D", "E", "F"]

ModifyArray(myArray, replacementArray)

do
    for i = 0 to myArray.length
    	print(myArray[i])
    	
    next i
    
    Sync()
    
loop


function ModifyArray(thisArray ref as string[], replacementData as string[])
	thisArray = replacementData
	
endfunction // This returns nothing as the array that is parsed into thisArray is directly modified.