Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Forum översikt / inlägg

Posta nytt inlägg


15-spelet

Postades av 2002-02-19 10:09:46 - Henrik Andersson, i forum visual basic - allmänt, Tråden har 8 Kommentarer och lästs av 2107 personer

Jag är en nybörjare inom detta område och har fått uppgift att göra ett femtonspel... Är det ngn som har en bra källkod som kan vara en grund för mitt kommande arbete.
Tack på förhand
Henrik


Svara

Sv: 15-spelet

Postades av 2002-02-19 10:29:31 - Emma Magnusson

Vad är ett 15-spel?

/E


Svara

Sv: 15-spelet

Postades av 2002-02-19 15:31:58 - Johan Djupmarker

Vet inte om detta är till någon hjälp, men jag har gjort ett sådant spel i Java för några år sedan (tror det är ett sånt iaf, har inte riktigt förstått vilket spel du vill göra). Du kan ju se om du förstår något av javakällkoden, kanske inte är det lättaste då den är väldigt dåligt skriven, men OM du förstår något kanske det kan vara något att utgå ifrån =)

import java.awt.*;
import java.awt.event.*;
import java.applet.Applet;
import java.util.Random;

public class brick extends Applet {
Button k[];
Panel p[];
Label text;
boolean startat=false;
int kinneh[];//knapparnas innehåll
int tryck=0;

public void init() {
kinneh=new int[16];
k=new Button[16];
p=new Panel[4];
text = new Label();

setLayout(new GridLayout(5,1));
int a=-1;
while(++a<4) {
p[a]=new Panel();
p[a].setLayout(new GridLayout(1,4));
add(p[a]);

int b=-1;
while(++b<4) {
k[b+4*a]=new Button();
p[a].add(k[b+4*a]);
k[b+4*a].addActionListener(new KnappLyssnare());
}
}
a=-1;
while (++a<15) {
kinneh[a]=a+1;
k[a].setLabel(""+(a+1));
}
kinneh[15]=0;
k[a].setLabel("Blanda");
add(text);
text.setText("Brick Game - (c)2000 Johan Djupmarker");
}

public void starta() {
int tmp, a=0, b=0, x=0;
Random slump=new Random();
while (++x<100) {
a=slump.nextInt(16);//ändra till 15 för att få den tomma sist
b=slump.nextInt(16);
tmp=kinneh[a];
kinneh[a]=kinneh[b];
kinneh[b]=tmp;
}
tryck=0;
skriv();
startat=true;
}

public void skriv() {
int x=-1;
while (++x<16) {
if (kinneh[x]==0) {
k[x].setLabel("");
}
else {
k[x].setLabel(""+kinneh[x]);
}
}
text.setText(tryck+" tryck");
}

class KnappLyssnare implements ActionListener{
public void actionPerformed(ActionEvent evt) {

String st=new String();
int a=0, knapp=0;
while (a++<15) {
if (evt.getSource()==k[a]) {
knapp=a; //tryckt knapp
}
}
if (startat==false) {
if (knapp==15) {
starta();//startar
}
}
else {
if (kinneh[knapp]!=0) { //ej tryck på tom ruta
tryck++;
a=-1;
while (++a<16) {
if (kinneh[a]==0) {
kinneh[a]=kinneh[knapp];
kinneh[knapp]=0;
skriv();
}
}
a=-1;
int b=0;
while (++a<15) {
if (kinneh[a]==(a+1)) {
b++;
}
}
if (b==15) { //klarat spelet
startat=false;
text.setText("Grattis, du klarade spelet på "+tryck+" tryck!!!");
k[15].setLabel("Blanda");
tryck=0;
}
}
}
}
}
}

/Johan


Svara

Sv: 15-spelet

Postades av 2002-02-19 17:31:12 - Sven Åke Persson

Hej JohanD mfl
Den var bra ,går att transformera till Vb

mvh
Sven


Svara

Sv: 15-spelet

Postades av 2002-02-19 20:39:08 - Niklas Jansson

Har ett komplett program, men jag kör med knappar. Tycker faktiskt det blir lite snyggare. Antar att det är en skoluppgift, så det är nog ganska bra att göra det själv. Lägger upp mitt exempel på filarean imorrn (jag måste hitta det...).

/Niklas Jansson


Svara

Sv: 15-spelet

Postades av 2002-02-21 16:00:28 - Per Ullner

Kolla länken http://www.hotmix.kiev.ua

Här finns källkod till ett 15-spel för studier.

Good luck

/W



Svara

Sv: 15-spelet

Postades av 2002-02-21 17:15:58 - Sven Åke Persson

Hej
Roland är ute och seglar
>Att få hela programmet löst hjälper knappast mer än för stunden.

Han har inte bett att få hela programmet serverat
>som kan vara en grund för mitt kommande arbete.
skrev han, vilket jag tycker är en mycket timid önskan.

usch för beserwisser nissar

Sven




Svara

Sv: 15-spelet

Postades av 2002-02-21 17:23:30 - Sven Åke Persson

Igen
http://www.hotmix.kiev.ua
Guld download ligger under Vbprog och Slide Tile Game
Hoppas att Roland får sura uppstötningar.

Att kolla in hur andra löst ett problem är den absolut
övelägsna metoden att komma igång med egna projekt.
Om man skall uppfinna hjulet varje gång man startar
ett projekt blir man dyr i drift och kommer att stagnera.

DS





Svara

Nyligen

  • 14:24 CBD regelbundet?
  • 14:23 CBD regelbundet?
  • 14:22 Har du märkt några verkliga fördel
  • 09:09 Vill du köpa medicinska tester?
  • 12:47 Vem beviljar assistansen – kommune
  • 14:17 Någon med erfarenhet av hemstädnin
  • 14:14 Bör man använda sig av en båtförme
  • 14:12 Finns det någon intressant hundblo

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 569 638
27 953
271 710
8 472
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies