examples: Update wiki code snippets

Author: dkl

examples/manual/casting/boolean.bas

@@ -0,0 +1,19 @@
+'' examples/manual/casting/boolean.bas
+''
+'' NOTICE: This file is part of the FreeBASIC Compiler package and can't
+''         be included in other distributions without authorization.
+''
+'' See Also: http://www.freebasic.net/wiki/wikka.php?wakka=KeyPgCbool
+'' --------
+
+' Using the CBOOL function to convert a numeric value
+
+'Create an BOOLEAN variable
+Dim b As BOOLEAN
+
+'Convert a numeric value
+b = CBOOL(1)
+
+'Print the result, should return True
+Print b
+Sleep

examples/manual/datatype/boolean-false.bas

@@ -0,0 +1,14 @@
+'' examples/manual/datatype/boolean-false.bas
+''
+'' NOTICE: This file is part of the FreeBASIC Compiler package and can't
+''         be included in other distributions without authorization.
+''
+'' See Also: http://www.freebasic.net/wiki/wikka.php?wakka=KeyPgFalse
+'' --------
+
+Dim b As Boolean = False
+If b Then
+	Print "b is True"
+Else
+	Print "b is False"
+End If

examples/manual/datatype/boolean-true.bas

@@ -0,0 +1,14 @@
+'' examples/manual/datatype/boolean-true.bas
+''
+'' NOTICE: This file is part of the FreeBASIC Compiler package and can't
+''         be included in other distributions without authorization.
+''
+'' See Also: http://www.freebasic.net/wiki/wikka.php?wakka=KeyPgTrue
+'' --------
+
+Dim b As Boolean = True
+If b Then
+	Print "b is True"
+Else
+	Print "b is False"
+End If

examples/manual/datatype/boolean.bas

@@ -0,0 +1,11 @@
+'' examples/manual/datatype/boolean.bas
+''
+'' NOTICE: This file is part of the FreeBASIC Compiler package and can't
+''         be included in other distributions without authorization.
+''
+'' See Also: http://www.freebasic.net/wiki/wikka.php?wakka=KeyPgBoolean
+'' --------
+
+Dim boolvar As Boolean
+boolvar = True
+Print "boolvar = ", boolvar

examples/manual/gfx/imageinfo.bas

@@ -22,7 +22,7 @@ End If
 
 '' Draw a pattern on the image by directly manipulating pixel memory.
 For y As Integer = 0 To 63
-	Dim row As UInteger Ptr = pixels + y * pitch
+	Dim row As ulong Ptr = pixels + y * pitch
 
 	For x As Integer = 0 To 63
 		row[x] = RGB(x * 4, y * 4, (x Xor y) * 4)

examples/manual/gfx/screenptr2.bas

@@ -35,16 +35,16 @@ ScreenLock()
 	For y As Integer = 0 To h - 1
 
 	    '' Set pixel address to the start of the row
-	    '' It's a 32-bit pixel, so use a UInteger Ptr
-	    Dim As UInteger Ptr pixel = row
+	    '' It's a 32-bit pixel, so use a ULong Ptr
+	    Dim As ULong Ptr pixel = row
 
 	    For x As Integer = 0 To w - 1
 
 	        '' Set the pixel value
 	        *pixel = RGB(x, x Xor y, y) 
 
 	        '' Get the next pixel address 
-	        '' (UInteger Ptr will increment by 4 bytes)
+	        '' (ULong Ptr will increment by 4 bytes)
 	        pixel += 1
 
 	    Next x

examples/manual/operator/not-equal2.bas

@@ -6,5 +6,5 @@
 '' See Also: http://www.freebasic.net/wiki/wikka.php?wakka=KeyPgOpNotEqual
 '' --------
 
-   If (69 <> 420) Then Print "(420 <> 420) is true."
+   If (69 <> 420) Then Print "(69 <> 420) is true."
    If Not (69 = 420) Then Print "not (69 = 420) is true."

examples/manual/proguide/literals/boolean.bas

@@ -0,0 +1,10 @@
+'' examples/manual/proguide/literals/boolean.bas
+''
+'' NOTICE: This file is part of the FreeBASIC Compiler package and can't
+''         be included in other distributions without authorization.
+''
+'' See Also: http://www.freebasic.net/wiki/wikka.php?wakka=ProPgLiterals
+'' --------
+
+Dim a As Boolean = False
+Dim b As Boolean = True