implement upkr unpacker in wasm, use to load compressed base

uw8-tool/src/base_module.rs

@@ -192,6 +192,13 @@ impl BaseModule {
         File::create(path)?.write_all(&self.to_wasm())?;
         Ok(())
     }
+
+    pub fn create_binary(path: &Path) -> Result<()> {
+        let base1 = BaseModule::for_format_version(1)?.to_wasm();
+        let data = upkr::pack(&base1);
+        File::create(path)?.write_all(&data)?;
+        Ok(())
+    }
 }
 
 fn add_function(