[erledigt]
Übersicht
BlitzBasic Beginners-Corner
mix2005Betreff: [erledigt] |
 So, Jul 08, 2007 1:49Antworten mit Zitat 
|
|
|---|---|---|
| gelöscht | ||
- Zuletzt bearbeitet von mix2005 am So, Jul 08, 2007 10:45, insgesamt 2-mal bearbeitet
|
Arrangemonk |
So, Jul 08, 2007 2:30 Antworten mit Zitat
|
|---|---|---|
|
dein programm
du entteuscht mich, das sind normale basic funktionen, das hättest du selber mit freebasic kompillieren können, so wie ich dazu muss es aber so aussehen^^ Code: [AUSKLAPPEN] Print "Abkürzungen:" Print "ALBA - Alba" Print "SARA - Saray" Print "MUMA - Muschelmark" Print "AMAR - Arcor Mark" Print "CRON - Ascaaronsche Krone" Print "AFRA - Astarischer Franken" Print "ATTA - Attekarischer Taler" Print "MIKR - MiKrone" Print "CORF - Rau" Print "DBRT - Reichstaler (Dreibürgen)" Print "FLTR - Freilandtaler" Print "FDNR - Futunischer Dinar" Print "YUAN - Yuan" Print "HNDN - Hansastanscher Dinar" Print "IKRT - Irkanischer Reichstaler" Print "LALI - Landinische Lira" Print "LEGU - Gulden" Print "MATH - Thaler" Print "NSLS - Neunseenländischer Seallar" Print "NOKO - Nöresunder Krone" Print "OGMI - Oghusische Milyon" Print "PEKS - Pizzarische Krösus" Print "OCKE - Öcke" Print "REKR - Renslöer Krone" Print "TRPE - Peanuts" Print "REAL - Real" Print "TURA - Tura" Print "RUBL - Rubbel" Print "" ALBA# = 1.24 SARA# = 0.45 MUMA# = 1.00 AMAR# = 1.00 CRON# = 0.14 AFRA# = 0.64 ATTA# = 0.50 MIKR# = 2.50 CORF# = 0.50 DBRT# = 0.51 FLTR# = 1.00 FDNR# = 10.00 YUAN# = 125.00 HNDN# = 0.20 IKRT# = 0.06 LALI# = 15.00 LEGU# = 1.00 MATH# = 20.00 NSLS# = 3.00 NOKO# = 1.00 OGMI# = 0.50 PEKS# = 0.75 OCKE# = 1.50 REKR# = 0.11 TRPE# = 0.50 REAL# = 0.10 TURA# = 0.70 RUBL# = 0.25 Input amoun# '("Anzahl ") Input rate1$ '("Währung ") Input rate2$ '("zu ") If rate1$ = "ALBA" Then wahrung1# = ALBA# ElseIf rate1$ = "SARA" Then wahrung1# = SARA# ElseIf rate1$ = "MUMA" Then wahrung1# = MUMA# ElseIf rate1$ = "AMAR" Then wahrung1# = AMAR# ElseIf rate1$ = "CRON" Then wahrung1# = CRON# ElseIf rate1$ = "AFRA" Then wahrung1# = AFRA# ElseIf rate1$ = "ATTA" Then wahrung1# = ATTA# ElseIf rate1$ = "MIKR" Then wahrung1# = MIKR# ElseIf rate1$ = "CORF" Then wahrung1# = CORF# ElseIf rate1$ = "DBRT" Then wahrung1# = DBRT# ElseIf rate1$ = "FLTR" Then wahrung1# = FLTR# ElseIf rate1$ = "FDNR" Then wahrung1# = FDNR# ElseIf rate1$ = "YUAN" Then wahrung1# = YUAN# ElseIf rate1$ = "HNDN" Then wahrung1# = HNDN# ElseIf rate1$ = "IKRT" Then wahrung1# = IKRT# ElseIf rate1$ = "LALI" Then wahrung1# = LALI# ElseIf rate1$ = "LEGU" Then wahrung1# = LEGU# ElseIf rate1$ = "MATH" Then wahrung1# = MATH# ElseIf rate1$ = "NSLS" Then wahrung1# = NSLS# ElseIf rate1$ = "NOKO" Then wahrung1# = NOKO# ElseIf rate1$ = "OGMI" Then wahrung1# = OGMI# ElseIf rate1$ = "PEKS" Then wahrung1# = PEKS# ElseIf rate1$ = "OCKE" Then wahrung1# = OCKE# ElseIf rate1$ = "REKR" Then wahrung1# = REKR# ElseIf rate1$ = "TRPE" Then wahrung1# = TRPE# ElseIf rate1$ = "REAL" Then wahrung1# = REAL# ElseIf rate1$ = "TURA" Then wahrung1# = TURA# ElseIf rate1$ = "RUBL" Then wahrung1# = RUBL# Else Print "Ungültiger Währungskürzel 1" EndIf If rate2$ = "ALBA" Then wahrung2# = ALBA# ElseIf rate2$ = "SARA" Then wahrung2# = SARA# ElseIf rate2$ = "MUMA" Then wahrung2# = MUMA# ElseIf rate2$ = "AMAR" Then wahrung2# = AMAR# ElseIf rate2$ = "CRON" Then wahrung2# = CRON# ElseIf rate2$ = "AFRA" Then wahrung2# = AFRA# ElseIf rate2$ = "ATTA" Then wahrung2# = ATTA# ElseIf rate2$ = "MIKR" Then wahrung2# = MIKR# ElseIf rate2$ = "CORF" Then wahrung2# = CORF# ElseIf rate2$ = "DBRT" Then wahrung2# = DBRT# ElseIf rate2$ = "FLTR" Then wahrung2# = FLTR# ElseIf rate2$ = "FDNR" Then wahrung2# = FDNR# ElseIf rate2$ = "YUAN" Then wahrung2# = YUAN# ElseIf rate2$ = "HNDN" Then wahrung2# = HNDN# ElseIf rate2$ = "IKRT" Then wahrung2# = IKRT# ElseIf rate2$ = "LALI" Then wahrung2# = LALI# ElseIf rate2$ = "LEGU" Then wahrung2# = LEGU# ElseIf rate2$ = "MATH" Then wahrung2# = MATH# ElseIf rate2$ = "NSLS" Then wahrung2# = NSLS# ElseIf rate2$ = "NOKO" Then wahrung2# = NOKO# ElseIf rate2$ = "OGMI" Then wahrung2# = OGMI# ElseIf rate2$ = "PEKS" Then wahrung2# = PEKS# ElseIf rate2$ = "OCKE" Then wahrung2# = OCKE# ElseIf rate2$ = "REKR" Then wahrung2# = REKR# ElseIf rate2$ = "TRPE" Then wahrung2# = TRPE# ElseIf rate2$ = "REAL" Then wahrung2# = REAL# ElseIf rate2$ = "TURA" Then wahrung2# = TURA# ElseIf rate2$ = "RUBL" Then wahrung2# = RUBL# Else Print "Ungültiger Währungskürzel 2" EndIf MatH1# = amoun# * wahrung1# MatH2# = MatH1# / wahrung2# Print MatH2# 'loop until INKEY$ = "q" sleep |
||
| ingeneur | ||
Schnuff |
So, Jul 08, 2007 8:33 Antworten mit Zitat
|
|
|---|---|---|
|
öhm, du weisst schon, das du deswegen verwahrnung und schlimmer kriegen kannst? ich würd dir empfehlen das sehr schnell zu löschen...
btw. wiso ist das forum eigentlich so langsam Oo |
||
| Programmers dont die. They gosub without return... | ||
|
The_Nici |
So, Jul 08, 2007 9:05 Antworten mit Zitat
|
|---|---|---|
|
Fremdkompilieren ist verboten und hat sehr wahrscheinlich folgen für den Ersteller des Codes und den, der ihn Compiliert hat.
@Schnuff: Manchmal laggt halt der Server^^ |
||
mix2005 |
So, Jul 08, 2007 10:50 Antworten mit Zitat
|
|
|---|---|---|
| danke | ||
|
|
Arrangemonk |
So, Jul 08, 2007 18:21 Antworten mit Zitat
|
|---|---|---|
| solange es sich um einfache basicfunktionen handelt die nicht blitzspezifisch sind, da die exe mit freebasic kompilliert wurde sehe ich keine rechtlichen probleme | ||
| ingeneur | ||
|
Gameprogman |
So, Jul 08, 2007 18:24 Antworten mit Zitat
|
|---|---|---|
|
@mix2005:
Du brauchst die Frage nicht immer löschen wenn sie beantwortet wurde, denn evtl. hat jemand genau dieselbe Frage und kann somit sein Problem mit der Forensuche lösen. |
||
| www.bandradr.de ! Awesome ! | ||
|
BladeRunnerModerator |
So, Jul 08, 2007 18:33 Antworten mit Zitat
|
|---|---|---|
|
Er weiss sicher warum er es gelöscht hat.
Jede weitere Anfrage dieser Art gibt ne Verwarnung, Mix. |
||
|
Zu Diensten, Bürger.
Intel T2300, 2.5GB DDR 533, Mobility Radeon X1600 Win XP Home SP3 Intel T8400, 4GB DDR3, Nvidia GF9700M GTS Win 7/64 B3D BMax MaxGUI Stolzer Gewinner des BAC#48, #52 & #92 |
||
Übersicht
BlitzBasic Beginners-Corner
Powered by phpBB © 2001 - 2006, phpBB Group