Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
clean-and-itasks
clean-libraries
Commits
8fb27ad6
Commit
8fb27ad6
authored
Nov 30, 1999
by
Peter Achten
Browse files
no message
parent
3cb3e377
Changes
70
Expand all
Hide whitespace changes
Inline
Side-by-side
ObjectIO/Game Examples/Charlie/AU.WAV
0 → 100644
View file @
8fb27ad6
File added
ObjectIO/Game Examples/Charlie/BEE.WAV
0 → 100644
View file @
8fb27ad6
File added
ObjectIO/Game Examples/Charlie/BEES.BMP
0 → 100644
View file @
8fb27ad6
3.87 KB
ObjectIO/Game Examples/Charlie/BEES.dcl
0 → 100644
View file @
8fb27ad6
definition
module
BEES
import
StdEnv
,
StdGameDef
BeesBitmap
::
GameBitmap
BeesMap
::
[{#
Int
}]
BeesSeq001
::
(
Int
,
[(
Int
,
Int
)])
BeesSequences
::
[(
Int
,
[(
Int
,
Int
)])]
ObjectIO/Game Examples/Charlie/BEES.icl
0 → 100644
View file @
8fb27ad6
implementation
module
BEES
import
StdEnv
,
StdGameDef
BeesBitmap
::
GameBitmap
BeesBitmap
=
{
bitmapname
=
"BEES.BMP"
,
unitsize
=
{
w
=
20
,
h
=
20
}
,
dimensions
=
(
16
,
1
)
,
transparent
=
Just
{
x
=
59
,
y
=
19
}
}
BeesMap
::
[{#
Int
}]
BeesMap
=
[{
1
,
2
,
3
,
2
,
-1
,
-1
,
-1
,
-1
,
-1
},
{
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
},
{
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
},
{
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
},
{
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
}]
BeesSeq001
::
(
Int
,
[(
Int
,
Int
)])
BeesSeq001
=
(
-1
,[])
BeesSequences
::
[(
Int
,
[(
Int
,
Int
)])]
BeesSequences
=
[
BeesSeq001
]
\ No newline at end of file
ObjectIO/Game Examples/Charlie/BIRD.WAV
0 → 100644
View file @
8fb27ad6
File added
ObjectIO/Game Examples/Charlie/CH.BMP
0 → 100644
View file @
8fb27ad6
8.5 KB
ObjectIO/Game Examples/Charlie/CH.dcl
0 → 100644
View file @
8fb27ad6
definition
module
CH
import
StdEnv
,
StdGameDef
MainCharBitmap
::
GameBitmap
MainCharMap
::
[{#
Int
}]
MainCharSeq001
::
(
Int
,
[(
Int
,
Int
)])
MainCharSequences
::
[(
Int
,
[(
Int
,
Int
)])]
ObjectIO/Game Examples/Charlie/CH.icl
0 → 100644
View file @
8fb27ad6
implementation
module
CH
import
StdEnv
,
StdGameDef
MainCharBitmap
::
GameBitmap
MainCharBitmap
=
{
bitmapname
=
"CH.BMP"
,
unitsize
=
{
w
=
24
,
h
=
34
}
,
dimensions
=
(
13
,
1
)
,
transparent
=
Just
{
x
=
191
,
y
=
33
}
}
MainCharMap
::
[{#
Int
}]
MainCharMap
=
[{
1
,
2
,
3
,
4
,
5
,
6
,
7
,
8
,
-1
,
-1
,
-1
},
{
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
},
{
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
,
-1
}]
MainCharSeq001
::
(
Int
,
[(
Int
,
Int
)])
MainCharSeq001
=
(
-1
,[])
MainCharSequences
::
[(
Int
,
[(
Int
,
Int
)])]
MainCharSequences
=
[
MainCharSeq001
]
\ No newline at end of file
ObjectIO/Game Examples/Charlie/CLARINET.WAV
0 → 100644
View file @
8fb27ad6
File added
ObjectIO/Game Examples/Charlie/CLOUDS.BMP
0 → 100644
View file @
8fb27ad6
8.55 KB
ObjectIO/Game Examples/Charlie/CLOUDS.dcl
0 → 100644
View file @
8fb27ad6
definition
module
CLOUDS
import
StdEnv
,
StdGameDef
CloudsBitmap
::
GameBitmap
CloudsMap
::
[{#
Int
}]
CloudsSeq001
::
(
Int
,
[(
Int
,
Int
)])
CloudsSeq002
::
(
Int
,
[(
Int
,
Int
)])
CloudsSequences
::
[(
Int
,
[(
Int
,
Int
)])]
ObjectIO/Game Examples/Charlie/CLOUDS.icl
0 → 100644
View file @
8fb27ad6
implementation
module
CLOUDS
import
StdEnv
,
StdGameDef
CloudsBitmap
::
GameBitmap
CloudsBitmap
=
{
bitmapname
=
"CLOUDS.BMP"
,
unitsize
=
{
w
=
40
,
h
=
24
}
,
dimensions
=
(
8
,
1
)
,
transparent
=
Just
{
x
=
159
,
y
=
23
}
}
CloudsMap
::
[{#
Int
}]
CloudsMap
=
[{
0
,
0
,
0
,
0
,
0
},
{
0
,
0
,
0
,
0
,
0
},
{
0
,
0
,
0
,
0
,
0
},
{
0
,
0
,
0
,
0
,
0
},
{
0
,
0
,
0
,
0
,
0
},
{
0
,
0
,
0
,
0
,
0
},
{
0
,
0
,
0
,
0
,
0
}]
CloudsSeq001
::
(
Int
,
[(
Int
,
Int
)])
CloudsSeq001
=
(
-1
,[(
1
,
36
),(
2
,
36
)])
CloudsSeq002
::
(
Int
,
[(
Int
,
Int
)])
CloudsSeq002
=
(
-2
,[(
3
,
36
),(
4
,
36
)])
CloudsSequences
::
[(
Int
,
[(
Int
,
Int
)])]
CloudsSequences
=
[
CloudsSeq001
,
CloudsSeq002
]
\ No newline at end of file
ObjectIO/Game Examples/Charlie/COIN.WAV
0 → 100644
View file @
8fb27ad6
File added
ObjectIO/Game Examples/Charlie/CRATE.WAV
0 → 100644
View file @
8fb27ad6
File added
ObjectIO/Game Examples/Charlie/Charlie.icl
0 → 100644
View file @
8fb27ad6
This diff is collapsed.
Click to expand it.
ObjectIO/Game Examples/Charlie/Charlie.mid
0 → 100644
View file @
8fb27ad6
File added
ObjectIO/Game Examples/Charlie/DEFAULT.PAL
0 → 100644
View file @
8fb27ad6
File added
ObjectIO/Game Examples/Charlie/ENDING.BMP
0 → 100644
View file @
8fb27ad6
22 Bytes
ObjectIO/Game Examples/Charlie/ENDING.dcl
0 → 100644
View file @
8fb27ad6
definition
module
ENDING
import
StdEnv
,
StdGameDef
EndingBitmap
::
GameBitmap
EndingMap
::
[{#
Int
}]
EndingSeq001
::
(
Int
,
[(
Int
,
Int
)])
EndingSequences
::
[(
Int
,
[(
Int
,
Int
)])]
Prev
1
2
3
4
Next
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment