blob: 6904596101df0ff4305cc7872bf350393c4ff2a3 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
|
Imports System
Imports System.IO
Imports System.Text
Imports System.Net.Mail
Public Class Form5
Public actualaleeversion As String = "0.0.1 Beta 4"
Dim newgame As Boolean = True
Dim tcount As Integer = 0
Dim rtext As String
Dim gtexttotype As String
Dim charcount As Integer
Dim currentletter As Integer
Dim slashcount As Integer
Dim lblhackwords As Object
Dim conversationcount As Integer = 0
Dim textgeninput As Object
Dim textgen As Integer
Dim TextType As Boolean
Dim di As DirectoryInfo
Dim needtoclose As Boolean = False
Dim oldversion As String
Public upgraded As Boolean = False
Dim fs As FileStream
Dim sw As StreamWriter
Dim hackeffect As Integer
Dim percentcount As Integer
Dim cdrive As System.IO.DriveInfo
Private Sub Form5_Load(sender As Object, e As EventArgs) Handles MyBase.Load
aleeosinstalltimer.Start()
End Sub
Private Sub aleeosinstalltimer_Tick(sender As Object, e As EventArgs) Handles aleeosinstalltimer.Tick
End Sub
Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
End Sub
End Class
|
