Das Open-Control-Projekt - Die Alternative zur C-Control-I


Das Forum zur C-Control-1
Welche C-Control-Varianten existieren?
Übersicht - Suchen - Neueste 50 Beiträge - Neuer Beitrag - Login - Registrieren
INFO - FAQ - CC2-Forum - CCPro-Forum 

 Re: C-Control am Ende? Kategorie: Verschiedenes (von Dietmar, Homepage - 26.10.2005 20:02)
 Als Antwort auf Re: C-Control am Ende? von Stefan Tappertzhofen - 26.10.2005 19:28
Dietmar nutzt:  CC1-M-Unit V1.1, Advanced CC1-Unit, Open-Micro, Open-Mini

Hallo miteinander

> Das gleiche in BASIC++
>
> if i < 10 then
>   print "i ist kleiner 10"
> else
>  print "i ist groesser 10"
> end if

..und hier OCBASIC. Und in CCBASIC plus Parser sieht es auch nicht großartig anders aus:

dim i byte

if i < 10 then
  print "i ist kleiner 10"
else
 print "i ist groesser 10"
end if



> und das ganze in BASIC++
>
> i = funktion1(1)
> end
>
> function funktion1(a as byte)
>   return (a + funktion2())
> end function
>
> function funktion2()
>  funktion2 = 5 ' kann man auch alternativ als RETUN nehmen
> end function

..und hier OCBASIC. Das "FUNCTION"-Keyword existiert zumindest bisher nicht.

i = funktion1(1)
end

' function funktion1(a as byte)

#funktion1
  pop a                'Alternativ: a=pop
return (a + funktion2) 'Alternativ: return pop+funktion2

' function funktion2()

#funktion2
return 5


Dietmar

Meine Homepage: http://ccintern.dharlos.de

 Antwort schreiben

Bisherige Antworten:

Re: C-Control am Ende? (von Dierk - 27.10.2005 9:52)
    Re: C-Control am Ende? (von Dietmar - 27.10.2005 12:16)
        Re: C-Control am Ende? (von Dierk - 27.10.2005 13:24)
    Re: C-Control am Ende? (von Jens - 27.10.2005 11:14)
Re: C-Control am Ende? (von Stefan Tappertzhofen - 27.10.2005 1:34)
    Re: C-Control am Ende? (von Dietmar - 27.10.2005 11:54)
        Re: C-Control am Ende? (von Stefan Tappertzhofen - 27.10.2005 16:41)
            Re: C-Control am Ende? (von Dietmar - 27.10.2005 22:17)