NOVINKA - Online rekvalifikační kurz Python programátor. Oblíbená a studenty ověřená rekvalifikace - nyní i online.
Hledáme nové posily do ITnetwork týmu. Podívej se na volné pozice a přidej se do nejagilnější firmy na trhu - Více informací.

Diskuze – Lekce 5 - Bojovník do arény

Zpět

Upozorňujeme, že diskuze pod našimi online kurzy jsou nemoderované a primárně slouží k získávání zpětné vazby pro budoucí vylepšení kurzů. Pro studenty našich rekvalifikačních kurzů nabízíme možnost přímého kontaktu s lektory a studijním referentem pro osobní konzultace a podporu v rámci jejich studia. Toto je exkluzivní služba, která zajišťuje kvalitní a cílenou pomoc v případě jakýchkoli dotazů nebo projektů.

Komentáře
Avatar
Aleš Brychta
Člen
Avatar
Aleš Brychta:24.8.2015 12:17

Public Sub Utoc(souper As Bojovnik)
Dim uder As Integer = utok + kostka.hod()
NastavZpravu(Strin­g.Format("{0} útočí s úderem za {1} hp", jmeno, uder))
souper.BranSe(uder)
End Sub

Public Sub BranSe(uder As Integer)
Dim zraneni As Integer = uder - (obrana + kostka.hod())
If zraneni > 0 Then
zivot -= zraneni
Dim zprava = String.Format("{0} utrpěl poškození {1} hp", jmeno, zraneni)
If zivot <= 0 Then
zivot = 0
zprava &= " a zemřel"
Else
zprava = String.Format("{0} odrazil útok", jmeno)
End If
NastavZpravu(zpra­va)
End If
End Sub**Public Sub Utoc(souper As Bojovnik)
Dim uder As Integer = utok + kostka.hod()
NastavZpravu(Strin­g.Format("{0} útočí s úderem za {1} hp", jmeno, uder))
souper.BranSe(uder)
End Sub

Public Sub BranSe(uder As Integer)
Dim zraneni As Integer = uder - (obrana + kostka.hod())
If zraneni > 0 Then
zivot -= zraneni
Dim zprava = String.Format("{0} utrpěl poškození {1} hp", jmeno, zraneni)
If zivot <= 0 Then
zivot = 0
zprava &= " a zemřel"
Else
zprava = String.Format("{0} odrazil útok", jmeno)
End If
NastavZpravu(zpra­va)
End If
End Sub**Public Sub Utoc(souper As Bojovnik)
Dim uder As Integer = utok + kostka.hod()
NastavZpravu(Strin­g.Format("{0} útočí s úderem za {1} hp", jmeno, uder))
souper.BranSe(uder)
End Sub

Public Sub BranSe(uder As Integer)
Dim zraneni As Integer = uder - (obrana + kostka.hod())
If zraneni > 0 Then
zivot -= zraneni
Dim zprava = String.Format("{0} utrpěl poškození {1} hp", jmeno, zraneni)
If zivot <= 0 Then
zivot = 0
zprava &= " a zemřel"
Else
zprava = String.Format("{0} odrazil útok", jmeno)
End If
NastavZpravu(zpra­va)
End If
End Sub

 
Odpovědět
24.8.2015 12:17
Avatar
Aleš Brychta
Člen
Avatar
Aleš Brychta:24.8.2015 12:19

Nemá být předposlední zdrojový kód takto ? PS: omlouvám se za předešlý komentář, poprosím smazat.

Public Sub Utoc(souper As Bojovnik)
        Dim uder As Integer = utok + kostka.hod()
        NastavZpravu(String.Format("{0} útočí s úderem za {1} hp", jmeno, uder))
        souper.BranSe(uder)
End Sub

Public Sub BranSe(uder As Integer)
        Dim zraneni As Integer = uder - (obrana + kostka.hod())
        If zraneni > 0 Then
                zivot -= zraneni
                Dim zprava = String.Format("{0} utrpěl poškození {1} hp", jmeno, zraneni)
                Else
                        zprava = String.Format("{0} odrazil útok", jmeno)
                End If
                If zivot <= 0 Then
                        zivot = 0
                        zprava &= " a zemřel"
                End If
                NastavZpravu(zprava)
End Sub
 
Odpovědět
24.8.2015 12:19
Avatar
Jaroslav Trojan
Tvůrce
Avatar
Odpovídá na Aleš Brychta
Jaroslav Trojan:26.6.2016 15:02

Tak,jak to máš, to bude programově správně. Chyběla tam verse, když je život <0.

Odpovědět
26.6.2016 15:02
statik
Avatar
Miroslav Němeček
Člen
Avatar
Miroslav Němeček:15.2.2017 20:11

V modulu1 mi po napsání tříd vyskočila chyba, příkaz Console.writeline() bralo jako hodnotu třídu a ne jako příkaz aby něco ukázal na obrazovce. Neví někdo co s tím?

 
Odpovědět
15.2.2017 20:11
Avatar
Neaktivní uživatel
Člen
Avatar
Neaktivní uživatel:24.7.2017 12:11

Chci tě jen upozornit že ve funkci
Public Overrides Function ToString() As String
Return jmeno;
End Function

Je nepoužitelný znak ; poprosím o opravení :)

Odpovědět
24.7.2017 12:11
Neaktivní uživatelský účet
Avatar
Neaktivní uživatel
Člen
Avatar
Neaktivní uživatel:24.7.2017 12:24

Když jsem otestoval poslední kód tak mi to napsalo že se zalgoren ubránil ale ubralo mu to jeden znak.. tak jsem to pustil znovu a měl ubrané 2 znaky co to je?

Odpovědět
24.7.2017 12:24
Neaktivní uživatelský účet
Avatar
Michal Žůrek - misaz
Tvůrce
Avatar
Odpovídá na Neaktivní uživatel
Michal Žůrek - misaz:24.7.2017 12:26

a četl jsi ten článek? Četl jsi všechny ve který se tvoří toto demo. Vstupuje tma do hry objekt kostka, který generuje náhodné číslo.

 
Odpovědět
24.7.2017 12:26
Avatar
Neaktivní uživatel
Člen
Avatar
Neaktivní uživatel:24.7.2017 15:06

Jo četl proč?

Odpovědět
24.7.2017 15:06
Neaktivní uživatelský účet
Avatar
Ondrej Zadrapa
Člen
Avatar
Odpovídá na Michal Žůrek - misaz
Ondrej Zadrapa:5.5.2020 17:53

Po nespoctu kontrol porad muj bojovnik odrazi utok. A není to jen u me, i tady na strankach porad odrazi utok. Je to prvek nahody, nebo to tak ma proste byt, nebo je nekde chyba, poradíš mi prosim Te?

 
Odpovědět
5.5.2020 17:53
Avatar
Alesh
Tvůrce
Avatar
Odpovídá na Ondrej Zadrapa
Alesh:19.5.2020 19:56

Tak jsi to kontroloval špatně, resp. nepřipouštíš variantu, že to má autor špatně! :-)
Správně to má být takto:

Public Sub BranSe(uder As Integer)
        Dim zraneni As Integer = uder - (obrana + kostka.hod())
        Dim zprava As String
        If zraneni > 0 Then
                zivot -= zraneni
                zprava = String.Format("{0} utrpěl poškození {1} hp", jmeno, zraneni)
                If zivot <= 0 Then
                        zivot = 0
                        zprava &= " a zemřel"
                End If
        Else
                zprava = String.Format("{0} odrazil útok", jmeno)
        End If
        NastavZpravu(zprava)
End Sub
 
Odpovědět
19.5.2020 19:56
Děláme co je v našich silách, aby byly zdejší diskuze co nejkvalitnější. Proto do nich také mohou přispívat pouze registrovaní členové. Pro zapojení do diskuze se přihlas. Pokud ještě nemáš účet, zaregistruj se, je to zdarma.

Zobrazeno 10 zpráv z 12.