fix DOS 3.2 writing of compressed RWTS

src/passport.a

@@ -508,23 +508,27 @@ StartWithUniv
 ; note: execution falls through here
 
 CopyUniversal
+         lda   #$B8
+CopyUniversalAnywhere
+         sta   dst+1
+         clc
+         adc   #$02
+         sta   .cu+2
+         lda   #$00
+         sta   dst
          lda   #>universalrwts
          sta   src+1
          lda   #<universalrwts
          sta   src
-         lda   #$B8
-         sta   dst+1
-         lda   #0
-         sta   dst
          jsr   Unpack
          sta   callrwts+1
          lda   #$BD
          sta   callrwts+2
          ldy   #$96
--        lda   nibtable,y
-         sta   $BA00,y
+.culoop  lda   nibtable,y
+.cu      sta   $d100,y    ; set at runtime
          iny
-         bne   -
+         bne   .culoop
          rts
 
 Cancel

src/patchers/dos32.a

@@ -10,10 +10,8 @@
 
 ; sectors 2-9
 
-         lda   #>universalrwts
-         ldx   #$12       ; #BASEPAGE+2
-         ldy   #$08
-         jsr   CopyMemory
+         lda   #$12       ; #BASEPAGE+2
+         jsr   CopyUniversalAnywhere
          lda   #$38
          sta   $1656      ; #BASEPAGE+6
 

src/strings/en.a

@@ -230,7 +230,7 @@ StringTable
 ; can be set directly before calling PrintByID.
 ;
 .header
-         !text "Passport by 4am               2017-09-07",$00
+         !text "Passport by 4am               2017-09-08",$00
 .mainmenu
          !text "________________________________________",$8D,$8D,$8D,$8D,$8D,$8D,$8D
          !text "              "