Fischer-Bayern.de
 FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen   RegistrierenRegistrieren 
 ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin 

Sudoku

 
Neues Thema eröffnen   Neue Antwort erstellen    Fischer-Bayern.de Foren-Übersicht -> Pool
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
till
•--->
•--->


Anmeldedatum: 21.04.2005
Beiträge: 187
Wohnort: q-town (R-P)

BeitragVerfasst am: 21.04.2006 - 11:09    Titel: Sudoku Antworten mit Zitat

wer was un warum? -> http://www.fischer-bayern.de/phpBB2/viewtopic.php?t=1990

-als app speichern
-und vorhandene werte eingeben

Zitat:

global z, ze, a1, b1, c1, d1, e1, f1, g1, h1, i1, a2, b2, c2, d2, e2, f2, g2, h2, i2, a3, b3, c3, d3, e3, f3, g3, h3, i3, a4, b4, c4, d4, e4, f4, g4, h4, i4, a5, b5, c5, d5, e5, f5, g5, h5, i5, a6, b6, c6, d6, e6, f6, g6, h6, i6, a7, b7, c7, d7, e7, f7, g7, h7, i7, a8, b8, c8, d8, e8, f8, g8, h8, i8, a9, b9, c9, d9, e9, f9, g9, h9, i9


set z to 0
set ze to 1

set a1 to "-"
set a2 to "-"
set a3 to "-"
set a4 to "-"
set a5 to "-"
set a6 to "-"
set a7 to "-"
set a8 to "-"
set a9 to "-"

-- 2.senkrecht
set b1 to "-"
set b2 to "-"
set b3 to "-"
set b4 to "-"
set b5 to "-"
set b6 to "-"
set b7 to "-"
set b8 to "-"
set b9 to "-"

-- 3. senkrecht
set c1 to "-"
set c2 to "-"
set c3 to "-"
set c4 to "-"
set c5 to "-"
set c6 to "-"
set c7 to "-"
set c8 to "-"
set c9 to "-"

-- 4. senkrecht
set d1 to "-"
set d2 to "-"
set d3 to "-"
set d4 to "-"
set d5 to "-"
set d6 to "-"
set d7 to "-"
set d8 to "-"
set d9 to "-"

-- 5.senkrecht
set e1 to "-"
set e2 to "-"
set e3 to "-"
set e4 to "-"
set e5 to "-"
set e6 to "-"
set e7 to "-"
set e8 to "-"
set e9 to "-"

--6. senkrecht
set f1 to "-"
set f2 to "-"
set f3 to "-"
set f4 to "-"
set f5 to "-"
set f6 to "-"
set f7 to "-"
set f8 to "-"
set f9 to "-"

-- 7.senkrecht
set g1 to "-"
set g2 to "-"
set g3 to "-"
set g4 to "-"
set g5 to "-"
set g6 to "-"
set g7 to "-"
set g8 to "-"
set g9 to "-"

-- 8. senkrecht
set h1 to "-"
set h2 to "-"
set h3 to "-"
set h4 to "-"
set h5 to "-"
set h6 to "-"
set h7 to "-"
set h8 to "-"
set h9 to "-"

--9. senkrecht
set i1 to "-"
set i2 to "-"
set i3 to "-"
set i4 to "-"
set i5 to "-"
set i6 to "-"
set i7 to "-"
set i8 to "-"
set i9 to "-"



set a1 to einles(a1)
set a2 to einles(a2)
set a3 to einles(a3)
set a4 to einles(a4)
set a5 to einles(a5)
set a6 to einles(a6)
set a7 to einles(a7)
set a8 to einles(a8)
set a9 to einles(a9)

set b1 to einles(b1)
set b2 to einles(b2)
set b3 to einles(b3)
set b4 to einles(b4)
set b5 to einles(b5)
set b6 to einles(b6)
set b7 to einles(b7)
set b8 to einles(b8)
set b9 to einles(b9)

set c1 to einles(c1)
set c2 to einles(c2)
set c3 to einles(c3)
set c4 to einles(c4)
set c5 to einles(c5)
set c6 to einles(c6)
set c7 to einles(c7)
set c8 to einles(c8)
set c9 to einles(c9)

set d1 to einles(d1)
set d2 to einles(d2)
set d3 to einles(d3)
set d4 to einles(d4)
set d5 to einles(d5)
set d6 to einles(d6)
set d7 to einles(d7)
set d8 to einles(d8)
set d9 to einles(d9)

set e1 to einles(e1)
set e2 to einles(e2)
set e3 to einles(e3)
set e4 to einles(e4)
set e5 to einles(e5)
set e6 to einles(e6)
set e7 to einles(e7)
set e8 to einles(e8)
set e9 to einles(e9)

set f1 to einles(f1)
set f2 to einles(f2)
set f3 to einles(f3)
set f4 to einles(f4)
set f5 to einles(f5)
set f6 to einles(f6)
set f7 to einles(f7)
set f8 to einles(f8)
set f9 to einles(f9)

set g1 to einles(g1)
set g2 to einles(g2)
set g3 to einles(g3)
set g4 to einles(g4)
set g5 to einles(g5)
set g6 to einles(g6)
set g7 to einles(g7)
set g8 to einles(g8)
set g9 to einles(g9)

set h1 to einles(h1)
set h2 to einles(h2)
set h3 to einles(h3)
set h4 to einles(h4)
set h5 to einles(h5)
set h6 to einles(h6)
set h7 to einles(h7)
set h8 to einles(h8)
set h9 to einles(h9)

set i1 to einles(i1)
set i2 to einles(i2)
set i3 to einles(i3)
set i4 to einles(i4)
set i5 to einles(i5)
set i6 to einles(i6)
set i7 to einles(i7)
set i8 to einles(i8)
set i9 to einles(i9)


on einles(var)
   
   set z to z + 1
   
   
   
   set waag1 to {a1, tab, b1, tab, c1, tab, tab, d1, tab, e1, tab, f1, tab, tab, g1, tab, h1, tab, i1}
   repeat with x from 1 to count items of waag1
      if item x of waag1 is "" then
         set item x of waag1 to "#"
      end if
      if z = 1 then
         set item 1 of waag1 to "?"
      end if
   end repeat
   set waag2 to {a2, tab, b2, tab, c2, tab, tab, d2, tab, e2, tab, f2, tab, tab, g2, tab, h2, tab, i2}
   repeat with x from 1 to count items of waag2
      if item x of waag2 is "" then
         set item x of waag2 to "#"
      end if
      if z = 2 then
         set item 1 of waag2 to "?"
      end if
   end repeat
   set waag3 to {a3, tab, b3, tab, c3, tab, tab, d3, tab, e3, tab, f3, tab, tab, g3, tab, h3, tab, i3}
   repeat with x from 1 to count items of waag3
      if item x of waag3 is "" then
         set item x of waag3 to "#"
      end if
      if z = 3 then
         set item 1 of waag3 to "?"
      end if
   end repeat
   set waag4 to {a4, tab, b4, tab, c4, tab, tab, d4, tab, e4, tab, f4, tab, tab, g4, tab, h4, tab, i4}
   repeat with x from 1 to count items of waag4
      if item x of waag4 is "" then
         set item x of waag4 to "#"
      end if
      if z = 4 then
         set item 1 of waag4 to "?"
      end if
   end repeat
   set waag5 to {a5, tab, b5, tab, c5, tab, tab, d5, tab, e5, tab, f5, tab, tab, g5, tab, h5, tab, i5}
   repeat with x from 1 to count items of waag5
      if item x of waag5 is "" then
         set item x of waag5 to "#"
      end if
      if z = 5 then
         set item 1 of waag5 to "?"
      [color=#0000FF:fc2306
_________________
ein berühmter Philosoph (<-Ich) sagte einmal:
" es ist nicht das Problem was uns Kopfzerbrechen macht,
es ist der Kopf selbst, der sich erdrückt"
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
till
•--->
•--->


Anmeldedatum: 21.04.2005
Beiträge: 187
Wohnort: q-town (R-P)

BeitragVerfasst am: 21.04.2006 - 12:28    Titel: Antworten mit Zitat

-- sorry hat nich ganz ins zitatfenster gepasst
--snow wird mich umbringen


global z, ze, a1, b1, c1, d1, e1, f1, g1, h1, i1, a2, b2, c2, d2, e2, f2, g2, h2, i2, a3, b3, c3, d3, e3, f3, g3, h3, i3, a4, b4, c4, d4, e4, f4, g4, h4, i4, a5, b5, c5, d5, e5, f5, g5, h5, i5, a6, b6, c6, d6, e6, f6, g6, h6, i6, a7, b7, c7, d7, e7, f7, g7, h7, i7, a8, b8, c8, d8, e8, f8, g8, h8, i8, a9, b9, c9, d9, e9, f9, g9, h9, i9


set z to 0
set ze to 1

set a1 to "-"
set a2 to "-"
set a3 to "-"
set a4 to "-"
set a5 to "-"
set a6 to "-"
set a7 to "-"
set a8 to "-"
set a9 to "-"

-- 2.senkrecht
set b1 to "-"
set b2 to "-"
set b3 to "-"
set b4 to "-"
set b5 to "-"
set b6 to "-"
set b7 to "-"
set b8 to "-"
set b9 to "-"

-- 3. senkrecht
set c1 to "-"
set c2 to "-"
set c3 to "-"
set c4 to "-"
set c5 to "-"
set c6 to "-"
set c7 to "-"
set c8 to "-"
set c9 to "-"

-- 4. senkrecht
set d1 to "-"
set d2 to "-"
set d3 to "-"
set d4 to "-"
set d5 to "-"
set d6 to "-"
set d7 to "-"
set d8 to "-"
set d9 to "-"

-- 5.senkrecht
set e1 to "-"
set e2 to "-"
set e3 to "-"
set e4 to "-"
set e5 to "-"
set e6 to "-"
set e7 to "-"
set e8 to "-"
set e9 to "-"

--6. senkrecht
set f1 to "-"
set f2 to "-"
set f3 to "-"
set f4 to "-"
set f5 to "-"
set f6 to "-"
set f7 to "-"
set f8 to "-"
set f9 to "-"

-- 7.senkrecht
set g1 to "-"
set g2 to "-"
set g3 to "-"
set g4 to "-"
set g5 to "-"
set g6 to "-"
set g7 to "-"
set g8 to "-"
set g9 to "-"

-- 8. senkrecht
set h1 to "-"
set h2 to "-"
set h3 to "-"
set h4 to "-"
set h5 to "-"
set h6 to "-"
set h7 to "-"
set h8 to "-"
set h9 to "-"

--9. senkrecht
set i1 to "-"
set i2 to "-"
set i3 to "-"
set i4 to "-"
set i5 to "-"
set i6 to "-"
set i7 to "-"
set i8 to "-"
set i9 to "-"



set a1 to einles(a1)
set a2 to einles(a2)
set a3 to einles(a3)
set a4 to einles(a4)
set a5 to einles(a5)
set a6 to einles(a6)
set a7 to einles(a7)
set a8 to einles(a8)
set a9 to einles(a9)

set b1 to einles(b1)
set b2 to einles(b2)
set b3 to einles(b3)
set b4 to einles(b4)
set b5 to einles(b5)
set b6 to einles(b6)
set b7 to einles(b7)
set b8 to einles(b8)
set b9 to einles(b9)

set c1 to einles(c1)
set c2 to einles(c2)
set c3 to einles(c3)
set c4 to einles(c4)
set c5 to einles(c5)
set c6 to einles(c6)
set c7 to einles(c7)
set c8 to einles(c8)
set c9 to einles(c9)

set d1 to einles(d1)
set d2 to einles(d2)
set d3 to einles(d3)
set d4 to einles(d4)
set d5 to einles(d5)
set d6 to einles(d6)
set d7 to einles(d7)
set d8 to einles(d8)
set d9 to einles(d9)

set e1 to einles(e1)
set e2 to einles(e2)
set e3 to einles(e3)
set e4 to einles(e4)
set e5 to einles(e5)
set e6 to einles(e6)
set e7 to einles(e7)
set e8 to einles(e8)
set e9 to einles(e9)

set f1 to einles(f1)
set f2 to einles(f2)
set f3 to einles(f3)
set f4 to einles(f4)
set f5 to einles(f5)
set f6 to einles(f6)
set f7 to einles(f7)
set f8 to einles(f8)
set f9 to einles(f9)

set g1 to einles(g1)
set g2 to einles(g2)
set g3 to einles(g3)
set g4 to einles(g4)
set g5 to einles(g5)
set g6 to einles(g6)
set g7 to einles(g7)
set g8 to einles(g8)
set g9 to einles(g9)

set h1 to einles(h1)
set h2 to einles(h2)
set h3 to einles(h3)
set h4 to einles(h4)
set h5 to einles(h5)
set h6 to einles(h6)
set h7 to einles(h7)
set h8 to einles(h8)
set h9 to einles(h9)

set i1 to einles(i1)
set i2 to einles(i2)
set i3 to einles(i3)
set i4 to einles(i4)
set i5 to einles(i5)
set i6 to einles(i6)
set i7 to einles(i7)
set i8 to einles(i8)
set i9 to einles(i9)


on einles(var)
   
   set z to z + 1
   
   
   
   set waag1 to {a1, tab, b1, tab, c1, tab, tab, d1, tab, e1, tab, f1, tab, tab, g1, tab, h1, tab, i1}
   repeat with x from 1 to count items of waag1
      if item x of waag1 is "" then
         set item x of waag1 to "#"
      end if
      if z = 1 then
         set item 1 of waag1 to "?"
      end if
   end repeat
   set waag2 to {a2, tab, b2, tab, c2, tab, tab, d2, tab, e2, tab, f2, tab, tab, g2, tab, h2, tab, i2}
   repeat with x from 1 to count items of waag2
      if item x of waag2 is "" then
         set item x of waag2 to "#"
      end if
      if z = 2 then
         set item 1 of waag2 to "?"
      end if
   end repeat
   set waag3 to {a3, tab, b3, tab, c3, tab, tab, d3, tab, e3, tab, f3, tab, tab, g3, tab, h3, tab, i3}
   repeat with x from 1 to count items of waag3
      if item x of waag3 is "" then
         set item x of waag3 to "#"
      end if
      if z = 3 then
         set item 1 of waag3 to "?"
      end if
   end repeat
   set waag4 to {a4, tab, b4, tab, c4, tab, tab, d4, tab, e4, tab, f4, tab, tab, g4, tab, h4, tab, i4}
   repeat with x from 1 to count items of waag4
      if item x of waag4 is "" then
         set item x of waag4 to "#"
      end if
      if z = 4 then
         set item 1 of waag4 to "?"
      end if
   end repeat
   set waag5 to {a5, tab, b5, tab, c5, tab, tab, d5, tab, e5, tab, f5, tab, tab, g5, tab, h5, tab, i5}
   repeat with x from 1 to count items of waag5
      if item x of waag5 is "" then
         set item x of waag5 to "#"
      end if
      if z = 5 then
         set item 1 of waag5 to "?"
      end [color=#0000FF:26f9d4
_________________
ein berühmter Philosoph (<-Ich) sagte einmal:
" es ist nicht das Problem was uns Kopfzerbrechen macht,
es ist der Kopf selbst, der sich erdrückt"
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
VJIADIS
•->
•->


Anmeldedatum: 20.10.2017
Beiträge: 1

BeitragVerfasst am: 20.10.2017 - 11:31    Titel: Antworten mit Zitat

zu schwierig!
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Fischer-Bayern.de Foren-Übersicht -> Pool Alle Zeiten sind GMT + 2 Stunden
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.


Powered by phpBB © 2001, 2002 phpBB Group
Deutsche Übersetzung von phpBB.de


AppleScript für absolute Starter