From 4f4825cd3298c5ff7925c394e59c2b9cdb02c4a0 Mon Sep 17 00:00:00 2001
From: ALittlePatate <maxime@patate.dev>
Date: Sat, 20 Jan 2024 19:38:13 +0100
Subject: [PATCH] add: poly.pasm script

---
 README.md          |  1 +
 examples/poly.pasm | 94 ++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 95 insertions(+)
 create mode 100644 examples/poly.pasm

diff --git a/README.md b/README.md
index 623a80d..70d898c 100644
--- a/README.md
+++ b/README.md
@@ -34,4 +34,5 @@ Then link the library to your program, see [this example](tests/lib_use.c).<br>
 
 # Code examples
 - [keylogger](examples/keylogger.pasm)
+- [polynomial calculator](examples/poly.pasm)
 - [functions test](examples/test.pasm)
diff --git a/examples/poly.pasm b/examples/poly.pasm
new file mode 100644
index 0000000..259c97a
--- /dev/null
+++ b/examples/poly.pasm
@@ -0,0 +1,94 @@
+; 2D polynomials calculator
+; calculates the delta, x1, x2
+; will fail to provide a good result for x most of the time because we don't have float
+; simple showcase of added neg, sqrt functions.
+
+print_a4:
+push :
+push 1
+call put
+push  
+push 1
+call put
+push a4
+push 2
+call put
+push \n
+push 1
+call put
+ret
+
+main:
+mov a8, 1   ;x1
+
+;ax² + bx + c
+mov a1, 2   ;a
+mov a2, 5   ;b
+mov a3, -3  ;c
+
+;delta
+;b² - 4ac
+push a1
+push a2
+mul a2, a2  ;b²
+mul a1, a3  ;a*c
+mul a1, 4   ;4ac
+sub a2, a1  ;b² - 4ac
+mov a4, a2  ;a4 is delta
+pop a1
+pop a2
+
+push d
+push 1
+call put
+jmp print_a4
+
+cmp a4, 0
+jnb 1       ;if delta < 0, we exit
+end
+
+calculate_x:
+;(-b-sqrt(delta))/(2ab)
+
+; -b
+push a2
+neg a2
+
+; a5 will be 2ab
+mov a5, 2
+mul a5, a1
+mul a5, a2
+
+; sqrt(delta)
+push a4
+sqrt a4
+
+;-b+-sqrt(delta)
+cmp a8, 1   ;x1 ?
+je 2
+add a2, a4  ;x2
+jmp 1
+sub a2, a4  ;x1
+
+;a2/2ab
+div a2, a5
+
+push x
+push 1
+call put
+push a8
+push 2
+call put
+push a4
+mov a4, a2
+jmp print_a4
+pop a4
+
+pop a2
+pop a4
+
+add a8, 1
+cmp a8, 2
+je calculate_x
+
+end
\ No newline at end of file