Page 73 of 78

Re: Tyhmät kysymykset (I/2010)

Posted: Wed Dec 15, 2010 9:13 pm
by DJ-Filbe
Miten voin poistaa merkkijonon keskeltä tietyn osan:
Pitää poistaa esim huutomerkin ja kysymysmerkin välissä oleva teksti sekä samalla huutomerkki ja kysymysmerkki. Miten?

Code: Select all

txt$="asdfg!ggrwe?aauutr"
txt=poista(txt,"!","?")
function poista(txt,a,b)
???
endfunction

Re: Tyhmät kysymykset (I/2010)

Posted: Wed Dec 15, 2010 9:48 pm
by MrMonday
DJ-Filbe wrote:Miten voin poistaa merkkijonon keskeltä tietyn osan:
Pitää poistaa esim huutomerkin ja kysymysmerkin välissä oleva teksti sekä samalla huutomerkki ja kysymysmerkki. Miten?

Code: Select all

txt$="asdfg!ggrwe?aauutr"
txt=poista(txt,"!","?")
function poista(txt,a,b)
???
endfunction
Mikäli ymmärsin ongelmasi oikein, niin STRREMOVE()-funktio voisi auttaa.
Kannattaa katsella myös muita komentoja manuaalista kohdasta "Merkkijonot".

Re: Tyhmät kysymykset (I/2010)

Posted: Thu Dec 16, 2010 12:09 am
by buke44
DJ-Filbe wrote:Miten voin poistaa merkkijonon keskeltä tietyn osan:
Pitää poistaa esim huutomerkin ja kysymysmerkin välissä oleva teksti sekä samalla huutomerkki ja kysymysmerkki. Miten?

Code: Select all

txt$="asdfg!ggrwe?aauutr"
txt=poista(txt,"!","?")
function poista(txt,a,b)
???
endfunction

Code: Select all

Function poista (Str$,a$,b$)
    Return StrRemove (t,InStr (t,a),InStr (t,b)-InStr (t,a)+1)
EndFunction 

Re: Tyhmät kysymykset (I/2010)

Posted: Thu Dec 16, 2010 12:44 am
by SPuntte
DJ-Filbe wrote:Miten voin poistaa merkkijonon keskeltä tietyn osan:
Pitää poistaa esim huutomerkin ja kysymysmerkin välissä oleva teksti sekä samalla huutomerkki ja kysymysmerkki. Miten?
Tai näin:

Code: Select all

txt$="asdfg!ggrwe?aauutr"
txt=poista(txt,"!","?")
Function poista$(txt$,a$,b$)
	Return GetWord(txt, 1, a) + GetWord(txt, 2, b)
EndFunction

Re: Tyhmät kysymykset (I/2010)

Posted: Thu Dec 16, 2010 6:43 pm
by DJ-Filbe
Pitäisi poistaa tagit HTML-dokumentista ja jättää pelkkä teksti jäljelle. How?

Re: Tyhmät kysymykset (I/2010)

Posted: Thu Dec 16, 2010 7:22 pm
by SPuntte
DJ-Filbe wrote:Pitäisi poistaa tagit HTML-dokumentista ja jättää pelkkä teksti jäljelle. How?
En ole ihan 100% varma, mutta käsittääkseni HTML:ssä ei voi olla sisäkkäisiä tageja, tarkoittaen siis sitä, että kahden <-merkin välissä on aina täsmälleen yksi >-merkki. Algoritmina homma näin:
1. Siirrä kursori syötteen alkuun.
2. Lue syötettä, kunnes vastaan tulee <-merkki. Mikäli näin ei tapahdu vaan syöte loppuu, HTML-tagit on poistettu. Tulosta muokattu syöte.
3. Tallenna nykyinen kursorin sijainti.
4. Lue syötettä, kunnes vastaan tulee >-merkki. Mikäli näin ei tapahdu vaan syöte loppuu, se on viallinen.
5. Poista syötteestä kaikki data tallennetusta kursorin sijainnista nykyiseen kursorin sijaintiin.
6. Siirrä kursori takaisin tallennettuun sijaintiin.
7. Toista kohdasta 2.

Re: Tyhmät kysymykset (I/2010)

Posted: Thu Dec 16, 2010 7:41 pm
by DJ-Filbe
SPuntte wrote:
DJ-Filbe wrote:Pitäisi poistaa tagit HTML-dokumentista ja jättää pelkkä teksti jäljelle. How?
En ole ihan 100% varma, mutta käsittääkseni HTML:ssä ei voi olla sisäkkäisiä tageja, tarkoittaen siis sitä, että kahden <-merkin välissä on aina täsmälleen yksi >-merkki. Algoritmina homma näin:
1. Siirrä kursori syötteen alkuun.
2. Lue syötettä, kunnes vastaan tulee <-merkki. Mikäli näin ei tapahdu vaan syöte loppuu, HTML-tagit on poistettu. Tulosta muokattu syöte.
3. Tallenna nykyinen kursorin sijainti.
4. Lue syötettä, kunnes vastaan tulee >-merkki. Mikäli näin ei tapahdu vaan syöte loppuu, se on viallinen.
5. Poista syötteestä kaikki data tallennetusta kursorin sijainnista nykyiseen kursorin sijaintiin.
6. Siirrä kursori takaisin tallennettuun sijaintiin.
7. Toista kohdasta 2.
Ensin pitänee poistaa HTML-tiedostoon sisältyvät mahdolliset javascriptit ja tyylitiedostot, sillä ne voivat sisältää esim vertailuoperaattoreita < tai >, jotka sotkisivat muuten hyvän algoritmin ;) Osaan kyllä tämän :D

Re: Tyhmät kysymykset (I/2010)

Posted: Fri Dec 17, 2010 4:19 pm
by esa94
DJ-Filbe wrote:
SPuntte wrote:
DJ-Filbe wrote:Pitäisi poistaa tagit HTML-dokumentista ja jättää pelkkä teksti jäljelle. How?
En ole ihan 100% varma, mutta käsittääkseni HTML:ssä ei voi olla sisäkkäisiä tageja, tarkoittaen siis sitä, että kahden <-merkin välissä on aina täsmälleen yksi >-merkki. Algoritmina homma näin:
1. Siirrä kursori syötteen alkuun.
2. Lue syötettä, kunnes vastaan tulee <-merkki. Mikäli näin ei tapahdu vaan syöte loppuu, HTML-tagit on poistettu. Tulosta muokattu syöte.
3. Tallenna nykyinen kursorin sijainti.
4. Lue syötettä, kunnes vastaan tulee >-merkki. Mikäli näin ei tapahdu vaan syöte loppuu, se on viallinen.
5. Poista syötteestä kaikki data tallennetusta kursorin sijainnista nykyiseen kursorin sijaintiin.
6. Siirrä kursori takaisin tallennettuun sijaintiin.
7. Toista kohdasta 2.
Ensin pitänee poistaa HTML-tiedostoon sisältyvät mahdolliset javascriptit ja tyylitiedostot, sillä ne voivat sisältää esim vertailuoperaattoreita < tai >, jotka sotkisivat muuten hyvän algoritmin ;) Osaan kyllä tämän :D
Lisäksi attribuutit

Re: Tyhmät kysymykset (I/2010)

Posted: Fri Dec 17, 2010 9:23 pm
by hfhsg
Mite saan piirrettyy objektin kartan over kerroksen päälle?noilla objectorder komennoilla ei ainakaa toiminu

Re: Tyhmät kysymykset (I/2010)

Posted: Fri Dec 17, 2010 9:27 pm
by Jonez
Muistaakseni mahdotonta. Joudut kikkailemaan, esim. käyttämällä kuvia, tai poistamalla over-kerroksen.

Re: Tyhmät kysymykset (I/2010)

Posted: Fri Dec 17, 2010 9:47 pm
by gddsg
Mikä tässä kuvan piirtämisessä on nyt vikana? eikös sen pitäs toimia ihan näin vaa repeatin sisällä?

Code: Select all

hiiri=LoadImage("media\\hiiri.bmp")
repeat
..
DrawImage  hiiri,MouseWX(),MouseWY()
drawscreen
Ei ainakaan noin toimi =/

Re: Tyhmät kysymykset (I/2010)

Posted: Fri Dec 17, 2010 9:52 pm
by ghsagsa
Anteeks tuplapostaus mutten tarviikkaa apuu =)
Kirjotan tän toimivan koodin nyt tähän jos jollai muulla joskus tulee sama ongelma =)

Code: Select all

DrawToWorld OFF,ON,OFF 
DrawImage  hiiri,MouseWX(),-MouseWY()
tolla siis sain toimii

Re: Tyhmät kysymykset (I/2010)

Posted: Fri Dec 17, 2010 9:55 pm
by Jonez
Paljon yksinkertaisempi tapa on vain käyttää MouseWX():n ja MouseWY():n sijaan MouseX():ää ja MouseY():tä. MouseWX() kertoo hiiren x-akselin maailmakoordinaatin, kun taas MouseX() vastaavan ruutukoordinaatin.

Edit. Siis näin:

Code: Select all

hiiri=LoadImage("media\cursor.bmp")

Repeat
    DrawImage  hiiri, MouseX() - ImageWidth( hiiri ) / 2, MouseY() - ImageHeight( hiiri ) / 2
    DrawScreen
Forever

Re: Tyhmät kysymykset (I/2010)

Posted: Sun Dec 19, 2010 11:57 am
by fasfas
Miks tää koodi tiputtaa fps 76->~~40 xD

Code: Select all

DrawToWorld  ON,OFF,OFF
 For puu.rakennukset = Each rakennukset
 If ObjectsOverlap (hiiri_obj,puu\obj) Then
 Box ObjectX(puu\obj)-64,ObjectY(puu\obj)+64,96,96,0 
 EndIf
 Next puu
heti ku vien hiiren pari kertaa jonkun puun päälle nii fps tipahtaa

Re: Tyhmät kysymykset (I/2010)

Posted: Sun Dec 19, 2010 5:32 pm
by Jonez
Veikkaan että sinulla on paljon rakennus-jäseniä, ja jostain syystä ne kaikki ovat samassa kohtaa, jolloin joko piirretään nolla laatikkoa, tai rakennus-jäsenien lukumäärän verran laatikoita. Cb:n sisäiset piirtokomennot (kuten box) eivät ole kaikista nopeimpia maailmassa.

Tai sitten suorituskykyongelman syy on jossain muualla.

Re: Tyhmät kysymykset (I/2010)

Posted: Mon Dec 20, 2010 9:10 pm
by Kille
[angst]Coolbasic lakkasi ensin värjäämästä komentoja. Uudelleenasensin sen ja vielä kolmen uudelleenkäynnistyksen jälkeen herjasi "previous program runningia". Löysin kyllä foorumeilta ratkaisun (suorita järjestelmänvalvojana), mutta outoa on se, että eilen cb toimi ihan ongelmitta. (sammuttaessa windows päivittyi) Onko tähän mitään pysyvää ratkaisua, ettei aina tarvisi säätää?

Re: Tyhmät kysymykset (I/2010)

Posted: Mon Dec 20, 2010 9:27 pm
by Viltzu
Kille wrote:[angst]Coolbasic lakkasi ensin värjäämästä komentoja. Uudelleenasensin sen ja vielä kolmen uudelleenkäynnistyksen jälkeen herjasi "previous program runningia". Löysin kyllä foorumeilta ratkaisun (suorita järjestelmänvalvojana), mutta outoa on se, että eilen cb toimi ihan ongelmitta. (sammuttaessa windows päivittyi) Onko tähän mitään pysyvää ratkaisua, ettei aina tarvisi säätää?
Hiiren oikea -> Ominaisuudet -> Yhteensopivuus -> Suorita tämä ohjelma järjestelmänvalvojana
Näin Win7 (Suomenkielinen) saa käynnistymään aina järjestelmänvalvojana.

Re: Tyhmät kysymykset (I/2010)

Posted: Tue Dec 21, 2010 5:17 pm
by Kille
Viltzu wrote:
Kille wrote:[angst]Coolbasic lakkasi ensin värjäämästä komentoja. Uudelleenasensin sen ja vielä kolmen uudelleenkäynnistyksen jälkeen herjasi "previous program runningia". Löysin kyllä foorumeilta ratkaisun (suorita järjestelmänvalvojana), mutta outoa on se, että eilen cb toimi ihan ongelmitta. (sammuttaessa windows päivittyi) Onko tähän mitään pysyvää ratkaisua, ettei aina tarvisi säätää?
Hiiren oikea -> Ominaisuudet -> Yhteensopivuus -> Suorita tämä ohjelma järjestelmänvalvojana
Näin Win7 (Suomenkielinen) saa käynnistymään aina järjestelmänvalvojana.
Kiitos vinkistä, tuo toimii hyvin! :)

Re: Tyhmät kysymykset (I/2010)

Posted: Tue Dec 21, 2010 8:21 pm
by DJ-Filbe
Tekstin tulostus tulostimesta Coolbasicilla? Tiedoston kirjoittaminen HTML-muodossa ja javascriptit, ja auki selaimeen helpoin tapa?

Re: Tyhmät kysymykset (I/2010)

Posted: Tue Dec 21, 2010 8:25 pm
by Latexi95
DLL voisi kanssa olla kohtuu kätevä.