diff --git a/.directory b/.directory
new file mode 100644
index 0000000..06dab1c
--- /dev/null
+++ b/.directory
@@ -0,0 +1,2 @@
+[Desktop Entry]
+Icon=./.icon.png
diff --git a/.icon.png b/.icon.png
new file mode 100644
index 0000000..c83b158
Binary files /dev/null and b/.icon.png differ
diff --git a/.lang/#project.pot b/.lang/#project.pot
new file mode 100644
index 0000000..2a3436f
--- /dev/null
+++ b/.lang/#project.pot
@@ -0,0 +1,20 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/.project
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
+#: .project:1
+msgid "VL-gui-installer"
+msgstr ""
+
diff --git a/.lang/.pot b/.lang/.pot
new file mode 100644
index 0000000..52ff7d8
--- /dev/null
+++ b/.lang/.pot
@@ -0,0 +1,485 @@
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n"
+"POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
+#: .project:1
+msgid "VL-gui-installer"
+msgstr ""
+
+#: InputBox.class:199
+msgid "Enter a value:"
+msgstr ""
+
+#: InputBox.class:205 frmDriveSelect.class:126 frmPartSelect.class:371
+msgid "OK"
+msgstr ""
+
+#: InputBox.class:212 frmDriveSelect.class:133 frmPartSelect.class:378
+msgid "Cancel"
+msgstr ""
+
+#: frmChoice.class:92
+msgid ""
+"You have 3 choices:
\n"
+"\n"
+"\n"
+"- Full-automatic install: Our easiest install yet; choose "
+"this option if you want to use your entire hard disk for VL. Your system "
+"will be automatically set up, partitions and all. WARNING: this option will DELETE everything on your hard disk, or offer a "
+"choice if there are multiple disks. There will of course be a "
+"confirmation dialog in case you selected this option by mistake.
\n"
+"- Semi-automatic install: With this option, you manually "
+"partition your drives with gparted, but the rest of the setup will be pretty "
+"automatic.
\n"
+"- Advanced install: For the technically savvy user that must "
+"do everything by hand. You can control most aspects of the install. However, "
+"there will be assisted options available all the way through, so this is a "
+"very flexible install.
\n"
+"
\n"
+msgstr ""
+
+#: frmChoice.class:103
+msgid "Choose install type"
+msgstr ""
+
+#: frmChoice.class:118
+msgid "Install types"
+msgstr ""
+
+#: frmChoice.class:123
+msgid "Full-automatic"
+msgstr ""
+
+#: frmChoice.class:129
+msgid "Semi-automatic"
+msgstr ""
+
+#: frmChoice.class:135
+msgid "Advanced"
+msgstr ""
+
+#: frmConfig.class:114
+msgid ""
+"Configuration:
\n"
+"\n"
+"Linux Loader boot manager setup:\n"
+"\n"
+"- Master Boot Record: Install Linux Loader boot manager to the "
+"master Boot Record of the bootable hard disk. This is the simplest method "
+"and the default action for most common operating systems.
\n"
+"- VL Boot sector: Install Linux Loader boot manager to the Boot "
+"Sector of the Vector Linux install partition. This will require the "
+"following extra steps:\n"
+"
\n"
+"- make the Vector Linux partition bootable using a partition manager."
+"li>\n"
+"
- add an option to your default boot manager to boot to LiLo in this "
+"partition.
\n"
+"
\n"
+" \n"
+"- Floppy diskette: Install Linux Loader boot manager to a floopy "
+"diskette in /dev/fd0 (drive A:). You can then boot to the Vector Linux "
+"install by simply booting the diskette.
\n"
+"- Do not install: Do not install Linux Loader. Select this if you "
+"use another boot manager and know how to set up an option to boot the Vector "
+"Linux install from it.
\n"
+"
\n"
+"\n"
+"Other configuration:\n"
+"\n"
+"- Config 1: Other configuration selection 1.
\n"
+"- Config 2: Other configuration selection 2.
\n"
+"
\n"
+msgstr ""
+
+#: frmConfig.class:125
+msgid "Additional configuration"
+msgstr ""
+
+#: frmConfig.class:140
+msgid "Boot manager"
+msgstr ""
+
+#: frmConfig.class:147
+msgid "Master Boot Record"
+msgstr ""
+
+#: frmConfig.class:155
+msgid "VL Boot Sector"
+msgstr ""
+
+#: frmConfig.class:163
+msgid "Floppy diskette"
+msgstr ""
+
+#: frmConfig.class:171
+msgid "Do not install"
+msgstr ""
+
+#: frmConfig.class:178
+msgid "Other configuration"
+msgstr ""
+
+#: frmConfig.class:185
+msgid "Config 1"
+msgstr ""
+
+#: frmConfig.class:193
+msgid "Config 2"
+msgstr ""
+
+#: frmDriveSelect.class:107 frmPartSelect.class:346
+msgid "Drives"
+msgstr ""
+
+#: frmDriveSelect.class:115
+msgid "Click on a row to select..."
+msgstr ""
+
+#: frmGO.class:85
+msgid "Ready to install!"
+msgstr ""
+
+#: frmMain.class:207
+msgid "Welcome!"
+msgstr ""
+
+#: frmMain.class:216
+msgid "The choice"
+msgstr ""
+
+#: frmMain.class:225 frmPartSelect.class:386
+msgid "Partitions"
+msgstr ""
+
+#: frmMain.class:234
+msgid "Packages"
+msgstr ""
+
+#: frmMain.class:243
+msgid "Configure"
+msgstr ""
+
+#: frmMain.class:252
+msgid "Go for it!"
+msgstr ""
+
+#: frmMain.class:264
+msgid "Tools"
+msgstr ""
+
+#: frmMain.class:275
+msgid "Exit"
+msgstr ""
+
+#: frmPackages.class:99
+msgid ""
+"Package selection strategies:
\n"
+"\n"
+"Assisted selection: Maintains dependency coherency.\n"
+"\n"
+"- All packages: Equivalent to a full distro install. All included "
+"packages will be installed to your hard disk.
\n"
+"- Package groups: Allow selection of what to install by logical "
+"package groupings.
\n"
+"
\n"
+"Advanced selection: WARNING: you will "
+"be responsible for what you install or not.\n"
+"\n"
+"- Manual selection: Manual selection from the full list of "
+"packages, sorted by categories.
\n"
+"- No extra packages: Install just the Vector Linux base distro. You "
+"know what you really want and will customise the install yourself."
+"li>\n"
+"
\n"
+msgstr ""
+
+#: frmPackages.class:111
+msgid "Package selection"
+msgstr ""
+
+#: frmPackages.class:126
+msgid "Assisted selection"
+msgstr ""
+
+#: frmPackages.class:131
+msgid "All packages"
+msgstr ""
+
+#: frmPackages.class:137
+msgid "By groups"
+msgstr ""
+
+#: frmPackages.class:144
+msgid "Advanced selection"
+msgstr ""
+
+#: frmPackages.class:149 frmPartitions.class:266
+msgid "Manual"
+msgstr ""
+
+#: frmPackages.class:155
+msgid "No extras"
+msgstr ""
+
+#: frmPartSelect.class:260
+msgid "Mountpoints"
+msgstr ""
+
+#: frmPartSelect.class:266
+msgid "/"
+msgstr ""
+
+#: frmPartSelect.class:272
+msgid "/home"
+msgstr ""
+
+#: frmPartSelect.class:278
+msgid "/var"
+msgstr ""
+
+#: frmPartSelect.class:284
+msgid "/opt"
+msgstr ""
+
+#: frmPartSelect.class:290
+msgid "/tmp"
+msgstr ""
+
+#: frmPartSelect.class:296
+msgid "/boot"
+msgstr ""
+
+#: frmPartSelect.class:302
+msgid "/usr"
+msgstr ""
+
+#: frmPartSelect.class:308
+msgid "/share"
+msgstr ""
+
+#: frmPartSelect.class:314
+msgid "FileSystem"
+msgstr ""
+
+#: frmPartSelect.class:320
+msgid "xfs"
+msgstr ""
+
+#: frmPartSelect.class:326
+msgid "reiserfs"
+msgstr ""
+
+#: frmPartSelect.class:332
+msgid "ext3"
+msgstr ""
+
+#: frmPartSelect.class:338
+msgid "ext2"
+msgstr ""
+
+#: frmPartSelect.class:354
+msgid "Click on select install drive"
+msgstr ""
+
+#: frmPartSelect.class:360
+msgid "Right-click in Mount or FileSystem to set"
+msgstr ""
+
+#: frmPartSelect.class:394
+msgid ""
+"\n"
+"- Left-click to (un)select drive(s) to install Vector Linux.
\n"
+"- Right-click on Linux partitions to pick mountpoint
\n"
+"- Left-click on other partitions to edit mountpoint
\n"
+"
\n"
+msgstr ""
+
+#: frmPartitions.class:217
+msgid ""
+"Available partitioning modes:
\n"
+"\n"
+"Automatic partitioning: The installer will handle all "
+"partition related decisions for you:\n"
+"\n"
+"- Full disk: Choose this option if you want to use your entire hard "
+"disk for VL. WARNING: this option will DELETE "
+"everything on your hard disk, or offer a choice if there are multiple disks. "
+"You have been WARNED.
\n"
+"- Free space: using available free (unpartitioned) disk space."
+"li>\n"
+"
\n"
+"Manual partitioning: You have full control of partitioning.\n"
+"\n"
+"- Using gparted (the advanced graphical partitioner).
\n"
+"- Using cfdisk (the traditional partition tool).
\n"
+"
\n"
+"Other partitioning:\n"
+"\n"
+"- Preset strategies: auto allocates partitions according to most "
+"common usage strategy intended for this computer.
\n"
+"- No partitioning: If you wish to use existing Linux and swap "
+"partitions. WARNING: The existing Linux partitions "
+"will be OVERWRITTEN. You have been WARNED.
\n"
+"
\n"
+msgstr ""
+
+#: frmPartitions.class:229
+msgid "Partitioning mode"
+msgstr ""
+
+#: frmPartitions.class:244
+msgid "Automatic"
+msgstr ""
+
+#: frmPartitions.class:251
+msgid "Full disk"
+msgstr ""
+
+#: frmPartitions.class:259
+msgid "Free space"
+msgstr ""
+
+#: frmPartitions.class:273
+msgid "GParted"
+msgstr ""
+
+#: frmPartitions.class:281
+msgid "cfdisk"
+msgstr ""
+
+#: frmPartitions.class:288
+msgid "Others"
+msgstr ""
+
+#: frmPartitions.class:295
+msgid "Preset strategies"
+msgstr ""
+
+#: frmPartitions.class:303
+msgid "No partitioning"
+msgstr ""
+
+#: frmTools.class:113
+msgid ""
+"Vector Linux repair tools:
\n"
+"\n"
+"Distro repair tools:\n"
+"\n"
+"- Repair LILO: Repair Linux Loader boot manager of an "
+"existing Vector Linux installation.
\n"
+"- Restore packages: Restore original packages from the install CD, "
+"to fix a broken upgrade.
\n"
+"
\n"
+"Backup / restore tools:\n"
+"\n"
+"- Backup /home: Backup your /home directory for safekeeping.
\n"
+"- Restore /home: Restore your /home directory from a previous "
+"backup. WARNING: The existing /home directory will "
+"be OVERWRITTEN during restore. You have been WARNED.
\n"
+"
\n"
+"Miscellaneous tools: \n"
+"\n"
+"- Tool 5: Tool number 5 to fix something or other.
\n"
+"- Tool 6: Tool number 6 to fix something or other.
\n"
+"
\n"
+msgstr ""
+
+#: frmTools.class:124
+msgid "VL Tools"
+msgstr ""
+
+#: frmTools.class:139
+msgid "Distro repair"
+msgstr ""
+
+#: frmTools.class:146
+msgid "Restore packages"
+msgstr ""
+
+#: frmTools.class:154
+msgid "Repair LILO"
+msgstr ""
+
+#: frmTools.class:161
+msgid "Backup / restore"
+msgstr ""
+
+#: frmTools.class:168
+msgid "Backup /home"
+msgstr ""
+
+#: frmTools.class:176
+msgid "Restore /home"
+msgstr ""
+
+#: frmTools.class:183
+msgid "Miscellaneous"
+msgstr ""
+
+#: frmTools.class:190
+msgid "Tool 5"
+msgstr ""
+
+#: frmTools.class:198
+msgid "(Make FHS tree)"
+msgstr ""
+
+#: frmWelcome.class:75
+msgid ""
+"Dear Vector Linux user:
\n"
+"\n"
+"\n"
+"We have worked very hard to make this install as quick and easy as possible. "
+"We hope you will also like its looks. To install, click on the START button below the VL logo. Use the buttons "
+"on the top row to return to a previous stage. If you have already installed "
+"VL and just need to use some of the rescue functions, head on over to the "
+"Tools button.\n"
+"
\n"
+"\n"
+"About:
\n"
+"\n"
+"\n"
+"Vector Linux is a small, but full-featured and VERY fast, Linux operating "
+"system for x86 PCs, based on one of the original Linux distributions, "
+"Slackware. VL is bloat free, easy to install, configure and maintain, with "
+"automatic hardware configuration, unique administration tools and easy "
+"package management via the Gslapt/slapt-get system.\n"
+"
\n"
+"\n"
+"Credits:
\n"
+"\n"
+"\n"
+"Installer made in Gambas2 by Joe1962 and Uelsk8s, Gambas is the copyright of "
+"Benoit Minisini.\n"
+"
\n"
+"\n"
+"\n"
+"The Vector Linux Community members that made this release possible: Vector "
+"(Founder), Tigger (SOHO Architect), Kocil (Dynamite Man), JohnB316 (SOHO "
+"Chief), Joe1962 (VL-hot Chief), Uelsk8s (LIVE Chief), Barlas, Berke, "
+"Cintyram, Freakyc, Gamfa, GbHill, Hanumizzle, Inggy, Jbcolmena, Jaos, "
+"JohnVan, Keffin, Lagagnon, Lost&LovinLinux, Lyn, Mamahoohoo, Maf3000, "
+"Monty67, Mutiny, Niiler, PastorEd, Paul, Ren, Shalow_Hal, Suse-Refugee, "
+"TonyH9904, UKBill, Vanger, Verbl-Kint, VxT, WebMouse, Wile_Coyote, YaP, "
+"Yiannis, Zarniwoop.\n"
+"
\n"
+msgstr ""
+
+#: frmWelcome.class:86
+msgid "Welcome to Vector Linux!"
+msgstr ""
+
+#: frmWelcome.class:111
+msgid "START"
+msgstr ""
diff --git a/.lang/Functions.pot b/.lang/Functions.pot
new file mode 100644
index 0000000..fb930b9
--- /dev/null
+++ b/.lang/Functions.pot
@@ -0,0 +1,16 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/Functions.module
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
diff --git a/.lang/Global.pot b/.lang/Global.pot
new file mode 100644
index 0000000..6aa646e
--- /dev/null
+++ b/.lang/Global.pot
@@ -0,0 +1,16 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/Global.class
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
diff --git a/.lang/InputBox.pot b/.lang/InputBox.pot
new file mode 100644
index 0000000..82e383c
--- /dev/null
+++ b/.lang/InputBox.pot
@@ -0,0 +1,28 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/InputBox.class
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
+#: InputBox.class:199
+msgid "Enter a value:"
+msgstr ""
+
+#: InputBox.class:205
+msgid "OK"
+msgstr ""
+
+#: InputBox.class:212
+msgid "Cancel"
+msgstr ""
+
diff --git a/.lang/Main.pot b/.lang/Main.pot
new file mode 100644
index 0000000..f403001
--- /dev/null
+++ b/.lang/Main.pot
@@ -0,0 +1,16 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/Main.module
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
diff --git a/.lang/Utils.pot b/.lang/Utils.pot
new file mode 100644
index 0000000..1b3fdd2
--- /dev/null
+++ b/.lang/Utils.pot
@@ -0,0 +1,16 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/Utils.module
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
diff --git a/.lang/cDiskInfo.pot b/.lang/cDiskInfo.pot
new file mode 100644
index 0000000..749f428
--- /dev/null
+++ b/.lang/cDiskInfo.pot
@@ -0,0 +1,16 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/cDiskInfo.class
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
diff --git a/.lang/cPartInfo.pot b/.lang/cPartInfo.pot
new file mode 100644
index 0000000..1eccf09
--- /dev/null
+++ b/.lang/cPartInfo.pot
@@ -0,0 +1,16 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/cPartInfo.class
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
diff --git a/.lang/cPartInstall.pot b/.lang/cPartInstall.pot
new file mode 100644
index 0000000..9f44cb5
--- /dev/null
+++ b/.lang/cPartInstall.pot
@@ -0,0 +1,16 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/cPartInstall.class
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
diff --git a/.lang/en.mo b/.lang/en.mo
new file mode 100644
index 0000000..2adc434
Binary files /dev/null and b/.lang/en.mo differ
diff --git a/.lang/en.po b/.lang/en.po
new file mode 100644
index 0000000..ff698e2
--- /dev/null
+++ b/.lang/en.po
@@ -0,0 +1,705 @@
+# #-#-#-#-# #project.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/.project
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# Global.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/Global.module
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# frmChoice.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/frmChoice.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# frmGO.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/frmGO.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# frmLieLow.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/frmLieLow.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# frmMain.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/frmMain.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# frmPackages.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/frmPackages.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# frmPartitioner.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/frmPartitioner.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# frmPartitions.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/frmPartitions.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# frmTools.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/frmTools.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# frmWelcome.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/frmWelcome.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n"
+"POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
+#: .project:1
+#, fuzzy
+msgid "VL-gui-installer"
+msgstr "new-installer"
+
+#: InputBox.class:196
+msgid "Enter a value:"
+msgstr ""
+
+#: InputBox.class:202 frmDriveSelect.class:123 frmPartSelect.class:367
+msgid "OK"
+msgstr ""
+
+#: InputBox.class:209 frmDriveSelect.class:130 frmPartSelect.class:374
+msgid "Cancel"
+msgstr ""
+
+#: frmChoice.class:90
+#, fuzzy
+msgid ""
+"You have 3 choices:
\n"
+"\n"
+"\n"
+"\t- Full-automatic install: Our easiest install yet; just "
+"choose this option and click ok and your system will be set up, partitions "
+"and all. WARNING: this option will DELETE everything "
+"on your hard disk, or offer a choice if there are multiple disks (unless one "
+"is empty). You have been WARNED.
\n"
+"\t- Semi-automatic install: This option is much easier with "
+"the added GParted; just partition your drives and your system will be set up "
+"for you.
\n"
+"\t- Advanced install: For the technically savvy user that "
+"must do everything by hand. You can control most aspects of the install."
+"li>\n"
+"
\n"
+msgstr ""
+"You have 3 choices:
\n"
+"\n"
+"\n"
+"\t- Full-automatic install: Our easiest install yet; just "
+"choose this option and click ok and your system will be set up, partitions "
+"and all. WARNING: this option will DELETE everything "
+"on your hard disk, or offer a choice if there are multiple disks (unless one "
+"is empty). You have been WARNED.
\n"
+"\t- Semi-automatic install: This option is much easier with "
+"the added GParted; just partition your drives and your system will be set up "
+"for you.
\n"
+"\t- Advanced install: For the technically savvy user that "
+"must do everything by hand. You can control most aspects of the install."
+"li>\n"
+"
\n"
+
+#: frmChoice.class:101
+msgid "Choose install type"
+msgstr "Choose install type"
+
+#: frmChoice.class:116
+msgid "Install types"
+msgstr "Install types"
+
+#: frmChoice.class:121
+msgid "Full-automatic"
+msgstr "Full-automatic"
+
+#: frmChoice.class:127
+msgid "Semi-automatic"
+msgstr "Semi-automatic"
+
+#: frmChoice.class:133
+#, fuzzy
+msgid "Advanced"
+msgstr "Advanced install"
+
+#: frmConfig.class:112
+msgid ""
+"Configuration:
\n"
+"\n"
+"Linux Loader boot manager setup:\n"
+"\n"
+"\t- Master Boot Record: Install Linux Loader boot manager to the "
+"master Boot Record of the bootable hard disk. This is the simplest method "
+"and the default action for most common operating systems.
\n"
+"\t- VL Boot sector: Install Linux Loader boot manager to the Boot "
+"Sector of the Vector Linux install partition. This will require the "
+"following extra steps:\n"
+"\t\t
\n"
+"\t\t\t- make the Vector Linux partition bootable using a partition manager."
+"
\n"
+"\t\t\t- add an option to your default boot manager to boot to LiLo in this "
+"partition.
\n"
+"\t\t
\n"
+"\t \n"
+"\t- Floppy diskette: Install Linux Loader boot manager to a floopy "
+"diskette in /dev/fd0 (drive A:). You can then boot to the Vector Linux "
+"install by simply booting the diskette.
\n"
+"\t- Do not install: Do not install Linux Loader. Select this if you "
+"use another boot manager and know how to set up an option to boot the Vector "
+"Linux install from it.
\n"
+"
\n"
+"\n"
+"Other configuration:\n"
+"\n"
+"\t- Config 1: Other configuration selection 1.
\n"
+"\t- Config 2: Other configuration selection 2.
\n"
+"
\n"
+msgstr ""
+"Configuration:
\n"
+"\n"
+"Linux Loader boot manager setup:\n"
+"\n"
+"\t- Master Boot Record: Install Linux Loader boot manager to the "
+"master Boot Record of the bootable hard disk. This is the simplest method "
+"and the default action for most common operating systems.
\n"
+"\t- VL Boot sector: Install Linux Loader boot manager to the Boot "
+"Sector of the Vector Linux install partition. This will require the "
+"following extra steps:\n"
+"\t\t
\n"
+"\t\t\t- make the Vector Linux partition bootable using a partition manager."
+"
\n"
+"\t\t\t- add an option to your default boot manager to boot to LiLo in this "
+"partition.
\n"
+"\t\t
\n"
+"\t \n"
+"\t- Floppy diskette: Install Linux Loader boot manager to a floopy "
+"diskette in /dev/fd0 (drive A:). You can then boot to the Vector Linux "
+"install by simply booting the diskette.
\n"
+"\t- Do not install: Do not install Linux Loader. Select this if you "
+"use another boot manager and know how to set up an option to boot the Vector "
+"Linux install from it.
\n"
+"
\n"
+"\n"
+"Other configuration:\n"
+"\n"
+"\t- Config 1: Other configuration selection 1.
\n"
+"\t- Config 2: Other configuration selection 2.
\n"
+"
\n"
+
+#: frmConfig.class:123
+msgid "Additional configuration"
+msgstr "Additional configuration"
+
+#: frmConfig.class:138
+msgid "Boot manager"
+msgstr "Boot manager"
+
+#: frmConfig.class:145
+msgid "Master Boot Record"
+msgstr "Master Boot Record"
+
+#: frmConfig.class:153
+msgid "VL Boot Sector"
+msgstr "VL Boot Sector"
+
+#: frmConfig.class:161
+msgid "Floppy diskette"
+msgstr "Floppy diskette"
+
+#: frmConfig.class:169
+msgid "Do not install"
+msgstr "Do not install"
+
+#: frmConfig.class:176
+msgid "Other configuration"
+msgstr "Other configuration"
+
+#: frmConfig.class:183
+msgid "Config 1"
+msgstr "Config 1"
+
+#: frmConfig.class:191
+msgid "Config 2"
+msgstr "Config 2"
+
+#: frmDriveSelect.class:104 frmPartSelect.class:342
+msgid "Drives"
+msgstr ""
+
+#: frmDriveSelect.class:112
+msgid "Click on a row to select..."
+msgstr ""
+
+#: frmGO.class:83
+msgid "Ready to install!"
+msgstr "Ready to install!"
+
+#: frmMain.class:202
+msgid "Welcome!"
+msgstr "Welcome!"
+
+#: frmMain.class:211
+msgid "The choice"
+msgstr "The choice"
+
+#: frmMain.class:220 frmPartSelect.class:382
+msgid "Partitions"
+msgstr "Partitions"
+
+#: frmMain.class:229
+msgid "Packages"
+msgstr "Packages"
+
+#: frmMain.class:238
+msgid "Configure"
+msgstr "Configure"
+
+#: frmMain.class:247
+msgid "Go for it!"
+msgstr "Go for it!"
+
+#: frmMain.class:259
+msgid "Tools"
+msgstr "Tools"
+
+#: frmMain.class:270
+msgid "Exit"
+msgstr "Exit"
+
+#: frmPackages.class:97
+#, fuzzy
+msgid ""
+"Package selection strategies:
\n"
+"\n"
+"Assisted selection: Maintains dependency coherency.\n"
+"\n"
+"\t- All packages: Equivalent to a full distro install. All included "
+"packages will be installed to your hard disk.
\n"
+"\t- Package groups: Allow selection of what to install by logical "
+"package groupings.
\n"
+"
\n"
+"Advanced selection: WARNING: you will "
+"be responsible for what you install or not.\n"
+"\n"
+"\t- Manual selection: Manual selection from the full list of "
+"packages, sorted by categories.
\n"
+"\t- No extra packages: Install just the Vector Linux base distro. "
+"You know what you really want and will customise the install yourself."
+"font>
\n"
+"
\n"
+msgstr ""
+"Package selection strategies:
\n"
+"\n"
+"Assisted selection: Maintains dependency coherency.\n"
+"\n"
+"\t- All packages: Equivalent to a full distro install. All included "
+"packages will be installed to your hard disk.
\n"
+"\t- Package groups: Allow selection of what to install by logical "
+"package groupings.
\n"
+"
\n"
+"Advanced selection: WARNING: you will "
+"be responsible for what you install or not.\n"
+"\n"
+"\t- Manual selection: Manual selection from the full list of "
+"packages, sorted by categories.
\n"
+"\t- No extra packages: Install just the Vector Linux base distro. "
+"You know what you really want and will customise the install yourself."
+"font>
\n"
+"
\n"
+
+#: frmPackages.class:109
+msgid "Package selection"
+msgstr "Package selection"
+
+#: frmPackages.class:124
+msgid "Assisted selection"
+msgstr "Assisted selection"
+
+#: frmPackages.class:129
+msgid "All packages"
+msgstr "All packages"
+
+#: frmPackages.class:135
+#, fuzzy
+msgid "By groups"
+msgstr "Package groups"
+
+#: frmPackages.class:142
+msgid "Advanced selection"
+msgstr "Advanced selection"
+
+#: frmPackages.class:147 frmPartitions.class:278
+msgid "Manual"
+msgstr ""
+
+#: frmPackages.class:153
+#, fuzzy
+msgid "No extras"
+msgstr "No extra packages"
+
+#: frmPartSelect.class:256
+msgid "Mountpoints"
+msgstr ""
+
+#: frmPartSelect.class:262
+msgid "/"
+msgstr ""
+
+#: frmPartSelect.class:268
+msgid "/home"
+msgstr ""
+
+#: frmPartSelect.class:274
+msgid "/var"
+msgstr ""
+
+#: frmPartSelect.class:280
+msgid "/opt"
+msgstr ""
+
+#: frmPartSelect.class:286
+msgid "/tmp"
+msgstr ""
+
+#: frmPartSelect.class:292
+msgid "/boot"
+msgstr ""
+
+#: frmPartSelect.class:298
+msgid "/usr"
+msgstr ""
+
+#: frmPartSelect.class:304
+msgid "/share"
+msgstr ""
+
+#: frmPartSelect.class:310
+msgid "FileSystem"
+msgstr ""
+
+#: frmPartSelect.class:316
+msgid "xfs"
+msgstr ""
+
+#: frmPartSelect.class:322
+msgid "reiserfs"
+msgstr ""
+
+#: frmPartSelect.class:328
+msgid "ext3"
+msgstr ""
+
+#: frmPartSelect.class:334
+msgid "ext2"
+msgstr ""
+
+#: frmPartSelect.class:350
+msgid "Click on select install drive"
+msgstr ""
+
+#: frmPartSelect.class:356
+msgid "Right-click in Mount or FileSystem to set"
+msgstr ""
+
+#: frmPartSelect.class:390
+msgid ""
+"\n"
+"- Left-click to (un)select drive(s) to install Vector Linux.
\n"
+"- Right-click on Linux partitions to pick mountpoint
\n"
+"- Left-click on other partitions to edit mountpoint
\n"
+"
\n"
+msgstr ""
+
+#: frmPartitions.class:229
+#, fuzzy
+msgid ""
+"Available partitioning modes:
\n"
+"\n"
+"Automatic partitioning: The installer will handle all "
+"partition related decisions for you:\n"
+"\t\n"
+"\t\t- Full disk: WARNING: this option will "
+"DELETE everything on your hard disk, or offer a choice if there are multiple "
+"disks (unless one is empty). You have been WARNED.
\n"
+"\t\t- Free space: using available free (unpartitioned) disk space."
+"li>\n"
+"\t
\n"
+"Manual partitioning: You have full control of partitioning.\n"
+"\t\n"
+"\t\t- Using GParted (the advanced graphical partitioner).
\n"
+"\t\t- Using cfdisk (the traditional partition tool).
\n"
+"\t
\n"
+"Other partitioning:\n"
+"\t\n"
+"\t\t- Preset strategies: auto allocates partitions according to "
+"most common usage strategy intended for this computer.
\n"
+"\t\t- No partitioning: If you wish to use existing Linux and swap "
+"partitions. WARNING: The existing Linux partitions "
+"will be OVERWRITTEN. You have been WARNED.
\n"
+"\t
\n"
+msgstr ""
+"Available partitioning modes:
\n"
+"\n"
+"Automatic partitioning: The installer will handle all "
+"partition related decisions for you:\n"
+"\t\n"
+"\t\t- Full disk: WARNING: this option will "
+"DELETE everything on your hard disk, or offer a choice if there are multiple "
+"disks (unless one is empty). You have been WARNED.
\n"
+"\t\t- Free space: using available free (unpartitioned) disk space."
+"li>\n"
+"\t
\n"
+"Manual partitioning: You have full control of partitioning.\n"
+"\t\n"
+"\t\t- Using GParted (the advanced graphical partitioner).
\n"
+"\t\t- Using cfdisk (the traditional partition tool).
\n"
+"\t
\n"
+"Other partitioning:\n"
+"\t\n"
+"\t\t- Preset strategies: auto allocates partitions according to "
+"most common usage strategy intended for this computer.
\n"
+"\t\t- No partitioning: If you wish to use existing Linux and swap "
+"partitions. WARNING: The existing Linux partitions "
+"will be OVERWRITTEN. You have been WARNED.
\n"
+"\t
\n"
+
+#: frmPartitions.class:241
+msgid "Partitioning mode"
+msgstr "Partitioning mode"
+
+#: frmPartitions.class:256
+#, fuzzy
+msgid "Automatic"
+msgstr "Full-automatic"
+
+#: frmPartitions.class:263
+msgid "Full disk"
+msgstr "Full disk"
+
+#: frmPartitions.class:271
+msgid "Free space"
+msgstr "Free space"
+
+#: frmPartitions.class:285
+msgid "GParted"
+msgstr "GParted"
+
+#: frmPartitions.class:293
+msgid "cfdisk"
+msgstr "cfdisk"
+
+#: frmPartitions.class:300
+msgid "Others"
+msgstr ""
+
+#: frmPartitions.class:307
+msgid "Preset strategies"
+msgstr "Preset strategies"
+
+#: frmPartitions.class:315
+msgid "No partitioning"
+msgstr "No partitioning"
+
+#: frmTools.class:110
+#, fuzzy
+msgid ""
+"Vector Linux repair tools:
\n"
+"\n"
+"Distro repair tools: \n"
+"\n"
+"\t- Repair LILO: Repair Linux Loader boot manager of an "
+"existing Vector Linux installation.
\n"
+"\t- Restore packages: Restore original packages from the install "
+"CD, to fix a broken upgrade.
\n"
+"
\n"
+"Backup / restore tools: \n"
+"\n"
+"\t- Backup /home: Backup your /home directory for safekeeping."
+"li>\n"
+"\t
- Restore /home: Restore your /home directory from a previous "
+"backup. WARNING: The existing /home directory will "
+"be OVERWRITTEN during restore. You have been WARNED.
\n"
+"
\n"
+"Miscellaneous tools: \n"
+"\n"
+"\t- Tool 5: Tool number 5 to fix something or other.
\n"
+"\t- Tool 6: Tool number 6 to fix something or other.
\n"
+"
\n"
+"\n"
+msgstr ""
+"Vector Linux repair tools:
\n"
+"\n"
+"Distro repair tools: \n"
+"\n"
+"\t- Repair LILO: Repair Linux Loader boot manager of an "
+"existing Vector Linux installation.
\n"
+"\t- Restore packages: Restore original packages from the install "
+"CD, to fix a broken upgrade.
\n"
+"
\n"
+"Backup / restore tools: \n"
+"\n"
+"\t- Backup /home: Backup your /home directory for safekeeping."
+"li>\n"
+"\t
- Restore /home: Restore your /home directory from a previous "
+"backup.
\n"
+"
\n"
+"Miscellaneous tools: \n"
+"\n"
+"\t- Tool 5: Tool number 5 to fix something or other.
\n"
+"\t- Tool 6: Tool number 6 to fix something or other.
\n"
+"
\n"
+"\n"
+
+#: frmTools.class:122
+msgid "VL Tools"
+msgstr "VL Tools"
+
+#: frmTools.class:137
+#, fuzzy
+msgid "Distro repair"
+msgstr "Distro repair tools"
+
+#: frmTools.class:144
+msgid "Restore packages"
+msgstr "Restore packages"
+
+#: frmTools.class:152
+msgid "Repair LILO"
+msgstr "Repair LILO"
+
+#: frmTools.class:159
+#, fuzzy
+msgid "Backup / restore"
+msgstr "Backup / restore tools"
+
+#: frmTools.class:166
+msgid "Backup /home"
+msgstr "Backup /home"
+
+#: frmTools.class:174
+msgid "Restore /home"
+msgstr "Restore /home"
+
+#: frmTools.class:181
+#, fuzzy
+msgid "Miscellaneous"
+msgstr "Miscellaneous tools"
+
+#: frmTools.class:188
+msgid "Tool 5"
+msgstr "Tool 5"
+
+#: frmTools.class:196
+msgid "(Make FHS tree)"
+msgstr ""
+
+#: frmWelcome.class:70
+#, fuzzy
+msgid ""
+"Dear Vector Linux user:
\n"
+"\n"
+"We have worked very hard to make this install as quick and easy as "
+"possible. We hope you will also like its looks ;-). To install, click on the "
+"START button below the VL logo. Use "
+"the buttons on the top row to return to a previous stage. If you have "
+"already installed VL and just need to use some of the rescue functions, head "
+"on over to the Tools button.
\n"
+"\n"
+"Distro Credits:
\n"
+"\n"
+"The Vector Linux Community members that made this endeavour possible: "
+"Vector (Founder), Tigger (SOHO Architect), Kocil (Dynamite Man), JohnB316 "
+"(SOHO Chief), Joe1962 (VL-hot Chief), Uelsk8s (LIVE Chief), Barlas, Berke, "
+"Cintyram, Freakyc, Gamfa, GbHill, Hanumizzle, Inggy, Jbcolmena, Jaos, "
+"JohnVan, Keffin, Lagagnon, Lost&LovinLinux, Lyn, Mamahoohoo, Maf3000, "
+"Monty67, Mutiny, Niiler, PastorEd, Paul, Ren, Shalow_Hal, Suse-Refugee, "
+"TonyH9904, UKBill, Vanger, Verbl-Kint, VxT, WebMouse, Wile_Coyote, YaP, "
+"Yiannis, Zarniwoop.
\n"
+"\n"
+"Installer Credits:
\n"
+"Made in Gambas2 by Joe1962 and Uelsk8s.
\n"
+"\n"
+"Vector Linux links:
\n"
+"\n"
+"\n"
+"\n"
+"\n"
+msgstr ""
+"Dear Vector Linux user:
\n"
+"\n"
+"We have worked very hard to make this install as quick and easy as "
+"possible. We hope you will also like it's looks ;-). To install, just take "
+"the buttons on the top row in order, though depending on the choices you "
+"make in each screen, you might automatically jump some steps. If you have "
+"already installed and need to use some of the rescue functions, head on over "
+"to the Tools button.
\n"
+"\n"
+"Distro Credits:
\n"
+"\n"
+"The Vector Linux Community members that made this endeavour possible: "
+"Vector (VL Founder), JohnB316 (SOHO coordinator), Hanumizzle, "
+"Lost&LovingLinux, Kocil, BigPaws, Cintyram, Lagagnon, GrannyGeek, Gamfa, "
+"Jaos, Joe1962, JohnVan, Lyn, Monty67, PastorEd, The HeadAcher, Paul, SuSE-"
+"Refugee, Vanger, TonyH9904, UKBill, Uelsk8s, VxT.
\n"
+"\n"
+"Installer Credits:
\n"
+"Made in Gambas2 by Joe1962 and Uelsk8s.\n"
+"\n"
+"Vector Linux links:
\n"
+"\n"
+"\n"
+"\t- Homepage: http://www.vectorlinux.com
\n"
+"\t- User Forum: http://www.vectorlinux.com/forum
\n"
+"\t- SourceForge: https://sourceforge.net/projects/vectorlinux
\n"
+"\t- Wikipedia: http://en.wikipedia.org/wiki/Vector_Linux
\n"
+"
\n"
+"\n"
+"\n"
+
+#: frmWelcome.class:82
+msgid "Welcome to Vector Linux!"
+msgstr "Welcome to Vector Linux!"
+
+#: frmWelcome.class:99
+msgid "START"
+msgstr ""
+
+#~ msgid "Auto partitioning"
+#~ msgstr "Auto partitioning"
+
+#~ msgid "Manual partitioning"
+#~ msgstr "Manual partitioning"
+
+#~ msgid "Manual selection"
+#~ msgstr "Manual selection"
+
+#~ msgid "Other partitioning"
+#~ msgstr "Other partitioning"
+
+#~ msgid "Tool 6"
+#~ msgstr "Tool 6"
diff --git a/.lang/en_US.po b/.lang/en_US.po
new file mode 100644
index 0000000..05a3e2a
--- /dev/null
+++ b/.lang/en_US.po
@@ -0,0 +1,483 @@
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n"
+"POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
+#: .project:1
+msgid "VL-gui-installer"
+msgstr ""
+
+#: InputBox.class:196
+msgid "Enter a value:"
+msgstr ""
+
+#: InputBox.class:202 frmDriveSelect.class:123 frmPartSelect.class:367
+msgid "OK"
+msgstr ""
+
+#: InputBox.class:209 frmDriveSelect.class:130 frmPartSelect.class:374
+msgid "Cancel"
+msgstr ""
+
+#: frmChoice.class:90
+msgid ""
+"You have 3 choices:
\n"
+"\n"
+"\n"
+"\t- Full-automatic install: Our easiest install yet; just "
+"choose this option and click ok and your system will be set up, partitions "
+"and all. WARNING: this option will DELETE everything "
+"on your hard disk, or offer a choice if there are multiple disks (unless one "
+"is empty). You have been WARNED.
\n"
+"\t- Semi-automatic install: This option is much easier with "
+"the added GParted; just partition your drives and your system will be set up "
+"for you.
\n"
+"\t- Advanced install: For the technically savvy user that "
+"must do everything by hand. You can control most aspects of the install."
+"li>\n"
+"
\n"
+msgstr ""
+
+#: frmChoice.class:101
+msgid "Choose install type"
+msgstr ""
+
+#: frmChoice.class:116
+msgid "Install types"
+msgstr ""
+
+#: frmChoice.class:121
+msgid "Full-automatic"
+msgstr ""
+
+#: frmChoice.class:127
+msgid "Semi-automatic"
+msgstr ""
+
+#: frmChoice.class:133
+msgid "Advanced"
+msgstr ""
+
+#: frmConfig.class:112
+msgid ""
+"Configuration:
\n"
+"\n"
+"Linux Loader boot manager setup:\n"
+"\n"
+"\t- Master Boot Record: Install Linux Loader boot manager to the "
+"master Boot Record of the bootable hard disk. This is the simplest method "
+"and the default action for most common operating systems.
\n"
+"\t- VL Boot sector: Install Linux Loader boot manager to the Boot "
+"Sector of the Vector Linux install partition. This will require the "
+"following extra steps:\n"
+"\t\t
\n"
+"\t\t\t- make the Vector Linux partition bootable using a partition manager."
+"
\n"
+"\t\t\t- add an option to your default boot manager to boot to LiLo in this "
+"partition.
\n"
+"\t\t
\n"
+"\t \n"
+"\t- Floppy diskette: Install Linux Loader boot manager to a floopy "
+"diskette in /dev/fd0 (drive A:). You can then boot to the Vector Linux "
+"install by simply booting the diskette.
\n"
+"\t- Do not install: Do not install Linux Loader. Select this if you "
+"use another boot manager and know how to set up an option to boot the Vector "
+"Linux install from it.
\n"
+"
\n"
+"\n"
+"Other configuration:\n"
+"\n"
+"\t- Config 1: Other configuration selection 1.
\n"
+"\t- Config 2: Other configuration selection 2.
\n"
+"
\n"
+msgstr ""
+
+#: frmConfig.class:123
+msgid "Additional configuration"
+msgstr ""
+
+#: frmConfig.class:138
+msgid "Boot manager"
+msgstr ""
+
+#: frmConfig.class:145
+msgid "Master Boot Record"
+msgstr ""
+
+#: frmConfig.class:153
+msgid "VL Boot Sector"
+msgstr ""
+
+#: frmConfig.class:161
+msgid "Floppy diskette"
+msgstr ""
+
+#: frmConfig.class:169
+msgid "Do not install"
+msgstr ""
+
+#: frmConfig.class:176
+msgid "Other configuration"
+msgstr ""
+
+#: frmConfig.class:183
+msgid "Config 1"
+msgstr ""
+
+#: frmConfig.class:191
+msgid "Config 2"
+msgstr ""
+
+#: frmDriveSelect.class:104 frmPartSelect.class:342
+msgid "Drives"
+msgstr ""
+
+#: frmDriveSelect.class:112
+msgid "Click on a row to select..."
+msgstr ""
+
+#: frmGO.class:83
+msgid "Ready to install!"
+msgstr ""
+
+#: frmMain.class:202
+msgid "Welcome!"
+msgstr ""
+
+#: frmMain.class:211
+msgid "The choice"
+msgstr ""
+
+#: frmMain.class:220 frmPartSelect.class:382
+msgid "Partitions"
+msgstr ""
+
+#: frmMain.class:229
+msgid "Packages"
+msgstr ""
+
+#: frmMain.class:238
+msgid "Configure"
+msgstr ""
+
+#: frmMain.class:247
+msgid "Go for it!"
+msgstr ""
+
+#: frmMain.class:259
+msgid "Tools"
+msgstr ""
+
+#: frmMain.class:270
+msgid "Exit"
+msgstr ""
+
+#: frmPackages.class:97
+msgid ""
+"Package selection strategies:
\n"
+"\n"
+"Assisted selection: Maintains dependency coherency.\n"
+"\n"
+"\t- All packages: Equivalent to a full distro install. All included "
+"packages will be installed to your hard disk.
\n"
+"\t- Package groups: Allow selection of what to install by logical "
+"package groupings.
\n"
+"
\n"
+"Advanced selection: WARNING: you will "
+"be responsible for what you install or not.\n"
+"\n"
+"\t- Manual selection: Manual selection from the full list of "
+"packages, sorted by categories.
\n"
+"\t- No extra packages: Install just the Vector Linux base distro. "
+"You know what you really want and will customise the install yourself."
+"font>
\n"
+"
\n"
+msgstr ""
+
+#: frmPackages.class:109
+msgid "Package selection"
+msgstr ""
+
+#: frmPackages.class:124
+msgid "Assisted selection"
+msgstr ""
+
+#: frmPackages.class:129
+msgid "All packages"
+msgstr ""
+
+#: frmPackages.class:135
+msgid "By groups"
+msgstr ""
+
+#: frmPackages.class:142
+msgid "Advanced selection"
+msgstr ""
+
+#: frmPackages.class:147 frmPartitions.class:278
+msgid "Manual"
+msgstr ""
+
+#: frmPackages.class:153
+msgid "No extras"
+msgstr ""
+
+#: frmPartSelect.class:256
+msgid "Mountpoints"
+msgstr ""
+
+#: frmPartSelect.class:262
+msgid "/"
+msgstr ""
+
+#: frmPartSelect.class:268
+msgid "/home"
+msgstr ""
+
+#: frmPartSelect.class:274
+msgid "/var"
+msgstr ""
+
+#: frmPartSelect.class:280
+msgid "/opt"
+msgstr ""
+
+#: frmPartSelect.class:286
+msgid "/tmp"
+msgstr ""
+
+#: frmPartSelect.class:292
+msgid "/boot"
+msgstr ""
+
+#: frmPartSelect.class:298
+msgid "/usr"
+msgstr ""
+
+#: frmPartSelect.class:304
+msgid "/share"
+msgstr ""
+
+#: frmPartSelect.class:310
+msgid "FileSystem"
+msgstr ""
+
+#: frmPartSelect.class:316
+msgid "xfs"
+msgstr ""
+
+#: frmPartSelect.class:322
+msgid "reiserfs"
+msgstr ""
+
+#: frmPartSelect.class:328
+msgid "ext3"
+msgstr ""
+
+#: frmPartSelect.class:334
+msgid "ext2"
+msgstr ""
+
+#: frmPartSelect.class:350
+msgid "Click on select install drive"
+msgstr ""
+
+#: frmPartSelect.class:356
+msgid "Right-click in Mount or FileSystem to set"
+msgstr ""
+
+#: frmPartSelect.class:390
+msgid ""
+"\n"
+"- Left-click to (un)select drive(s) to install Vector Linux.
\n"
+"- Right-click on Linux partitions to pick mountpoint
\n"
+"- Left-click on other partitions to edit mountpoint
\n"
+"
\n"
+msgstr ""
+
+#: frmPartitions.class:229
+msgid ""
+"Available partitioning modes:
\n"
+"\n"
+"Automatic partitioning: The installer will handle all "
+"partition related decisions for you:\n"
+"\t\n"
+"\t\t- Full disk: WARNING: this option will "
+"DELETE everything on your hard disk, or offer a choice if there are multiple "
+"disks (unless one is empty). You have been WARNED.
\n"
+"\t\t- Free space: using available free (unpartitioned) disk space."
+"li>\n"
+"\t
\n"
+"Manual partitioning: You have full control of partitioning.\n"
+"\t\n"
+"\t\t- Using GParted (the advanced graphical partitioner).
\n"
+"\t\t- Using cfdisk (the traditional partition tool).
\n"
+"\t
\n"
+"Other partitioning:\n"
+"\t\n"
+"\t\t- Preset strategies: auto allocates partitions according to "
+"most common usage strategy intended for this computer.
\n"
+"\t\t- No partitioning: If you wish to use existing Linux and swap "
+"partitions. WARNING: The existing Linux partitions "
+"will be OVERWRITTEN. You have been WARNED.
\n"
+"\t
\n"
+msgstr ""
+
+#: frmPartitions.class:241
+msgid "Partitioning mode"
+msgstr ""
+
+#: frmPartitions.class:256
+msgid "Automatic"
+msgstr ""
+
+#: frmPartitions.class:263
+msgid "Full disk"
+msgstr ""
+
+#: frmPartitions.class:271
+msgid "Free space"
+msgstr ""
+
+#: frmPartitions.class:285
+msgid "GParted"
+msgstr ""
+
+#: frmPartitions.class:293
+msgid "cfdisk"
+msgstr ""
+
+#: frmPartitions.class:300
+msgid "Others"
+msgstr ""
+
+#: frmPartitions.class:307
+msgid "Preset strategies"
+msgstr ""
+
+#: frmPartitions.class:315
+msgid "No partitioning"
+msgstr ""
+
+#: frmTools.class:110
+msgid ""
+"Vector Linux repair tools:
\n"
+"\n"
+"Distro repair tools: \n"
+"\n"
+"\t- Repair LILO: Repair Linux Loader boot manager of an "
+"existing Vector Linux installation.
\n"
+"\t- Restore packages: Restore original packages from the install "
+"CD, to fix a broken upgrade.
\n"
+"
\n"
+"Backup / restore tools: \n"
+"\n"
+"\t- Backup /home: Backup your /home directory for safekeeping."
+"li>\n"
+"\t
- Restore /home: Restore your /home directory from a previous "
+"backup. WARNING: The existing /home directory will "
+"be OVERWRITTEN during restore. You have been WARNED.
\n"
+"
\n"
+"Miscellaneous tools: \n"
+"\n"
+"\t- Tool 5: Tool number 5 to fix something or other.
\n"
+"\t- Tool 6: Tool number 6 to fix something or other.
\n"
+"
\n"
+"\n"
+msgstr ""
+
+#: frmTools.class:122
+msgid "VL Tools"
+msgstr ""
+
+#: frmTools.class:137
+msgid "Distro repair"
+msgstr ""
+
+#: frmTools.class:144
+msgid "Restore packages"
+msgstr ""
+
+#: frmTools.class:152
+msgid "Repair LILO"
+msgstr ""
+
+#: frmTools.class:159
+msgid "Backup / restore"
+msgstr ""
+
+#: frmTools.class:166
+msgid "Backup /home"
+msgstr ""
+
+#: frmTools.class:174
+msgid "Restore /home"
+msgstr ""
+
+#: frmTools.class:181
+msgid "Miscellaneous"
+msgstr ""
+
+#: frmTools.class:188
+msgid "Tool 5"
+msgstr ""
+
+#: frmTools.class:196
+msgid "(Make FHS tree)"
+msgstr ""
+
+#: frmWelcome.class:70
+msgid ""
+"Dear Vector Linux user:
\n"
+"\n"
+"We have worked very hard to make this install as quick and easy as "
+"possible. We hope you will also like its looks ;-). To install, click on the "
+"START button below the VL logo. Use "
+"the buttons on the top row to return to a previous stage. If you have "
+"already installed VL and just need to use some of the rescue functions, head "
+"on over to the Tools button.
\n"
+"\n"
+"Distro Credits:
\n"
+"\n"
+"The Vector Linux Community members that made this endeavour possible: "
+"Vector (Founder), Tigger (SOHO Architect), Kocil (Dynamite Man), JohnB316 "
+"(SOHO Chief), Joe1962 (VL-hot Chief), Uelsk8s (LIVE Chief), Barlas, Berke, "
+"Cintyram, Freakyc, Gamfa, GbHill, Hanumizzle, Inggy, Jbcolmena, Jaos, "
+"JohnVan, Keffin, Lagagnon, Lost&LovinLinux, Lyn, Mamahoohoo, Maf3000, "
+"Monty67, Mutiny, Niiler, PastorEd, Paul, Ren, Shalow_Hal, Suse-Refugee, "
+"TonyH9904, UKBill, Vanger, Verbl-Kint, VxT, WebMouse, Wile_Coyote, YaP, "
+"Yiannis, Zarniwoop.
\n"
+"\n"
+"Installer Credits:
\n"
+"Made in Gambas2 by Joe1962 and Uelsk8s.\n"
+"\n"
+"Vector Linux links:
\n"
+"\n"
+"\n"
+"\n"
+"\n"
+msgstr ""
+
+#: frmWelcome.class:82
+msgid "Welcome to Vector Linux!"
+msgstr ""
+
+#: frmWelcome.class:99
+msgid "START"
+msgstr ""
diff --git a/.lang/es.mo b/.lang/es.mo
new file mode 100644
index 0000000..b36deea
Binary files /dev/null and b/.lang/es.mo differ
diff --git a/.lang/es.po b/.lang/es.po
new file mode 100644
index 0000000..c61866d
--- /dev/null
+++ b/.lang/es.po
@@ -0,0 +1,552 @@
+# #-#-#-#-# #project.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/.project
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# CDiskInfo.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/CDiskInfo.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# CPartInfo.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/CPartInfo.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# Global.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/Global.module
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# frmChoice.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/frmChoice.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# frmGO.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/frmGO.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# frmLieLow.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/frmLieLow.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# frmMain.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/frmMain.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# frmPackages.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/frmPackages.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# frmPartitioner.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/frmPartitioner.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# frmPartitions.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/frmPartitions.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# frmTools.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/frmTools.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+# #-#-#-#-# frmWelcome.pot (PACKAGE VERSION) #-#-#-#-#
+# /home/joe1962/develop/gambas2/new-installer/frmWelcome.class
+# Generated by Gambas compiler
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n"
+"POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
+#: .project:1
+#, fuzzy
+msgid "VL-gui-installer"
+msgstr "-"
+
+#: InputBox.class:196
+msgid "Enter a value:"
+msgstr ""
+
+#: InputBox.class:202 frmDriveSelect.class:123 frmPartSelect.class:367
+msgid "OK"
+msgstr ""
+
+#: InputBox.class:209 frmDriveSelect.class:130 frmPartSelect.class:374
+msgid "Cancel"
+msgstr ""
+
+#: frmChoice.class:90
+msgid ""
+"You have 3 choices:
\n"
+"\n"
+"\n"
+"\t- Full-automatic install: Our easiest install yet; just "
+"choose this option and click ok and your system will be set up, partitions "
+"and all. WARNING: this option will DELETE everything "
+"on your hard disk, or offer a choice if there are multiple disks (unless one "
+"is empty). You have been WARNED.
\n"
+"\t- Semi-automatic install: This option is much easier with "
+"the added GParted; just partition your drives and your system will be set up "
+"for you.
\n"
+"\t- Advanced install: For the technically savvy user that "
+"must do everything by hand. You can control most aspects of the install."
+"li>\n"
+"
\n"
+msgstr ""
+
+#: frmChoice.class:101
+msgid "Choose install type"
+msgstr "Escoja tipo de instalación"
+
+#: frmChoice.class:116
+msgid "Install types"
+msgstr "Tipos de instalación"
+
+#: frmChoice.class:121
+msgid "Full-automatic"
+msgstr "Automática"
+
+#: frmChoice.class:127
+msgid "Semi-automatic"
+msgstr "Semi-automática"
+
+#: frmChoice.class:133
+msgid "Advanced"
+msgstr "Avanzada"
+
+#: frmConfig.class:112
+msgid ""
+"Configuration:
\n"
+"\n"
+"Linux Loader boot manager setup:\n"
+"\n"
+"\t- Master Boot Record: Install Linux Loader boot manager to the "
+"master Boot Record of the bootable hard disk. This is the simplest method "
+"and the default action for most common operating systems.
\n"
+"\t- VL Boot sector: Install Linux Loader boot manager to the Boot "
+"Sector of the Vector Linux install partition. This will require the "
+"following extra steps:\n"
+"\t\t
\n"
+"\t\t\t- make the Vector Linux partition bootable using a partition manager."
+"
\n"
+"\t\t\t- add an option to your default boot manager to boot to LiLo in this "
+"partition.
\n"
+"\t\t
\n"
+"\t \n"
+"\t- Floppy diskette: Install Linux Loader boot manager to a floopy "
+"diskette in /dev/fd0 (drive A:). You can then boot to the Vector Linux "
+"install by simply booting the diskette.
\n"
+"\t- Do not install: Do not install Linux Loader. Select this if you "
+"use another boot manager and know how to set up an option to boot the Vector "
+"Linux install from it.
\n"
+"
\n"
+"\n"
+"Other configuration:\n"
+"\n"
+"\t- Config 1: Other configuration selection 1.
\n"
+"\t- Config 2: Other configuration selection 2.
\n"
+"
\n"
+msgstr ""
+
+#: frmConfig.class:123
+msgid "Additional configuration"
+msgstr "Configuración adicional"
+
+#: frmConfig.class:138
+msgid "Boot manager"
+msgstr "Manejador arranque"
+
+#: frmConfig.class:145
+msgid "Master Boot Record"
+msgstr "Sector arranque"
+
+#: frmConfig.class:153
+msgid "VL Boot Sector"
+msgstr "Partición VL"
+
+#: frmConfig.class:161
+msgid "Floppy diskette"
+msgstr "Disquete"
+
+#: frmConfig.class:169
+msgid "Do not install"
+msgstr "No instalar"
+
+#: frmConfig.class:176
+msgid "Other configuration"
+msgstr "Otras configuraciones"
+
+#: frmConfig.class:183
+msgid "Config 1"
+msgstr "Config 1"
+
+#: frmConfig.class:191
+msgid "Config 2"
+msgstr "Config 2"
+
+#: frmDriveSelect.class:104 frmPartSelect.class:342
+msgid "Drives"
+msgstr ""
+
+#: frmDriveSelect.class:112
+msgid "Click on a row to select..."
+msgstr ""
+
+#: frmGO.class:83
+msgid "Ready to install!"
+msgstr "Listo para instalar!"
+
+#: frmMain.class:202
+msgid "Welcome!"
+msgstr "Bienvenido!"
+
+#: frmMain.class:211
+msgid "The choice"
+msgstr "Opciones"
+
+#: frmMain.class:220 frmPartSelect.class:382
+msgid "Partitions"
+msgstr "Particiones"
+
+#: frmMain.class:229
+msgid "Packages"
+msgstr "Paquetes"
+
+#: frmMain.class:238
+msgid "Configure"
+msgstr "Configurar"
+
+#: frmMain.class:247
+msgid "Go for it!"
+msgstr "Adelante!"
+
+#: frmMain.class:259
+msgid "Tools"
+msgstr "Herramientas"
+
+#: frmMain.class:270
+msgid "Exit"
+msgstr "Salir"
+
+#: frmPackages.class:97
+msgid ""
+"Package selection strategies:
\n"
+"\n"
+"Assisted selection: Maintains dependency coherency.\n"
+"\n"
+"\t- All packages: Equivalent to a full distro install. All included "
+"packages will be installed to your hard disk.
\n"
+"\t- Package groups: Allow selection of what to install by logical "
+"package groupings.
\n"
+"
\n"
+"Advanced selection: WARNING: you will "
+"be responsible for what you install or not.\n"
+"\n"
+"\t- Manual selection: Manual selection from the full list of "
+"packages, sorted by categories.
\n"
+"\t- No extra packages: Install just the Vector Linux base distro. "
+"You know what you really want and will customise the install yourself."
+"font>
\n"
+"
\n"
+msgstr ""
+
+#: frmPackages.class:109
+msgid "Package selection"
+msgstr "Selección de paquetes"
+
+#: frmPackages.class:124
+msgid "Assisted selection"
+msgstr "Selección asistida"
+
+#: frmPackages.class:129
+msgid "All packages"
+msgstr "Todos"
+
+#: frmPackages.class:135
+msgid "By groups"
+msgstr "Por grupos"
+
+#: frmPackages.class:142
+msgid "Advanced selection"
+msgstr "Selección avanzada"
+
+#: frmPackages.class:147 frmPartitions.class:278
+msgid "Manual"
+msgstr "Manual"
+
+#: frmPackages.class:153
+msgid "No extras"
+msgstr "Sin extras"
+
+#: frmPartSelect.class:256
+msgid "Mountpoints"
+msgstr ""
+
+#: frmPartSelect.class:262
+msgid "/"
+msgstr ""
+
+#: frmPartSelect.class:268
+msgid "/home"
+msgstr ""
+
+#: frmPartSelect.class:274
+msgid "/var"
+msgstr ""
+
+#: frmPartSelect.class:280
+msgid "/opt"
+msgstr ""
+
+#: frmPartSelect.class:286
+msgid "/tmp"
+msgstr ""
+
+#: frmPartSelect.class:292
+msgid "/boot"
+msgstr ""
+
+#: frmPartSelect.class:298
+msgid "/usr"
+msgstr ""
+
+#: frmPartSelect.class:304
+msgid "/share"
+msgstr ""
+
+#: frmPartSelect.class:310
+msgid "FileSystem"
+msgstr ""
+
+#: frmPartSelect.class:316
+msgid "xfs"
+msgstr ""
+
+#: frmPartSelect.class:322
+msgid "reiserfs"
+msgstr ""
+
+#: frmPartSelect.class:328
+msgid "ext3"
+msgstr ""
+
+#: frmPartSelect.class:334
+msgid "ext2"
+msgstr ""
+
+#: frmPartSelect.class:350
+msgid "Click on select install drive"
+msgstr ""
+
+#: frmPartSelect.class:356
+msgid "Right-click in Mount or FileSystem to set"
+msgstr ""
+
+#: frmPartSelect.class:390
+msgid ""
+"\n"
+"- Left-click to (un)select drive(s) to install Vector Linux.
\n"
+"- Right-click on Linux partitions to pick mountpoint
\n"
+"- Left-click on other partitions to edit mountpoint
\n"
+"
\n"
+msgstr ""
+
+#: frmPartitions.class:229
+msgid ""
+"Available partitioning modes:
\n"
+"\n"
+"Automatic partitioning: The installer will handle all "
+"partition related decisions for you:\n"
+"\t\n"
+"\t\t- Full disk: WARNING: this option will "
+"DELETE everything on your hard disk, or offer a choice if there are multiple "
+"disks (unless one is empty). You have been WARNED.
\n"
+"\t\t- Free space: using available free (unpartitioned) disk space."
+"li>\n"
+"\t
\n"
+"Manual partitioning: You have full control of partitioning.\n"
+"\t\n"
+"\t\t- Using GParted (the advanced graphical partitioner).
\n"
+"\t\t- Using cfdisk (the traditional partition tool).
\n"
+"\t
\n"
+"Other partitioning:\n"
+"\t\n"
+"\t\t- Preset strategies: auto allocates partitions according to "
+"most common usage strategy intended for this computer.
\n"
+"\t\t- No partitioning: If you wish to use existing Linux and swap "
+"partitions. WARNING: The existing Linux partitions "
+"will be OVERWRITTEN. You have been WARNED.
\n"
+"\t
\n"
+msgstr ""
+
+#: frmPartitions.class:241
+msgid "Partitioning mode"
+msgstr "Modo particionamiento"
+
+#: frmPartitions.class:256
+msgid "Automatic"
+msgstr "Automático"
+
+#: frmPartitions.class:263
+msgid "Full disk"
+msgstr "Disco total"
+
+#: frmPartitions.class:271
+msgid "Free space"
+msgstr "Espacio libre"
+
+#: frmPartitions.class:285
+msgid "GParted"
+msgstr "-"
+
+#: frmPartitions.class:293
+msgid "cfdisk"
+msgstr "-"
+
+#: frmPartitions.class:300
+msgid "Others"
+msgstr "Otros"
+
+#: frmPartitions.class:307
+msgid "Preset strategies"
+msgstr "Por estrategias"
+
+#: frmPartitions.class:315
+msgid "No partitioning"
+msgstr "Sin particionar"
+
+#: frmTools.class:110
+msgid ""
+"Vector Linux repair tools:
\n"
+"\n"
+"Distro repair tools: \n"
+"\n"
+"\t- Repair LILO: Repair Linux Loader boot manager of an "
+"existing Vector Linux installation.
\n"
+"\t- Restore packages: Restore original packages from the install "
+"CD, to fix a broken upgrade.
\n"
+"
\n"
+"Backup / restore tools: \n"
+"\n"
+"\t- Backup /home: Backup your /home directory for safekeeping."
+"li>\n"
+"\t
- Restore /home: Restore your /home directory from a previous "
+"backup. WARNING: The existing /home directory will "
+"be OVERWRITTEN during restore. You have been WARNED.
\n"
+"
\n"
+"Miscellaneous tools: \n"
+"\n"
+"\t- Tool 5: Tool number 5 to fix something or other.
\n"
+"\t- Tool 6: Tool number 6 to fix something or other.
\n"
+"
\n"
+"\n"
+msgstr ""
+
+#: frmTools.class:122
+msgid "VL Tools"
+msgstr "Herramientas VL"
+
+#: frmTools.class:137
+msgid "Distro repair"
+msgstr "Reparación distro"
+
+#: frmTools.class:144
+msgid "Restore packages"
+msgstr "Restaurar paquetes"
+
+#: frmTools.class:152
+msgid "Repair LILO"
+msgstr "Reparar LILO"
+
+#: frmTools.class:159
+msgid "Backup / restore"
+msgstr "Salva / restaura"
+
+#: frmTools.class:166
+msgid "Backup /home"
+msgstr "Salvar /home"
+
+#: frmTools.class:174
+msgid "Restore /home"
+msgstr "Restaurar /home"
+
+#: frmTools.class:181
+msgid "Miscellaneous"
+msgstr "Misceláneas"
+
+#: frmTools.class:188
+msgid "Tool 5"
+msgstr "Tool 5"
+
+#: frmTools.class:196
+msgid "(Make FHS tree)"
+msgstr ""
+
+#: frmWelcome.class:70
+msgid ""
+"Dear Vector Linux user:
\n"
+"\n"
+"We have worked very hard to make this install as quick and easy as "
+"possible. We hope you will also like its looks ;-). To install, click on the "
+"START button below the VL logo. Use "
+"the buttons on the top row to return to a previous stage. If you have "
+"already installed VL and just need to use some of the rescue functions, head "
+"on over to the Tools button.
\n"
+"\n"
+"Distro Credits:
\n"
+"\n"
+"The Vector Linux Community members that made this endeavour possible: "
+"Vector (Founder), Tigger (SOHO Architect), Kocil (Dynamite Man), JohnB316 "
+"(SOHO Chief), Joe1962 (VL-hot Chief), Uelsk8s (LIVE Chief), Barlas, Berke, "
+"Cintyram, Freakyc, Gamfa, GbHill, Hanumizzle, Inggy, Jbcolmena, Jaos, "
+"JohnVan, Keffin, Lagagnon, Lost&LovinLinux, Lyn, Mamahoohoo, Maf3000, "
+"Monty67, Mutiny, Niiler, PastorEd, Paul, Ren, Shalow_Hal, Suse-Refugee, "
+"TonyH9904, UKBill, Vanger, Verbl-Kint, VxT, WebMouse, Wile_Coyote, YaP, "
+"Yiannis, Zarniwoop.
\n"
+"\n"
+"Installer Credits:
\n"
+"Made in Gambas2 by Joe1962 and Uelsk8s.\n"
+"\n"
+"Vector Linux links:
\n"
+"\n"
+"\n"
+"\n"
+"\n"
+msgstr ""
+
+#: frmWelcome.class:82
+msgid "Welcome to Vector Linux!"
+msgstr "Bienvenido a Vector Linux!"
+
+#: frmWelcome.class:99
+msgid "START"
+msgstr ""
+
+#~ msgid "Tool 6"
+#~ msgstr "Tool 6"
diff --git a/.lang/frmChoice.pot b/.lang/frmChoice.pot
new file mode 100644
index 0000000..7a0c5da
--- /dev/null
+++ b/.lang/frmChoice.pot
@@ -0,0 +1,40 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/frmChoice.class
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
+#: frmChoice.class:92
+msgid "You have 3 choices:
\n\n\n- Full-automatic install: Our easiest install yet; choose this option if you want to use your entire hard disk for VL. Your system will be automatically set up, partitions and all. WARNING: this option will DELETE everything on your hard disk, or offer a choice if there are multiple disks. There will of course be a confirmation dialog in case you selected this option by mistake.
\n- Semi-automatic install: With this option, you manually partition your drives with gparted, but the rest of the setup will be pretty automatic.
\n- Advanced install: For the technically savvy user that must do everything by hand. You can control most aspects of the install. However, there will be assisted options available all the way through, so this is a very flexible install.
\n
\n"
+msgstr ""
+
+#: frmChoice.class:103
+msgid "Choose install type"
+msgstr ""
+
+#: frmChoice.class:118
+msgid "Install types"
+msgstr ""
+
+#: frmChoice.class:123
+msgid "Full-automatic"
+msgstr ""
+
+#: frmChoice.class:129
+msgid "Semi-automatic"
+msgstr ""
+
+#: frmChoice.class:135
+msgid "Advanced"
+msgstr ""
+
diff --git a/.lang/frmConfig.pot b/.lang/frmConfig.pot
new file mode 100644
index 0000000..f35b9f7
--- /dev/null
+++ b/.lang/frmConfig.pot
@@ -0,0 +1,56 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/frmConfig.class
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
+#: frmConfig.class:114
+msgid "Configuration:
\n\nLinux Loader boot manager setup:\n\n- Master Boot Record: Install Linux Loader boot manager to the master Boot Record of the bootable hard disk. This is the simplest method and the default action for most common operating systems.
\n- VL Boot sector: Install Linux Loader boot manager to the Boot Sector of the Vector Linux install partition. This will require the following extra steps:\n
\n- make the Vector Linux partition bootable using a partition manager.
\n- add an option to your default boot manager to boot to LiLo in this partition.
\n
\n \n- Floppy diskette: Install Linux Loader boot manager to a floopy diskette in /dev/fd0 (drive A:). You can then boot to the Vector Linux install by simply booting the diskette.
\n- Do not install: Do not install Linux Loader. Select this if you use another boot manager and know how to set up an option to boot the Vector Linux install from it.
\n
\n\nOther configuration:\n\n- Config 1: Other configuration selection 1.
\n- Config 2: Other configuration selection 2.
\n
\n"
+msgstr ""
+
+#: frmConfig.class:125
+msgid "Additional configuration"
+msgstr ""
+
+#: frmConfig.class:140
+msgid "Boot manager"
+msgstr ""
+
+#: frmConfig.class:147
+msgid "Master Boot Record"
+msgstr ""
+
+#: frmConfig.class:155
+msgid "VL Boot Sector"
+msgstr ""
+
+#: frmConfig.class:163
+msgid "Floppy diskette"
+msgstr ""
+
+#: frmConfig.class:171
+msgid "Do not install"
+msgstr ""
+
+#: frmConfig.class:178
+msgid "Other configuration"
+msgstr ""
+
+#: frmConfig.class:185
+msgid "Config 1"
+msgstr ""
+
+#: frmConfig.class:193
+msgid "Config 2"
+msgstr ""
+
diff --git a/.lang/frmDriveSelect.pot b/.lang/frmDriveSelect.pot
new file mode 100644
index 0000000..6acccbc
--- /dev/null
+++ b/.lang/frmDriveSelect.pot
@@ -0,0 +1,32 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/frmDriveSelect.class
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
+#: frmDriveSelect.class:107
+msgid "Drives"
+msgstr ""
+
+#: frmDriveSelect.class:115
+msgid "Click on a row to select..."
+msgstr ""
+
+#: frmDriveSelect.class:126
+msgid "OK"
+msgstr ""
+
+#: frmDriveSelect.class:133
+msgid "Cancel"
+msgstr ""
+
diff --git a/.lang/frmGO.pot b/.lang/frmGO.pot
new file mode 100644
index 0000000..4260d2f
--- /dev/null
+++ b/.lang/frmGO.pot
@@ -0,0 +1,20 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/frmGO.class
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
+#: frmGO.class:85
+msgid "Ready to install!"
+msgstr ""
+
diff --git a/.lang/frmMain.pot b/.lang/frmMain.pot
new file mode 100644
index 0000000..6bd2968
--- /dev/null
+++ b/.lang/frmMain.pot
@@ -0,0 +1,48 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/frmMain.class
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
+#: frmMain.class:207
+msgid "Welcome!"
+msgstr ""
+
+#: frmMain.class:216
+msgid "The choice"
+msgstr ""
+
+#: frmMain.class:225
+msgid "Partitions"
+msgstr ""
+
+#: frmMain.class:234
+msgid "Packages"
+msgstr ""
+
+#: frmMain.class:243
+msgid "Configure"
+msgstr ""
+
+#: frmMain.class:252
+msgid "Go for it!"
+msgstr ""
+
+#: frmMain.class:264
+msgid "Tools"
+msgstr ""
+
+#: frmMain.class:275
+msgid "Exit"
+msgstr ""
+
diff --git a/.lang/frmPackages.pot b/.lang/frmPackages.pot
new file mode 100644
index 0000000..4725e4b
--- /dev/null
+++ b/.lang/frmPackages.pot
@@ -0,0 +1,48 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/frmPackages.class
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
+#: frmPackages.class:99
+msgid "Package selection strategies:
\n\nAssisted selection: Maintains dependency coherency.\n\n- All packages: Equivalent to a full distro install. All included packages will be installed to your hard disk.
\n- Package groups: Allow selection of what to install by logical package groupings.
\n
\nAdvanced selection: WARNING: you will be responsible for what you install or not.\n\n- Manual selection: Manual selection from the full list of packages, sorted by categories.
\n- No extra packages: Install just the Vector Linux base distro. You know what you really want and will customise the install yourself.
\n
\n"
+msgstr ""
+
+#: frmPackages.class:111
+msgid "Package selection"
+msgstr ""
+
+#: frmPackages.class:126
+msgid "Assisted selection"
+msgstr ""
+
+#: frmPackages.class:131
+msgid "All packages"
+msgstr ""
+
+#: frmPackages.class:137
+msgid "By groups"
+msgstr ""
+
+#: frmPackages.class:144
+msgid "Advanced selection"
+msgstr ""
+
+#: frmPackages.class:149
+msgid "Manual"
+msgstr ""
+
+#: frmPackages.class:155
+msgid "No extras"
+msgstr ""
+
diff --git a/.lang/frmPartSelect.pot b/.lang/frmPartSelect.pot
new file mode 100644
index 0000000..04ed8b3
--- /dev/null
+++ b/.lang/frmPartSelect.pot
@@ -0,0 +1,100 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/frmPartSelect.class
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
+#: frmPartSelect.class:260
+msgid "Mountpoints"
+msgstr ""
+
+#: frmPartSelect.class:266
+msgid "/"
+msgstr ""
+
+#: frmPartSelect.class:272
+msgid "/home"
+msgstr ""
+
+#: frmPartSelect.class:278
+msgid "/var"
+msgstr ""
+
+#: frmPartSelect.class:284
+msgid "/opt"
+msgstr ""
+
+#: frmPartSelect.class:290
+msgid "/tmp"
+msgstr ""
+
+#: frmPartSelect.class:296
+msgid "/boot"
+msgstr ""
+
+#: frmPartSelect.class:302
+msgid "/usr"
+msgstr ""
+
+#: frmPartSelect.class:308
+msgid "/share"
+msgstr ""
+
+#: frmPartSelect.class:314
+msgid "FileSystem"
+msgstr ""
+
+#: frmPartSelect.class:320
+msgid "xfs"
+msgstr ""
+
+#: frmPartSelect.class:326
+msgid "reiserfs"
+msgstr ""
+
+#: frmPartSelect.class:332
+msgid "ext3"
+msgstr ""
+
+#: frmPartSelect.class:338
+msgid "ext2"
+msgstr ""
+
+#: frmPartSelect.class:346
+msgid "Drives"
+msgstr ""
+
+#: frmPartSelect.class:354
+msgid "Click on select install drive"
+msgstr ""
+
+#: frmPartSelect.class:360
+msgid "Right-click in Mount or FileSystem to set"
+msgstr ""
+
+#: frmPartSelect.class:371
+msgid "OK"
+msgstr ""
+
+#: frmPartSelect.class:378
+msgid "Cancel"
+msgstr ""
+
+#: frmPartSelect.class:386
+msgid "Partitions"
+msgstr ""
+
+#: frmPartSelect.class:394
+msgid "\n- Left-click to (un)select drive(s) to install Vector Linux.
\n- Right-click on Linux partitions to pick mountpoint
\n- Left-click on other partitions to edit mountpoint
\n
\n"
+msgstr ""
+
diff --git a/.lang/frmPartitioner.pot b/.lang/frmPartitioner.pot
new file mode 100644
index 0000000..06a9b43
--- /dev/null
+++ b/.lang/frmPartitioner.pot
@@ -0,0 +1,16 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/frmPartitioner.class
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
diff --git a/.lang/frmPartitions.pot b/.lang/frmPartitions.pot
new file mode 100644
index 0000000..1a4077e
--- /dev/null
+++ b/.lang/frmPartitions.pot
@@ -0,0 +1,60 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/frmPartitions.class
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
+#: frmPartitions.class:217
+msgid "Available partitioning modes:
\n\nAutomatic partitioning: The installer will handle all partition related decisions for you:\n\n- Full disk: Choose this option if you want to use your entire hard disk for VL. WARNING: this option will DELETE everything on your hard disk, or offer a choice if there are multiple disks. You have been WARNED.
\n- Free space: using available free (unpartitioned) disk space.
\n
\nManual partitioning: You have full control of partitioning.\n\n- Using gparted (the advanced graphical partitioner).
\n- Using cfdisk (the traditional partition tool).
\n
\nOther partitioning:\n\n- Preset strategies: auto allocates partitions according to most common usage strategy intended for this computer.
\n- No partitioning: If you wish to use existing Linux and swap partitions. WARNING: The existing Linux partitions will be OVERWRITTEN. You have been WARNED.
\n
\n"
+msgstr ""
+
+#: frmPartitions.class:229
+msgid "Partitioning mode"
+msgstr ""
+
+#: frmPartitions.class:244
+msgid "Automatic"
+msgstr ""
+
+#: frmPartitions.class:251
+msgid "Full disk"
+msgstr ""
+
+#: frmPartitions.class:259
+msgid "Free space"
+msgstr ""
+
+#: frmPartitions.class:266
+msgid "Manual"
+msgstr ""
+
+#: frmPartitions.class:273
+msgid "GParted"
+msgstr ""
+
+#: frmPartitions.class:281
+msgid "cfdisk"
+msgstr ""
+
+#: frmPartitions.class:288
+msgid "Others"
+msgstr ""
+
+#: frmPartitions.class:295
+msgid "Preset strategies"
+msgstr ""
+
+#: frmPartitions.class:303
+msgid "No partitioning"
+msgstr ""
+
diff --git a/.lang/frmTools.pot b/.lang/frmTools.pot
new file mode 100644
index 0000000..5d3a12e
--- /dev/null
+++ b/.lang/frmTools.pot
@@ -0,0 +1,60 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/frmTools.class
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
+#: frmTools.class:113
+msgid "Vector Linux repair tools:
\n\nDistro repair tools:\n\n- Repair LILO: Repair Linux Loader boot manager of an existing Vector Linux installation.
\n- Restore packages: Restore original packages from the install CD, to fix a broken upgrade.
\n
\nBackup / restore tools:\n\n- Backup /home: Backup your /home directory for safekeeping.
\n- Restore /home: Restore your /home directory from a previous backup. WARNING: The existing /home directory will be OVERWRITTEN during restore. You have been WARNED.
\n
\nMiscellaneous tools: \n\n- Tool 5: Tool number 5 to fix something or other.
\n- Tool 6: Tool number 6 to fix something or other.
\n
\n"
+msgstr ""
+
+#: frmTools.class:124
+msgid "VL Tools"
+msgstr ""
+
+#: frmTools.class:139
+msgid "Distro repair"
+msgstr ""
+
+#: frmTools.class:146
+msgid "Restore packages"
+msgstr ""
+
+#: frmTools.class:154
+msgid "Repair LILO"
+msgstr ""
+
+#: frmTools.class:161
+msgid "Backup / restore"
+msgstr ""
+
+#: frmTools.class:168
+msgid "Backup /home"
+msgstr ""
+
+#: frmTools.class:176
+msgid "Restore /home"
+msgstr ""
+
+#: frmTools.class:183
+msgid "Miscellaneous"
+msgstr ""
+
+#: frmTools.class:190
+msgid "Tool 5"
+msgstr ""
+
+#: frmTools.class:198
+msgid "(Make FHS tree)"
+msgstr ""
+
diff --git a/.lang/frmWelcome.pot b/.lang/frmWelcome.pot
new file mode 100644
index 0000000..5bead5b
--- /dev/null
+++ b/.lang/frmWelcome.pot
@@ -0,0 +1,28 @@
+# /home/joe1962/develop/2-cvs/vl-gui-installer/frmWelcome.class
+# Generated by Gambas compiler
+
+# FIRST AUTHOR , YEAR.
+#
+#, fuzzy
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\n""POT-Creation-Date: 2002-11-01 04:27+0100\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
+"Last-Translator: FULL NAME \n"
+"Language-Team: LANGUAGE \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
+#: frmWelcome.class:75
+msgid "Dear Vector Linux user:
\n\n\nWe have worked very hard to make this install as quick and easy as possible. We hope you will also like its looks. To install, click on the START button below the VL logo. Use the buttons on the top row to return to a previous stage. If you have already installed VL and just need to use some of the rescue functions, head on over to the Tools button.\n
\n\nAbout:
\n\n\nVector Linux is a small, but full-featured and VERY fast, Linux operating system for x86 PCs, based on one of the original Linux distributions, Slackware. VL is bloat free, easy to install, configure and maintain, with automatic hardware configuration, unique administration tools and easy package management via the Gslapt/slapt-get system.\n
\n\nCredits:
\n\n\nInstaller made in Gambas2 by Joe1962 and Uelsk8s, Gambas is the copyright of Benoit Minisini.\n
\n\n\nThe Vector Linux Community members that made this release possible: Vector (Founder), Tigger (SOHO Architect), Kocil (Dynamite Man), JohnB316 (SOHO Chief), Joe1962 (VL-hot Chief), Uelsk8s (LIVE Chief), Barlas, Berke, Cintyram, Freakyc, Gamfa, GbHill, Hanumizzle, Inggy, Jbcolmena, Jaos, JohnVan, Keffin, Lagagnon, Lost&LovinLinux, Lyn, Mamahoohoo, Maf3000, Monty67, Mutiny, Niiler, PastorEd, Paul, Ren, Shalow_Hal, Suse-Refugee, TonyH9904, UKBill, Vanger, Verbl-Kint, VxT, WebMouse, Wile_Coyote, YaP, Yiannis, Zarniwoop.\n
\n"
+msgstr ""
+
+#: frmWelcome.class:86
+msgid "Welcome to Vector Linux!"
+msgstr ""
+
+#: frmWelcome.class:111
+msgid "START"
+msgstr ""
+
diff --git a/.project b/.project
new file mode 100644
index 0000000..aa15af8
--- /dev/null
+++ b/.project
@@ -0,0 +1,10 @@
+# Gambas Project File 2.0
+Title=VL-gui-installer
+Startup=Main
+Icon=vl_logo_icon2.png
+Version=0.0.166
+Library=gb.qt
+Library=gb.qt.ext
+TabSize=3
+Translate=1
+ControlPublic=1
diff --git a/.settings b/.settings
new file mode 100644
index 0000000..a464495
--- /dev/null
+++ b/.settings
@@ -0,0 +1,16 @@
+[Breakpoints]
+Count=0
+
+[FFind]
+SearchIn="Project"
+CaseSensitive=False
+SearchWord=False
+SearchComment=False
+SearchString=True
+
+[Watches]
+Count=0
+
+[YWindows]
+Count=0
+
diff --git a/Functions.module b/Functions.module
new file mode 100644
index 0000000..2516909
--- /dev/null
+++ b/Functions.module
@@ -0,0 +1,217 @@
+' Gambas module file
+
+' ### SYSTEMWIDE FUNCTIONS ###
+
+PUBLIC FUNCTION AutoUnits(capacity AS Long) AS String
+' Return drive/partition size in nicer units as "value;unit" string:
+DIM temp AS Long
+
+IF capacity < 1000 THEN ' Bytes:
+ RETURN Format$(capacity, "###,###,###,###") & ";B"
+ELSE IF capacity < 1000000 THEN ' Kilobytes:
+ RETURN Format$(capacity / 1024, "###,###,###,###") & ";KB"
+ 'gridDisk[m + 1,units].Text = "KB"
+ELSE IF capacity < 1000000000 THEN ' Megabytes:
+ RETURN Format$(capacity / 1048576, "###,###,###,###") & ";MB"
+ 'gridDisk[m + 1,units].Text = "MB"
+ELSE ' Gigabytes:
+ RETURN Format$(capacity / 1073741824, "####,###,###,###") & ";GB"
+END IF
+
+' What about Terabytes? LOL.
+
+END
+
+PUBLIC FUNCTION getPartType(t AS String) AS String
+' Return partition type string from partition type code:
+
+IF Trim$(t) = "0" THEN RETURN "Empty"
+IF Trim$(t) = "1" THEN RETURN "FAT12"
+IF Trim$(t) = "2" THEN RETURN "XENIX root"
+IF Trim$(t) = "3" THEN RETURN "XENIX usr"
+IF Trim$(t) = "4" THEN RETURN "FAT16 <32MB"
+IF Trim$(t) = "5" THEN RETURN "Extended"
+IF Trim$(t) = "6" THEN RETURN "FAT16"
+IF Trim$(t) = "7" THEN RETURN "HPFS/NTFS"
+IF Trim$(t) = "8" THEN RETURN "AIX"
+IF Trim$(t) = "9" THEN RETURN "AIX bootable"
+IF Trim$(t) = "a" THEN RETURN "OS/2 Boot Manager"
+IF Trim$(t) = "b" THEN RETURN "W95 FAT32"
+IF Trim$(t) = "c" THEN RETURN "W95 FAT32 (LBA)"
+IF Trim$(t) = "e" THEN RETURN "W95 FAT16 (LBA)"
+IF Trim$(t) = "f" THEN RETURN "W95 Extended (LBA)"
+IF Trim$(t) = "10" THEN RETURN "OPUS"
+IF Trim$(t) = "11" THEN RETURN "Hidden FAT12"
+IF Trim$(t) = "12" THEN RETURN "Compaq diagnostics"
+IF Trim$(t) = "14" THEN RETURN "Hidden FAT16 <32MB"
+IF Trim$(t) = "16" THEN RETURN "Hidden FAT16"
+IF Trim$(t) = "17" THEN RETURN "Hidden HPFS/NTFS"
+IF Trim$(t) = "18" THEN RETURN "AST SmartSleep"
+IF Trim$(t) = "1b" THEN RETURN "Hidden W95 FAT32"
+IF Trim$(t) = "1c" THEN RETURN "Hidden W95 FAT32 (LBA)"
+IF Trim$(t) = "1e" THEN RETURN "Hidden W95 FAT16 (LBA)"
+IF Trim$(t) = "24" THEN RETURN "NEC DOS"
+IF Trim$(t) = "39" THEN RETURN "Plan 9"
+IF Trim$(t) = "3c" THEN RETURN "PartitionMagic recovery"
+IF Trim$(t) = "40" THEN RETURN "Venix 80286"
+IF Trim$(t) = "41" THEN RETURN "PPC PReP Boot"
+IF Trim$(t) = "42" THEN RETURN "SFS"
+IF Trim$(t) = "4d" THEN RETURN "QNX4.x"
+IF Trim$(t) = "4e" THEN RETURN "QNX4.x 2nd part"
+IF Trim$(t) = "4f" THEN RETURN "QNX4.x 3rd part"
+IF Trim$(t) = "50" THEN RETURN "OnTrack DM"
+IF Trim$(t) = "51" THEN RETURN "OnTrack DM6 Aux1"
+IF Trim$(t) = "52" THEN RETURN "CP/M"
+IF Trim$(t) = "53" THEN RETURN "OnTrack DM6 Aux3"
+IF Trim$(t) = "54" THEN RETURN "OnTrack DM6"
+IF Trim$(t) = "55" THEN RETURN "EZ-Drive"
+IF Trim$(t) = "56" THEN RETURN "Golden Bow"
+IF Trim$(t) = "5c" THEN RETURN "Priam Edisk"
+IF Trim$(t) = "61" THEN RETURN "SpeedStor"
+IF Trim$(t) = "63" THEN RETURN "GNU HURD or SysV"
+IF Trim$(t) = "64" THEN RETURN "Novell Netware 286"
+IF Trim$(t) = "65" THEN RETURN "Novell Netware 386"
+IF Trim$(t) = "70" THEN RETURN "DiskSecure Multi-Boot"
+IF Trim$(t) = "75" THEN RETURN "PC/IX"
+IF Trim$(t) = "80" THEN RETURN "Old Minix"
+IF Trim$(t) = "81" THEN RETURN "Minix / old Linux"
+IF Trim$(t) = "82" THEN RETURN "Linux swap"
+IF Trim$(t) = "83" THEN RETURN "Linux"
+IF Trim$(t) = "84" THEN RETURN "OS/2 hidden C: drive"
+IF Trim$(t) = "85" THEN RETURN "Linux extended"
+IF Trim$(t) = "86" THEN RETURN "NTFS volume set"
+IF Trim$(t) = "87" THEN RETURN "NTFS volume set"
+IF Trim$(t) = "88" THEN RETURN "Linux plaintext"
+IF Trim$(t) = "8e" THEN RETURN "Linux LVM"
+IF Trim$(t) = "93" THEN RETURN "Amoeba"
+IF Trim$(t) = "94" THEN RETURN "Amoeba BBT"
+IF Trim$(t) = "9f" THEN RETURN "BSD/OS"
+IF Trim$(t) = "a0" THEN RETURN "IBM Thinkpad hibernate"
+IF Trim$(t) = "a5" THEN RETURN "FreeBSD"
+IF Trim$(t) = "a6" THEN RETURN "OpenBSD"
+IF Trim$(t) = "a7" THEN RETURN "NeXTSTEP"
+IF Trim$(t) = "a8" THEN RETURN "Darwin UFS"
+IF Trim$(t) = "a9" THEN RETURN "NetBSD"
+IF Trim$(t) = "ab" THEN RETURN "Darwin boot"
+IF Trim$(t) = "b7" THEN RETURN "BSDI fs"
+IF Trim$(t) = "b8" THEN RETURN "BSDI swap"
+IF Trim$(t) = "bb" THEN RETURN "Boot Wizard hidden"
+IF Trim$(t) = "be" THEN RETURN "Solaris boot"
+IF Trim$(t) = "bf" THEN RETURN "Solaris"
+IF Trim$(t) = "c1" THEN RETURN "DRDOS/sec (FAT-12)"
+IF Trim$(t) = "c4" THEN RETURN "DRDOS/sec (FAT-16 <32MB)"
+IF Trim$(t) = "c6" THEN RETURN "DRDOS/sec (FAT-16)"
+IF Trim$(t) = "c7" THEN RETURN "Syrinx"
+IF Trim$(t) = "da" THEN RETURN "Non-FS data"
+IF Trim$(t) = "db" THEN RETURN "CP/M / CTOS / ..."
+IF Trim$(t) = "de" THEN RETURN "Dell Utility"
+IF Trim$(t) = "df" THEN RETURN "BootIt"
+IF Trim$(t) = "e1" THEN RETURN "DOS access"
+IF Trim$(t) = "e3" THEN RETURN "DOS R/O"
+IF Trim$(t) = "e4" THEN RETURN "SpeedStor"
+IF Trim$(t) = "eb" THEN RETURN "BeOS fs"
+IF Trim$(t) = "ee" THEN RETURN "EFI GPT"
+IF Trim$(t) = "ef" THEN RETURN "EFI (FAT-12/16/32)"
+IF Trim$(t) = "f0" THEN RETURN "Linux/PA-RISC boot"
+IF Trim$(t) = "f1" THEN RETURN "SpeedStor"
+IF Trim$(t) = "f2" THEN RETURN "DOS secondary"
+IF Trim$(t) = "f4" THEN RETURN "SpeedStor"
+IF Trim$(t) = "fd" THEN RETURN "Linux raid autodetect"
+IF Trim$(t) = "fe" THEN RETURN "LANstep"
+IF Trim$(t) = "ff" THEN RETURN "BBT"
+'IF Trim$(t) = "" THEN RETURN ""
+
+RETURN "unknown"
+
+END
+
+PUBLIC FUNCTION MakeTree(BaseDir AS String) AS Boolean
+' Create a full FHS dir tree within BaseDir:
+
+MKDIR BaseDir &/ "bin"
+MKDIR BaseDir &/ "boot"
+MKDIR BaseDir &/ "etc"
+ MKDIR BaseDir &/ "etc/opt"
+MKDIR BaseDir &/ "home"
+MKDIR BaseDir &/ "lib"
+MKDIR BaseDir &/ "media"
+ MKDIR BaseDir &/ "media/cdrom"
+ MKDIR BaseDir &/ "media/floppy"
+MKDIR BaseDir &/ "mnt"
+MKDIR BaseDir &/ "opt"
+MKDIR BaseDir &/ "root"
+MKDIR BaseDir &/ "sbin"
+MKDIR BaseDir &/ "srv"
+MKDIR BaseDir &/ "tmp"
+MKDIR BaseDir &/ "usr"
+ MKDIR BaseDir &/ "usr/bin"
+ MKDIR BaseDir &/ "usr/include"
+ MKDIR BaseDir &/ "usr/lib"
+ MKDIR BaseDir &/ "usr/local"
+ MKDIR BaseDir &/ "usr/local/bin"
+ MKDIR BaseDir &/ "usr/local/include"
+ MKDIR BaseDir &/ "usr/local/lib"
+ MKDIR BaseDir &/ "usr/local/sbin"
+ MKDIR BaseDir &/ "usr/local/share"
+ MKDIR BaseDir &/ "usr/local/share/doc"
+ MKDIR BaseDir &/ "usr/local/share/info"
+ MKDIR BaseDir &/ "usr/local/share/locale"
+ MKDIR BaseDir &/ "usr/local/share/man"
+ MKDIR BaseDir &/ "usr/local/share/man/man1"
+ MKDIR BaseDir &/ "usr/local/share/man/man2"
+ MKDIR BaseDir &/ "usr/local/share/man/man3"
+ MKDIR BaseDir &/ "usr/local/share/man/man4"
+ MKDIR BaseDir &/ "usr/local/share/man/man5"
+ MKDIR BaseDir &/ "usr/local/share/man/man6"
+ MKDIR BaseDir &/ "usr/local/share/man/man7"
+ MKDIR BaseDir &/ "usr/local/share/man/man8"
+ MKDIR BaseDir &/ "usr/local/share/misc"
+ MKDIR BaseDir &/ "usr/local/share/terminfo"
+ MKDIR BaseDir &/ "usr/local/share/zoneinfo"
+ MKDIR BaseDir &/ "usr/local/src"
+ MKDIR BaseDir &/ "usr/sbin"
+ MKDIR BaseDir &/ "usr/share"
+ MKDIR BaseDir &/ "usr/share/doc"
+ LINK BaseDir &/ "usr/doc" TO BaseDir &/ "usr/share/doc"
+ LINK BaseDir &/ "usr/local/doc" TO BaseDir &/ "usr/local/share/doc"
+ MKDIR BaseDir &/ "usr/share/info"
+ LINK BaseDir &/ "usr/info" TO BaseDir &/ "usr/share/info"
+ LINK BaseDir &/ "usr/local/info" TO BaseDir &/ "usr/local/share/info"
+ MKDIR BaseDir &/ "usr/share/locale"
+ MKDIR BaseDir &/ "usr/share/man"
+ LINK BaseDir &/ "usr/man" TO BaseDir &/ "usr/share/man"
+ LINK BaseDir &/ "usr/local/man" TO BaseDir &/ "usr/local/share/man"
+ MKDIR BaseDir &/ "usr/share/man/man1"
+ MKDIR BaseDir &/ "usr/share/man/man2"
+ MKDIR BaseDir &/ "usr/share/man/man3"
+ MKDIR BaseDir &/ "usr/share/man/man4"
+ MKDIR BaseDir &/ "usr/share/man/man5"
+ MKDIR BaseDir &/ "usr/share/man/man6"
+ MKDIR BaseDir &/ "usr/share/man/man7"
+ MKDIR BaseDir &/ "usr/share/man/man8"
+ MKDIR BaseDir &/ "usr/share/misc"
+ MKDIR BaseDir &/ "usr/share/terminfo"
+ MKDIR BaseDir &/ "usr/share/zoneinfo"
+ MKDIR BaseDir &/ "usr/src"
+MKDIR BaseDir &/ "var"
+ MKDIR BaseDir &/ "var/cache"
+ MKDIR BaseDir &/ "var/lib"
+ MKDIR BaseDir &/ "var/lib/locate"
+ MKDIR BaseDir &/ "var/lib/misc"
+ MKDIR BaseDir &/ "var/local"
+ MKDIR BaseDir &/ "var/lock"
+ MKDIR BaseDir &/ "var/log"
+ MKDIR BaseDir &/ "var/mail"
+ MKDIR BaseDir &/ "var/opt"
+ MKDIR BaseDir &/ "var/run"
+ MKDIR BaseDir &/ "var/spool"
+ MKDIR BaseDir &/ "var/tmp"
+
+' Success:
+RETURN TRUE
+
+CATCH ' Failed, usually due to already existing dirs:
+ RETURN FALSE
+
+END
+
diff --git a/Global.class b/Global.class
new file mode 100644
index 0000000..fd8c780
--- /dev/null
+++ b/Global.class
@@ -0,0 +1,64 @@
+' Gambas class file
+
+' ### GLOBAL DECLARATIONS ###
+
+' Background colour tests:
+'PUBLIC CONST DefaultColour AS Long = &H80AAFF&
+'PUBLIC CONST DefaultColour AS Long = &HFFFFFF&
+'STATIC PUBLIC CONST DefaultColour AS Long = &H0055FF&
+'STATIC PUBLIC CONST LogoBG AS Long = &H257CD2& 'RGB = 37:124:210; HSV = 210:210:210
+'STATIC PUBLIC CONST LogoBG AS Long = &H2D96FF& 'RGB = 45:150:255; HSV = 210:210:255
+STATIC PUBLIC CONST LogoBG AS Long = &H528DC8& 'RGB = 82:141:200; HSV = 210:150:200
+STATIC PUBLIC CONST HTMLBG AS Long = &HDFFFFF&
+STATIC PUBLIC CONST TextColour AS Long = &HFFFFFF&
+
+' Global flags:
+STATIC PUBLIC DebugMode AS Boolean
+STATIC PUBLIC SimulationMode AS Boolean
+STATIC PUBLIC flagStarted AS Boolean 'Start button was pressed.
+STATIC PUBLIC prevForm AS Long 'Which frmMain button is active.
+STATIC PUBLIC flagBUTTExec AS Boolean 'A button is executing.
+
+' Global enums:
+STATIC PUBLIC enumINSTMODE AS Long 'Install mode.
+' 0 = Full-automatic
+' 1 = Semi-automatic
+' 2 = Advanced
+STATIC PUBLIC enumPACKS AS Long 'Package selection mode.
+' 0 = All packages
+' 1 = By groups
+' 2 = Manual
+' 3 = No extras
+STATIC PUBLIC enumPARTMODE AS Long 'Partitioning mode.
+' 0 = Full disk
+' 1 = Free space
+' 2 = GParted
+' 3 = cfdisk
+' 4 = Preset strategies
+' 5 = No partitioning
+STATIC PUBLIC enumLILOMODE AS Long 'Boot manager installation.
+' 0 = Master Boot Record
+' 1 = VL Boot Sector
+' 2 = Floppy diskette
+' 3 = Do not install
+
+' Drive and partition declarations:
+STATIC PUBLIC DiskInfo AS NEW Object[]
+STATIC PUBLIC PartInfo AS NEW Object[]
+STATIC PUBLIC PARTinst AS NEW Object[]
+STATIC PUBLIC PARTroot AS String
+STATIC PUBLIC PARThome AS String
+STATIC PUBLIC PARTvar AS String
+STATIC PUBLIC PARTopt AS String
+STATIC PUBLIC PARTtmp AS String
+STATIC PUBLIC PARTboot AS String
+STATIC PUBLIC PARTusr AS String
+STATIC PUBLIC PARTshare AS String
+
+' Process declarations:
+STATIC PUBLIC tproc AS Process
+
+'temp stuff 2 check out:
+STATIC PUBLIC installDrive AS String
+
+
diff --git a/InputBox.class b/InputBox.class
new file mode 100644
index 0000000..338e52f
--- /dev/null
+++ b/InputBox.class
@@ -0,0 +1,178 @@
+' Gambas class file
+
+'''
+' Name: InputBox
+' Author: Timothy Marshal-Nichols
+' Company: automationControls
+' eMail: timothy@m-nichols.freeserve.co.uk
+' Version: 1.0
+' Version Date: Febuuary 2006
+' Version History:
+'
+' TWEAKED BY JOE1962
+'
+'''
+' Licence Information
+'
+' This program is free software; you can redistribute it and/or modify
+' it under the terms of the GNU General Public License as published by
+' the Free Software Foundation; either version 2 of the License, or
+' (at your option) any later version.
+'
+' This program is distributed in the hope that it will be useful,
+' but WITHOUT ANY WARRANTY; without even the implied warranty of
+' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+' GNU General Public License for more details.
+'
+' You should have received a copy of the GNU General Public License
+' along with this program; if not, write to the Free Software
+' Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+'
+' http://www.gnu.org/licenses/gpl.html
+'
+'''
+' Description:
+'
+' An text input box. A replacement for the Visual Basic InputBox.
+'
+'''
+' Dependencies:
+'
+' gb - Gambas internal native classes
+' gb.qt - Graphical QT toolkit component
+'
+'''
+' External Dependencies:
+'
+' None
+'
+'''
+' Class Usage:
+'
+' Call the static method Input
+'
+' InputBox.Input(Prompt [, Title] [, DefaultValue])
+'
+' Prompt
+' A string message to display in the dialog box. This may contain HTML formatting.
+'
+' Title
+' Optional title of the dialog box. If not set the the Application Title is used.
+'
+' DefaultValue
+' Optional default string displayed in the text entry area. If not set then the text entry area is empty
+'
+' Returns
+' Returns the string in the text entry area if the OK button is pressed.
+' Returns an empty string (“”) if the Cancel button is pressed
+'
+' Examples:
+'
+' ' Setting just the prompt. HTML formatting is used for the prompt.
+' DIM returnString AS String
+' returnString = InputBox.Input("Input String: Bold Value
Another line of text")
+' IF returnString THEN
+' ' Do something with returnString
+' END IF
+'
+' ' Setting the prompt and dialog title.
+' DIM returnString AS String
+' returnString = InputBox.Input("Input Value", "Show a new title")
+' IF returnString THEN
+' ' Do something with returnString
+' END IF
+'
+' ' Setting the prompt and default value.
+' DIM returnString AS String
+' returnString = InputBox.Input("Input Value", "", "Set a default value")
+' IF returnString THEN
+' ' Do something with returnString
+' END IF
+'
+'''
+
+STATIC returnValue AS String
+
+'''
+''' InputBox display method
+'''
+
+STATIC PUBLIC FUNCTION Input(Prompt AS String, OPTIONAL Title AS String, OPTIONAL DefaultValue AS String) AS String
+ DIM box AS NEW InputBox
+ ' Set input box prompt
+ box.Prompt = Prompt
+ ' Set input box title
+ IF Title THEN
+ box.Title = Title
+ ELSE
+ box.Title = Application.Title
+ END IF
+ ' Set default value
+ IF DefaultValue THEN
+ box.DefaultValue = DefaultValue
+ ELSE
+ box.DefaultValue = ""
+ END IF
+ ' Init return string
+ returnValue = ""
+ box.ShowDialog
+ RETURN returnValue
+END
+
+
+'''
+''' Properties
+'''
+
+' Read/Write the prompt
+PUBLIC PROPERTY Prompt AS String
+
+
+PRIVATE SUB Prompt_Write(Value AS String)
+ TextLabelPrompt.Text = Value
+END
+
+
+PRIVATE FUNCTION Prompt_Read() AS String
+ RETURN TextLabelPrompt.Text
+END
+
+
+' Read/Write the default value
+PUBLIC PROPERTY DefaultValue AS String
+
+
+PRIVATE SUB DefaultValue_Write(Value AS String)
+ ' We use Clear and Insert because this moves the
+ ' cursor to the end of the default text
+ TextBox1.Clear()
+ TextBox1.Insert(Value)
+ ' select default value string:
+ TextBox1.SelectAll
+END
+
+PRIVATE FUNCTION DefaultValue_Read() AS String
+ RETURN TextBox1.Text
+END
+
+PUBLIC SUB ButtonOK_Click()
+ ' Set the value to be returned by the Input static method
+ returnValue = TextBox1.Text
+ ME.Close
+END
+
+PUBLIC SUB ButtonCancel_Click()
+ ME.Close
+END
+
+
+PUBLIC SUB TextBox1_KeyPress()
+
+' Check for ENTER key and run OK button.
+
+END
+
+
+''' End of InputBox '''
+
+
diff --git a/InputBox.form b/InputBox.form
new file mode 100644
index 0000000..a3dce57
--- /dev/null
+++ b/InputBox.form
@@ -0,0 +1,36 @@
+# Gambas Form File 1.0
+
+{ Form Form
+ MoveScaled(32.375,12.625,30,12)
+ 'Move(259,101,240,96)
+ Font = Font["Luxi Sans"]
+ Text = ("")
+ Border = Window.Fixed
+ SkipTaskbar = True
+ { TextLabelPrompt TextLabel
+ MoveScaled(1,0,28,3)
+ 'Move(8,0,224,24)
+ Font = Font["Luxi Sans"]
+ Text = ("Enter a value:")
+ }
+ { ButtonOK Button
+ MoveScaled(1,7,12,4)
+ 'Move(8,56,96,32)
+ Font = Font["Luxi Sans"]
+ Text = ("OK")
+ Default = True
+ }
+ { ButtonCancel Button
+ MoveScaled(17,7,12,4)
+ 'Move(136,56,96,32)
+ Font = Font["Luxi Sans"]
+ Text = ("Cancel")
+ Cancel = True
+ }
+ { TextBox1 TextBox
+ MoveScaled(1,3,28,3)
+ 'Move(8,24,224,24)
+ Font = Font["Luxi Sans"]
+ Text = ("")
+ }
+}
diff --git a/Main.module b/Main.module
new file mode 100644
index 0000000..2af56e5
--- /dev/null
+++ b/Main.module
@@ -0,0 +1,71 @@
+' Gambas module file
+
+' ### MAIN SUBROUTINES ###
+
+PUBLIC SUB Main()
+
+' Set debugging mode:
+'Global.DebugMode = TRUE
+Global.DebugMode = FALSE
+
+' Simulation mode:
+IF User.Name <> "root" THEN
+ Global.SimulationMode = TRUE
+ message.Warning("You need to be root to run the VL installer" & gb.NewLine & "Switching to simulation mode...")
+ELSE
+ Global.SimulationMode = FALSE
+ENDIF
+
+' Initially no buttons being executed:
+Global.flagBUTTExec = FALSE
+
+' Load the Main window:
+frmMain.Load
+
+' Make always on top:
+'frmMain.TopOnly = TRUE
+
+' Loose the border at 640x480:
+'IF Desktop.Width = 640 THEN frmMain.Border = 0
+
+' Form size or Full Screen:
+'frmMain.FullScreen = TRUE 'Make this default when finished?
+'frmMain.Border = window.Resizable
+'frmMain.Width = 640 'Only if resizable.
+'frmMain.Height = 480 'Only if rsizable.
+'frmMain.Width = 800 'Only if resizable.
+'frmMain.Height = 600 'Only if resizable.
+'frmMain.Width = 1024 'Only if resizable.
+'frmMain.Height = 768 'Only if resizable.
+
+' Center if not using Full Screen:
+'frmMain.Center
+
+' Pre-load all forms for speed (comment out for less memory use):
+'frmTools.Reparent(frmMain.pnlContainer, 0, 0)
+'frmTools.Hide
+'frmGO.Reparent(frmMain.pnlContainer, 0, 0)
+'frmGO.Hide
+'frmLieLow.Reparent(frmMain.pnlContainer, 0, 0)
+'frmLieLow.Hide
+'frmPackages.Reparent(frmMain.pnlContainer, 0, 0)
+'frmPackages.Hide
+'frmPartitioner.Reparent(frmMain.pnlContainer, 0, 0)
+'frmPartitioner.Hide
+'frmPartitions.Reparent(frmMain.pnlContainer, 0, 0)
+'frmPartitions.Hide
+'frmChoice.Reparent(frmMain.pnlContainer, 0, 0)
+'frmChoice.Hide
+
+' Fit the Welcome window inside the Main one:
+frmWelcome.Reparent(frmMain.pnlContainer, 0, 0)
+
+' Start off with button 1 on Main window:
+Global.prevForm = 1
+
+' And get the show on the road....:
+frmMain.Show
+
+END
+
+
diff --git a/Utils.module b/Utils.module
new file mode 100644
index 0000000..d074f30
--- /dev/null
+++ b/Utils.module
@@ -0,0 +1,187 @@
+' Gambas module file
+
+' ### SYSTEMWIDE SUBROUTINES ###
+
+PUBLIC SUB DrivePartInfo()
+' Get available drives and partitions with fdisk:
+DIM sTemp AS String
+
+Global.DiskInfo.Clear
+Global.PartInfo.Clear
+
+IF Global.SimulationMode = FALSE THEN
+ EXEC ["fdisk", "-l"] TO sTemp
+ELSE
+ ' 4 debug:
+ ' English:
+ sTemp = Chr$(10)
+ sTemp = sTemp & "Disk /dev/hda: 40,0 GB, 40060403712 bytes" & Chr$(10)
+ sTemp = sTemp & "255 heads, 63 sectors/track, 4870 cylinders" & Chr$(10)
+ sTemp = sTemp & "Units = cylinders of 16065 * 512 = 8225280 bytes" & Chr$(10)
+ sTemp = sTemp & Chr$(10)
+ sTemp = sTemp & " Device Boot Start End Blocks Id System" & Chr$(10)
+ sTemp = sTemp & "/dev/hda1 * 1 1044 8385898+ 7 HPFS/NTFS" & Chr$(10)
+ sTemp = sTemp & "/dev/hda2 1045 1110 530145 82 Linux swap" & Chr$(10)
+ sTemp = sTemp & "/dev/hda4 1111 4870 30202200 f W95 Ext'd (LBA)" & Chr$(10)
+ sTemp = sTemp & "/dev/hda5 1111 2415 10482381 83 Linux" & Chr$(10)
+ sTemp = sTemp & "/dev/hda6 2416 4219 14490598+ c W95 FAT32 (LBA)" & Chr$(10)
+ sTemp = sTemp & "/dev/hda7 4220 4870 5229126 83 Linux" & Chr$(10)
+ sTemp = sTemp & Chr$(10)
+ sTemp = sTemp & "Disk /dev/sda: 258.0 MB, 258473984 bytes" & Chr$(10)
+ sTemp = sTemp & "8 heads, 62 sectors/track, 1017 cylinders" & Chr$(10)
+ sTemp = sTemp & "Units = cylinders of 496 * 512 = 253952 bytes" & Chr$(10)
+ sTemp = sTemp & Chr$(10)
+ sTemp = sTemp & " Device Boot Start End Blocks Id System" & Chr$(10)
+ sTemp = sTemp & "/dev/sda1 1 1017 252185 b W95 FAT32" & Chr$(10)
+ ' Spanish:
+ 'sTemp = Chr$(10)
+ 'sTemp = sTemp & "Disco /dev/hda: 40.0 GB, 40060403712 bytes" & Chr$(10)
+ 'sTemp = sTemp & "255 cabezas, 63 sectores/pista, 4870 cilindros" & Chr$(10)
+ 'sTemp = sTemp & "Unidades = cilindros de 16065 * 512 = 8225280 bytes" & Chr$(10)
+ 'sTemp = sTemp & Chr$(10)
+ 'sTemp = sTemp & "Disposit. Inicio Comienzo Fin Bloques Id Sistema" & Chr$(10)
+ 'sTemp = sTemp & "/dev/hda1 * 1 1044 8385898+ 7 HPFS/NTFS" & Chr$(10)
+ 'sTemp = sTemp & "/dev/hda2 1045 1110 530145 82 Linux swap" & Chr$(10)
+ 'sTemp = sTemp & "/dev/hda4 1111 4870 30202200 f W95 Ext'd (LBA)" & Chr$(10)
+ 'sTemp = sTemp & "/dev/hda5 1111 2415 10482381 83 Linux" & Chr$(10)
+ 'sTemp = sTemp & "/dev/hda6 2416 4219 14490598+ c W95 FAT32 (LBA)" & Chr$(10)
+ 'sTemp = sTemp & "/dev/hda7 4220 4870 5229126 83 Linux" & Chr$(10)
+ 'sTemp = sTemp & Chr$(10)
+ 'sTemp = sTemp & "Disco /dev/sda: 258 MB, 258473984 bytes" & Chr$(10)
+ 'sTemp = sTemp & "8 cabezas, 62 sectores/pista, 1017 cilindros" & Chr$(10)
+ 'sTemp = sTemp & "Unidades = cilindros de 496 * 512 = 253952 bytes" & Chr$(10)
+ 'sTemp = sTemp & Chr$(10)
+ 'sTemp = sTemp & "Disposit. Inicio Comienzo Fin Bloques Id Sistema" & Chr$(10)
+ 'sTemp = sTemp & "/dev/sda1 1 1017 252185 b W95 FAT32" & Chr$(10)
+ENDIF
+
+' Parse what fdisk has to say:
+Parse_fdisk(sTemp)
+
+END
+
+PUBLIC SUB Parse_fdisk(sTemp AS String)
+' Parse what fdisk has to say:
+DIM vDI AS NEW cDiskInfo
+DIM vPI AS NEW cPartInfo
+DIM arrTemp1 AS NEW String[]
+DIM arrTemp2 AS NEW String[]
+DIM pos AS Long
+DIM n AS Long, m AS Long
+DIM pcounter AS Long
+
+' 4 debug:
+IF Global.DebugMode = TRUE THEN
+ message.Info("Working in Simulation Mode..." & gb.NewLine & sTemp)
+ENDIF
+
+' Parse it:
+arrTemp1 = Split(sTemp, Chr$(10))
+FOR n = 0 TO arrTemp1.Max
+ pos = InStr(arrTemp1[n], "/dev/")
+ IF pos = 1 ' Parse a partition.
+ vPI = NEW cPartInfo
+ arrTemp2 = Split(arrTemp1[n], Space$(1), "", TRUE)
+ vPI.Device = arrTemp2[0]
+ IF Trim(arrTemp2[1]) = "*" THEN
+ vPI.Bootable = TRUE
+ vPI.StartBlock = arrTemp2[2]
+ vPI.EndBlock = arrTemp2[3]
+ IF Right$(arrTemp2[4]) = "+" THEN
+ vPI.Blocks = Val(Left$(arrTemp2[4], Len(arrTemp2[4]) - 1))
+ ELSE
+ vPI.Blocks = Val(arrTemp2[4])
+ ENDIF
+ vPI.ID = arrTemp2[5]
+ ELSE
+ vPI.Bootable = FALSE
+ vPI.StartBlock = arrTemp2[1]
+ vPI.EndBlock = arrTemp2[2]
+ IF Right$(arrTemp2[3]) = "+" THEN
+ vPI.Blocks = Val(Left$(arrTemp2[3], Len(arrTemp2[3]) - 1))
+ ELSE
+ vPI.Blocks = Val(arrTemp2[3])
+ ENDIF
+ vPI.ID = arrTemp2[4]
+ ENDIF
+ Global.PartInfo.Push(vPI)
+ ELSE IF pos > 1 ' Parse a disk drive.
+ vDI = NEW cDiskInfo
+ arrTemp2 = Split(arrTemp1[n], ":,", "", TRUE)
+ vDI.Device = Trim$(Mid$(arrTemp2[0], InStr(arrTemp2[0], "/dev")))
+ IF Val(arrTemp2[2]) > 0 THEN
+ vDI.Bytes = Val(arrTemp2[2])
+ ELSE
+ vDI.Bytes = Val(arrTemp2[3])
+ ENDIF
+ Global.DiskInfo.Push(vDI)
+ ELSE ' Nothing.
+ END IF
+NEXT
+
+' 4 debug:
+IF Global.DebugMode = TRUE THEN
+ FOR n = 0 TO Global.DiskInfo.Max
+ frmGo.TextLabel1.Text &= Global.DiskInfo[n].Device & ": " & Global.DiskInfo[n].Bytes & " bytes" & "
"
+ NEXT
+ frmGo.TextLabel1.Text &= "
"
+ FOR n = 0 TO Global.PartInfo.Max
+ frmGo.TextLabel1.Text &= Global.PartInfo[n].Device & "
"
+ frmGo.TextLabel1.Text &= "Bootable= " & Str(Global.PartInfo[n].Bootable) & "
"
+ frmGo.TextLabel1.Text &= "Start block= " & Global.PartInfo[n].StartBlock & "
"
+ frmGo.TextLabel1.Text &= "End block= " & Global.PartInfo[n].EndBlock & "
"
+ frmGo.TextLabel1.Text &= "Num. Blocks= " & Global.PartInfo[n].Blocks & "
"
+ frmGo.TextLabel1.Text &= "Part. ID= " & Global.PartInfo[n].ID & ", " & Functions.getPartType(Global.PartInfo[n].ID) & "
"
+ frmGo.TextLabel1.Text &= "
"
+ NEXT
+ENDIF
+
+END
+
+
+PUBLIC SUB BUTTdisable()
+' Disable all frmMain buttons:
+
+' Save state first:
+BUTTsave
+
+' Then disable:
+frmMain.Button1.Enabled = FALSE
+frmMain.Button2.Enabled = FALSE
+frmMain.Button3.Enabled = FALSE
+frmMain.Button4.Enabled = FALSE
+frmMain.Button5.Enabled = FALSE
+frmMain.Button6.Enabled = FALSE
+frmMain.Button7.Enabled = FALSE
+frmMain.ButExit.Enabled = FALSE
+
+END
+
+PUBLIC SUB BUTTsave()
+' Save state of all frmMain buttons:
+
+frmMain.Button1.Tag = frmMain.Button1.Enabled
+frmMain.Button2.Tag = frmMain.Button2.Enabled
+frmMain.Button3.Tag = frmMain.Button3.Enabled
+frmMain.Button4.Tag = frmMain.Button4.Enabled
+frmMain.Button5.Tag = frmMain.Button5.Enabled
+frmMain.Button6.Tag = frmMain.Button6.Enabled
+frmMain.Button7.Tag = frmMain.Button7.Enabled
+frmMain.ButExit.Tag = frmMain.ButExit.Enabled
+
+END
+
+PUBLIC SUB BUTTrest()
+' Restore saved state of all frmMain buttons:
+
+frmMain.Button1.Enabled = frmMain.Button1.Tag
+frmMain.Button2.Enabled = frmMain.Button2.Tag
+frmMain.Button3.Enabled = frmMain.Button3.Tag
+frmMain.Button4.Enabled = frmMain.Button4.Tag
+frmMain.Button5.Enabled = frmMain.Button5.Tag
+frmMain.Button6.Enabled = frmMain.Button6.Tag
+frmMain.Button7.Enabled = frmMain.Button7.Tag
+frmMain.ButExit.Enabled = frmMain.ButExit.Tag
+
+END
+
diff --git a/VL-logo-shine.png b/VL-logo-shine.png
new file mode 100644
index 0000000..c489c48
Binary files /dev/null and b/VL-logo-shine.png differ
diff --git a/VL.png b/VL.png
new file mode 100644
index 0000000..c2a2042
Binary files /dev/null and b/VL.png differ
diff --git a/cDiskInfo.class b/cDiskInfo.class
new file mode 100644
index 0000000..263af34
--- /dev/null
+++ b/cDiskInfo.class
@@ -0,0 +1,5 @@
+' Gambas class file
+
+' Structure for drive information array:
+PUBLIC Device AS String
+PUBLIC Bytes AS Long
diff --git a/cPartInfo.class b/cPartInfo.class
new file mode 100644
index 0000000..00d0222
--- /dev/null
+++ b/cPartInfo.class
@@ -0,0 +1,11 @@
+' Gambas class file
+
+' Structure for partition information array:
+PUBLIC Device AS String
+PUBLIC Bootable AS Boolean
+PUBLIC StartBlock AS Long
+PUBLIC EndBlock AS Long
+PUBLIC Blocks AS Long
+PUBLIC ID AS String
+PUBLIC Mountpoint AS String
+PUBLIC FileSystem AS String
diff --git a/cPartInstall.class b/cPartInstall.class
new file mode 100644
index 0000000..04f82fa
--- /dev/null
+++ b/cPartInstall.class
@@ -0,0 +1,6 @@
+' Gambas class file
+
+' Structure for installation partitions information array:
+PUBLIC Device AS String
+PUBLIC Mountpoint AS String
+PUBLIC FileSystem AS String
diff --git a/frmChoice.class b/frmChoice.class
new file mode 100644
index 0000000..49a3c75
--- /dev/null
+++ b/frmChoice.class
@@ -0,0 +1,55 @@
+' Gambas class file
+
+' ### CHOOSE INSTALL TYPE FORM ###
+
+PUBLIC SUB Form_Show()
+
+' set button focus:
+frmMain.Button2.SetFocus
+
+' set some background colours:
+TextLabel1.BackColor = Global.HTMLBG
+lblSubTitle.BackColor = Global.LogoBG
+Panel1.BackColor = Global.LogoBG
+
+END
+
+PUBLIC SUB Form_Resize()
+
+' Resize the html message:
+TextLabel1.Width = ScrollView1.ClientWidth
+TextLabel1.Adjust
+
+END
+
+PUBLIC SUB Button1_Click() ' Full-automatic.
+
+Global.enumINSTMODE = 1 ' Full-automatic install mode.
+
+Utils.DrivePartInfo
+IF Global.DiskInfo.Count > 1 THEN frmDriveSelect.ShowModal
+
+frmMain.Button2.Enabled = FALSE ' Disable Choices.
+frmMain.Button6.Enabled = TRUE ' Enable Go for it!.
+frmMain.Button6_Click ' Advance to Go for it!.
+
+END
+
+PUBLIC SUB Button2_Click() ' Semi-automatic.
+
+Global.enumINSTMODE = 1 ' Semi-automatic install mode.
+frmMain.Button2.Enabled = FALSE ' Disable Choices.
+frmMain.Button3.Enabled = TRUE ' Enable Partitions.
+frmMain.Button3_Click ' Advance to Partitions.
+
+END
+
+PUBLIC SUB Button3_Click() ' Advanced.
+
+Global.enumINSTMODE = 1 ' Advanced install mode.
+'frmMain.Button2.Enabled = FALSE ' Disable Choices
+frmMain.Button3.Enabled = TRUE ' Enable Partitions
+frmMain.Button3_Click ' Advance to Partitions
+
+END
+
diff --git a/frmChoice.form b/frmChoice.form
new file mode 100644
index 0000000..894e8ba
--- /dev/null
+++ b/frmChoice.form
@@ -0,0 +1,73 @@
+# Gambas Form File 1.0
+
+{ Form Form
+ MoveScaled(43.125,3.375,101.625,65.125)
+ 'Move(345,27,813,521)
+ Font = Font["Luxi Sans"]
+ Background = &HFFFFFF&
+ Text = ("")
+ Border = Window.None
+ Arrangement = Arrange.Horizontal
+ { ScrollView1 ScrollView
+ MoveScaled(0,0,60,61)
+ 'Move(0,0,480,488)
+ Font = Font["Luxi Sans,12"]
+ Background = &HDFFFFF&
+ Expand = True
+ ScrollBar = Scroll.Vertical
+ { TextLabel1 TextLabel
+ MoveScaled(0,0,73,52)
+ 'Move(0,0,584,416)
+ Font = Font["Luxi Sans,14"]
+ Background = &HDFFFFF&
+ Padding = 10
+ AutoResize = True
+ Text = ("You have 3 choices:
\n\n\n- Full-automatic install: Our easiest install yet; choose this option if you want to use your entire hard disk for VL. Your system will be automatically set up, partitions and all. WARNING: this option will DELETE everything on your hard disk, or offer a choice if there are multiple disks. There will of course be a confirmation dialog in case you selected this option by mistake.
\n- Semi-automatic install: With this option, you manually partition your drives with gparted, but the rest of the setup will be pretty automatic.
\n- Advanced install: For the technically savvy user that must do everything by hand. You can control most aspects of the install. However, there will be assisted options available all the way through, so this is a very flexible install.
\n
\n")
+ }
+ }
+ { VBox1 VBox
+ MoveScaled(62,2,29,61)
+ 'Move(496,16,232,488)
+ { lblSubTitle Label
+ MoveScaled(0,0,32,4)
+ 'Move(0,0,256,32)
+ Font = Font["Luxi Sans,Bold,12"]
+ Background = &H0055FF&
+ Text = ("Choose install type")
+ Alignment = Align.Center
+ Border = Border.Etched
+ }
+ { Panel1 Panel
+ MoveScaled(0,4,29,50)
+ 'Move(0,32,232,400)
+ Font = Font["Luxi Sans"]
+ Background = &H0055FF&
+ Expand = True
+ Border = Border.Etched
+ { Frame2 Frame
+ MoveScaled(2,1,25,21)
+ 'Move(16,8,200,168)
+ Font = Font["Luxi Sans,14"]
+ Text = ("Install types")
+ { Button1 Button
+ MoveScaled(1,3,23,5)
+ 'Move(8,24,184,40)
+ Font = Font["Luxi Sans,14"]
+ Text = ("Full-automatic")
+ }
+ { Button2 Button
+ MoveScaled(1,9,23,5)
+ 'Move(8,72,184,40)
+ Font = Font["Luxi Sans,14"]
+ Text = ("Semi-automatic")
+ }
+ { Button3 Button
+ MoveScaled(1,15,23,5)
+ 'Move(8,120,184,40)
+ Font = Font["Luxi Sans,14"]
+ Text = ("Advanced")
+ }
+ }
+ }
+ }
+}
diff --git a/frmConfig.class b/frmConfig.class
new file mode 100644
index 0000000..6a4f8cd
--- /dev/null
+++ b/frmConfig.class
@@ -0,0 +1,73 @@
+' Gambas class file
+
+' ### ADDITIONAL CONFIGURATION FORM ###
+
+PUBLIC SUB Form_Show()
+
+' set button focus:
+frmMain.Button5.SetFocus
+
+' set some background colours:
+TextLabel1.BackColor = Global.HTMLBG
+lblSubTitle.BackColor = Global.LogoBG
+Panel1.BackColor = Global.LogoBG
+
+END
+
+PUBLIC SUB Form_Resize()
+
+' Resize the html message:
+TextLabel1.Width = ScrollView1.ClientWidth
+TextLabel1.Adjust
+
+END
+
+PUBLIC SUB Button1_Click() 'Master Boot Record:
+
+Global.enumLILOMODE = 0
+
+END
+
+PUBLIC SUB Button2_Click() 'VL Boot Sector:
+
+Global.enumLILOMODE = 1
+
+END
+
+PUBLIC SUB Button3_Click() 'Floppy diskette:
+
+Global.enumLILOMODE = 2
+
+END
+
+PUBLIC SUB Button4_Click() 'Do not install:
+
+' Check for button execution:
+IF Global.flagBUTTExec = TRUE THEN RETURN
+
+' Flag button execution:
+Global.flagBUTTExec = TRUE
+
+Global.enumLILOMODE = 3
+
+frmMain.Button5.Enabled = FALSE 'Disable "Configure".
+frmMain.Button6.Enabled = TRUE 'Enable "Go for it!".
+frmMain.Button6_Click 'Advance to "Go for it!".
+
+' Unflag button execution:
+Global.flagBUTTExec = FALSE
+
+END
+
+PUBLIC SUB Button5_Click() 'Config 1:
+
+
+
+END
+
+PUBLIC SUB Button6_Click() 'Config 2:
+
+
+
+END
+
diff --git a/frmConfig.form b/frmConfig.form
new file mode 100644
index 0000000..6a96670
--- /dev/null
+++ b/frmConfig.form
@@ -0,0 +1,109 @@
+# Gambas Form File 1.0
+
+{ Form Form
+ MoveScaled(21.625,26.125,95,64)
+ 'Move(173,209,760,512)
+ Font = Font["Luxi Sans"]
+ Background = &HFFFFFF&
+ Text = ("")
+ Border = Window.None
+ Arrangement = Arrange.Horizontal
+ { ScrollView1 ScrollView
+ MoveScaled(0,0,69,59)
+ 'Move(0,0,552,472)
+ Font = Font["Luxi Sans,12"]
+ Background = &HDFFFFF&
+ Expand = True
+ ScrollBar = Scroll.Vertical
+ { TextLabel1 TextLabel
+ MoveScaled(0,0,72,50)
+ 'Move(0,0,576,400)
+ Font = Font["Luxi Sans,14"]
+ Background = &HDFFFFF&
+ Padding = 10
+ AutoResize = True
+ Text = ("Configuration:
\n\nLinux Loader boot manager setup:\n\n- Master Boot Record: Install Linux Loader boot manager to the master Boot Record of the bootable hard disk. This is the simplest method and the default action for most common operating systems.
\n- VL Boot sector: Install Linux Loader boot manager to the Boot Sector of the Vector Linux install partition. This will require the following extra steps:\n
\n- make the Vector Linux partition bootable using a partition manager.
\n- add an option to your default boot manager to boot to LiLo in this partition.
\n
\n \n- Floppy diskette: Install Linux Loader boot manager to a floopy diskette in /dev/fd0 (drive A:). You can then boot to the Vector Linux install by simply booting the diskette.
\n- Do not install: Do not install Linux Loader. Select this if you use another boot manager and know how to set up an option to boot the Vector Linux install from it.
\n
\n\nOther configuration:\n\n- Config 1: Other configuration selection 1.
\n- Config 2: Other configuration selection 2.
\n
\n")
+ }
+ }
+ { VBox1 VBox
+ MoveScaled(64,2,29,61)
+ 'Move(512,16,232,488)
+ { lblSubTitle Label
+ MoveScaled(0,0,29,4)
+ 'Move(0,0,232,32)
+ Font = Font["Luxi Sans,Bold,12"]
+ Background = &H0055FF&
+ Text = ("Additional configuration")
+ Alignment = Align.Center
+ Border = Border.Etched
+ }
+ { Panel1 Panel
+ MoveScaled(0,4,29,49.625)
+ 'Move(0,32,232,397)
+ Font = Font["Luxi Sans"]
+ Background = &H0055FF&
+ Expand = True
+ Border = Border.Etched
+ { Frame1 Frame
+ MoveScaled(2,1,25,27)
+ 'Move(16,8,200,216)
+ Font = Font["Luxi Sans,14"]
+ Text = ("Boot manager")
+ { Button1 Button
+ MoveScaled(1,3,23,5)
+ 'Move(8,24,184,40)
+ Font = Font["Luxi Sans,14"]
+ Background = Color.ButtonBackground
+ Foreground = Color.ButtonForeground
+ Text = ("Master Boot Record")
+ }
+ { Button2 Button
+ MoveScaled(1,9,23,5)
+ 'Move(8,72,184,40)
+ Font = Font["Luxi Sans,14"]
+ Background = Color.ButtonBackground
+ Foreground = Color.ButtonForeground
+ Text = ("VL Boot Sector")
+ }
+ { Button3 Button
+ MoveScaled(1,15,23,5)
+ 'Move(8,120,184,40)
+ Font = Font["Luxi Sans,14"]
+ Background = Color.ButtonBackground
+ Foreground = Color.ButtonForeground
+ Text = ("Floppy diskette")
+ }
+ { Button4 Button
+ MoveScaled(1,21,23,5)
+ 'Move(8,168,184,40)
+ Font = Font["Luxi Sans,14"]
+ Background = Color.ButtonBackground
+ Foreground = Color.ButtonForeground
+ Text = ("Do not install")
+ }
+ }
+ { Frame2 Frame
+ MoveScaled(2,28,25,15)
+ 'Move(16,224,200,120)
+ Font = Font["Luxi Sans,14"]
+ Text = ("Other configuration")
+ { Button5 Button
+ MoveScaled(1,3,23,5)
+ 'Move(8,24,184,40)
+ Font = Font["Luxi Sans,14"]
+ Background = Color.ButtonBackground
+ Foreground = Color.ButtonForeground
+ Text = ("Config 1")
+ }
+ { Button6 Button
+ MoveScaled(1,9,23,5)
+ 'Move(8,72,184,40)
+ Font = Font["Luxi Sans,14"]
+ Background = Color.ButtonBackground
+ Foreground = Color.ButtonForeground
+ Text = ("Config 2")
+ }
+ }
+ }
+ }
+}
diff --git a/frmDriveSelect.class b/frmDriveSelect.class
new file mode 100644
index 0000000..19db456
--- /dev/null
+++ b/frmDriveSelect.class
@@ -0,0 +1,86 @@
+' Gambas class file
+
+' ### DRIVES WINDOW ###
+
+PRIVATE MaxDisks AS Long
+PRIVATE selectedDisk AS String
+
+PUBLIC SUB Form_Open()
+DIM arrTemp AS NEW String[]
+DIM n AS Byte
+DIM m AS Byte
+
+'Center form on screen:
+ME.Center
+ME.Caption = "Install Drive Selection"
+
+MaxDisks = Global.DiskInfo.Count
+
+'Setup gridDisk:
+gridDisk.Columns.Count = 4
+'gridDisk.Rows.Count = MaxDisks
+gridDisk.Rows.Count = 32
+gridDisk.Columns[0].Width = 0.4 * gridDisk.ClientWidth
+gridDisk.Columns[1].Width = 0.25 * gridDisk.ClientWidth
+gridDisk.Columns[2].Width = 0.2 * gridDisk.ClientWidth
+gridDisk.Columns[3].Width = 0.15 * gridDisk.ClientWidth
+
+'Center gridDisk titles alignment:
+FOR n = 0 TO gridDisk.Columns.Count - 1
+ gridDisk[0, n].Alignment = Align.Center
+NEXT
+
+'Setup gridDisk titles:
+gridDisk[0, 0].Text = "Drive"
+gridDisk[0, 1].Text = "Size"
+gridDisk[0, 2].Text = "Units"
+gridDisk[0, 3].Text = "Sel."
+
+'Set gridDisk cell alignment; left for text, right for numbers:
+FOR m = 1 TO MaxDisks
+ gridDisk[m, 0].Alignment = Align.Left
+ gridDisk.Rows[m].Height = 20
+ gridDisk[m, 0].Text = Global.DiskInfo[m - 1].Device
+ gridDisk[m, 1].Alignment = Align.Right
+ gridDisk[m, 1].Text = Global.DiskInfo[m - 1].Bytes
+ arrTemp = Split(Functions.AutoUnits(Global.DiskInfo[m - 1].Bytes), ";", "", TRUE)
+ gridDisk[m, 1].Text = arrTemp[0]
+ gridDisk[m, 2].Alignment = Align.Left
+ gridDisk[m, 2].Text = arrTemp[1]
+ gridDisk[m, 3].Alignment = Align.Center
+NEXT
+
+END
+
+PUBLIC SUB gridDisk_Click()
+DIM arrTemp AS NEW String[]
+DIM n AS Long
+DIM m AS Long
+
+IF gridDisk.Row = 0 OR gridDisk[gridDisk.Row, 2].Text = "" THEN
+ELSE
+ FOR n = 1 TO gridDisk.Rows.Count - 1
+ gridDisk[n, 3].Text = ""
+ NEXT
+ gridDisk[gridDisk.Row, 3].Text = "+++"
+ selectedDisk = gridDisk[gridDisk.Row, 0].Text
+ENDIF
+
+END
+
+PUBLIC SUB btnOK_Click()
+
+IF selectedDisk = "" THEN selectedDisk = gridDisk[1, 0].Text
+Global.installDrive = selectedDisk
+IF Global.DebugMode = TRUE THEN message.Info(Global.installDrive)
+
+ME.Close(TRUE)
+
+END
+
+PUBLIC SUB btnCancel_Click()
+
+ME.Close()
+
+END
+
diff --git a/frmDriveSelect.form b/frmDriveSelect.form
new file mode 100644
index 0000000..2059224
--- /dev/null
+++ b/frmDriveSelect.form
@@ -0,0 +1,43 @@
+# Gambas Form File 1.0
+
+{ Form Form
+ MoveScaled(39.625,12.625,35,49)
+ 'Move(317,101,280,392)
+ Font = Font["Luxi Sans"]
+ Text = ("")
+ Border = Window.Fixed
+ { Label1 Label
+ MoveScaled(0,0,35,3)
+ 'Move(0,0,280,24)
+ Font = Font["Luxi Sans,Bold,12"]
+ Text = ("Drives")
+ Alignment = Align.Center
+ Border = Border.Raised
+ }
+ { gridDisk GridView
+ MoveScaled(0,3,35,40)
+ 'Move(0,24,280,320)
+ Font = Font["Luxi Sans,12"]
+ ToolTip = ("Click on a row to select...")
+ }
+ { Panel1 Panel
+ MoveScaled(0,43,35,6)
+ 'Move(0,344,280,48)
+ Font = Font["Luxi Sans"]
+ Border = Border.Etched
+ { btnOK Button
+ MoveScaled(2,1,14,4)
+ 'Move(16,8,112,32)
+ Font = Font["Luxi Sans"]
+ Text = ("OK")
+ Default = True
+ }
+ { btnCancel Button
+ MoveScaled(19,1,14,4)
+ 'Move(152,8,112,32)
+ Font = Font["Luxi Sans"]
+ Text = ("Cancel")
+ Cancel = True
+ }
+ }
+}
diff --git a/frmGO.class b/frmGO.class
new file mode 100644
index 0000000..2ecf7f3
--- /dev/null
+++ b/frmGO.class
@@ -0,0 +1,27 @@
+' Gambas class file
+
+' ### READY TO INSTALL! FORM ###
+
+PUBLIC SUB Form_Show()
+
+' set button focus:
+frmMain.Button6.SetFocus
+
+' set some background colours:
+TextLabel1.BackColor = Global.HTMLBG
+lblSubTitle.BackColor = Global.LogoBG
+Panel1.BackColor = Global.LogoBG
+
+END
+
+PUBLIC SUB Form_Resize()
+
+' Resize the html message:
+TextLabel1.Width = ScrollView1.ClientWidth
+TextLabel1.Adjust
+
+' 4 debug:
+ProgressBar1.Value = 0.31
+
+END
+
diff --git a/frmGO.form b/frmGO.form
new file mode 100644
index 0000000..f4d769e
--- /dev/null
+++ b/frmGO.form
@@ -0,0 +1,61 @@
+# Gambas Form File 1.0
+
+{ Form Form
+ MoveScaled(29.125,25.375,90.625,64.375)
+ 'Move(233,203,725,515)
+ Font = Font["Luxi Sans"]
+ Background = &HFFFFFF&
+ Text = ("")
+ Border = Window.None
+ Arrangement = Arrange.Horizontal
+ { VBox2 VBox
+ MoveScaled(1,2,57,60)
+ 'Move(8,16,456,480)
+ Font = Font["Luxi Sans"]
+ Expand = True
+ { ScrollView1 ScrollView
+ MoveScaled(2,2,58,50)
+ 'Move(16,16,464,400)
+ Font = Font["Luxi Sans,16"]
+ Background = &HDFFFFF&
+ Expand = True
+ ScrollBar = Scroll.Vertical
+ { TextLabel1 TextLabel
+ MoveScaled(0,0,58,39)
+ 'Move(0,0,464,312)
+ Font = Font["Luxi Sans,14"]
+ Background = &HDFFFFF&
+ Padding = 10
+ AutoResize = True
+ Text = ("")
+ }
+ }
+ { ProgressBar1 ProgressBar
+ MoveScaled(3,55,47,4)
+ 'Move(24,440,376,32)
+ Font = Font["Luxi Sans"]
+ }
+ }
+ { VBox1 VBox
+ MoveScaled(61,2,29,61)
+ 'Move(488,16,232,488)
+ Font = Font["Luxi Sans"]
+ { lblSubTitle Label
+ MoveScaled(0,0,29,4)
+ 'Move(0,0,232,32)
+ Font = Font["Luxi Sans,Bold,12"]
+ Background = &H0055FF&
+ Text = ("Ready to install!")
+ Alignment = Align.Center
+ Border = Border.Etched
+ }
+ { Panel1 Panel
+ MoveScaled(0,4,29,49.625)
+ 'Move(0,32,232,397)
+ Font = Font["Luxi Sans"]
+ Background = &H0055FF&
+ Expand = True
+ Border = Border.Etched
+ }
+ }
+}
diff --git a/frmMain.class b/frmMain.class
new file mode 100644
index 0000000..bbe207b
--- /dev/null
+++ b/frmMain.class
@@ -0,0 +1,159 @@
+' Gambas class file
+
+' ### MAIN WINDOW ###
+
+PUBLIC flagStep AS Byte
+
+PUBLIC SUB Form_Open()
+
+' Can't set these here or title bitmap is duplicated on resize!
+'picTitle.BackColor = Global.DefaultBackground
+'picSlogan.BackColor = Global.DefaultBackground
+
+'frmWelcome.Show
+
+flagStep = 1
+' Button1.Expand = TRUE
+' Button2.Expand = TRUE
+' Button3.Expand = TRUE
+' Button4.Expand = TRUE
+' Button5.Expand = TRUE
+' Button6.Expand = TRUE
+' Button7.Expand = TRUE
+' butExit.Expand = TRUE
+
+' Button2.Enabled = TRUE
+' Button3.Enabled = FALSE
+' Button4.Enabled = FALSE
+' Button5.Enabled = FALSE
+' Button6.Enabled = FALSE
+' Button7.Enabled = FALSE
+' butExit.Enabled = TRUE
+
+END
+
+PUBLIC SUB Form_Resize()
+DIM x AS Integer, y AS Integer
+
+picTitle.Move(0, 0, ME.ClientWidth, picTitle.Picture.Height + 8)
+picSlogan.Move(0, ME.ClientHeight - picSlogan.Picture.Height - 10, ME.ClientWidth, picSlogan.Picture.Height + 10)
+pnlSteps.Move(0, picTitle.Height, pnlSteps.Parent.ClientWidth, pnlSteps.Height)
+pnlContainer.Move(0, pnlSteps.Y + pnlSteps.Height, ME.ClientWidth, picSlogan.Y - pnlContainer.Y)
+
+END
+
+PUBLIC SUB butExit_Click()
+
+ME.Close
+
+END
+
+PUBLIC SUB Button1_Click()
+
+IF Global.prevForm <> 1 THEN
+ CloseForm(Global.prevForm)
+ frmWelcome.Reparent(frmMain.pnlContainer, 0, 0)
+ frmWelcome.Show
+ Global.prevForm = 1
+ENDIF
+
+END
+
+PUBLIC SUB Button2_Click()
+
+IF Global.prevForm <> 2 THEN
+ CloseForm(Global.prevForm)
+ frmChoice.Reparent(frmMain.pnlContainer, 0, 0)
+ frmChoice.Show
+ Global.prevForm = 2
+ENDIF
+
+END
+
+PUBLIC SUB Button3_Click()
+
+IF Global.prevForm <> 3 THEN
+ CloseForm(Global.prevForm)
+ frmPartitions.Reparent(frmMain.pnlContainer, 0, 0)
+ frmPartitions.Show
+ Global.prevForm = 3
+ENDIF
+
+END
+
+PUBLIC SUB Button4_Click()
+
+IF Global.prevForm <> 4 THEN
+ CloseForm(Global.prevForm)
+ frmPackages.Reparent(frmMain.pnlContainer, 0, 0)
+ frmPackages.Show
+ Global.prevForm = 4
+ENDIF
+
+END
+
+PUBLIC SUB Button5_Click()
+
+IF Global.prevForm <> 5 THEN
+ CloseForm(Global.prevForm)
+ frmConfig.Reparent(frmMain.pnlContainer, 0, 0)
+ frmConfig.Show
+ Global.prevForm = 5
+ENDIF
+
+END
+
+PUBLIC SUB Button6_Click()
+
+IF Global.prevForm <> 6 THEN
+ CloseForm(Global.prevForm)
+ frmGO.Reparent(frmMain.pnlContainer, 0, 0)
+ frmGO.Show
+ Global.prevForm = 6
+ENDIF
+
+END
+
+PUBLIC SUB Button7_Click()
+
+IF Global.prevForm <> 7 THEN
+ CloseForm(Global.prevForm)
+ frmTools.Reparent(frmMain.pnlContainer, 0, 0)
+ frmTools.Show
+ Global.prevForm = 7
+ENDIF
+
+END
+
+PUBLIC SUB CloseForm(frmNum AS Long)
+' Close previous form to save mem.
+
+SELECT CASE frmNum
+CASE 1
+ frmWelcome.Close
+CASE 2
+ frmChoice.Close
+CASE 3
+ frmPartitions.Close
+CASE 4
+ frmPackages.Close
+CASE 5
+ frmConfig.Close
+CASE 6
+ frmGO.Close
+CASE 7
+ frmTools.Close
+END SELECT
+
+END
+
+PUBLIC SUB Form_Close()
+DIM hWindow AS Window
+
+FOR EACH hWindow IN Windows
+ hWindow.Close
+NEXT
+
+END
+
+
diff --git a/frmMain.form b/frmMain.form
new file mode 100644
index 0000000..b64e502
--- /dev/null
+++ b/frmMain.form
@@ -0,0 +1,118 @@
+# Gambas Form File 1.0
+
+{ Form Form
+ MoveScaled(0,37.125,91.375,68.375)
+ 'Move(0,297,731,547)
+ Font = Font["Luxi Sans"]
+ Text = ("")
+ Icon = Picture["installer3.png"]
+ Border = Window.Fixed
+ FullScreen = True
+ Arrangement = Arrange.Vertical
+ { picTitle PictureBox
+ MoveScaled(0,0,101,8)
+ 'Move(0,0,808,64)
+ Background = &H528DC8&
+ Picture = Picture["VL.png"]
+ Alignment = Align.Center
+ Border = Border.Etched
+ }
+ { pnlSteps Panel
+ MoveScaled(1,9,85,4.375)
+ 'Move(8,72,680,35)
+ Arrangement = Arrange.Horizontal
+ Border = Border.Etched
+ { Button1 Button
+ MoveScaled(0,0,9,4)
+ 'Move(0,0,72,32)
+ Font = Font["Luxi Sans,12"]
+ Tag = "1"
+ Expand = True
+ Text = ("Welcome!")
+ }
+ { Button2 Button
+ MoveScaled(9,0,9,4)
+ 'Move(72,0,72,32)
+ Enabled = False
+ Font = Font["Luxi Sans,12"]
+ Tag = "2"
+ Expand = True
+ Text = ("The choice")
+ }
+ { Button3 Button
+ MoveScaled(18,0,9,4)
+ 'Move(144,0,72,32)
+ Enabled = False
+ Font = Font["Luxi Sans,12"]
+ Tag = "3"
+ Expand = True
+ Text = ("Partitions")
+ }
+ { Button4 Button
+ MoveScaled(27,0,9,4)
+ 'Move(216,0,72,32)
+ Enabled = False
+ Font = Font["Luxi Sans,12"]
+ Tag = "4"
+ Expand = True
+ Text = ("Packages")
+ }
+ { Button5 Button
+ MoveScaled(36,0,9,4)
+ 'Move(288,0,72,32)
+ Enabled = False
+ Font = Font["Luxi Sans,12"]
+ Tag = "5"
+ Expand = True
+ Text = ("Configure")
+ }
+ { Button6 Button
+ MoveScaled(45,0,9,4)
+ 'Move(360,0,72,32)
+ Enabled = False
+ Font = Font["Luxi Sans,12"]
+ Tag = "6"
+ Expand = True
+ Text = ("Go for it!")
+ }
+ { Separator1 Separator
+ MoveScaled(54,0,1.125,4)
+ 'Move(432,0,9,32)
+ }
+ { Button7 Button
+ MoveScaled(55,0,9,4)
+ 'Move(440,0,72,32)
+ Font = Font["Luxi Sans,12"]
+ Tag = "7"
+ Expand = True
+ Text = ("Tools")
+ }
+ { Separator2 Separator
+ MoveScaled(64,0,1.125,4)
+ 'Move(512,0,9,32)
+ }
+ { butExit Button
+ MoveScaled(65,0,8.375,4)
+ 'Move(520,0,67,32)
+ Font = Font["Luxi Sans,12"]
+ Expand = True
+ Text = ("Exit")
+ }
+ }
+ { pnlContainer Panel
+ MoveScaled(6,16,70,33)
+ 'Move(48,128,560,264)
+ Font = Font["Luxi Sans"]
+ Expand = True
+ Arrangement = Arrange.Fill
+ Border = Border.Etched
+ }
+ { picSlogan PictureBox
+ MoveScaled(0,52,82,5)
+ 'Move(0,416,656,40)
+ Background = &H528DC8&
+ Picture = Picture["slogan.png"]
+ Alignment = Align.Center
+ Border = Border.Etched
+ }
+}
diff --git a/frmPackages.class b/frmPackages.class
new file mode 100644
index 0000000..091524e
--- /dev/null
+++ b/frmPackages.class
@@ -0,0 +1,61 @@
+' Gambas class file
+
+' ### PACKAGE SELECTION FORM ###
+
+PUBLIC SUB Form_Show()
+
+' set button focus:
+frmMain.Button4.SetFocus
+
+' set some background colours:
+TextLabel1.BackColor = Global.HTMLBG
+lblSubTitle.BackColor = Global.LogoBG
+Panel1.BackColor = Global.LogoBG
+
+END
+
+PUBLIC SUB Form_Resize()
+
+' Resize the html message:
+TextLabel1.Width = ScrollView1.ClientWidth
+TextLabel1.Adjust
+
+END
+
+PUBLIC SUB Button1_Click() 'All packages:
+
+Global.enumPACKS = 0
+frmMain.Button4.Enabled = FALSE
+frmMain.Button5.Enabled = TRUE
+frmMain.Button5_Click
+
+END
+
+PUBLIC SUB Button2_Click() 'By groups:
+
+Global.enumPACKS = 1
+frmMain.Button4.Enabled = FALSE
+frmMain.Button5.Enabled = TRUE
+frmMain.Button5_Click
+
+END
+
+PUBLIC SUB Button3_Click() 'Manual:
+
+Global.enumPACKS = 2
+'frmMain.Button4.Enabled = FALSE
+'frmMain.Button5.Enabled = TRUE
+'frmMain.Button5_Click
+
+END
+
+PUBLIC SUB Button4_Click() 'No extras:
+
+Global.enumPACKS = 3
+frmMain.Button4.Enabled = FALSE
+frmMain.Button5.Enabled = TRUE
+frmMain.Button5_Click
+
+END
+
+
diff --git a/frmPackages.form b/frmPackages.form
new file mode 100644
index 0000000..5318cd7
--- /dev/null
+++ b/frmPackages.form
@@ -0,0 +1,85 @@
+# Gambas Form File 1.0
+
+{ Form Form
+ MoveScaled(43.125,3.375,101.625,64.125)
+ 'Move(345,27,813,513)
+ Font = Font["Luxi Sans"]
+ Background = &HFFFFFF&
+ Text = ("")
+ Border = Window.None
+ Arrangement = Arrange.Horizontal
+ { ScrollView1 ScrollView
+ MoveScaled(1,2,58,55)
+ 'Move(8,16,464,440)
+ Background = &HDFFFFF&
+ Expand = True
+ ScrollBar = Scroll.Vertical
+ { TextLabel1 TextLabel
+ MoveScaled(0,0,62,50)
+ 'Move(0,0,496,400)
+ Font = Font["Luxi Sans,14"]
+ Background = &HDFFFFF&
+ Padding = 10
+ AutoResize = True
+ Text = ("Package selection strategies:
\n\nAssisted selection: Maintains dependency coherency.\n\n- All packages: Equivalent to a full distro install. All included packages will be installed to your hard disk.
\n- Package groups: Allow selection of what to install by logical package groupings.
\n
\nAdvanced selection: WARNING: you will be responsible for what you install or not.\n\n- Manual selection: Manual selection from the full list of packages, sorted by categories.
\n- No extra packages: Install just the Vector Linux base distro. You know what you really want and will customise the install yourself.
\n
\n")
+ }
+ }
+ { VBox1 VBox
+ MoveScaled(62,1,29,61)
+ 'Move(496,8,232,488)
+ Font = Font["Luxi Sans"]
+ { lblSubTitle Label
+ MoveScaled(0,0,29,4)
+ 'Move(0,0,232,32)
+ Font = Font["Luxi Sans,Bold,12"]
+ Background = &H0055FF&
+ Text = ("Package selection")
+ Alignment = Align.Center
+ Border = Border.Etched
+ }
+ { Panel1 Panel
+ MoveScaled(0,4,29,49.625)
+ 'Move(0,32,232,397)
+ Font = Font["Luxi Sans"]
+ Background = &H0055FF&
+ Expand = True
+ Border = Border.Etched
+ { Frame1 Frame
+ MoveScaled(2,1,25,15)
+ 'Move(16,8,200,120)
+ Font = Font["Luxi Sans,14"]
+ Text = ("Assisted selection")
+ { Button1 Button
+ MoveScaled(1,3,23,5)
+ 'Move(8,24,184,40)
+ Font = Font["Luxi Sans,14"]
+ Text = ("All packages")
+ }
+ { Button2 Button
+ MoveScaled(1,9,23,5)
+ 'Move(8,72,184,40)
+ Font = Font["Luxi Sans,14"]
+ Text = ("By groups")
+ }
+ }
+ { Frame2 Frame
+ MoveScaled(2,16,25,15)
+ 'Move(16,128,200,120)
+ Font = Font["Luxi Sans,14"]
+ Text = ("Advanced selection")
+ { Button3 Button
+ MoveScaled(1,3,23,5)
+ 'Move(8,24,184,40)
+ Font = Font["Luxi Sans,14"]
+ Text = ("Manual")
+ }
+ { Button4 Button
+ MoveScaled(1,9,23,5)
+ 'Move(8,72,184,40)
+ Font = Font["Luxi Sans,14"]
+ Text = ("No extras")
+ }
+ }
+ }
+ }
+}
diff --git a/frmPartSelect.class b/frmPartSelect.class
new file mode 100644
index 0000000..85a1ea1
--- /dev/null
+++ b/frmPartSelect.class
@@ -0,0 +1,223 @@
+' Gambas class file
+
+' ### PARTITION SELECTION WINDOW ###
+
+PRIVATE MaxDisks AS Long
+PRIVATE MaxPartions AS Long
+PRIVATE selectedDisk AS String
+
+PUBLIC SUB Form_Open()
+DIM arrTemp AS NEW String[]
+DIM n AS Byte
+DIM m AS Byte
+
+'Center form on screen:
+ME.Center
+ME.Caption = "Partition Selection"
+
+MaxDisks = Global.DiskInfo.Count
+MaxPartions = Global.PartInfo.Count
+Global.PARTinst.Clear
+
+'Setup gridDisk:
+gridDisk.Columns.Count = 4
+'gridDisk.Rows.Count = MaxDisks
+gridDisk.Rows.Count = 32
+gridDisk.Columns[0].Width = 0.4 * gridDisk.ClientWidth
+gridDisk.Columns[1].Width = 0.25 * gridDisk.ClientWidth
+gridDisk.Columns[2].Width = 0.2 * gridDisk.ClientWidth
+gridDisk.Columns[3].Width = 0.15 * gridDisk.ClientWidth
+
+'Center gridDisk titles alignment:
+FOR n = 0 TO gridDisk.Columns.Count - 1
+ gridDisk[0, n].Alignment = Align.Center
+NEXT
+
+'Setup gridDisk titles:
+gridDisk[0, 0].Text = "Drive"
+gridDisk[0, 1].Text = "Size"
+gridDisk[0, 2].Text = "Units"
+gridDisk[0, 3].Text = "Sel."
+
+'Set gridDisk cell alignment; left for text, right for numbers, fill in gridDisk data:
+FOR m = 1 TO MaxDisks
+ gridDisk[m, 0].Alignment = Align.Left
+ gridDisk.Rows[m].Height = 20
+ gridDisk[m, 0].Text = Global.DiskInfo[m - 1].Device
+ gridDisk[m, 1].Alignment = Align.Right
+ gridDisk[m, 1].Text = Global.DiskInfo[m - 1].Bytes
+ arrTemp = Split(Functions.AutoUnits(Global.DiskInfo[m - 1].Bytes), ";", "", TRUE)
+ gridDisk[m, 1].Text = arrTemp[0]
+ gridDisk[m, 2].Alignment = Align.Left
+ gridDisk[m, 2].Text = arrTemp[1]
+ gridDisk[m, 3].Alignment = Align.Center
+NEXT
+
+'Setup gridPart:
+gridPart.Columns.Count = 7
+'gridPart.Rows.Count = MaxPartions
+gridPart.Rows.Count = 256
+gridPart.Columns[0].Width = 0.15 * gridPart.ClientWidth
+gridPart.Columns[1].Width = 0.1 * gridPart.ClientWidth
+gridPart.Columns[2].Width = 0.075 * gridPart.ClientWidth
+gridPart.Columns[3].Width = 0.055 * gridPart.ClientWidth
+gridPart.Columns[4].Width = 0.3 * gridPart.ClientWidth
+gridPart.Columns[5].Width = 0.195 * gridPart.ClientWidth
+gridPart.Columns[6].Width = 0.125 * gridPart.ClientWidth
+
+'Center gridPart titles alignment:
+FOR n = 0 TO gridPart.Columns.Count - 1
+ gridPart[0, n].Alignment = Align.Center
+NEXT
+
+'Setup gridPart titles:
+gridPart[0, 0].Text = "Partition"
+gridPart[0, 1].Text = "Size"
+gridPart[0, 2].Text = "Units"
+gridPart[0, 3].Text = "Boot"
+gridPart[0, 4].Text = "Type"
+gridPart[0, 5].Text = "Mount"
+gridPart[0, 6].Text = "Filesystem"
+
+'Set gridPart cell alignment; left for text, right for numbers:
+FOR m = 1 TO gridPart.Rows.Count - 1
+ gridPart.Rows[m].Height = 20
+ gridPart[m, 0].Alignment = Align.Left
+ gridPart[m, 1].Alignment = Align.Right
+ gridPart[m, 2].Alignment = Align.Left
+ gridPart[m, 3].Alignment = Align.Center
+ gridPart[m, 4].Alignment = Align.Left
+ gridPart[m, 5].Alignment = Align.Left
+NEXT
+
+END
+
+PUBLIC SUB gridDisk_Click()
+DIM arrTemp AS NEW String[]
+DIM n AS Long, m AS Long, p AS Long
+
+IF gridDisk.Row = 0 OR gridDisk[gridDisk.Row, 2].Text = "" THEN
+ELSE
+ IF gridDisk[gridDisk.Row, 3].Text = "" THEN
+ gridDisk[gridDisk.Row, 3].Text = "+++"
+ ELSE
+ gridDisk[gridDisk.Row, 3].Text = ""
+ ENDIF
+
+ FOR m = 1 TO gridPart.Rows.Count - 1
+ FOR n = 0 TO gridPart.Columns.Count - 1
+ gridPart[m, n].text = ""
+ NEXT
+ NEXT
+ m = 0
+
+ FOR p = 1 TO MaxDisks
+ IF gridDisk[p, 3].Text = "+++" THEN
+ selectedDisk = gridDisk[p, 0].Text
+ FOR n = 1 TO MaxPartions
+ IF InStr(Global.PartInfo[n - 1].Device, selectedDisk) THEN
+ m = m + 1
+ gridPart[m, 0].Text = Global.PartInfo[n - 1].Device
+ arrTemp = Split(Functions.AutoUnits(Global.PartInfo[n - 1].Blocks * 1024), ";", "", TRUE)
+ gridPart[m, 1].Text = arrTemp[0]
+ gridPart[m, 2].Text = arrTemp[1]
+ gridPart[m, 3].Text = IIf(Global.PartInfo[n - 1].Bootable, "B", "")
+ gridPart[m, 4].Text = Functions.getPartType(Global.PartInfo[n - 1].ID)
+ IF gridPart[m, 4].Text = "Linux swap" THEN
+ gridPart[m, 5].Text = "swap"
+ gridPart[m, 6].Text = "swap"
+ ELSE IF gridPart[m, 4].Text = "Linux" THEN
+ gridPart[m, 6].Text = "reiserfs"
+ Global.PartInfo[n - 1].FileSystem = "reiserfs"
+ ELSE
+ gridPart[m, 5].Text = Mid$(gridPart[m, 0].Text, 6)
+ gridPart[m, 6].Text = "--------------------"
+ ENDIF
+ ENDIF
+ NEXT
+ ENDIF
+ NEXT
+ENDIF
+
+END
+
+PUBLIC SUB btnOK_Click()
+DIM vPI AS NEW cPartInstall
+DIM n AS Long
+DIM sTemp AS String
+
+FOR n = 1 TO gridPart.Rows.Count - 1
+ IF InStr(LCase(gridPart[n, 4].Text), LCase("Linux")) THEN
+ vPI = NEW cPartInstall
+ vPI.Device = gridPart[n, 0].Text
+ vPI.Mountpoint = gridPart[n, 5].Text
+ vPI.FileSystem = gridPart[n, 6].Text
+ Global.PARTinst.Push(vPI)
+ ENDIF
+NEXT
+
+ME.Close(TRUE)
+
+END
+
+PUBLIC SUB btnCancel_Click()
+
+ME.Close()
+
+END
+
+PUBLIC SUB gridPart_Menu()
+
+IF gridPart[gridPart.Row, 4].Text = "Linux" THEN
+ IF gridPart.Column = 5 THEN
+ mountpoints.Popup
+ ELSE IF gridPart.Column = 6 THEN
+ filesystem.Popup
+ ENDIF
+ENDIF
+
+END
+
+PUBLIC SUB Gmountpoint_Click()
+DIM n AS Long
+
+FOR n = 0 TO Global.PartInfo.Max
+ IF Global.PartInfo[n].Device = gridPart[gridPart.Row, 0].Text THEN
+ gridPart[gridPart.Row, 5].Text = LAST.Tag
+ Global.PartInfo[n].Mountpoint = gridPart[gridPart.Row, 5].Text
+ BREAK
+ ENDIF
+NEXT
+
+END
+
+PUBLIC SUB Gfilesystem_Click()
+DIM n AS Long
+
+FOR n = 0 TO Global.PartInfo.Max
+ IF Global.PartInfo[n].Device = gridPart[gridPart.Row, 0].Text THEN
+ gridPart[gridPart.Row, 6].Text = LAST.Tag
+ Global.PartInfo[n].FileSystem = gridPart[gridPart.Row, 6].Text
+ BREAK
+ ENDIF
+NEXT
+
+END
+
+PUBLIC SUB gridPart_Click()
+DIM retstr AS String
+
+IF gridPart.Column = 5 THEN
+ IF gridPart[gridPart.Row, 4].Text <> "Linux" AND gridPart[gridPart.Row, 5].Text <> "swap" THEN
+ ' Get mount label.
+ retstr = InputBox.Input("Set mountpoint:", "", gridPart[gridPart.Row, 5].Text)
+ IF retstr THEN
+ ' TODO: validate retstr
+ gridPart[gridPart.Row, 5].Text = retstr
+ END IF
+ ENDIF
+ENDIF
+
+END
+
+
diff --git a/frmPartSelect.form b/frmPartSelect.form
new file mode 100644
index 0000000..f712884
--- /dev/null
+++ b/frmPartSelect.form
@@ -0,0 +1,135 @@
+# Gambas Form File 1.0
+
+{ Form Form
+ MoveScaled(54.125,9.375,86,69)
+ 'Move(433,75,688,552)
+ Font = Font["Luxi Sans"]
+ Text = ("")
+ Border = Window.Fixed
+ SkipTaskbar = True
+ { mountpoints Menu
+ Text = ("Mountpoints")
+ Visible = False
+ Tag = "mountpoints"
+ { root Menu Gmountpoint
+ Name = "root"
+ Text = ("/")
+ Tag = "/"
+ }
+ { home Menu Gmountpoint
+ Name = "home"
+ Text = ("/home")
+ Tag = "/home"
+ }
+ { var Menu Gmountpoint
+ Name = "var"
+ Text = ("/var")
+ Tag = "/var"
+ }
+ { opt Menu Gmountpoint
+ Name = "opt"
+ Text = ("/opt")
+ Tag = "/opt"
+ }
+ { tmp Menu Gmountpoint
+ Name = "tmp"
+ Text = ("/tmp")
+ Tag = "/tmp"
+ }
+ { boot Menu Gmountpoint
+ Name = "boot"
+ Text = ("/boot")
+ Tag = "/boot"
+ }
+ { usr Menu Gmountpoint
+ Name = "usr"
+ Text = ("/usr")
+ Tag = "/usr"
+ }
+ { share Menu Gmountpoint
+ Name = "share"
+ Text = ("/share")
+ Tag = "/share"
+ }
+ }
+ { filesystem Menu
+ Text = ("FileSystem")
+ Visible = False
+ Tag = "filesystem"
+ { xfs Menu Gfilesystem
+ Name = "xfs"
+ Text = ("xfs")
+ Tag = "xfs"
+ }
+ { reiserfs Menu Gfilesystem
+ Name = "reiserfs"
+ Text = ("reiserfs")
+ Tag = "reiserfs"
+ }
+ { ext3 Menu Gfilesystem
+ Name = "ext3"
+ Text = ("ext3")
+ Tag = "ext3"
+ }
+ { ext2 Menu Gfilesystem
+ Name = "ext2"
+ Text = ("ext2")
+ Tag = "ext2"
+ }
+ }
+ { Label1 Label
+ MoveScaled(0,0,34.625,3)
+ 'Move(0,0,277,24)
+ Font = Font["Luxi Sans,Bold,12"]
+ Text = ("Drives")
+ Alignment = Align.Center
+ Border = Border.Raised
+ }
+ { gridDisk GridView
+ MoveScaled(0,3,34.625,13)
+ 'Move(0,24,277,104)
+ Font = Font["Luxi Sans,10"]
+ ToolTip = ("Click on select install drive")
+ }
+ { gridPart GridView
+ MoveScaled(0,19,86,50)
+ 'Move(0,152,688,400)
+ Font = Font["Luxi Sans,10"]
+ ToolTip = ("Right-click in Mount or FileSystem to set")
+ }
+ { Panel1 Panel
+ MoveScaled(35,0.125,51,7)
+ 'Move(280,1,408,56)
+ Font = Font["Luxi Sans"]
+ Border = Border.Etched
+ { btnOK Button
+ MoveScaled(4,1,19,5)
+ 'Move(32,8,152,40)
+ Font = Font["Luxi Sans"]
+ Text = ("OK")
+ Default = True
+ }
+ { btnCancel Button
+ MoveScaled(27,1,19,5)
+ 'Move(216,8,152,40)
+ Font = Font["Luxi Sans"]
+ Text = ("Cancel")
+ Cancel = True
+ }
+ }
+ { Label2 Label
+ MoveScaled(0,16,86,3)
+ 'Move(0,128,688,24)
+ Font = Font["Luxi Sans,Bold,12"]
+ Text = ("Partitions")
+ Alignment = Align.Center
+ Border = Border.Raised
+ }
+ { TextLabel1 TextLabel
+ MoveScaled(35,7,51,9)
+ 'Move(280,56,408,72)
+ Font = Font["Luxi Sans,10"]
+ Text = ("\n- Left-click to (un)select drive(s) to install Vector Linux.
\n- Right-click on Linux partitions to pick mountpoint
\n- Left-click on other partitions to edit mountpoint
\n
\n")
+ Border = Border.Etched
+ }
+}
diff --git a/frmPartitioner.class b/frmPartitioner.class
new file mode 100644
index 0000000..9a9c73d
--- /dev/null
+++ b/frmPartitioner.class
@@ -0,0 +1,28 @@
+' Gambas class file
+
+' ### PARTITIONER FORM ###
+
+
+PUBLIC SUB Embedder1_Error()
+
+message.Error("Error embedding external application, might be due to low memory.")
+ME.Hide
+frmPartitions.Show
+utils.BUTTrest
+frmPartitions.Show
+ME.Close
+
+END
+
+PUBLIC SUB Embedder1_Close()
+
+ME.Hide
+frmPartitions.Show
+utils.BUTTrest
+ME.Close
+
+Utils.DrivePartInfo
+frmPartSelect.ShowModal
+
+END
+
diff --git a/frmPartitioner.form b/frmPartitioner.form
new file mode 100644
index 0000000..6683a48
--- /dev/null
+++ b/frmPartitioner.form
@@ -0,0 +1,17 @@
+# Gambas Form File 1.0
+
+{ Form Form
+ MoveScaled(36.75,30.625,57.125,57.125)
+ 'Move(294,245,457,457)
+ Font = Font["Luxi Sans"]
+ Expand = True
+ Text = ("")
+ Border = Window.None
+ Arrangement = Arrange.Fill
+ { Embedder1 Embedder
+ MoveScaled(0,0,46,23)
+ 'Move(0,0,368,184)
+ Font = Font["Luxi Sans"]
+ Expand = True
+ }
+}
diff --git a/frmPartitions.class b/frmPartitions.class
new file mode 100644
index 0000000..e72bedf
--- /dev/null
+++ b/frmPartitions.class
@@ -0,0 +1,176 @@
+' Gambas class file
+
+' ### PARTITIONING MODE FORM ###
+
+PUBLIC tnum AS Integer[]
+PUBLIC ttime AS Date
+
+PUBLIC SUB Form_Show()
+
+' set button focus:
+frmMain.Button3.SetFocus
+
+' set some background colours:
+TextLabel1.BackColor = Global.HTMLBG
+lblSubTitle.BackColor = Global.LogoBG
+Panel1.BackColor = Global.LogoBG
+
+END
+
+PUBLIC SUB Form_Resize()
+
+' Resize the html message:
+TextLabel1.Width = ScrollView1.ClientWidth
+TextLabel1.Adjust
+
+END
+
+PUBLIC SUB Button1_Click() 'Full disk:
+
+' Check for button execution:
+IF Global.flagBUTTExec = TRUE THEN RETURN
+
+' Flag button execution:
+Global.flagBUTTExec = TRUE
+
+frmMain.Button3.Enabled = FALSE 'Disable "Partitions".
+frmMain.Button4.Enabled = TRUE 'Enable "Packages".
+frmMain.Button4_Click 'Advance to "Packages".
+
+' Unflag button execution:
+Global.flagBUTTExec = FALSE
+
+END
+
+PUBLIC SUB Button2_Click() 'Free space:
+
+' Check for button execution:
+IF Global.flagBUTTExec = TRUE THEN RETURN
+
+' Flag button execution:
+Global.flagBUTTExec = TRUE
+
+frmMain.Button3.Enabled = FALSE 'Disable "Partitions".
+frmMain.Button4.Enabled = TRUE 'Enable "Packages".
+frmMain.Button4_Click 'Advance to "Packages".
+
+' Unflag button execution:
+Global.flagBUTTExec = FALSE
+
+END
+
+PUBLIC SUB Button3_Click() 'GParted:
+
+' Check for button execution:
+IF Global.flagBUTTExec = TRUE THEN RETURN
+
+' Flag button execution:
+Global.flagBUTTExec = TRUE
+
+IF User.Name <> "root" THEN
+ message.Warning("You need to be root to run GParted...", "Exit")
+ELSE
+ Global.tproc = SHELL "gparted"
+ ttime = Now
+ REPEAT
+ 'tnum = desktop.Find("/dev/hda - GParted")
+ tnum = desktop.Find("GParted")
+ WAIT 0.1
+ IF DateDiff(ttime, Now, gb.Second) > 25 THEN
+ message.Error("Error executing GParted, could be due to low memory.")
+ BREAK
+ ENDIF
+ UNTIL tnum.Count > 0
+ IF tnum.Count > 0 THEN
+ frmPartitioner.Reparent(frmMain.pnlContainer, 0, 0)
+ frmPartitioner.Embedder1.Embed(tnum[0])
+ ME.Hide
+ frmPartitioner.Show
+ frmPartitioner.Embedder1.Raise
+ ENDIF
+ENDIF
+
+IF Global.DebugMode = TRUE THEN
+ Utils.DrivePartInfo
+ frmPartSelect.ShowModal
+ENDIF
+
+' Unflag button execution:
+Global.flagBUTTExec = FALSE
+
+END
+
+PUBLIC SUB Button4_Click() 'cfdisk:
+
+' Check for button execution:
+IF Global.flagBUTTExec = TRUE THEN RETURN
+
+' Flag button execution:
+Global.flagBUTTExec = TRUE
+
+IF User.Name <> "root" THEN
+ message.Warning("You need to be root to run cfdisk...", "Exit")
+ELSE
+ utils.BUTTdisable
+' Global.tproc = SHELL "xterm -e cfdisk"
+' Global.tproc = EXEC ["xterm", "-e", "cfdisk"]
+ Global.tproc = EXEC ["aterm", "+tr", "+sb", "-fg", "black", "-bg", "white", "-e", "cfdisk"]
+ ttime = Now
+ REPEAT
+ tnum = desktop.Find("cfdisk")
+ WAIT 0.1
+ IF DateDiff(ttime, Now, gb.Second) > 10 THEN
+ message.Error("Error executing cfdisk, could be due to low memory.")
+ frmPartitions.Show
+ utils.BUTTrest
+ BREAK
+ ENDIF
+ UNTIL tnum.Count > 0
+ IF tnum.Count > 0 THEN
+ frmPartitioner.Reparent(frmMain.pnlContainer, 0, 0)
+ frmPartitioner.Embedder1.Embed(tnum[0])
+ ME.Hide
+ frmPartitioner.Show
+ frmPartitioner.Embedder1.SetFocus
+ ENDIF
+ENDIF
+
+' Unflag button execution:
+Global.flagBUTTExec = FALSE
+
+END
+
+PUBLIC SUB Button5_Click() 'Preset strategies:
+
+' Check for button execution:
+IF Global.flagBUTTExec = TRUE THEN RETURN
+
+' Flag button execution:
+Global.flagBUTTExec = TRUE
+
+
+' do some stuff...
+
+
+' Unflag button execution:
+Global.flagBUTTExec = FALSE
+
+END
+
+PUBLIC SUB Button6_Click() 'No partitioning:
+
+' Check for button execution:
+IF Global.flagBUTTExec = TRUE THEN RETURN
+
+' Flag button execution:
+Global.flagBUTTExec = TRUE
+
+' Mountpoint selection:
+Utils.DrivePartInfo
+frmPartSelect.ShowModal
+
+' Unflag button execution:
+Global.flagBUTTExec = FALSE
+
+END
+
diff --git a/frmPartitions.form b/frmPartitions.form
new file mode 100644
index 0000000..07c9221
--- /dev/null
+++ b/frmPartitions.form
@@ -0,0 +1,115 @@
+# Gambas Form File 1.0
+
+{ Form Form
+ MoveScaled(4.125,6.125,90.625,78.375)
+ 'Move(33,49,725,627)
+ Font = Font["Luxi Sans"]
+ Background = &HFFFFFF&
+ Text = ("")
+ Border = Window.None
+ Arrangement = Arrange.Horizontal
+ { ScrollView1 ScrollView
+ MoveScaled(1,2,59,66)
+ 'Move(8,16,472,528)
+ Background = &HDFFFFF&
+ Expand = True
+ ScrollBar = Scroll.Vertical
+ { TextLabel1 TextLabel
+ MoveScaled(0,0,68,50)
+ 'Move(0,0,544,400)
+ Font = Font["Luxi Sans,14"]
+ Background = &HDFFFFF&
+ Padding = 10
+ AutoResize = True
+ Text = ("Available partitioning modes:
\n\nAutomatic partitioning: The installer will handle all partition related decisions for you:\n\n- Full disk: Choose this option if you want to use your entire hard disk for VL. WARNING: this option will DELETE everything on your hard disk, or offer a choice if there are multiple disks. You have been WARNED.
\n- Free space: using available free (unpartitioned) disk space.
\n
\nManual partitioning: You have full control of partitioning.\n\n- Using gparted (the advanced graphical partitioner).
\n- Using cfdisk (the traditional partition tool).
\n
\nOther partitioning:\n\n- Preset strategies: auto allocates partitions according to most common usage strategy intended for this computer.
\n- No partitioning: If you wish to use existing Linux and swap partitions. WARNING: The existing Linux partitions will be OVERWRITTEN. You have been WARNED.
\n
\n")
+ }
+ }
+ { VBox1 VBox
+ MoveScaled(61,1,29,68)
+ 'Move(488,8,232,544)
+ Font = Font["Luxi Sans"]
+ { lblSubTitle Label
+ MoveScaled(0,0,29,4)
+ 'Move(0,0,232,32)
+ Font = Font["Luxi Sans,Bold,12"]
+ Background = &H0055FF&
+ Text = ("Partitioning mode")
+ Alignment = Align.Center
+ Border = Border.Etched
+ }
+ { Panel1 Panel
+ MoveScaled(0,4,29,62)
+ 'Move(0,32,232,496)
+ Font = Font["Luxi Sans"]
+ Background = &H0055FF&
+ Expand = True
+ Border = Border.Etched
+ { Frame1 Frame
+ MoveScaled(2,1,25,15)
+ 'Move(16,8,200,120)
+ Font = Font["Luxi Sans,14"]
+ Text = ("Automatic")
+ { Button1 Button
+ MoveScaled(1,3,23,5)
+ 'Move(8,24,184,40)
+ Font = Font["Luxi Sans,14"]
+ Background = Color.ButtonBackground
+ Foreground = Color.ButtonForeground
+ Text = ("Full disk")
+ }
+ { Button2 Button
+ MoveScaled(1,9,23,5)
+ 'Move(8,72,184,40)
+ Font = Font["Luxi Sans,14"]
+ Background = Color.ButtonBackground
+ Foreground = Color.ButtonForeground
+ Text = ("Free space")
+ }
+ }
+ { Frame2 Frame
+ MoveScaled(2,16,25,15)
+ 'Move(16,128,200,120)
+ Font = Font["Luxi Sans,14"]
+ Text = ("Manual")
+ { Button3 Button
+ MoveScaled(1,3,23,5)
+ 'Move(8,24,184,40)
+ Font = Font["Luxi Sans,14"]
+ Background = Color.ButtonBackground
+ Foreground = Color.ButtonForeground
+ Text = ("GParted")
+ }
+ { Button4 Button
+ MoveScaled(1,9,23,5)
+ 'Move(8,72,184,40)
+ Font = Font["Luxi Sans,14"]
+ Background = Color.ButtonBackground
+ Foreground = Color.ButtonForeground
+ Text = ("cfdisk")
+ }
+ }
+ { Frame3 Frame
+ MoveScaled(2,31,25,15)
+ 'Move(16,248,200,120)
+ Font = Font["Luxi Sans,14"]
+ Text = ("Others")
+ { Button5 Button
+ MoveScaled(1,3,23,5)
+ 'Move(8,24,184,40)
+ Font = Font["Luxi Sans,14"]
+ Background = Color.ButtonBackground
+ Foreground = Color.ButtonForeground
+ Text = ("Preset strategies")
+ }
+ { Button6 Button
+ MoveScaled(1,9,23,5)
+ 'Move(8,72,184,40)
+ Font = Font["Luxi Sans,14"]
+ Background = Color.ButtonBackground
+ Foreground = Color.ButtonForeground
+ Text = ("No partitioning")
+ }
+ }
+ }
+ }
+}
diff --git a/frmTools.class b/frmTools.class
new file mode 100644
index 0000000..c5e376d
--- /dev/null
+++ b/frmTools.class
@@ -0,0 +1,72 @@
+' Gambas class file
+
+' ### VL TOOLS FORM ###
+
+PUBLIC SUB Form_Show()
+
+' set button focus:
+frmMain.Button7.SetFocus
+
+' set some background colours:
+TextLabel1.BackColor = Global.HTMLBG
+lblSubTitle.BackColor = Global.LogoBG
+Panel1.BackColor = Global.LogoBG
+
+END
+
+PUBLIC SUB Form_Resize()
+
+' Resize the html message:
+TextLabel1.Width = ScrollView1.ClientWidth
+'TextLabel1.Height = Global.htmlLen
+TextLabel1.Adjust
+
+END
+
+PUBLIC SUB Button1_Click() ' Repair LILO:
+
+
+
+END
+
+PUBLIC SUB Button2_Click() ' Restore packages:
+
+
+
+END
+
+PUBLIC SUB Button3_Click() 'Backup /home:
+
+
+
+END
+
+PUBLIC SUB Button4_Click() 'Restore /home:
+
+
+
+END
+
+PUBLIC SUB Button5_Click() ' Tool 5:
+
+
+
+END
+
+PUBLIC SUB Button6_Click() ' Tool 6:
+
+' 4 debug:
+IF Functions.MakeTree(User.Home &/ "fhstree") THEN
+ message.Info("FHS tree created under " & User.Home &/ "fhstree/")
+ELSE
+ message.Error("Error creating FHS tree")
+ENDIF
+
+END
+
+PUBLIC SUB TextLabel1_MouseDown()
+
+
+
+END
+
diff --git a/frmTools.form b/frmTools.form
new file mode 100644
index 0000000..a49ae16
--- /dev/null
+++ b/frmTools.form
@@ -0,0 +1,114 @@
+# Gambas Form File 1.0
+
+{ Form Form
+ MoveScaled(41.375,35.625,98.625,64.625)
+ 'Move(331,285,789,517)
+ Font = Font["Luxi Sans"]
+ Background = &HFFFFFF&
+ Text = ("")
+ Border = Window.None
+ Arrangement = Arrange.Horizontal
+ { ScrollView1 ScrollView
+ MoveScaled(2,2,55,56)
+ 'Move(16,16,440,448)
+ Background = &HDFFFFF&
+ Expand = True
+ ScrollBar = Scroll.Vertical
+ { TextLabel1 TextLabel
+ MoveScaled(0,0,56,50)
+ 'Move(0,0,448,400)
+ Font = Font["Luxi Sans,14"]
+ Background = &HDFFFFF&
+ Padding = 10
+ AutoResize = True
+ Text = ("Vector Linux repair tools:
\n\nDistro repair tools:\n\n- Repair LILO: Repair Linux Loader boot manager of an existing Vector Linux installation.
\n- Restore packages: Restore original packages from the install CD, to fix a broken upgrade.
\n
\nBackup / restore tools:\n\n- Backup /home: Backup your /home directory for safekeeping.
\n- Restore /home: Restore your /home directory from a previous backup. WARNING: The existing /home directory will be OVERWRITTEN during restore. You have been WARNED.
\n
\nMiscellaneous tools: \n\n- Tool 5: Tool number 5 to fix something or other.
\n- Tool 6: Tool number 6 to fix something or other.
\n
\n")
+ }
+ }
+ { VBox1 VBox
+ MoveScaled(58,1,29,61)
+ 'Move(464,8,232,488)
+ { lblSubTitle Label
+ MoveScaled(0,0,29,4)
+ 'Move(0,0,232,32)
+ Font = Font["Luxi Sans,Bold,12"]
+ Background = &H0055FF&
+ Text = ("VL Tools")
+ Alignment = Align.Center
+ Border = Border.Etched
+ }
+ { Panel1 Panel
+ MoveScaled(0,4,29,50)
+ 'Move(0,32,232,400)
+ Font = Font["Luxi Sans"]
+ Background = &H0055FF&
+ Expand = True
+ Border = Border.Etched
+ { Frame1 Frame
+ MoveScaled(2,1,25,15)
+ 'Move(16,8,200,120)
+ Font = Font["Luxi Sans,14"]
+ Text = ("Distro repair")
+ { Button2 Button
+ MoveScaled(1,9,23,5)
+ 'Move(8,72,184,40)
+ Font = Font["Luxi Sans,14"]
+ Background = Color.ButtonBackground
+ Foreground = Color.ButtonForeground
+ Text = ("Restore packages")
+ }
+ { Button1 Button
+ MoveScaled(1,3,23,5)
+ 'Move(8,24,184,40)
+ Font = Font["Luxi Sans,14"]
+ Background = Color.ButtonBackground
+ Foreground = Color.ButtonForeground
+ Text = ("Repair LILO")
+ }
+ }
+ { Frame2 Frame
+ MoveScaled(2,16,25,15)
+ 'Move(16,128,200,120)
+ Font = Font["Luxi Sans,14"]
+ Text = ("Backup / restore")
+ { Button3 Button
+ MoveScaled(1,3,23,5)
+ 'Move(8,24,184,40)
+ Font = Font["Luxi Sans,14"]
+ Background = Color.ButtonBackground
+ Foreground = Color.ButtonForeground
+ Text = ("Backup /home")
+ }
+ { Button4 Button
+ MoveScaled(1,9,23,5)
+ 'Move(8,72,184,40)
+ Font = Font["Luxi Sans,14"]
+ Background = Color.ButtonBackground
+ Foreground = Color.ButtonForeground
+ Text = ("Restore /home")
+ }
+ }
+ { Frame3 Frame
+ MoveScaled(2,31,25,15)
+ 'Move(16,248,200,120)
+ Font = Font["Luxi Sans,14"]
+ Text = ("Miscellaneous")
+ { Button5 Button
+ MoveScaled(1,3,23,5)
+ 'Move(8,24,184,40)
+ Font = Font["Luxi Sans,14"]
+ Background = Color.ButtonBackground
+ Foreground = Color.ButtonForeground
+ Text = ("Tool 5")
+ }
+ { Button6 Button
+ MoveScaled(1,9,23,5)
+ 'Move(8,72,184,40)
+ Font = Font["Luxi Sans,14"]
+ Background = Color.ButtonBackground
+ Foreground = Color.ButtonForeground
+ Text = ("(Make FHS tree)")
+ }
+ }
+ }
+ }
+}
diff --git a/frmWelcome.class b/frmWelcome.class
new file mode 100644
index 0000000..df99c18
--- /dev/null
+++ b/frmWelcome.class
@@ -0,0 +1,41 @@
+' Gambas class file
+
+' ### WELCOME FORM ###
+
+PUBLIC SUB Form_Show()
+
+IF Global.flagStarted THEN butStart.Enabled = FALSE
+
+' set button focus:
+butStart.SetFocus
+
+' set some background colours:
+TextLabel1.BackColor = Global.HTMLBG
+lblSubTitle.BackColor = Global.LogoBG
+PictureBox1.BackColor = Global.LogoBG
+Panel1.BackColor = Global.LogoBG
+
+END
+
+PUBLIC SUB Form_Resize()
+
+' Resize the html message:
+TextLabel1.Width = ScrollView1.ClientWidth
+TextLabel1.Adjust
+
+PictureBox1.Move(0, 0, Panel1.ClientWidth, Panel1.ClientHeight)
+PictureBox1.Refresh
+
+END
+
+PUBLIC SUB butStart_Click()
+
+butStart.Enabled = FALSE
+Global.flagStarted = TRUE
+frmMain.Button2.Enabled = TRUE ' Enable "Choices".
+frmMain.Button2_Click ' Advance to "Choices".
+
+END
+
+
+
diff --git a/frmWelcome.form b/frmWelcome.form
new file mode 100644
index 0000000..120abd8
--- /dev/null
+++ b/frmWelcome.form
@@ -0,0 +1,64 @@
+# Gambas Form File 1.0
+
+{ Form Form
+ MoveScaled(21.625,26.125,98.625,64.625)
+ 'Move(173,209,789,517)
+ Font = Font["Luxi Sans"]
+ Background = &HFFFFFF&
+ Text = ("")
+ Border = Window.None
+ Arrangement = Arrange.Horizontal
+ { ScrollView1 ScrollView
+ MoveScaled(2,2,55,56)
+ 'Move(16,16,440,448)
+ Background = &HDFFFFF&
+ Expand = True
+ ScrollBar = Scroll.Vertical
+ { TextLabel1 TextLabel
+ MoveScaled(0,0,56,50)
+ 'Move(0,0,448,400)
+ Font = Font["Luxi Sans,14"]
+ Background = &HDFFFFF&
+ Padding = 10
+ AutoResize = True
+ Text = ("Dear Vector Linux user:
\n\n\nWe have worked very hard to make this install as quick and easy as possible. We hope you will also like its looks. To install, click on the START button below the VL logo. Use the buttons on the top row to return to a previous stage. If you have already installed VL and just need to use some of the rescue functions, head on over to the Tools button.\n
\n\nAbout:
\n\n\nVector Linux is a small, but full-featured and VERY fast, Linux operating system for x86 PCs, based on one of the original Linux distributions, Slackware. VL is bloat free, easy to install, configure and maintain, with automatic hardware configuration, unique administration tools and easy package management via the Gslapt/slapt-get system.\n
\n\nCredits:
\n\n\nInstaller made in Gambas2 by Joe1962 and Uelsk8s, Gambas is the copyright of Benoit Minisini.\n
\n\n\nThe Vector Linux Community members that made this release possible: Vector (Founder), Tigger (SOHO Architect), Kocil (Dynamite Man), JohnB316 (SOHO Chief), Joe1962 (VL-hot Chief), Uelsk8s (LIVE Chief), Barlas, Berke, Cintyram, Freakyc, Gamfa, GbHill, Hanumizzle, Inggy, Jbcolmena, Jaos, JohnVan, Keffin, Lagagnon, Lost&LovinLinux, Lyn, Mamahoohoo, Maf3000, Monty67, Mutiny, Niiler, PastorEd, Paul, Ren, Shalow_Hal, Suse-Refugee, TonyH9904, UKBill, Vanger, Verbl-Kint, VxT, WebMouse, Wile_Coyote, YaP, Yiannis, Zarniwoop.\n
\n")
+ }
+ }
+ { VBox1 VBox
+ MoveScaled(60,2,29,68)
+ 'Move(480,16,232,544)
+ { lblSubTitle Label
+ MoveScaled(0,0,29,4)
+ 'Move(0,0,232,32)
+ Font = Font["Luxi Sans,Bold,12"]
+ Background = &H0055FF&
+ Text = ("Welcome to Vector Linux!")
+ Alignment = Align.Center
+ Border = Border.Etched
+ }
+ { Panel1 Panel
+ MoveScaled(0,0,29,50)
+ 'Move(0,0,232,400)
+ Font = Font["Luxi Sans"]
+ Background = &H0055FF&
+ Expand = True
+ Arrangement = Arrange.Fill
+ Border = Border.Etched
+ { PictureBox1 PictureBox
+ MoveScaled(0,0,29,50)
+ 'Move(0,0,232,400)
+ Background = &H0055FF&
+ Expand = True
+ Picture = Picture["VL-logo-shine.png"]
+ Alignment = Align.Center
+ }
+ }
+ { butStart Button
+ MoveScaled(3,55,23,7)
+ 'Move(24,440,184,56)
+ Font = Font["Luxi Sans,20"]
+ Text = ("START")
+ Default = True
+ }
+ }
+}
diff --git a/installer3.png b/installer3.png
new file mode 100644
index 0000000..f3bbeb3
Binary files /dev/null and b/installer3.png differ
diff --git a/slogan.png b/slogan.png
new file mode 100644
index 0000000..44dd2f9
Binary files /dev/null and b/slogan.png differ
diff --git a/vl-gui-installer.gambas b/vl-gui-installer.gambas
new file mode 100755
index 0000000..c337471
Binary files /dev/null and b/vl-gui-installer.gambas differ
diff --git a/vl_logo_icon2.png b/vl_logo_icon2.png
new file mode 100644
index 0000000..57f9882
Binary files /dev/null and b/vl_logo_icon2.png differ