## Win XP Pro ongelma! MAV kaverilla vaikka mulla ei.

CoolBasiciin yleisesti liittyvä keskustelu.
mato1223
Member
Posts: 69
Joined: Sat Aug 16, 2008 12:04 pm
Location: Rääkkylä

### Win XP Pro ongelma! MAV kaverilla vaikka mulla ei.

Kaverillani on Win XP Pro eikä Cool Basic toimi... MAV tulee vaikka mulla ei tule. Mistäköhän sekin johtuu... Microsoft tietysti möhliny Tosin

Code: Select all

``````Repeat
DrawScreen
Forever``````
toimii...
Tässä koodi joka EI toimi:

Code: Select all

``````SCREEN 800,600

While 1
n=HPBar(10,10,100,n,100)
o=ManaBar(10,20,100,o,100)
e=ExpBar(10,30,100,e,100)
ä=(RightKey()-LeftKey())
n=n+(ä)
o=o+(ä)
e=e+(ä)
DrawScreen
Wend
// x,y = koordinaatit
// w = leveys
// s = nykyinen arvo
// m = maksimi arvo
Function HPBar(x#,y#,w#,s#,m#)
If s > m Then s = m
n# = (w/100*s/m)*100
For a = -1 To 3
Color 160-(Abs(a)*19),160-(Abs(a)*19),160-(Abs(a)*19)
Line x-(a>-1 And a<3),y+a,x+w+(a>-1 And a<3),y+a
Next a
If s > 0 Then
For i = -1 To 3
Color 250-(Abs(i)*6),60-(Abs(i)*6),60-(Abs(i)*19)
Line x-(i>-1 And i<3),y+i,x+n+(i>-1 And i<3),y+i
Next i
EndIf
Return Int(s/m*100)
EndFunction

Function ManaBar(x#,y#,w#,s#,m#)
If s > m Then s = m
o# = (w/100*s/m)*100
For a = -1 To 3
Color 160-(Abs(a)*19),160-(Abs(a)*19),160-(Abs(a)*19)
Line X-(A>-1 And a<3),y+a,x+w+(a>-1 And a<3),y+a
Next a
If s > 0 Then
For i = -1 To 3
Color 60-(Abs(i)*6),60-(Abs(i)*6),250-(Abs(i)*19)
Line x-(i>-1 And i<3),y+i,x+o+(i>-1 And i<3),y+i
Next i
EndIf
Return Int(s/m*100)
EndFunction

Function ExpBar(x#,y#,w#,s#,m#)
If s > m Then s = m
e# = (w/100*s/m)*100
For a = -1 To 3
Color 160-(Abs(a)*19),160-(Abs(a)*19),160-(Abs(a)*19)
Line x-(a>-1 And a<3),y+a,x+w+(a>-1 And a<3),y+a
Next a
If s > 0 Then
For i = -1 To 3
Color 100-(Abs(i)*6),60-(Abs(i)*6),250-(Abs(i)*19)
Line x-(i>-1 And i<3),y+i,x+e+(i>-1 And i<3),y+i
Next i
EndIf
Return Int(s/m*100)
EndFunction``````
EDIT:

Mulla on Win XP Home Edition.

temu92
Web Developer
Posts: 1226
Joined: Mon Aug 27, 2007 9:56 pm
Location: Gamindustri
Contact:

### Re: Win XP Pro ongelma! MAV kaverilla vaikka mulla ei.

Vikana voi olla ihan CB:n bugikin. Toisaalta taas XP:kin vaikuttaa siihen. Mutta ei ole tuntematonta että eri koneilla tuleekin Memory Access Violation. En ole varma vaikuttaako se mitään, mutta olitko varmasti kirjautuneena järjestelmänvalvojan oikeuksilla kaverisi koneella.

Ja vaikka näitä tämmöisiä tapahtuu niin ei ole mitenkään takuuvarmaa että softan kehityksen jälkeen MAV yllättäen katoaakin kokonaan. Monesti on huomattu että ohjelma toimiikin sen jälkeen kun sinne on lisätty uusia rivejä mitenkään muuttamatta vanhoja tai vanhoille lataamalla/alustamalla mediaa/muuttujia.
tuhoojabotti
Posts: 485
Joined: Tue Aug 28, 2007 3:53 pm
Location: Suomi, Finland
Contact:

### Re: Win XP Pro ongelma! MAV kaverilla vaikka mulla ei.

Minulla on Xp Pro ja toimii täydellisesti (service pack 3)
dev.tuhoojabotti.com — “Programmer (noun): An organism that turns caffeine into code.”
duck-

### Re: Win XP Pro ongelma! MAV kaverilla vaikka mulla ei.

juu siis.
kotona on 2 konetta.
toisella koneella tulee monesti MAV yhtäkkiä.
toinen taas toimii lähes aina ilman MAVeja.
Awaclus
Forum Veteran
Posts: 2939
Joined: Tue Aug 28, 2007 2:50 pm

### Re: Win XP Pro ongelma! MAV kaverilla vaikka mulla ei.

Minulla on kotonani 1x Win XP Pro ja 1x Win Vista jokumikälie. ÄksPeellä toimii varsin mallikkaasti kaikki ohjelmat ellei niihin sitten ole päässyt bugeja, mutta ei toimi Vistalla yhtä hyvin.
Khamûl
Member
Posts: 73
Joined: Sat Sep 22, 2007 8:46 pm

### Re: Win XP Pro ongelma! MAV kaverilla vaikka mulla ei.

itelläni on vista, ja tulee joku viesti jossa sanotaan että ohjelma on jo käynnissä kun yrittää ajaa (mitä tahansa koodia)....

EDIT: joo kommentti alla pelasti, en ala tätä enää postaamaan....
Last edited by Khamûl on Tue Jan 27, 2009 7:32 pm, edited 1 time in total.
Will the highways on the Internet become more few? --G.W.Bush
tuhoojabotti
Posts: 485
Joined: Tue Aug 28, 2007 3:53 pm
Location: Suomi, Finland
Contact:

### Re: Win XP Pro ongelma! MAV kaverilla vaikka mulla ei.

kokeile ajaa järjestelmän valvojana se on ainakin muita auttanut, siis "käynnistä nimellä..."
dev.tuhoojabotti.com — “Programmer (noun): An organism that turns caffeine into code.”
Guest

### Re: Win XP Pro ongelma! MAV kaverilla vaikka mulla ei.

mato1223 wrote:Kaverillani on Win XP Pro eikä Cool Basic toimi... MAV tulee vaikka mulla ei tule. Mistäköhän sekin johtuu... Microsoft tietysti möhliny Tosin

Code: Select all

``````Repeat
DrawScreen
Forever``````
toimii...
Tässä koodi joka EI toimi:

Code: Select all

``````SCREEN 800,600

While 1
n=HPBar(10,10,100,n,100)
o=ManaBar(10,20,100,o,100)
e=ExpBar(10,30,100,e,100)
ä=(RightKey()-LeftKey())
n=n+(ä)
o=o+(ä)
e=e+(ä)
DrawScreen
Wend
// x,y = koordinaatit
// w = leveys
// s = nykyinen arvo
// m = maksimi arvo
Function HPBar(x#,y#,w#,s#,m#)
If s > m Then s = m
n# = (w/100*s/m)*100
For a = -1 To 3
Color 160-(Abs(a)*19),160-(Abs(a)*19),160-(Abs(a)*19)
Line x-(a>-1 And a<3),y+a,x+w+(a>-1 And a<3),y+a
Next a
If s > 0 Then
For i = -1 To 3
Color 250-(Abs(i)*6),60-(Abs(i)*6),60-(Abs(i)*19)
Line x-(i>-1 And i<3),y+i,x+n+(i>-1 And i<3),y+i
Next i
EndIf
Return Int(s/m*100)
EndFunction

Function ManaBar(x#,y#,w#,s#,m#)
If s > m Then s = m
o# = (w/100*s/m)*100
For a = -1 To 3
Color 160-(Abs(a)*19),160-(Abs(a)*19),160-(Abs(a)*19)
Line X-(A>-1 And a<3),y+a,x+w+(a>-1 And a<3),y+a
Next a
If s > 0 Then
For i = -1 To 3
Color 60-(Abs(i)*6),60-(Abs(i)*6),250-(Abs(i)*19)
Line x-(i>-1 And i<3),y+i,x+o+(i>-1 And i<3),y+i
Next i
EndIf
Return Int(s/m*100)
EndFunction

Function ExpBar(x#,y#,w#,s#,m#)
If s > m Then s = m
e# = (w/100*s/m)*100
For a = -1 To 3
Color 160-(Abs(a)*19),160-(Abs(a)*19),160-(Abs(a)*19)
Line x-(a>-1 And a<3),y+a,x+w+(a>-1 And a<3),y+a
Next a
If s > 0 Then
For i = -1 To 3
Color 100-(Abs(i)*6),60-(Abs(i)*6),250-(Abs(i)*19)
Line x-(i>-1 And i<3),y+i,x+e+(i>-1 And i<3),y+i
Next i
EndIf
Return Int(s/m*100)
EndFunction``````
EDIT:

Mulla on Win XP Home Edition.

Voisiko olla mahdollista, että kaverisi kone ei tuo näyttötilaa 800x600?
Ruuttu
Devoted Member
Posts: 687
Joined: Thu Aug 30, 2007 5:11 pm
Location: Finland, Sipoo

### Re: Win XP Pro ongelma! MAV kaverilla vaikka mulla ei.

Ei, sillä tuota ohjelmaa ei ajeta kokoruudulla. Ikkunatilassa minkä tahansa resoluution pitäisi kyllä toimia.
koodaaja
Moderator
Posts: 1583
Joined: Mon Aug 27, 2007 11:24 pm
Location: Otaniemi - Mikkeli -pendelöinti

### Re: Win XP Pro ongelma! MAV kaverilla vaikka mulla ei.

Ja väärä ikkunatila ei anna MAVia, siitä tulee "unable to set graphics mode".