Kartuvės
Jump to navigation
Jump to search
Kartuvės
Ši programa demonstruoja, kaip susikurti klasikinį kartuvių stiliaus žaidimą - sugalvojamas žodis ir jeigu raidė atspėta, ją programa įrašo, jeigu raidės sugalvotame žodyje nėra, tai kartuvėse atsiranda papildoma žmogeliuko kūno dalis. Kol atspėjamas sugalvotas žodis suklysti daugiausiai galima 5 kartus - suklydus daugiau kartų žaidimas praloštas.
Šioje programėlėje panaudoti keli skirtingi vaizdo failai, kurie atsiranda priklausomai nuo atlikto veiksmo.
Žaisti Kartuves
Žaidimui reikalingi failai
Visus garsus ir vaizdus panaudotus šiame žaidime galima atsisiųsti čia.
Kartuvių kodas
reikalinga angis
reikalingas žaidimas
reikalinga random
žaidimasBaigtas = 'ne'
atspėjimai = []
bandymai = 0
kartuviųPaveikslėliai =[
'kartuvės/kartuvės/kartuvės0.png',
'kartuvės/kartuvės/kartuvės1.png',
'kartuvės/kartuvės/kartuvės2.png',
'kartuvės/kartuvės/kartuvės3.png',
'kartuvės/kartuvės/kartuvės4.png',
'kartuvės/kartuvės/kartuvės4.png',
'kartuvės/kartuvės/kartuvės5.png'
]
#Įkeliam pagrindinį žaidimo foną
žaidimas.duokSceną().fonas('kartuvės/kartuvės/kartuvės0.png')
švieslentė = žaidimas.Tekstas('')
švieslentė.dydis(20)
švieslentė.spalva("#FFFFFF")
švieslentė.atsirask(x = 620, y = 100)
komanda perpieškŠvieslentę():
tekstas = ''
kiekvienam r iš atspėjimai:
jei r == '*':
tekstas = tekstas + '_ '
kituatveju:
tekstas = tekstas + r + ' '
švieslentė.tekstas(tekstas)
komanda neatspėjaiRaidės():
global bandymai
bandymai = bandymai + 1
žaidimas.duokSceną().fonas('kartuvės/kartuvės/kartuvės'+str(bandymai)+'.png')
jei bandymai >= 6:
global žaidimasBaigtas
žaidimasBaigtas = 'baigtas'
rašyk(" Numirei :( :( :(")
komanda atspėjaiRaidę():
perpieškŠvieslentę()
kiekvienam r iš atspėjimai:
jei r == '*':
grįžk # aha, kažkokia raidė dar neatspėta!
# perėjom per visus atspėjimus, nei vienos neatspėtos raidės.
# jei mes čia, vadinasi VISOS RAIDĖS ATSPĖTOS!!!
rašyk("atspėjau visas raides!!!!")
global žaidimasBaigtas
žaidimasBaigtas = 'baigtas'
komanda spėk(raidė):
global žodis
rastaRaidžių = 0
pozicija = 0
kartok len(žodis):
jei žodis[pozicija] == raidė:
atspėjimai[pozicija] = raidė
rastaRaidžių = rastaRaidžių + 1
pozicija = pozicija + 1
jei rastaRaidžių == 0:
neatspėjaiRaidės()
kituatveju:
atspėjaiRaidę()
komanda pelėsPaspaudimas(x, y):
global žaidimasBaigtas
jei žaidimasBaigtas == 'baigtas':
grįžk
elementas = žaidimas.duokSceną().duokSluoksnį().duokElementą(x, y)
jei elementas == None:
grįžk
elementas.pasislėpk()
spėk(elementas.raidė)
# sukuriam mygtukus kiekvienai abecelės raidei
komanda sukurkMygtuką(raidė, x, y):
mygtukas = žaidimas.Dekoracija('kartuvės/abėcėlė/'+raidė+'.png', x, y)
mygtukas.pelęPaspaudus(pelėsPaspaudimas)
mygtukas.raidė = raidė
grąžink mygtukas
a = sukurkMygtuką('a', x=310, y=30)
ą = sukurkMygtuką('ą', x=380, y=30)
b = sukurkMygtuką('b', x=450, y=30)
c = sukurkMygtuką('c', x=520, y=30)
č = sukurkMygtuką('č', x=310, y=100)
d = sukurkMygtuką('d', x=380, y=100)
e = sukurkMygtuką('e', x=450, y=100)
ę = sukurkMygtuką('ę', x=520, y=100)
ė = sukurkMygtuką('ė', x=310, y=170)
f = sukurkMygtuką('f', x=380, y=170)
g = sukurkMygtuką('g', x=450, y=170)
h = sukurkMygtuką('h', x=520, y=170)
i = sukurkMygtuką('i', x=310, y=240)
į = sukurkMygtuką('į', x=380, y=240)
y = sukurkMygtuką('y', x=450, y=240)
j = sukurkMygtuką('j', x=520, y=240)
k = sukurkMygtuką('k', x=310, y=310)
l = sukurkMygtuką('l', x=380, y=310)
m = sukurkMygtuką('m', x=450, y=310)
n = sukurkMygtuką('n', x=520, y=310)
o = sukurkMygtuką('o', x=310, y=380)
p = sukurkMygtuką('p', x=380, y=380)
r = sukurkMygtuką('r', x=450, y=380)
s = sukurkMygtuką('s', x=520, y=380)
š = sukurkMygtuką('š', x=310, y=450)
t = sukurkMygtuką('t', x=380, y=450)
u = sukurkMygtuką('u', x=450, y=450)
ų = sukurkMygtuką('ų', x=520, y=450)
ū = sukurkMygtuką('ū', x=310, y=520)
v = sukurkMygtuką('v', x=380, y=520)
z = sukurkMygtuką('z', x=450, y=520)
ž = sukurkMygtuką('ž', x=520, y=520)
# paklausiam žodžio
žodis = žaidimas.paklauskTeksto("sugalvok žodį")
# paverčiam raides mažosiomis
žodis = žodis.lower()
# užpildom masyvą 'atspėjimai' tuščiomis reikšmėmis kiekvienai raidei
kiekvienam r iš žodis:
atspėjimai.append('*')
# nupiešiam švieslentę
perpieškŠvieslentę()
# viskas. Laukiam vartotojo mygtukų paspaudimų!
Svarbu! Nepamiršk įsikelti žaidime naudojamus paveiksliukus ir garsus per failų tvarkyklę. Visi Kartuvių žaidimui reikalingi failai yra čia.