File: memory.ld

package info (click to toggle)
cuyo 2.1.0-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 10,756 kB
  • sloc: cpp: 12,451; ml: 6,341; sh: 1,228; pascal: 754; yacc: 558; makefile: 261; lex: 244; perl: 204; sed: 5
file content (105 lines) | stat: -rw-r--r-- 3,229 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
#
#   Copyright 2006 by Bernhard Seckinger
#   Maintenance modifications 2002,2003,2005,2006,2008,2011,2014 by the cuyo developers
#   Partly based on the following levels:
#   hexkugeln.ld which, at that time, was
#     Copyright <=2004 by Immanuel Halupczok
#   kunst.ld which, at that time, was
#     Copyright <=2004 by Immanuel Halupczok
#   pinguine.ld which, at that time, was
#     Created <=2002 by Bernhard Seckinger
#   hormone.ld which, at that time, was
#     Copyright <=2004 by Immanuel Halupczok
#   viecher.ld which, at that time, was
#     Copyright <=2004 by Immanuel Halupczok
#   nasenkugeln.ld which, at that time, was
#     Copyright <=2004 by Immanuel Halupczok
#   pfeile.ld which, at that time, was
#     Copyright <=2004 by Immanuel Halupczok
#
#   This program is free software; you can redistribute it and/or modify
#   it under the terms of the GNU General Public License as published by
#   the Free Software Foundation; either version 2 of the License, or
#   (at your option) any later version.
#
#   This program is distributed in the hope that it will be useful,
#   but WITHOUT ANY WARRANTY; without even the implied warranty of
#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
#   GNU General Public License for more details.
#
#   You should have received a copy of the GNU General Public License
#   along with this program; if not, write to the Free Software
#   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
#
# The above notices apply to this file and to:
#   bmKarten.xpm[.gz], bmStrich.xpm[.gz], bmTisch.xpm[.gz]
#

# referenced from labskaus.ld

# Status: (M=Muss, S=Soll, K=Kann, F=Feature, B=Bugs)
#
# Fertig.
#
# FK Blumenbild wird nicht mehr "zitiert".

Memory={
# TRANSLATORS: "Memory" is the name of a commercial brand of the Pairs game,
# at least in the German market.
  name="Memory"
  author="Berni"
  numexplode=2
  chaingrass=0
  greypic=bm
  pics=bm*13
  bgcolor=255,255,255
  topcolor=0,0,0
  toptime=50
  startpic=bmTisch.xpm
  startdist[1]="++++++++++","AAAAAAAAAA"
  startdist="AAAAAAAAAA"
  textcolor=90,90,90
# TRANSLATORS: "Memory" is the name of a commercial brand of the Pairs game,
# at least in the German market.
  description="Well, memory."
  
  <<
  var zuklappen=1;
  
  karte={
    switch {
      falling || informational -> {
        # Am fallen
        *
      };
      zuklappen &&
        kind@(-1,0) != outside && kind@(-1,0) != nothing &&
	kind@(-1,0) != bmTisch &&
	zuklappen@(-1,0) -> {
        # Wir sollen zuklappen, aber links von uns ist eine Karte,
	# die auch noch nicht damit angefangen. Dann warten wir noch...
        # (Lustiger Rberklapp-effekt.)
        *
      };
      zuklappen => {
        # Grade aufgekommen oder so was.
        # Aber erst noch ein Bildchen lang normal, weil sonst die
        # Start-Karten schon beim ersten Bild leicht umklappen.
        {zuklappen=0;*}, {pos+=15;*}, 1A*, P*
      };
      1:500 => {
        # Kurz aufklappen
        P*, 1A*, {pos+=15;*},
        *,*,*,*,*,*,*,*,*,*,*,*,*,*,
        {pos+=15;*}, 1A*, P*
      };
      -> A*; # zugeklappt
    };
  };
  >>

  bm={
    pics=bmKarten.xpm,bmStrich.xpm
    << bm={pos=kind-bm+1;karte}; >>
  }
}