add: strlen, putchar, putstr

src/putchar.🗿

@@ -0,0 +1,3 @@
+putchar(c){
+	wrt c;
+}

src/putstr.🗿

@@ -0,0 +1,11 @@
+putstr(str)
+{
+	local i;
+	i = 0;
+	loop {
+		if ([str + i] == 0)
+			return;
+		putchar([str + i]);
+		i = i + 1;
+	}
+}

src/strlen.🗿

@@ -0,0 +1,9 @@
+strlen(str) {
+	local i;
+	i = 0;
+	loop {
+		if ([str + i] == 0)
+			return (i);
+		i = i + 1;
+	}
+}