Şimdi Ara

Ucretsiz Kucuk Boyutlu Programlar Yazilir

Daha Fazla
Bu Konudaki Kullanıcılar: Daha Az
1 Misafir - 1 Masaüstü
5 sn
24
Cevap
1
Favori
775
Tıklama
Daha Fazla
İstatistik
  • Konu İstatistikleri Yükleniyor
Öne Çıkar
0 oy
Sayfa: 12
Sayfaya Git
Git
sonraki
Giriş
Mesaj
  • Ucretsiz Kucuk Boyutlu Programlar Yazilir
    Daha Fazla Bilgi icin
    Buraya Yazin Veya PM Atin



    < Bu mesaj bu kişi tarafından değiştirildi atekse -- 9 Nisan 2013; 15:21:47 >



    _____________________________
    İnsanların en kötüsü, iyiliği kötülükle karşılayan ve insanların en iyisi, kötülüğe karşı iyilik yapandır. Hz.Ali r.a.
  • Ben Bir xox oyunu kodlayacağım fakat nasıl yaparım bilmiyorum biraz ayrıntı verebilirmisiniz.
    _____________________________
  • borsa programı lazım, yapabilir misin?
    _____________________________
  • quote:

    Orijinalden alıntı: Umutttttttt

    Ben Bir xox oyunu kodlayacağım fakat nasıl yaparım bilmiyorum biraz ayrıntı verebilirmisiniz.


    C++ BASIT BIR OXO OYUNU

    #include <iostream> 
    #include <conio.h>
    using namespace std;
    int gameover= 0;
    int pos[9]={1,2,3,4,5,6,7,8,9};
    char set[9]={'1','2','3','4','5','6','7','8','9'};
    int taken[9]={0,0,0,0,0,0,0,0,0};
    char cPlayer1 = 'X';
    char cPlayer2 = 'O';
    void print_board_start()
    {
    cout<<"Hosgeldiniz OXO Oyununa."<<endl;
    cout<<"Atekse."<<endl;
    cout<<"|"<<pos[0]<<"|"<<pos[1]<<"|"<<pos[2]<<"|"<<endl;
    cout<<"-------"<<endl;
    cout<<"|"<<pos[3]<<"|"<<pos[4]<<"|"<<pos[5]<<"|"<<endl;
    cout<<"-------"<<endl;
    cout<<"|"<<pos[6]<<"|"<<pos[7]<<"|"<<pos[8]<<"|"<<endl;
    cout<<"-------"<<endl;
    }
    void input_board_x(int user_pos_x)
    {
    set[user_pos_x-1]= 'X';
    }
    void input_board_y(int user_pos_y)
    {
    set[user_pos_y-1]= 'O';
    }
    void final_result_board()
    {
    cout<<"|"<<set[0]<<"|"<<set[1]<<"|"<<set[2]<<endl;
    cout<<"-------"<<endl;
    cout<<"|"<<set[3]<<"|"<<set[4]<<"|"<<set[5]<<endl;
    cout<<"-------"<<endl;
    cout<<"|"<<set[6]<<"|"<<set[7]<<"|"<<set[8]<<endl;
    cout<<"-------"<<endl;
    }

    int check_gameover()
    {

    if(set[0] == set[1] && set[2] == set[0])
    {
    cout<<"OYUN BITI!"<<endl;
    gameover = 1;
    if(set[0] == cPlayer1)
    {
    cout<<"OYUNCU 1 KAZANDI!"<<endl;
    }
    else
    cout<<"OYUNCU 2 KAZANDI!"<<endl;
    }

    if(set[0] == set[3] && set[6] == set[0])
    {
    cout<<"OYUN BITTI!"<<endl;
    gameover = 1;
    if(set[0] == cPlayer1)
    {
    cout<<"OYUNCU 1 KAZANDI!"<<endl;
    }
    else
    cout<<"OYUNCU 2 KAZANDI!"<<endl;
    }

    if(set[0] == set[4] && set[8] == set[0])
    {
    cout<<"OYUN BITTI!"<<endl;
    gameover = 1;
    if(set[0] == cPlayer1)
    {
    cout<<"OYUNCU 1 KAZANDI!"<<endl;
    }
    else
    cout<<"OYUNCU 2 KAZANDI!"<<endl;
    }

    if(set[1] == set[4] && set[7] == set[1])
    {
    cout<<"OYUN BITTI!"<<endl;
    gameover = 1;
    if(set[1] == cPlayer1)
    {
    cout<<"OYUNCU 1 KAZANDI!"<<endl;
    }
    else
    cout<<"OYUNCU 2 KAZANDI!"<<endl;
    }

    if(set[2] == set[5] && set[2] == set[8])
    {
    cout<<"OYUN BITTI!"<<endl;
    gameover = 1;
    if(set[2] == cPlayer1)
    {
    cout<<"OYUNCU 1 KAZANDI!"<<endl;
    }
    else
    cout<<"OYUNCU 2 KAZANDI!"<<endl;
    }

    if(set[2] == set[4] && set[4] == set[6])
    {
    cout<<"OYUN BITTI!"<<endl;
    gameover = 1;
    if(set[2] == cPlayer1)
    {
    cout<<"OYUNCU 1 KAZANDI!"<<endl;
    }
    else
    cout<<"OYUNCU 2 KAZANDI!"<<endl;
    }

    if(set[6] == set[7] && set[8] == set[6])
    {
    cout<<"OYUN BITTI!"<<endl;
    gameover = 1;
    if(set[2] == cPlayer1)
    {
    cout<<"OYUNCU 1 KAZANDI!"<<endl;
    }
    else
    cout<<"OYUNCU 2 KAZANDI!"<<endl;
    }
    return gameover;
    }
    int check_duplicate(int i)
    {
    while(taken[i-1] == 1)
    {
    cout<<i<<" baska bir nokta seçiniz ";
    cin>>i;
    }
    return i;
    }
    int main()
    {
    int count = 0;
    int x_pos,y_pos;
    print_board_start();
    cout<<"OYUNCU 1 : X"<<endl<<"OYUNCU 2 : 0"<<endl;
    while(gameover==0 && count<=8)
    {
    count++;
    cout<<"Posizyonu Girin X :"<<endl;
    cin>>x_pos;
    while(x_pos>9 || x_pos <1 )
    {
    cout<<"Hatali Girdiniz 1 Den 9 a Kadar Secin: ";
    cin>>x_pos;
    }

    if(taken[x_pos-1] == 1)
    {
    x_pos=check_duplicate(x_pos);
    }
    input_board_x(x_pos);
    taken[x_pos -1] = 1;
    check_gameover();
    if(gameover == 1)
    {
    break;
    }
    if(count == 9)
    {
    break;
    }
    count++;
    final_result_board();
    cout<<"Posizyonu Girin 0 : "<<endl;
    cin>>y_pos;
    while(y_pos>9 || y_pos <1 )
    {
    cout<<"Hatali Girdiniz 1 Den 9 a Kadar Secin: ";
    cin>>y_pos;
    }
    if(taken[y_pos-1] == 1)
    {
    y_pos=check_duplicate(y_pos);
    }
    input_board_y(y_pos);
    taken[y_pos -1] = 1;
    check_gameover();
    final_result_board();
    if(gameover == 1)
    {
    break;
    }
    }
    if(gameover == 0)
    {
    cout<<"Kura"<<endl;
    }
    final_result_board();
    getch();
    }


    BUDA VB6 KODU OXO OYUNU

    Dim oyuncu1 As Boolean 
    Dim oyuncu2 As Boolean
    Dim blnYeni As Boolean

    Private Sub cmdClear_Click()
    blnYeni = True
    Clear
    End Sub

    Private Sub Form_Load()
    blnYeni = True
    Clear
    End Sub

    Private Sub grd_Click()

    If blnYeni = False Then Exit Sub

    With grd

    If oyuncu1 = True Then
    If .TextMatrix(.Row, .Col) = "" Then
    .TextMatrix(.Row, .Col) = lblYes.Caption
    .CellBackColor = &H8080FF
    oyuncu1 = False
    oyuncu2 = True
    lbloyuncu1.FontUnderline = False
    lbloyuncu2.FontUnderline = True
    GoTo 10
    End If
    End If

    If oyuncu2 = True Then
    If .TextMatrix(.Row, .Col) = "" Then
    .TextMatrix(.Row, .Col) = lblNo.Caption
    .CellBackColor = &H80FF80

    oyuncu1 = True
    oyuncu2 = False
    lbloyuncu1.FontUnderline = True
    lbloyuncu2.FontUnderline = False
    GoTo 10
    End If
    End If

    10:
    If oyuncu1 = False Then
    If (.TextMatrix(0, 0) = lblYes.Caption) And (.TextMatrix(0, 1) = lblYes.Caption) And (.TextMatrix(0, 2) = lblYes.Caption) Then
    MsgBox "Oyuncu 1 Kazanan"
    GoTo 20
    ElseIf (.TextMatrix(1, 0) = lblYes.Caption) And (.TextMatrix(1, 1) = lblYes.Caption) And (.TextMatrix(1, 2) = lblYes.Caption) Then
    MsgBox "Oyuncu 1 Kazanan"
    GoTo 20
    ElseIf (.TextMatrix(2, 0) = lblYes.Caption) And (.TextMatrix(2, 1) = lblYes.Caption) And (.TextMatrix(2, 2) = lblYes.Caption) Then
    MsgBox "Oyuncu 1 Kazanan"
    GoTo 20
    ElseIf (.TextMatrix(0, 0) = lblYes.Caption) And (.TextMatrix(1, 0) = lblYes.Caption) And (.TextMatrix(2, 0) = lblYes.Caption) Then
    MsgBox "Oyuncu 1 Kazanan"
    GoTo 20
    ElseIf (.TextMatrix(0, 1) = lblYes.Caption) And (.TextMatrix(1, 1) = lblYes.Caption) And (.TextMatrix(2, 1) = lblYes.Caption) Then
    MsgBox "Oyuncu 1 Kazanan"
    GoTo 20
    ElseIf (.TextMatrix(0, 2) = lblYes.Caption) And (.TextMatrix(1, 2) = lblYes.Caption) And (.TextMatrix(2, 2) = lblYes.Caption) Then
    MsgBox "Oyuncu 1 Kazanan"
    GoTo 20

    ElseIf (.TextMatrix(0, 0) = lblYes.Caption) And (.TextMatrix(1, 1) = lblYes.Caption) And (.TextMatrix(2, 2) = lblYes.Caption) Then
    MsgBox "Oyuncu 1 Kazanan"
    GoTo 20
    ElseIf (.TextMatrix(2, 0) = lblYes.Caption) And (.TextMatrix(1, 1) = lblYes.Caption) And (.TextMatrix(0, 2) = lblYes.Caption) Then
    MsgBox "Oyuncu 1 Kazanan"
    GoTo 20


    End If
    End If

    If oyuncu2 = False Then
    If (.TextMatrix(0, 0) = lblNo.Caption) And (.TextMatrix(0, 1) = lblNo.Caption) And (.TextMatrix(0, 2) = lblNo.Caption) Then
    MsgBox "Oyuncu 2 Kazanan"
    GoTo 20
    ElseIf (.TextMatrix(1, 0) = lblNo.Caption) And (.TextMatrix(1, 1) = lblNo.Caption) And (.TextMatrix(1, 2) = lblNo.Caption) Then
    MsgBox "Oyuncu 2 Kazanan"
    GoTo 20
    ElseIf (.TextMatrix(2, 0) = lblNo.Caption) And (.TextMatrix(2, 1) = lblNo.Caption) And (.TextMatrix(2, 2) = lblNo.Caption) Then
    MsgBox "Oyuncu 2 Kazanan"
    GoTo 20
    ElseIf (.TextMatrix(0, 0) = lblNo.Caption) And (.TextMatrix(1, 0) = lblNo.Caption) And (.TextMatrix(2, 0) = lblNo.Caption) Then
    MsgBox "Oyuncu 2 Kazanan"
    GoTo 20
    ElseIf (.TextMatrix(0, 1) = lblNo.Caption) And (.TextMatrix(1, 1) = lblNo.Caption) And (.TextMatrix(2, 1) = lblNo.Caption) Then
    MsgBox "Oyuncu 2 Kazanan"
    GoTo 20
    ElseIf (.TextMatrix(0, 2) = lblNo.Caption) And (.TextMatrix(1, 2) = lblNo.Caption) And (.TextMatrix(2, 2) = lblNo.Caption) Then
    MsgBox "Oyuncu 2 Kazanan"
    GoTo 20

    ElseIf (.TextMatrix(0, 0) = lblNo.Caption) And (.TextMatrix(1, 1) = lblNo.Caption) And (.TextMatrix(2, 2) = lblNo.Caption) Then
    MsgBox "Oyuncu 2 Kazanan"
    GoTo 20
    ElseIf (.TextMatrix(2, 0) = lblNo.Caption) And (.TextMatrix(1, 1) = lblNo.Caption) And (.TextMatrix(0, 2) = lblNo.Caption) Then
    MsgBox "Oyuncu 2 Kazanan"
    GoTo 20
    End If
    End If

    Exit Sub

    End With

    20:
    blnYeni = False
    If oyuncu1 = False Then
    lblP1.Caption = Val(lblP1.Caption) + 1
    ElseIf oyuncu2 = False Then
    lblP2.Caption = Val(lblP2.Caption) + 1
    End If
    'Clear


    End Sub

    Public Sub Clear()
    With grd
    .ColWidth(0) = 1800
    .ColWidth(1) = 1800
    .ColWidth(2) = 1800

    .RowHeight(0) = 1800
    .RowHeight(1) = 1800
    .RowHeight(2) = 1800

    For i = 0 To 2
    For j = 0 To 2
    .Row = i
    .Col = j
    .CellAlignment = 4
    .CellBackColor = vbWhite
    .TextMatrix(i, j) = ""
    Next j
    Next i
    End With
    oyuncu1 = True
    oyuncu2 = False

    lbloyuncu1.FontUnderline = True
    lbloyuncu2.FontUnderline = False

    End Sub



    < Bu mesaj bu kişi tarafından değiştirildi atekse -- 9 Nisan 2013; 1:30:07 >
    _____________________________
    İnsanların en kötüsü, iyiliği kötülükle karşılayan ve insanların en iyisi, kötülüğe karşı iyilik yapandır. Hz.Ali r.a.




  • quote:

    Orijinalden alıntı: expertise

    borsa programı lazım, yapabilir misin?

    programinin ayrintilari nasil birsey olacak ayrintili anlat
    _____________________________
    İnsanların en kötüsü, iyiliği kötülükle karşılayan ve insanların en iyisi, kötülüğe karşı iyilik yapandır. Hz.Ali r.a.
  • PM attım yardımcı olur musun ?
    _____________________________
  • Bana küçük ölçekli yaptığın programlardan arşivinde varsa bi kaç tane verir misin ? Küçük boyutlu program arşivi yapıyorum....Teşekkürler
    _____________________________
    Adımız miskindir bizim
    Düşmanımız kindir bizim
    Biz kimseye kin tutmayız
    Kamu âlem birdir bize
  • Yapay Zeka’dan İlgili Konular
    Bu programi ariyorum
    6 yıl önce açıldı
    Daha Fazla Göster
  • program yazarım diye mesaj atıyorsun
    sonra anlat hadi nasıl yazayım diyorsun
    bilmiyorsan niye ortaya atladın diyorum
    senin gibiler yüzünden yardım alamıyorum diyorsun.

    baştan söylesene: program yazmayı bilmiyorum yardım edin öğreneyim diye. böyle kıvırtmak da ayrı bir marifet olsa gerek.
    güzel böyle devam et.
    _____________________________
  • http://forum.donanimhaber.com/m_73655992/tm.htm burada benim bir sorunum var yardımcı olabilir misiniz ?
    _____________________________
  • quote:

    Orijinalden alıntı: expertise

    program yazarım diye mesaj atıyorsun
    sonra anlat hadi nasıl yazayım diyorsun
    bilmiyorsan niye ortaya atladın diyorum
    senin gibiler yüzünden yardım alamıyorum diyorsun.

    baştan söylesene: program yazmayı bilmiyorum yardım edin öğreneyim diye. böyle kıvırtmak da ayrı bir marifet olsa gerek.
    güzel böyle devam et.

    kardesim insanlari rencide edme ben insan gibi nasil olacagini sordum pragram nasil yazilacak nasil kodlanacak diye sormadim
    burasi tartisma bolumu degil git tartisama bolumune
    _____________________________
    İnsanların en kötüsü, iyiliği kötülükle karşılayan ve insanların en iyisi, kötülüğe karşı iyilik yapandır. Hz.Ali r.a.
  • quote:

    Orijinalden alıntı: koyukaranlık

    Bana küçük ölçekli yaptığın programlardan arşivinde varsa bi kaç tane verir misin ? Küçük boyutlu program arşivi yapıyorum....Teşekkürler

    baya var visual basic 6 ve c++ cuma gunu hepsini ubload edip linkini veririm
    _____________________________
    İnsanların en kötüsü, iyiliği kötülükle karşılayan ve insanların en iyisi, kötülüğe karşı iyilik yapandır. Hz.Ali r.a.
  • pm
    _____________________________
  • bir yazılım projesinde ilk önce analiz yapılır gereksinimler , user experince tarzı şeyler , sonra kodlamaya başlanabilir . yoksa projesi çizilmemiş bina gibi ortaya ne çıkacağı belli olmaz .

    Arkadaşın demek istediği buydu sanırım .
    _____________________________
  • Arkadaş Çok Teşekkürler Ne Kadar Emek Vermişsindir Çok Sağol
    _____________________________
  • quote:

    Orijinalden alıntı: atekse

    quote:

    Orijinalden alıntı: koyukaranlık

    Bana küçük ölçekli yaptığın programlardan arşivinde varsa bi kaç tane verir misin ? Küçük boyutlu program arşivi yapıyorum....Teşekkürler

    baya var visual basic 6 ve c++ cuma gunu hepsini ubload edip linkini veririm

    Çok teşekkür ediyorum kardeş bekliyorum
    _____________________________
    Adımız miskindir bizim
    Düşmanımız kindir bizim
    Biz kimseye kin tutmayız
    Kamu âlem birdir bize
  • quote:

    Orijinalden alıntı: atekse

    quote:

    Orijinalden alıntı: koyukaranlık

    Bana küçük ölçekli yaptığın programlardan arşivinde varsa bi kaç tane verir misin ? Küçük boyutlu program arşivi yapıyorum....Teşekkürler

    baya var visual basic 6 ve c++ cuma gunu hepsini ubload edip linkini veririm

    ben de bekliyorum :)
    _____________________________
  • _____________________________
  • Visual C++ Code
    Dosya adı: Visual_C++2010+Code.rar
    Dosya boyutu: 234.78 MB
    Yukle



    < Bu mesaj bu kişi tarafından değiştirildi atekse -- 11 Nisan 2013; 20:25:37 >
    _____________________________
    İnsanların en kötüsü, iyiliği kötülükle karşılayan ve insanların en iyisi, kötülüğe karşı iyilik yapandır. Hz.Ali r.a.
  • Using-Inet1-FTP

    full FTP Client Windows Application

    VB6-Source-Code



    < Bu mesaj bu kişi tarafından değiştirildi atekse -- 11 Nisan 2013; 20:33:21 >
    _____________________________
    İnsanların en kötüsü, iyiliği kötülükle karşılayan ve insanların en iyisi, kötülüğe karşı iyilik yapandır. Hz.Ali r.a.
  • Bana da bir küçük oyun lazım. PM attım.
    _____________________________
  • 
Sayfa: 12
Sayfaya Git
Git
sonraki
- x
Bildirim
mesajınız kopyalandı (ctrl+v) yapıştırmak istediğiniz yere yapıştırabilirsiniz.