diff --git a/src/scripts/conio.4th b/src/scripts/conio.4th
index 9330ee2..8ff7f57 100644
--- a/src/scripts/conio.4th
+++ b/src/scripts/conio.4th
@@ -1,10 +1,15 @@
 ' CONIOAPI ENDSRC
 LOOKUP CONIO CONSTANT CONIOAPI
-CONIOAPI  3 IFACE PLASMA _HOME    : HOME _HOME DROP ;
-CONIOAPI  4 IFACE PLASMA _GOTOXY  : GOTOXY _GOTOXY DROP ;
-CONIOAPI  7 IFACE PLASMA _TEXT    : TEXT 40 _TEXT DROP ;
-CONIOAPI  8 IFACE PLASMA _GR      : GR 1 _GR DROP ;
-CONIOAPI  9 IFACE PLASMA _COLOR   : COLOR _COLOR DROP ;
-CONIOAPI 10 IFACE PLASMA _PLOT    : PLOT _PLOT DROP ;
-CONIOAPI 11 IFACE PLASMA _TONE    : TONE _TONE DROP ;
-CONIOAPI 12 IFACE PLASMA RAND
\ No newline at end of file
+CONIOAPI  3 IFACE PLASMA _HOME     : HOME _HOME DROP ;
+CONIOAPI  4 IFACE PLASMA _GOTOXY   : GOTOXY _GOTOXY DROP ;
+CONIOAPI  5 IFACE PLASMA _VIEWPORT : VIEWPORT _VIEWPORT DROP ;
+CONIOAPI  6 IFACE PLASMA _TEXTTYPE
+: NORMALTEXT  $FF _TEXTTYPE DROP ;
+: INVERSETEXT $3F _TEXTTYPE DROP ;
+: FLASHTEXT   $7F _TEXTTYPE DROP ;
+CONIOAPI  7 IFACE PLASMA _TEXT     : TEXT 40 _TEXT DROP ;
+CONIOAPI  8 IFACE PLASMA _GR       : GR 1 _GR DROP ;
+CONIOAPI  9 IFACE PLASMA _COLOR    : COLOR _COLOR DROP ;
+CONIOAPI 10 IFACE PLASMA _PLOT     : PLOT _PLOT DROP ;
+CONIOAPI 11 IFACE PLASMA _TONE     : TONE _TONE DROP ;
+CONIOAPI 12 IFACE PLASMA RAND
diff --git a/src/scripts/fileio.4th b/src/scripts/fileio.4th
index 4de0ff2..bad561b 100644
--- a/src/scripts/fileio.4th
+++ b/src/scripts/fileio.4th
@@ -1,4 +1,5 @@
 ' FILEIOAPI ENDSRC
+LOOKUP PERR   CONSTANT PERR
 LOOKUP FILEIO CONSTANT FILEIOAPI
 FILEIOAPI  2  IFACE PLASMA GETFILEINFO
 FILEIOAPI  3  IFACE PLASMA SETFILEINFO
diff --git a/src/vmsrc/apple/plvm802.s b/src/vmsrc/apple/plvm802.s
index 0d4f6de..bc36435 100644
--- a/src/vmsrc/apple/plvm802.s
+++ b/src/vmsrc/apple/plvm802.s
@@ -531,7 +531,7 @@ JITINTRPX PHP
         STA     ESTKH,X
         JSR     JMPTMP
         !AS                     ; RETURN IN EMULATION MODE
-RETJIT  PLA
+  PLA
         STA     TMPL
         PLA
         STA     TMPH