Show Posts
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
Messages - Jaepheth
Pages: 1 2 3 4 5 [6] 7 8 9 10 11 ... 14
126
« on: May 09, 2009, 05:48:02 PM »
Come on! I just passed SOA Exam FM/2 I now have 2 of the 5 preliminary Actuarial exams passed. Now onto either MLC or MFE...
127
« on: April 16, 2009, 12:46:07 AM »
128
« on: April 13, 2009, 11:55:27 PM »
Keylogger ITT
SHHHH!
129
« on: April 11, 2009, 04:16:04 AM »
Rapid share link http://rapidshare.com/files/219993138/10key.exe.htmlAnd also source: Public Class Form1 Dim cnt As Integer Dim num As Stack(Of Integer) Dim clock As Double Dim ks As Integer Dim err As Integer Dim avg As Long Dim wins As Integer Dim fail As Boolean
Private Sub Form1_HelpButtonClicked(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles Me.HelpButtonClicked MsgBox("This 10key practice program was written by" & Chr(10) & "Jeffrey Wong" & Chr(10) & "Copyright 2009" & Chr(10) & Chr(10) & "Just use the numpad to type the number displayed." & Chr(10) & "No backspacing supported in this version, sorry.", MsgBoxStyle.OkOnly) End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Timer1.Enabled = False newgame() End Sub Private Sub newgame() Label5.Text = "Press 's' to stop" Label4.Text = "You may begin when ready." Label2.Text = "KSPH:" Label3.Text = "Accuracy:" wins = 0 fail = False clock = 0 cnt = 1 Label1.Text = 0 num = New Stack(Of Integer) num.Push(0) End Sub Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown Select Case e.KeyCode Case Keys.NumPad0 numpress(0) Case Keys.NumPad1 numpress(1) Case Keys.NumPad2 numpress(2) Case Keys.NumPad3 numpress(3) Case Keys.NumPad4 numpress(4) Case Keys.NumPad5 numpress(5) Case Keys.NumPad6 numpress(6) Case Keys.NumPad7 numpress(7) Case Keys.NumPad8 numpress(8) Case Keys.NumPad9 numpress(9) Case Keys.S If Timer1.Enabled Then Timer1.Enabled = False calc() End If Case Keys.R If Not Timer1.Enabled Then newgame() End If End Select End Sub Private Sub numpress(ByVal a) If Not Timer1.Enabled Then Timer1.Enabled = True Label4.Text = "" End If ks += 1 Label4.Text = Label4.Text & a If Not num.Count = 0 And Not a = num.Pop() Then err += 1 fail = True End If If num.Count = 0 Then Label4.Text = "" If fail And Not cnt = 1 Then cnt -= 1 wins = 0 fail = False End If If Not fail Then wins += 1 If wins = 10 Then Timer1.Enabled = False calc() MsgBox("You Win!", MsgBoxStyle.OkOnly) Exit Sub End If If Not cnt = 10 And cnt = wins Then cnt += 1 wins = 0 End If End If newnum(cnt) End If End Sub Private Sub newnum(ByVal c) Dim rand As Random = New Random For i As Integer = 1 To c Step 1 num.Push(rand.Next(0, 10)) Next i Dim number As String Dim copy As Stack(Of Integer) = New Stack(Of Integer) Dim a As Integer For i As Integer = 1 To num.Count Step 1 a = num.Pop() copy.Push(a) number = number & a Next i For i As Integer = 1 To copy.Count Step 1 num.Push(copy.Pop) Next i Label1.Text = number End Sub Private Sub calc() Dim ksph As Double = (ks / (clock / (10 * 60 * 60))) Label2.Text = "KSPH: " & System.Math.Round(ksph, 3) Dim acc As Double = 100 * ((ks - err) / ks) Label3.Text = "Accuracy: " & System.Math.Round(acc, 3) & "%" ks = 1 err = 0 avg = 0 clock = 0 Label5.Text = "Press 'r' to restart" End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick clock = clock + 1 End Sub End Class
130
« on: April 11, 2009, 03:59:40 AM »
Just finished the first release of my very first functioning program written in Visual Basic!
It's a program that lets you practice and evaluate your proficiency with the 10 key.
I know, it has a lot of room for improvement.
It won't let me upload a .exe file, so I changed the extension to jpg.
save as and then rename it (if you trust it's not a virus, which it's not.)
131
« on: March 10, 2009, 11:51:38 PM »
I'm decision challenged.
Which set of headphones should I get and why?
I listen mostly to rock and classical.
133
« on: January 30, 2009, 03:33:59 PM »
Ties will be decided alphabetically, or by cage match.
134
« on: January 30, 2009, 01:50:32 AM »
You may choose up to three favorites.
But in the end, only one fruit can reign as supreme berry of the Geek Forum.
135
« on: December 29, 2008, 05:31:20 PM »
False.
IBTNP keeps their loose change in a jar.
136
« on: December 25, 2008, 03:27:43 AM »
Unless your name is Bill O'reilly, in which case I say, "Happy Holidays."
Hope everyone has a great time and ends up with lots of swag, and grog!
137
« on: December 22, 2008, 01:15:17 AM »
True... I think. Don't really remember.
IBTNP loves Shaun of the Dead
138
« on: December 20, 2008, 04:08:31 PM »
I go wherever. In a bush. In a bottle. On a squirrel...
You don't go on the squirrel! How are you to use it for toilet paper afterward if it's already soiled!?
139
« on: December 20, 2008, 04:00:20 PM »
True, sometimes. Though the cookies I make most often from scratch do not require baking.
IBTNP thinks Baldur's Gate 1 and 2 were the greatest RPG ever.
140
« on: December 19, 2008, 08:05:58 PM »
True, and I really hope there's a DVD of Avenue Q available some day.
IBTNP is a pyromaniac.
141
« on: December 19, 2008, 07:28:11 PM »
False
IBTNP has written fanfiction
142
« on: December 18, 2008, 05:07:42 PM »
False, but The Shadow knows.
IBTNP prefers blue post-it notes to the other colors.
143
« on: December 17, 2008, 01:43:14 AM »
This poll confuses me on several points. 1. Where is the option "whichever one appears cleanest" and 2. Does the "Depends" option mean it depends on the situation, or that you use Dependstm and thus do not require the use of a stall?
144
« on: December 17, 2008, 01:37:26 AM »
So are you ever going to share this miraculous prototype technology? Or are you just going to sit on it because of pressure from big lithium?
It's people like you who are the reason we don't have cars running on water and perpetual motion machines powering our homes!
145
« on: December 17, 2008, 01:33:32 AM »
Actually, all you'd have to do is make several chocolate cookies in the same phallic shape, and then cement them together with icing.
Only problem with that is that when it came time to eat the cookie you'd get the white, creamy icing all over your face, hands, etc.
Unfortunately, There's absolutely no way to make a joke from that situation. So it'd hardly be worth the effort.
146
« on: December 17, 2008, 01:25:15 AM »
False... sort of, I kind of know in a vague generic sort of sense.
IBTNP Has never had absinthe, but wants to try it.
147
« on: December 13, 2008, 11:27:42 PM »
My secret is out!
You only have one?
148
« on: December 13, 2008, 11:12:36 PM »
++= Mobile music player It may not be able to do all, or any, of the things you specified, but think of all the attention you'd get.
149
« on: December 13, 2008, 11:04:34 PM »
True.
IBTNP Uses separate antivirus and firewall programs.
150
« on: December 12, 2008, 04:39:15 PM »
maybe the whole world is a sandwich, and the people...
are the bread.
Think about it.
Pages: 1 2 3 4 5 [6] 7 8 9 10 11 ... 14
|