Commit 8a2c7927 authored by cvs2snv's avatar cvs2snv
Browse files

This commit was manufactured by cvs2svn to create branch 'rankn'.

parent ce9d0bec
Pipeline #18961 failed with stages
in 16 seconds

Too many changes to show.

To preserve performance only 1000 of 1000+ files are displayed.
definition module BEES
import StdEnv, StdGameDef
BeesBitmap :: GameBitmap
BeesMap :: [{#Int}]
BeesSeq001 :: (Int, [(Int, Int)])
BeesSequences :: [(Int, [(Int, Int)])]
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
@echo off
if (%2)==() goto error
..\bin\makedx %1
..\bin\map2icl %1 %2
copy %1.bmp ..
del %1.bmp
copy %1.dcl ..
del %1.dcl
copy %1.icl ..
del %1.icl
goto end
:error
echo usage: conv levelfile identifier
:end
@..\bin\edlev %1 %2 %3 %4
\ No newline at end of file
@..\bin\gred %1 %2 %3 %4
\ No newline at end of file
definition module CH
import StdEnv, StdGameDef
MainCharBitmap :: GameBitmap
MainCharMap :: [{#Int}]
MainCharSeq001 :: (Int, [(Int, Int)])
MainCharSequences :: [(Int, [(Int, Int)])]
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
definition module CLOUDS
import StdEnv, StdGameDef
CloudsBitmap :: GameBitmap
CloudsMap :: [{#Int}]
CloudsSeq001 :: (Int, [(Int, Int)])
CloudsSeq002 :: (Int, [(Int, Int)])
CloudsSequences :: [(Int, [(Int, Int)])]
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
This diff is collapsed.
definition module ENDING
import StdEnv, StdGameDef
EndingBitmap :: GameBitmap
EndingMap :: [{#Int}]
EndingSeq001 :: (Int, [(Int, Int)])
EndingSequences :: [(Int, [(Int, Int)])]
implementation module ENDING
import StdEnv, StdGameDef
EndingBitmap :: GameBitmap
EndingBitmap
= { bitmapname = "ENDING.BMP"
, unitsize = { w = 32, h = 26 }
, dimensions = (10, 1)
, transparent = Just { x = 287, y = 25 }
}
EndingMap :: [{#Int}]
EndingMap = [{1,2,3,4,5,6,7,8,9},
{-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}]
EndingSeq001 :: (Int, [(Int, Int)])
EndingSeq001 = (-1,[])
EndingSequences :: [(Int, [(Int, Int)])]
EndingSequences = [EndingSeq001]
\ No newline at end of file
definition module ENEMY
import StdEnv, StdGameDef
EnemyBitmap :: GameBitmap
EnemyMap :: [{#Int}]
EnemySeq001 :: (Int, [(Int, Int)])
EnemySequences :: [(Int, [(Int, Int)])]
implementation module ENEMY
import StdEnv, StdGameDef
EnemyBitmap :: GameBitmap
EnemyBitmap
= { bitmapname = "ENEMY.BMP"
, unitsize = { w = 24, h = 18 }
, dimensions = (13, 1)
, transparent = Just { x = 215, y = 17 }
}
EnemyMap :: [{#Int}]
EnemyMap = [{1,2,3,4,-1,-1},
{5,6,7,8,9,-1},
{-1,-1,-1,-1,-1,-1},
{-1,-1,-1,-1,-1,-1},
{-1,-1,-1,-1,-1,-1}]
EnemySeq001 :: (Int, [(Int, Int)])
EnemySeq001 = (-1,[])
EnemySequences :: [(Int, [(Int, Int)])]
EnemySequences = [EnemySeq001]
\ No newline at end of file
definition module FROGS
import StdEnv, StdGameDef
FrogsBitmap :: GameBitmap
FrogsMap :: [{#Int}]
FrogsSeq001 :: (Int, [(Int, Int)])
FrogsSequences :: [(Int, [(Int, Int)])]
implementation module FROGS
import StdEnv, StdGameDef
FrogsBitmap :: GameBitmap
FrogsBitmap
= { bitmapname = "FROGS.BMP"
, unitsize = { w = 20, h = 24 }
, dimensions = (16, 1)
, transparent = Just { x = 139, y = 23 }
}
FrogsMap :: [{#Int}]
FrogsMap = [{1,2,3,4,-1},
{5,6,-1,-1,-1},
{-1,-1,-1,7,-1},
{-1,-1,-1,-1,-1}]
FrogsSeq001 :: (Int, [(Int, Int)])
FrogsSeq001 = (-1,[])
FrogsSequences :: [(Int, [(Int, Int)])]
FrogsSequences = [FrogsSeq001]
\ No newline at end of file
definition module INFRONT
import StdEnv, StdGameDef
InFrontBitmap :: GameBitmap
InFrontMap :: [{#Int}]
InFrontSeq001 :: (Int, [(Int, Int)])
InFrontSequences :: [(Int, [(Int, Int)])]
implementation module INFRONT
import StdEnv, StdGameDef
InFrontBitmap :: GameBitmap
InFrontBitmap
= { bitmapname = "INFRONT.BMP"
, unitsize = { w = 20, h = 16 }
, dimensions = (16, 1)
, transparent = Just { x = 59, y = 15 }
}
InFrontMap :: [{#Int}]
InFrontMap = [{1,2,3,-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}]
InFrontSeq001 :: (Int, [(Int, Int)])
InFrontSeq001 = (-1,[])
InFrontSequences :: [(Int, [(Int, Int)])]
InFrontSequences = [InFrontSeq001]
\ No newline at end of file
definition module L1
import StdEnv, StdGameDef
Level1Bitmap :: GameBitmap
Level1Map :: [{#Int}]
Level1Bounds :: [{#Int}]
Level1Seq001 :: (Int, [(Int, Int)])
Level1Sequences :: [(Int, [(Int, Int)])]
This diff is collapsed.
definition module L2
import StdEnv, StdGameDef
Level2Bitmap :: GameBitmap
Level2Map :: [{#Int}]
Level2Bounds :: [{#Int}]
Level2Seq001 :: (Int, [(Int, Int)])
Level2Sequences :: [(Int, [(Int, Int)])]
This diff is collapsed.
PPPPPPPPPPPPPPPPPPPPQQPPPPQQPPPPPQQQPPPPQQPPPPQQQQQQQRRRRRQQPPQRRRRRQQQQSSSRRRSSPPRRRRRRTTTTSSSRRRTTPPRRSSTTTTTTTTTTTTTTPPRRSSTTTTTTTTTTSSSSPPRRSSTTTTTTTTTTTSSSPPRRSSSSSSSSTTTTTSSSPPRRSSSSSSSSTTTTTSSSPPRRSSSSRRRRSSSSSSSRPPRRSSSSRRRRSSSSSSSRPPRRSSSSRRRRRRRRRRRRPPQQRRRRRRQQQQQQQRRRPPPPPPQRRRQQPPPPPQQQPPPPPPPPPPPPPPPPPPPP
\ No newline at end of file
PPPPPPPPPPPPPPPPPPPPQQPPPPQQPPPPPQQQPPPPQQPPPPQQQQQQQRRRQQPPUUSSSSSSQQQQQSSSQQPPUUSSSSSSUTTTTSSSRRRPTUUUUUUUUTTTTSSRRQQPSTTUUUUTTTTTSRRRRRRPSTTTTTTTTTTTSRRRRQQPSTTTTTTTSSSSSRRRRQQPSSSSSSSSSSSSSSSRRQQPRRSSSSSSSSSSSSSRRRRPRRRRRRSSSRRSSSSRRRRPRRRRRRRRRRRRRRRRRQQPRRRQQQQQQQQQQRRRRQQPQRQQQPPPPPPQQQQQQPPPPPPPPPPPPPPPPPPPPPPP
\ No newline at end of file
PPPPPPPPPPPPPPPPPPPPQQPPPPQQPPPPPQQQPPPPQQPPPPQQQQQQQQSSSQQQRRQQQQRRRRQQQQSSSSVVRRRRRSSSRRVVVSSSSSVVRRTTUSSSVVVVVVVVVVVVRRTTUUVVVVVVVVVVUUUURRTTUUVVVVVVVVVVVUUURRTTUUUUUUUUVVVVVUUURRTTUUUUUUUUVVVVVUUURRTTUUUUTTTTUUUUUUUTRRTTUUUUTTTTUUUUUUUTRRTTUUUUTTTTTTTTTTTTRRSSTTTTTTSSSSSSSTTTRRRRRRSTTTSSRRRRRSSSRRRRRRRRRRRRRRRRRRRR
\ No newline at end of file
PPPPPPPPPPPPPPPPPPPPQQPPPPQQPPPPPQQRPPPPQRRPPPQQQQQRRSSRRRQQWRRSSSRRQQQRRSSSRRRRWWSSSSRRRVVVVSSSSSRRVWWWWWWWWVVVVUUTTSSRUVVWWWWVVVVVUTTTTTTRUVVVVVVVVVVVUTTTTSSRUVVVVVVVUUUUUTTTTSSRUUUUUUUUUUUUUUUTTSSRTTUUUUUUUUUUUUUTTTTRTTTTTTUUUTTUUUUTTTTRTTTTTTTTTTTTTTTTTSSRTTTSSSSSSSSSSTTTTSSRSTSSSRRRRRRSSSSSSRRRRRRRRRRRRRRRRRRRRRRR
\ No newline at end of file
@echo off
if (%2)==() goto error
..\bin\makedx %1
..\bin\map2icl %1 %2
copy %1.bmp ..\*.bmp
del %1.bmp
copy %1.dcl ..\*.dcl
del %1.dcl
copy %1.icl ..\*.icl
del %1.icl
if exist %1.lev del %1.lev
if exist %1.seq del %1.seq
goto end
:error
echo usage: conv levelfile identifier
:end
PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPRRSSSSSSSSRRRRRRPPPPRRSSSSSSSSRRRRRRPPPPQQRRRRRRRRRRRRRRPPPPQQRRRRRRRRRRRRRRPPPPQQRRRRRRRRRRQQQQPPPPQQRRRRRRRRRRRQQQPPPPQQQQQQQQRRRRRQQQPPPPQQQQQQQQRRRRRQQQPPPPQQQQPPPPQQQQQQQPPPPPQQQQPPPPQQQQQQQPPPPPQQQQPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP
\ No newline at end of file
PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPRRRRRRRRRRRRRRRQQPPPSSSSSSSSSRRRRQQPPPPPSSSSSSSSSRRRRQQPPPPPRSSSSSSSSRRRRQQPPPPPQRRSSSSRRRRRQPPPPPPPQRRRRRRRRRRRQPPPPPPPQRRRRRRRQQQQQPPPPPPPQQQQQQQQQQQQQQQPPPPPPPQQQQQQQQQQQQQPPPPPPPPPPPQQQPPQQQQPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP
\ No newline at end of file
@..\bin\edlev %1 %2 %3 %4
\ No newline at end of file
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment