Tidy up of tabbing, addition of key scanning (and ability to skip intro)

c/Input

@@ -0,0 +1,20 @@
+#include <stdio.h>
+#include "swis.h"
+#include <kernel.h>
+
+// SWI Registers
+extern _kernel_swi_regs inreg;
+extern _kernel_swi_regs outreg;
+
+int input_readkey(int key)
+{
+    inreg.r[0] = 129;
+    inreg.r[1] = key ^ 255;
+    inreg.r[2] = 255;
+    _kernel_swi(OS_Byte,&inreg,&outreg);
+    
+    if(outreg.r[1] == 255)
+      return 1;
+      
+    return 0;
+}