Browse this blog

Wednesday, September 30, 2009

Google search engine with opera10

Unfortunately I deleted the search URL from Google in my search settings from opera and I didn't know the right URL that I can start the search by pressing ENTER.

But I solved the problem and here is the way how to do it, if you should have the same problem:
1.)  open Google website
2.) right-click into input-field
3.) Click "add search"
4.) Make adjustments (Do not change the URL)
5.) Press "Ready"

Who doesn't know what I am talking about:


Tuesday, September 29, 2009

Crossfire

Crossfire is a very funny ego-shooter. It's freeware and you only need to register on the development's homepage. You have to possibility to buy different kinds of weapons. With real money you can buy some special weapons which have for example more ammo. I like to compare Crossfire with CS, because I think Crossfire is CS for the poor. So for all who don't want to buy CS can download Crossfire. In the last time, some bugs were fixed and some new maps were added.
Graphical there is a little problem: People who haven't got a wide screen monitor can only play with 1024*768 pixels. A higher resolution isn't possible at the moment.
But the game is really funny and I can advise you to download this game.
You can download it here:
http://download.chip.eu/de/CrossFire-Free-Online-FPS-Game_5861377.html

Sunday, September 27, 2009

Integral Calculus

For everyone who hasn't any desire to to type every integral calculus into the calculator, I have a solution:

Public Class Form1
Dim a As Double
Dim b As Double
Dim n As Double
Dim F As Double

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.Close()
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
If TextBox1.Text = "" Or TextBox2.Text = "" Or TextBox4.Text = "" Then
MessageBox.Show("Bitte Eingabe ├╝berpr├╝fen", "Error", MessageBoxButtons.OK)
Else
a = TextBox2.Text
b = TextBox4.Text
n = TextBox1.Text

F = ((b ^ (n + 1)) / (n + 1)) - ((a ^ (n + 1)) / (n + 1))

TextBox3.Text = F
End If
End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
TextBox4.Text = ""
End Sub
End Class

Here you can download my program:
http://christianlachmann.de.vu/Integralrechnung.exe

Thursday, September 24, 2009

Solving quadratic formulas

I wrote an application with VisualBasic 2008 to solve quadratic formulas.

The most important part is this:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click



a = TextBox1.Text
b = TextBox2.Text
c = TextBox3.Text

x3 = ((b ^ 2) - (4 * a * c))

If x3 < 0 Then
TextBox4.Text = "D < 0"
TextBox5.Text = "D < 0"
MessageBox.Show("D<0", "Fehler", MessageBoxButtons.OK)
Else

x1 = (-b - Math.Sqrt((b ^ 2) - (4 * a * c))) / (2 * a)
x2 = (-b + Math.Sqrt((b ^ 2) - (4 * a * c))) / (2 * a)

TextBox4.Text = x1
TextBox5.Text = x2
End If
End Sub

Here, x1 and x2 is calculated and checked whether the discriminant is smaller than zero.  In VB you use Math.Sqrt ( ) to extract a root.

You can download this application here:
http://christianlachmann.de.vu/QuadratischeGleichung.exe

But it's in German language.

Tuesday, September 22, 2009

Cyber bulling

This blog is also about internet sites like Twitter, because of that I want to pick up this topic:
http://www.taz.de/1/leben/internet/artikel/1/der-moerder-ist-immer-das-netz

In my opinion, the Internet is a huge playground, where many people meet or communicate with each other. Like in every society you've to accept some rules, for this reason cyber bulling is a breach of the rules and we shouldn't close our eyes, because we are not affected.

I believe the person on the other end of the Internet cable is a person like you and me, so he/she has the right to be accepted.

Here's a link to persons who deal with this topic:
http://www.watchyourweb.de

Monday, September 21, 2009

Twitter

There are many ways to send Twitter messages.
On the one hand you can send your messages with the Twitter HP or on the other hand you can send twitter messages on your mobile phone. For that you do not need any other apps, because you can use your browser on your mobile phone. Only enter m.twitter.com and start posting.

An other possibility to send twitter messages is an opera widget. I'm using the "Twitter Opera widget". It's small and offers all options, you also have on the Twitter HP.
For Firefox, there are also some Add-ons, but I didn't test them so far.

Friday, September 18, 2009

Opera10

I tested Opera10 for a while and I'm very surprised. Normally I'm surfing with Firefox, but I read about Opera10 and thought that I could test it. 

Now you've a turbo-mode, which helps you if you have a bad internet connection. It scales the pictures down, so that they're smaller. 

The password manager offers the possibility to auto-login with the shortcut STRG+ENTER. You've open the site -> press STRG+ENTER -> password and user name were insert -> browser logs in automatically. 

Also you've a large number of "widgets". For example, I have the google translator and a twitter widget. But there are many more useful widgets.

At the fast-choice-site you can add up to 25 sites, now. 

So you can see, that there are some changes and I will keep Opera10.


Thursday, September 17, 2009

Header ("Location: ")

This PHP-command could be very useful if you're coding a passord request. 

On the one hand you can use it to forward to the login site if the password or user name is wrong or on the other hand you can use it to forward the user to the "secret" site if the password and the user name is correct.

A little example:

$username = $_POST["username"];
$passwort = $_POST["passwort"];

if ($username=="++++" && $passwort=="++++")
{
Header ("Location: bilder.html");
}

else
{,
Header ("Location: index.html");
}

?>

Here are first defined the variables coming from a form on my login page, then checked if the password and the user name is correct. If this is true you will be forwarded to the "secret" page and if user name or password is wrong, you will be forwarded back to the login page. 

Tuesday, September 15, 2009

AA3.0.6 Patch

At 10th september 2009 the new AA3.0.6 Patch was released, to solve some problems. 

The problems with the training were fixed, for example that the game doesn't freeze after starting the training mission.

Also the gameplay was improved, because there were the most of the problems. 

Furthermore the statistics were improved. For example the rank display is working correct, now.

Some bugs with the missions were also fixed. One improvement is that the VIP has now the right number of magazines. 

The admin-settings were also overworked. Now, the admin-communication-console should work right. 

Who wants to have more informations, should read the release notes.

You can download the patch on steam or with the deploy client. 


Thursday, September 3, 2009

Coding a clock with VB2008

For coding a clock you only need a timer and a label.

Put the timer setting on "enabled" and the interval on "1000".

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick


Me.Label1.Text = My.Computer.Clock.LocalTime


End Sub

This is the whole code. Have fun with your clock

Wednesday, September 2, 2009

Calculation with date and time in VisualBasic 2008

At the moment I'm writing an application who deals with calculation with date and time. I had to search for a long time to find the right informations I needed for this application. So I thought it can't be wrong to write a post about the informations I found.

At first you have to implement the variable "datum":

Dim datum As New DateTime

Now you need the actual time:

datum = My.Computer.Clock.LocalTime

After this you have to name how much time you want to add or subtract. You can do that with either with a positive prefix or a negative:

datum = datum.AddHours(4)

Now you could write that in a label:

Label1.Text() = datum

Also you have many more possibilities to add or subtract time:

.AddYears

.AddMonths

.AddDays

.AddSeconds

.AddHours

.AddTicks

.AddMilliseconds

.AddMinutes

Now the whole coding example for the comprehension:

Dim datum As New DateTime

datum = My.Computer.Clock.LocalTime

datum = datum.AddHours(4)

Label10.Text() = datum