Forum Sveta kompjutera  

Nazad   Forum Sveta kompjutera > Test Run > Programiranje > Pravljenje igara

Pravljenje igara Programski jezici, tehnike, alatke u službi pravljenja igara...

Odgovor
 
Alatke vezane za temu Vrste prikaza
Stara 19.1.2007, 18:46   #1
Ocelot
N.B.
 
Avatar korisnika Ocelot
 
Član od: 3.4.2006.
Lokacija: Outer Haven
Poruke: 2.985
Zahvalnice: 315
Zahvaljeno 887 puta na 476 poruka
Slanje poruke preko ICQ-a korisniku Ocelot Slanje poruke preko Skypea korisniku Ocelot
Određen forumom Ukrštene reči

Da li je neko probao da napravi ukrštene reči za PC? Pretpostavljam da je izvodljivo, ali koliko je teško da se to uradi?
Ocelot je offline   Odgovor sa citatom ove poruke
Stara 19.1.2007, 19:44   #2
LoneWolf
Deo inventara foruma
 
Član od: 9.1.2006.
Lokacija: Kafana
Poruke: 7.338
Zahvalnice: 1.551
Zahvaljeno 1.906 puta na 1.353 poruka
Slanje poruke preko Skypea korisniku LoneWolf
Određen forumom Re: Ukrštene reči

Davno sam probao nesto slicno,ali sam brzo odustao jer nisam znao da se bakcem sa matematikom
Ali,moze da se napravi neka jednostavnija crossword puzzle bez puno "matematisanja"
A sto je najgore,nisam ih nigdje vidio na internetu...a nisam ni trazio nesto posebno...
LoneWolf je offline   Odgovor sa citatom ove poruke
Stara 19.1.2007, 19:45   #3
Patton
Deo inventara foruma
 
Avatar korisnika Patton
 
Član od: 1.11.2005.
Lokacija: Silent Hill
Poruke: 4.647
Zahvalnice: 157
Zahvaljeno 899 puta na 491 poruka
Slanje poruke preko ICQ-a korisniku Patton Slanje poruke preko MSN-a korisniku Patton Slanje poruke preko Yahooa korisniku Patton
Određen forumom Re: Ukrštene reči

Citat:
Ocelot kaže:
Da li je neko probao da napravi ukrštene reči za PC? Pretpostavljam da je izvodljivo, ali koliko je teško da se to uradi?
Ja se toliko smorio u vojsci da 4h dnevno resavam ukrstene reci Sada, posle par meseci mi je proradila profesionalna deformacija iz detinjstva, pa sam razmisljao da napravim program koji ce generisati "osmosmerke". Ne bi trebalo da bude tesko. Treba ti ogromna baza pojmova (eventualno da budu podeljeni u vise oblasti). Izaberes oblik osmosmerke, izaberes konacno resenje i udri. Vrti kombinacije reci do iznemoglosti dok ne sklopis ono sto ti treba. Ukrstene reci isto nisu problem, samo sto je baza duplo veca, jer treba drzati i pitanja i odgovore.
Patton je offline   Odgovor sa citatom ove poruke
Stara 20.1.2007, 10:11   #4
MG-RAY
Starosedelac
 
Član od: 15.2.2006.
Lokacija: Midlands
Poruke: 1.523
Zahvalnice: 277
Zahvaljeno 307 puta na 207 poruka
Slanje poruke preko Skypea korisniku MG-RAY
Određen forumom Re: Ukrštene reči

Ovaj primer sam nasao pre...hm, par godina ...napisan je u QBasic, pa ako mozes nesto da iskoristis...(osmosmerka)

Kod:
DIM let$(20, 20)
DIM flag$(20, 20)
DIM word$(100)
RANDOMIZE TIMER
CLS
FOR outer = 1 TO 20
  FOR inner = 1 TO 20
    let$(outer, inner) = CHR$(INT(RND * 26 + 65))
  NEXT inner
NEXT outer
INPUT "Number of words to find"; words
FOR count = 1 TO words
  INPUT word$
  word$ = UCASE$(word$)
  words$(count) = word$
dir = INT(RND * 2 + 1)
ON dir GOSUB across, down
NEXT count
GOSUB viewlets
INPUT "Print out word search (y/n)"; sel$
IF UCASE$(sel$) = "Y" THEN GOSUB printout
END

across:
usedflag$ = "yes"
WHILE usedflag$ = "yes"
  usedflag$ = "no"
  xstart = INT(RND * (20 - LEN(word$)) + 1)
  y = INT(RND * 20 + 1)
  FOR spot = xstart TO xstart + LEN(word$)
    IF flag$(spot, y) = "used" THEN usedflag$ = "yes"
  NEXT spot
WEND
FOR spot = 1 TO LEN(word$)
  let$(spot + xstart, y) = MID$(word$, spot, 1)
  flag$(spot + xstart, y) = "used"
NEXT spot
RETURN

down:
usedflag$ = "yes"
WHILE usedflag$ = "yes"
  usedflag$ = "no"
  ystart = INT(RND * (20 - LEN(word$)) + 1)
  x = INT(RND * 20 + 1)
  FOR spot = ystart TO ystart + LEN(word$)
    IF flag$(x, spot) = "used" THEN usedflag$ = "yes"
  NEXT spot
WEND
FOR spot = 1 TO LEN(word$)
  let$(x, ystart + spot) = MID$(word$, spot, 1)
  flag$(x, ystart + spot) = "used"
NEXT spot
RETURN

viewlets:
FOR outer = 1 TO 20
  FOR inner = 1 TO 20
    PRINT let$(outer, inner); "  ";
  NEXT inner
  PRINT
NEXT outer
PRINT "Words to Find"
time = 1
indent = 0
WHILE words$(time) <> ""
  PRINT TAB(indent); words$(time);
  time = time + 1
  indent = indent + 20
  IF indent >= 80 THEN
    indent = 0
    PRINT
  END IF
WEND
PRINT
RETURN

handler:
IF ERR = 25 THEN PRINT "Turn priter on!"
GOSUB printout

printout:
LINE INPUT "Title (ENTER for none)"; title$
FOR lines = 1 TO 8
ON ERROR GOTO handler
LPRINT
NEXT lines
LPRINT TAB(40 - (LEN(title$) / 2)); title$
LPRINT
LPRINT
LPRINT
FOR outer = 1 TO 20
  LPRINT "            ";
  FOR inner = 1 TO 20
    LPRINT let$(outer, inner); "  ";
  NEXT inner
  LPRINT
NEXT outer
LPRINT
LPRINT
LPRINT "Words to Find'"
LPRINT
LPRINT
time = 1
indent = 0
WHILE words$(time) <> ""
  LPRINT TAB(indent); words$(time);
  time = time + 1
  indent = indent + 20
  IF indent >= 80 THEN
    indent = 0
    LPRINT
  END IF
WEND
FOR lines = 1 TO 5
LPRINT
NEXT lines
LPRINT TAB(55); "Word Search Marker"
LPRINT TAB(55); "Created by Brian Emmer"
RETURN
MG-RAY je offline   Odgovor sa citatom ove poruke
Stara 20.1.2007, 13:37   #5
Ocelot
N.B.
 
Avatar korisnika Ocelot
 
Član od: 3.4.2006.
Lokacija: Outer Haven
Poruke: 2.985
Zahvalnice: 315
Zahvaljeno 887 puta na 476 poruka
Slanje poruke preko ICQ-a korisniku Ocelot Slanje poruke preko Skypea korisniku Ocelot
Određen forumom Re: Ukrštene reči

Da ne dođe do zabune, ja ne planiram da pravim bilo koju igru, već samo pitam da li je neko to radio ili planira da uradi.
Ocelot je offline   Odgovor sa citatom ove poruke
Stara 9.2.2007, 19:28   #6
nepoznati2
Novi član
 
Član od: 19.6.2006.
Poruke: 4
Zahvalnice: 0
Zahvaljeno 0 puta na 0 poruka
Određen forumom Re: Ukrštene reči

Veoma je tesko napraviti program za ukrstene reci ili program za osmosmerke. Potrebne su godine dok se pronadje pravi algoritam, uz to morate biti profesionalni enigmata da biste ispostovali sva enigmatska pravila kao i vrhunski programer. Pogledajte na www.elitesecurity.org/ t222911-Program-za-ukrstene-reci-osmosmerke-VB
Rajko
nepoznati2 je offline   Odgovor sa citatom ove poruke
Stara 19.2.2007, 19:03   #7
nepoznati2
Novi član
 
Član od: 19.6.2006.
Poruke: 4
Zahvalnice: 0
Zahvaljeno 0 puta na 0 poruka
Određen forumom Re: Ukrštene reči

Citat:
Ocelot kaže:
Da li je neko probao da napravi ukrštene reči za PC? Pretpostavljam da je izvodljivo, ali koliko je teško da se to uradi?
Jako tesko. Postrebno je biti enigmata godinama i biti odlican programer. I onda ti trebaju godine za pravi algoritam.
nepoznati2 je offline   Odgovor sa citatom ove poruke
Stara 19.2.2007, 19:04   #8
nepoznati2
Novi član
 
Član od: 19.6.2006.
Poruke: 4
Zahvalnice: 0
Zahvaljeno 0 puta na 0 poruka
Određen forumom Re: Ukrštene reči

Citat:
Patton kaže:
Ja se toliko smorio u vojsci da 4h dnevno resavam ukrstene reci Sada, posle par meseci mi je proradila profesionalna deformacija iz detinjstva, pa sam razmisljao da napravim program koji ce generisati "osmosmerke". Ne bi trebalo da bude tesko. Treba ti ogromna baza pojmova (eventualno da budu podeljeni u vise oblasti). Izaberes oblik osmosmerke, izaberes konacno resenje i udri. Vrti kombinacije reci do iznemoglosti dok ne sklopis ono sto ti treba. Ukrstene reci isto nisu problem, samo sto je baza duplo veca, jer treba drzati i pitanja i odgovore.
Ovo nije tacno. Treba biti enigmata godinama i vrhunski programer. I onda godinama trazis pravi algoritam.
nepoznati2 je offline   Odgovor sa citatom ove poruke
Stara 19.2.2007, 23:41   #9
MG-RAY
Starosedelac
 
Član od: 15.2.2006.
Lokacija: Midlands
Poruke: 1.523
Zahvalnice: 277
Zahvaljeno 307 puta na 207 poruka
Slanje poruke preko Skypea korisniku MG-RAY
Određen forumom Re: Ukrštene reči

Zasto se jednostavno ne slazem sa ovim...a ti Patton ? ... godine...ccc
MG-RAY je offline   Odgovor sa citatom ove poruke
Stara 19.2.2007, 23:53   #10
Patton
Deo inventara foruma
 
Avatar korisnika Patton
 
Član od: 1.11.2005.
Lokacija: Silent Hill
Poruke: 4.647
Zahvalnice: 157
Zahvaljeno 899 puta na 491 poruka
Slanje poruke preko ICQ-a korisniku Patton Slanje poruke preko MSN-a korisniku Patton Slanje poruke preko Yahooa korisniku Patton
Određen forumom Re: Ukrštene reči

@nepoznati2
Zasto si jednu te istu stvar napisao u tri posta?

Prvo koja pravila postoje za osmosmerku?
1. reci se u dijagramu prostiru u osam smerova
2. od preostalih slova, sklapa se resenje

... e da... ima jos jedno pravilo

3. neke osmosmerke, nemaju preostala slova

To ti je sva mudrost kod osmosmerke. Potreban je solidan, i pre svega brz, algoritam koji ce generisati osmosmerku na osnovu dijagrama (oblika osmosmerke) i resenja koje zelite da bude na kraju. A taj algoritam nema puno veze sa enigmatikom, vec je obicno baratanje ogromnom bazom reci.
Patton je offline   Odgovor sa citatom ove poruke
Stara 28.4.2008, 17:13   #11
rgdrajko
Novi član
 
Član od: 18.9.2007.
Poruke: 22
Zahvalnice: 0
Zahvaljeno 5 puta na 4 poruka
Određen forumom Re: Ukrštene reči

Uradjen je profesionalni program koji sastavlja osmosmeke svih vrsta.
Program mozete pogledati na: www.enigmatika.zzl.org
rgdrajko je offline   Odgovor sa citatom ove poruke
Stara 28.4.2008, 17:25   #12
rgdrajko
Novi član
 
Član od: 18.9.2007.
Poruke: 22
Zahvalnice: 0
Zahvaljeno 5 puta na 4 poruka
Određen forumom Re: Ukrštene reči

Uradjen je profesionalni program za sastavljanje osmosmerki.
Program mozete pogledati na:

www.enigmatika.zzl.org
rgdrajko je offline   Odgovor sa citatom ove poruke
Stara 28.4.2008, 21:29   #13
todos
Deo inventara foruma
 
Član od: 9.12.2005.
Lokacija: Parmenac Čačak
Poruke: 7.485
Zahvalnice: 4.426
Zahvaljeno 2.520 puta na 1.502 poruka
Slanje poruke preko Skypea korisniku todos
Određen forumom Re: Ukrštene reči

Ja znam da je sastavim. Naravno programiranje za mene je spansko selo. Inace treba mi od 5 minuta do nekoliko sati za jednu klasicnu ukrstenicu.
todos je offline   Odgovor sa citatom ove poruke
Odgovor

Bookmarks sajtovi

Alatke vezane za temu
Vrste prikaza

Vaš status
Ne možete postavljati teme
Ne možete odgovarati na poruke
Ne možete slati priloge uz poruke
Ne možete prepravljati svoje poruke

BB kod: uključeno
Smajliji: uključeno
[IMG] kod: uključeno
HTML kod: isključeno



Sva vremena su po Griniču +2 h. Sada je 8:57.


Powered by vBulletin® verzija 3.8.7
Copyright ©2000–2019, vBulletin Solutions, Inc.
Hosted by Beograd.com