kannabis on portti mm. demokratiaan by Jumalauta [web]
DIM raster(40, 2)
DIM virt(4000)
DIM hame(1000)
DIM hime(1000)
DIM teksti$(21)
SCREEN 0
WIDTH 40, 25
CLS
pee = 2 * pi
koht = 190
FOR x = 0 TO 12
READ raster(x, 0)
READ raster(x, 1)
raster(25 - x, 0) = raster(x, 0)
raster(25 - x, 1) = raster(x, 1)
NEXT x
FOR x = 0 TO 8
READ raster(26 + x, 0)
READ raster(26 + x, 1)
NEXT x
FOR x = 0 TO 20
READ teksti$(x)
NEXT x
puokki = INT(20 - LEN(teksti$(0)) / 2)
DO
READ eppo$
skrolleri$ = skrolleri$ + eppo$
LOOP UNTIL eppo$ = " "
vika = LEN(skrolleri$) - 80
FOR y = 0 TO 99
FOR x = 0 TO 39
k = x + y * 40
virt(k) = 13 + INT((SIN(x / 6.36) - COS(y / 6.36)) * 6.5)
NEXT x
NEXT y
FOR x = 0 TO 999
hime(x) = virt(x)
NEXT x
DEF SEG = &HB800
FOR x = 0 TO 39
POKE 961 + x * 2, 15
NEXT x
POKE 961, 0: POKE 963, 1: POKE 965, 5: POKE 967, 13
POKE 1033, 13: POKE 1035, 5: POKE 1037, 1: POKE 1039, 0
DO
kello = TIMER + .01
d = d + 1
z = z + .05
ee = ee + .03
guu = SIN(ee) * 15
IF z > pee THEN z = z - pee
p = (38 + INT(SIN(z) * 38)) * 40
FOR x = 0 TO 999
dee = x + p + INT(SIN((d + x) / 100) * guu)
IF dee < 0 THEN dee = 0
IF dee > 3999 THEN dee = 3999
hame(x) = virt(dee)
NEXT x
goo = 40
FOR y = 0 TO 10
FOR x = 1 TO LEN(teksti$(y))
kee$ = MID$(teksti$(y), x, 1)
IF kee$ = "*" THEN
hame(goo + x - 1) = 26 + INT(hame(goo + x - 1) / 3)
ELSEIF kee$ = "." THEN
hame(goo + x - 1) = 0
END IF
NEXT x
goo = goo + 40
NEXT y
goo = 480
FOR y = 0 TO 11
FOR x = 1 TO LEN(teksti$(y + 10))
kee$ = MID$(teksti$(y + 10), x, 1)
IF kee$ = "*" THEN
hame(goo + x - 1) = 26 + INT(hame(goo + x - 1) / 3)
ELSEIF kee$ = "." THEN
hame(goo + x - 1) = 0
END IF
NEXT x
goo = goo + 40
NEXT y
FOR x = 0 TO 958 STEP 2
k = hame(x / 2)
POKE x, raster(k, 0)
POKE x + 1, raster(k, 1)
NEXT x
FOR x = 1040 TO 1998 STEP 2
k = hame(x / 2)
POKE x, raster(k, 0)
POKE x + 1, raster(k, 1)
NEXT x
nahka = nahka + .5
IF nahka < 1 THEN nahka = 1
IF nahka > vika THEN nahka = vika
FOR x = 0 TO 39
POKE 960 + x * 2, ASC(MID$(skrolleri$, INT(nahka) + x, 1))
NEXT x
DO: LOOP WHILE kello > TIMER
IF INKEY$ = CHR$(27) THEN END
LOOP
DATA 32,0, 176,1, 177,1, 178,1, 219,1
DATA 176,20, 177,20, 178,20, 219,20
DATA 176,77, 177,77, 178,77, 219,77
DATA 219,&h0a, 178,&h2a, 177,&h2a, 176,&h2a, 32,&h2a
DATA 178,&h02, 177,&h02, 176,&h02, 32,&h02
DATA " . "
DATA " .*. "
DATA " .*. "
DATA " . .*. . "
DATA " . .***. .. "
DATA " .*. .***. .*. "
DATA " .*.. .***. .*. "
DATA " .**.. .***. ..**. "
DATA " ..**...***...***. "
DATA " .. .***..***..***. . "
DATA " .*. .**..***..***. .*. "
DATA " .****...**.***.**....*****.. "
DATA " ...***..**.*.**..***..... "
DATA " ...**..***..**... "
DATA " ...*******... "
DATA " ..**...*...**... "
DATA " .**.. .*. ..***. "
DATA " .*.. .*. ... "
DATA " . .*. "
DATA " .*. "
DATA " . "
DATA " "
DATA " -- L A U M A T A J U O P A S T A A -- "
DATA " "
DATA " 'KANNABIS ON PORTTI HUUMEISIIN' "
DATA " "
DATA "Kannabisyhdistys kampanjoi Suomessa voimakkaasti kannabiksen "
DATA "laillistamisen puolesta kertoo auliisti kyseessä olevan puhtaan "
DATA "luonnontuotteen, jolla ei ole haittavaikutuksia. Yleensä he vetoavat "
DATA "siihen, että kannabis aiheuttaa vähemmän haittoja, kuin alkoholi. "
DATA "Suomessa on yli 2 miljoonaa alkoholin käyttäjää ja arviolta 50-60000 "
DATA "kannabiksen käyttäjää. Kannabiksen käytön yleistymisen myötä myös "
DATA "rauhoittavien lääkkeitten käyttö on lisääntynyt ja nimenomaan siinä "
DATA "ryhmässä, joka käyttää kannabista on kasvu ollut voimakasta. "
DATA "Suomessa on lukuisia suuryrityksiä, joita johtaa alkoholisti mutta ei ainuttakaan sellaista, jonka johtajana on kannabiksen vakiokäyttäjä!!!! "
DATA "Yliopistoissa opiskelevat tietävät tarkkaan, että kannabiksen käyttö on lopetettava ainakin viikko ennen tenttejä, koska muuten lukemisesta tai keskittymisestä ei tule mitään. "
DATA "Kannabisyhdistys vetoaa yleensä Hollannin esimerkkiin ja siihen, että eihän sielläkään ole mitään ongelmia huumeen suhteen. Valitettavan yksipuolista tietoa.... "
DATA "Hollannista joutuu joka vuosi hoitoon 30 000 ihmistä ja valtaosa kannabiksen vuoksi. "
DATA "Hollannin tulliin tai poliisiin ei maailmalla luota kukaan suurten huumeongelmien takia. Esim. YK ei palkkaa Hollantilaisia poliiseja siviilipoliiseiksi. "
DATA "Tässä vain pieni osa Hollannin todellisista ongelmista, joita kannabis aiheuttaa. "
DATA "Kannabisyhdistys kiistää nk. porttiteorian, jonka mukaan käyttäjät siirtyvät miedommista aineista käyttämään kovempia. "
DATA "Valitettavasti kovien aineiden käyttäjät lähes poikkeuksetta ovat kertoneet aloittaneensa kannabiksesta, eli yhdistys valehtelee tietoisesti. "
DATA "Koukuttaako huume ja missä ajassa? Yleispätevää vastausta kysymykseen ei ole. On ihmisiä, jotka juovat viinaa koko ikänsä tulematta alkoholisteiksi, eli he pystyvät lopettamaan koska tahansa. "
DATA "Samoin on ihmisiä, jotka pystyvät lopettamaan huumausaineiden käytön noin vain ja jopa pitämään sen viikonloppukäyttönä mutta heitä ei ole paljon. Lisäksi kukaan ei tiedä, kuka on se, joka jää koukkuun... "
DATA "On ihmisiä, jotka ovat jääneet koukkuun ensimmäisestä hasispiipusta, tai amfetamiinipiikistä. "
DATA "Jos kannabis laillistettaisiin, olisi kaikilla Suomalaisilla oikeus sitä myös käyttää, vai olisiko sittenkään? "
DATA "Mitkä ammattiryhmät rajattaisiin perustuslain vastaisesti ulkopuolelle ? Mitä sanoisitte, jos poliisit, liikennelentäjät, bussikuskit, taksikuskit, junankuljettajat, lääkärit, sairaanhoitajat, palomiehet ym.
DATA "avainammattilaiset alkaisivat käyttää hasista? "
DATA "Menisitkö leikattavaksi lääkärille, jonka tietäisit säännöllisesti käyttävän huumeita? Mitä sanoisit, jos sinua oikeudessa tuomitseva tuomari olisi huumeenkäyttäjä? "
DATA "Entä jos joutuisit tekemisiin poliisin kanssa, jonka tietäisit vapaa-aikoinaan käyttävän kannabista? "
DATA "Valitettavasti jotkut Suomalaiset julkishenkilöt ovat lehtien palstoilla ilmoittaneet, että heidän mielestään on jokaisen oma asia, jos käyttää huumausaineita, kuten näyttelijä Irina Björklund haastattelussaan sanoi. "
DATA "Onko huumeita käyttävä ihminen sitten yksin aineensa kanssa? Ei ole...jokaista käyttäjää kohti kärsii ainakin 20 muuta ihmistä. "
DATA "Käyttäjän omaiset ovat yhtälailla kärsijöitä, kaveripiiri ja muut omaiset myöskin. Unohtaa ei sovi veronmaksajia! "
DATA "Huumeriippuvaisen hoito maksaa helposti miljoona vanhaa markkaa vuodessa. Kun siihen lisätään rikosvahinkojen korvaukset, rauhoittavat lääkkeet ja sairaala, sekä lääkärikulut, oikeudenkäyntikulut yms. "
DATA "et menot, joita aineista aiheutuu, puhutaan huikeista summista, jotka kaikki ovat poissa mm. vanhustenhoidosta. "
DATA "Armeijan helikopterihankinnoista on noussut hirveä meteli ja tunteikkaasti ollaan vedottu sairaan- ja vanhustenhoitoon ja niiden tilaan. "
DATA "Jokainen veronmaksaja kustantaa pelkästään rauhoittavina lääkkeinä ja lääkärikuluina narkomaaneille vähintään saman summan, kuin joutuisi maksamaan armeijan hankinnoista mutta kukaan poliitikkomme, "
DATA "tai päättäjät eivät ole uskaltaneet ottaa sanallakaan puheeksi tätä asiaa. "
DATA "Jos pienessä 10 000 asukkaan kunnassa on asutettuna esim 10 narkomaania, voi jokainen laskea, kuinka paljon jokainen veroja maksava kuntalainen maksaa vuosittain näiden elättämisestä ja hoidosta! "
DATA "Jos tämän jälkeen vielä joku tosissaan väittää, että huumeiden käyttö on jokaisen oma asia, niin... "
DATA " "
DATA " "
[ back to the prod ]