home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / sharew / franzbas / basic.doc < prev    next >
Encoding:
Text File  |  1994-03-01  |  7.8 KB  |  263 lines
  1. ACHTUNG: VORABVERSION - RICHTIGES MANUAL FOLGT!
  2.  
  3. Diese Version benötigt eine Farbgrafikkarte (CGA/EGA/VGA).
  4.  
  5. Die endgültige Version läuft auf allen Grafikkarten!
  6.  
  7. FranzBasic
  8.  
  9. zum 1.11.1989 implementierte Funktionen
  10.  
  11. Daten-Definitionen
  12.  
  13. DIM       Felder definieren
  14.       Dim Preis(10), y%(20)
  15. RECORD    Variable vom Typ Record definieren
  16.       RECORD Rtype1 Asatz
  17. RECTYPE   Record-Type definieren
  18.       RECTYPE
  19.         RECVAR A$ 20, i%, Preis
  20.       ENDREC
  21. STATIC    Lokale Variable statisch erklΣren
  22.       STATIC i%
  23. LOCAL     ErklΣrt eine Variable als lokal in einer Subroutine
  24.       LOCAL i%, Preis
  25.  
  26.  
  27. Programm-Steuerung
  28.  
  29. PAUSE     Text anzeigen und auf Tastendruck warten
  30.       PAUSE "Taste drⁿcken, wenn's weitergehen soll"
  31. GOTO      Label anspringen
  32.       GOTO Anfang
  33. AND       Logischer Operator in IF-Anweisungen
  34.       If i% > 0 AND len% > 0 THEN ....
  35. NOT       Logischer Operator in IF-Anweisungen
  36.       If NOT (i% > 0 AND len% > 0) THEN ....
  37. OR        Logischer Operator in IF-Anweisungen
  38.       If i% > 0 OR len% > 0 THEN ....
  39. IF        IF-Schleife
  40.  
  41.       IF Preis < 100.0 Then Print "OK"  (einzeilige Anweisung)
  42.  
  43.       IF Preis < 100.0 Then             (mehrzeilig)
  44.          ...
  45.       ELSE
  46.          ...
  47.       ENDIF
  48.  
  49.       IF Preis < 100.0 Then
  50.          ...
  51.       ELSIF Preis < 150.0 Then
  52.          ...
  53.       ELSE
  54.          ...
  55.       ENDIF
  56. BREAK     VerlΣsst WHILE-, REPEAT- oder FOR-Schleife
  57. FOR       FOR-Schleife
  58.       FOR I% = 1 To 20 [Step 1]
  59.          ...
  60.          IF .... THEN BREAK
  61.          ...
  62.       ENDFOR
  63. NEXT      Synonym fⁿr ENDFOR
  64. REPEAT    REPEAT-Schleife
  65.       REPEAT
  66.         ...
  67.         If ... Then Break
  68.         ...
  69.       UNTIL x < 0
  70. UNTIL     siehe REPEAT
  71. SUBROUTINE Unterprogramm einleiten
  72.  
  73.       SUBROUTINE Add%(a%,b%)
  74.         Print "Summe 0 ";a%+b%
  75.         Return a%+b%
  76.       ENDSUB
  77.  
  78.       GOSUB Add%(100,45)                  Aufruf als Prozedur
  79.       Summe% = Add%(100,45)               Aufruf als Funktion
  80.  
  81. VAR       Formalparameter durch Referenz ⁿbergeben
  82.       Subroutine C1$(VAR S$)
  83.         S$ = "ABC"    'Ohne VAR Σndern von s$ nicht m÷glich)
  84.       Endsub
  85. RETURN    Siehe Subroutine
  86. GOSUB     Subroutine aufrufen
  87.       GOSUB Drucken()
  88. WHILE     WHILE-Schleife
  89.       i% = 20
  90.       WHILE i%
  91.         ...
  92.         If ... Then Break
  93.         ...
  94.         i% = i%-1
  95.       WEND
  96. STOP      Programm beenden
  97.       STOP
  98.  
  99.  
  100. Mathematische Funktionen
  101.  
  102. SIN       Sinus-Funktiom
  103.       X = SIN(Y)
  104. COS       Cosinus
  105.       X = COS(Y)
  106. TAN       Tangens-Funktion
  107.       x = TAN(y)
  108. ATN       Arcustangens
  109.       x = ATN(Y)
  110. EXP       Exponentialfunktion
  111.       X = EXP(y)
  112. LOG       Natⁿrlicher Logarithmus
  113.       x = LOG(y)
  114. SQR       Quadratwurzel
  115.       X = SQR(Y)
  116.  
  117. String-Befehle und Funktionen
  118.  
  119. SET$      Teilstring ⁿberschreiben
  120.       A$ = "ABcd" : Teil$ = "xx" : SET$ A$,2,Teil$ --> A$ = "Axxd"
  121. DELETE$   Teilstring l÷schen
  122.       DELETE$   A$,3,4 --> In String A$ werden ab Stelle 3
  123.       4 Char entfernt
  124. INSERT$   String in anderen String einsetzen
  125.       A$ = "Ad" : Teil$ = "Bc" : INSERT$ A$,2,Teil$ --> A$ = "ABcd"
  126. INSTR%    Stellt fest, ob String in einen anderen enthalten ist und gibt
  127.       Position zurⁿck, 0 wenn nicht enthalten
  128.       i% = INSTR%S$,Teil$) --> i% = 3, wenn S$="123ABC", TEIL$="3A"
  129. LEFT$     Linken Teilstring eines Strings bilden
  130.       Links$ = LEFT$("ABcd",2) --> Links$ = "AB"
  131. MID$      Teilstring aus Mitte eines Strings bilden
  132.       Teil$ = MID$("ABcdZ",2,3) --> Teil$ = "BcD"
  133. RIGHT$    Linken Teilstring eines Strings bilden
  134.       Rechts$ = RIGHT$("ABcd",2) --> Rechts$ = "cd"
  135. LTRIM$    Fⁿhrende Leerstellen in String abschneiden
  136.       S$ = "    123" : S$=LTRIM$(S$) --> s$="123"
  137. TRIM$     Nachfolgende Blanks von String abschneiden
  138.       S$ = "123   2" : S$=Trim(S$) --> S$ = "123"
  139. LCASE$    String in lowercase(Kleinschrift) darstellen
  140.       Klein$ = LCASE$("ABcd") --> Klein$ = "abcd"
  141. UCASE$    String in uppercase(Gro▀schrift) darstellen
  142.       Gross$ = UCASE$("ABcd") --> Gross$ = "ABCD"
  143. LEN%      LΣnge eines Strings ermitteln
  144.       l% = LEN%("ABcd") --> l% = 4
  145. ASC%      liefert ASC-Zahlenwert des 1. Characters einer Zeichenkette
  146.       i% = ASC%("ABC") --> i% = 65
  147. CHR$      Wandelt Integer-Wert in String-Character
  148.       A$ = CHR$(66) --> A$ = "B"
  149. STR$      Zahl in Zeichenkette wandeln
  150.       A$ = STR$(100.0) --> A$ = "100.0"
  151. VAL       Realzahl aus String erzeugen
  152.       a = VAL("123.9") --> a = 123.9
  153. VAL%      Integerzahl aus String erzeugen
  154.       a% = VAL%("123.9") --> a% = 123
  155.  
  156. Datenbank-Befehle
  157.  
  158. DBCREATE  Datenbank erzeugen mit Satzstruktur
  159.       DBCREATE "Artikel",Artikelsatz
  160. DBOPEN    Datenbank ÷ffnen
  161.       DBOPEN #1,"Kunden"
  162. DBCLOSE   Schliessen Datenbank
  163.       DBCLOSE #1
  164. DBGET     Datenbank lesen ⁿber Schlⁿssel
  165.       DBGET #1,Kundennr$,Kundensatz
  166. DBPUT     Datenbank schreiben
  167.       DBPUT #2, Artikelsatz
  168. DBDELETE  Zuletzt gelesenen Satz in Datenbank loeschen
  169.       DBDELETE #1
  170. DBBROWSE  DurchblΣttern einer Datenbank am Bildschirm
  171.       Startsatz und Format k÷nnen eingestellt werden
  172.       DBBROWSE #1[,Start$,Format$]
  173.  
  174. Bildschirm-Steuerung
  175.  
  176. CLS       Loescht Bildschirm
  177. COLOUR    Einstellen von Vorder- und Hintergrundfarbe
  178.       COLOUR 7,0 --> Weiss auf Schwarz
  179. LOCATE    Cursor positionieren
  180.       LOCATE x%,y%
  181.  
  182. IO-Behandlung (Dateien, Tastatur, Drucker)
  183.  
  184. OPEN      Datei ÷ffnen
  185.       OPEN "I", #1,"Fakt.txt"                 ╓ffnen fⁿr Input
  186.       OPEN "O", #1,"Fakt.txt"                 ╓ffnen fⁿr Output
  187.       OPEN "R", #1,"Fakt.txt",Artikelsatz     ╓ffnen fⁿr Random-Access
  188. CLOSE     Schliesst Datei
  189.       Close #3
  190. INPUT     Daten einlesen
  191.       INPUT [Prompt$,]a%      (ⁿber Tastatur)
  192.       INPUT #4, a%  (aus Datei)
  193. LINE      Vorsatz zu INPUT, liesst bis zum Zeilenende
  194.       LINE INPUT #1,A$
  195. PRINT     Bildschirmausgabe / Dateiausgabe
  196.       PRINT "Gesamtsumme=";GS
  197.       PRINT #4,"Gesamtsumme=";GS
  198. LPRINT    Ausgabe auf Drucker
  199.       LPRINT "Gesamtsumme=";GS
  200. USING     Druckmaske definieren
  201.       r$ = 4.9 : PRINT USING "##,###.##",r$,"",r$ --> Ausgabe 4.90  4.9
  202. WRITE     Data in Datei schreiben
  203.       WRITE #3, a%,s$
  204. GET       Satz aus Random-Datei lesen
  205.       GET #3, satznr%, satz$
  206. PUT       Satz in Random-Datei schreiben
  207.       PUT #3, satznr%, satz$
  208. ERASE     Datei L÷schen
  209.       Erase "abc.txt"
  210. RENAME    Datei umbenennen
  211.       RENAME altername$, neuername$
  212. INKEY$    Zuletzt ⁿber Tastatur eingegebenes Zeichen holen
  213.       INKEY$ a$
  214. LASTKEY%  Zuletzt gedrⁿckte Taste feststellen
  215.       If LASTKEY%() = 27 Then Return   (27 = ESC)
  216.  
  217. Verschiedenes
  218.  
  219. REM       Bemerkung, wird vom ▄bersetzer nicht ausgewertet
  220.       REM  Dies ist ein Kommentar
  221.       ' Dies ist auch einer           (' identisch mit REM am Satzanfang)
  222.       i% = 0 'i% zuruecksetzen        (' kann aber auch nach Anweisung
  223.                          folgen)
  224. ERROR%    Runtime-error feststellen
  225.       err% = error%()
  226. EXEC      Programm starten
  227.       EXEC "format.com"
  228.       EXEC SHELL
  229. INTERRUPT Interrupt erzeugen
  230.       INTERRUPT inr%,Regs
  231. TIMEDATE$ Zeit und Datum ermitteln
  232.       Zeit$ = TimeDate$(1) --> Zeit$ = "12:00:00"
  233.       Date$ = TimeDate$(2) --> Date$ = "6.9.1988"
  234.  
  235.  
  236. FranzBasic Spezial
  237.  
  238. DIALOG    Data erfassen
  239.       Dialog "Kundennr: ",Kundennummer$[,x%,y%]
  240. FILES     Dateien eines Typs anzeigen und Auswahl erm÷glichen
  241.       FILES "\Basic","*.bas",file$
  242. FORM      Datenerfassung fⁿr einen RECORD
  243.       FORM Artikelsatz$,[x%,y%]
  244. MENU      Menu erzeugen
  245.       Dim Mstring$(5)
  246.       MString$(1) = " Auswahl1 Auswahl2 Auswahl3 "
  247.       MString$(2) = " Hilfstext1 "
  248.       MString$(3) = " Hilfstext2 "
  249.       MString$(4) = " Hilfstext3 "
  250.       MString$(5) = ""
  251.       Menu MString$[,x%,y%]
  252. MESSAGE   MessageBox erzeugen
  253.       MESSAGE "Datei l÷schen|  Ja  Nein"
  254. MOUSE ON  Maus-Zeiger einschalten
  255. MOUSE OFF Maus-Zeiger ausschalten
  256. MOUSE     Maus-Daten lesen (gedrⁿckter Knopf, x-/y-Position)
  257.       Mouse Button%, x%, y%
  258.  
  259. Bezug durch: Zimmer Informatik, Postfach 140369, 4000 Dⁿsseldorf, Tel. (0211)203726
  260. Einfⁿhrungspreis DM 149,-- (Bar, Scheck, Nachnahme), Demo-Version DM 20,-- (nur bar)
  261. Version 1.1 wird eine Spreadsheet-Schnittstelle enthalten (Anfang 1990)
  262. Ab 1.1.90 liefern wir FranzBasic Windows, die Version fⁿr MS-Windows, mit Grafikbefehlen
  263.