From 2ca972542c048ecc6ac3cef1a5758290ac007e86 Mon Sep 17 00:00:00 2001
From: coderJeff <coder@execulink.com>
Date: Mon, 27 Nov 2023 05:04:03 -0500
Subject: [PATCH] fbdocs: wiki snapshot 2023.11.27 - update examples/manual

---
 examples/manual/defines/fbjs.bas      | 13 +++++++++++++
 examples/manual/gfx/pixelptr.bas      |  6 +++---
 examples/manual/prepro/elseifdef.bas  | 17 +++++++++++++++++
 examples/manual/prepro/elseifndef.bas | 15 +++++++++++++++
 4 files changed, 48 insertions(+), 3 deletions(-)
 create mode 100644 examples/manual/defines/fbjs.bas
 create mode 100644 examples/manual/prepro/elseifdef.bas
 create mode 100644 examples/manual/prepro/elseifndef.bas

diff --git a/examples/manual/defines/fbjs.bas b/examples/manual/defines/fbjs.bas
new file mode 100644
index 0000000000..d778f1b1cd
--- /dev/null
+++ b/examples/manual/defines/fbjs.bas
@@ -0,0 +1,13 @@
+'' examples/manual/defines/fbjs.bas
+''
+'' Example extracted from the FreeBASIC Manual
+'' from topic '__FB_JS__'
+''
+'' See Also: https://www.freebasic.net/wiki/wikka.php?wakka=KeyPgDdfbjs
+'' --------
+
+#ifdef __FB_JS__
+  '...instructions only for emscripten target...
+#else
+  '...instructions not for emscripten target...
+#endif 
diff --git a/examples/manual/gfx/pixelptr.bas b/examples/manual/gfx/pixelptr.bas
index 0c145f922d..7bdda6fe01 100644
--- a/examples/manual/gfx/pixelptr.bas
+++ b/examples/manual/gfx/pixelptr.bas
@@ -12,11 +12,11 @@ Function pixelptr(ByVal img As Any Ptr, ByVal x As Integer, ByVal y As Integer)
 
 	Dim As Long w, h, bypp, pitch
 	Dim As Any Ptr pixdata
-	Dim As Long success
+	Dim As Long result
 	
-	success = (ImageInfo(img, w, h, bypp, pitch, pixdata) = 0)
+	result = ImageInfo(img, w, h, bypp, pitch, pixdata)
 	
-	If success Then
+	If result = 0 Then '' seems like a valid image
 		If x < 0 Or x >= w Then Return 0
 		If y < 0 Or y >= h Then Return 0
 		Return pixdata + y * pitch + x * bypp
diff --git a/examples/manual/prepro/elseifdef.bas b/examples/manual/prepro/elseifdef.bas
new file mode 100644
index 0000000000..94d676082b
--- /dev/null
+++ b/examples/manual/prepro/elseifdef.bas
@@ -0,0 +1,17 @@
+'' examples/manual/prepro/elseifdef.bas
+''
+'' Example extracted from the FreeBASIC Manual
+'' from topic '#ELSEIFDEF'
+''
+'' See Also: https://www.freebasic.net/wiki/wikka.php?wakka=KeyPgPpelseifdef
+'' --------
+
+#define B
+
+#ifdef A
+	Print "A is defined"
+#elseifdef B
+	Print "A is not defined and B is defined"
+#else
+	Print "both A and B are not defined"
+#endif
diff --git a/examples/manual/prepro/elseifndef.bas b/examples/manual/prepro/elseifndef.bas
new file mode 100644
index 0000000000..21e02aa2aa
--- /dev/null
+++ b/examples/manual/prepro/elseifndef.bas
@@ -0,0 +1,15 @@
+'' examples/manual/prepro/elseifndef.bas
+''
+'' Example extracted from the FreeBASIC Manual
+'' from topic '#ELSEIFNDEF'
+''
+'' See Also: https://www.freebasic.net/wiki/wikka.php?wakka=KeyPgPpelseifndef
+'' --------
+
+#ifdef A
+	Print "A is defined"
+#elseifndef B
+	Print "both A and B are not defined"
+#else
+	Print "A is not defined and B is defined"
+#endif