rem basic-lyrics 8.9

(#ausgruenden hochgezogen vom 12.8.2003)

rem author.this.thing.content = mikelbower (date = this-date )
rem to be continued

declare function lyric-online ()
declare function lieb ()
declare sub Politics ()
declare sub schmerz (schon_wieder_du as boolean )
declare sub herz ()

main:

do
until_the_end_of_the_universe = false REM a very long time
readd { (reader.lyric) all[ everthing:from;alles ] }
loop

Public Function lyric-online ()

Private Function lieb ()
dim mychoice as liebling

if mychoice then
lieb
else
exit function
REM : spinnste ?
end if

End Function

Public Dynamic Politics

dim gekauft as normal
dim erwischt as selten
dim schnell as kommtdraufan
dim money_is_gone as long

with gekauft do
amigo(amiga) loves amiga(amigo)
if erwischt then exit sub ( schnell)
//// { scrpit = sauerei
exception : ( from cdu/org/net/chef/vati_kanns/lex_speyer-staufer)
if kohl then stay_and_eat_and_laugh-grins
//// neverends seems like that REM what is im bush ?
until money_is_gone
loop

End Sub

Private Static Sub schmerz(schon_wieder_du as boolean)
if schon_wieder_du = true then
exit live(mylive;vestehste(from tommy)
else if
du_auch_noch
verkrümel_dich_void( from ++);exit_express(dalli)
else
ah_jo_was_glaabschd_donn_du_exit
end if
rem: zur sicherheit :
exit(from schmerz)
End Sub
Private Static Sub herz()

dim i as integer
dim ewig, gigaherz as long
dim rasend, flashherz, michflasch as computer_lyrical
dim dichflasch, deinherz,meinherz as computer_lyrical
dim bibliothek as flashstuff

import from :
humanresource.object.livestream! { fuehle, gruesse, klopf, puls }

do loop
fuehle(flashherz,bibliothek)
fuehle(michflash,dichflash)
gruesse(deinherz,meinherz)
for i = 1 to gigahertz
klopf(rasend;let puls = 1 to 99 )
next
until ewig
End Sub
dim satisfied as human

if not satisfied
goto http://mikelbower.com
satisfied = true
end if

End Function