Skip to main content
guest
Join
|
Help
|
Sign In
Liberty BASIC Community Wiki
Home
guest
|
Join
|
Help
|
Sign In
Wiki Home
Recent Changes
Pages and Files
Members
Home
Liberty BASIC FAQ
Contests
Tutorials
Science
Shared Code
Tips
DLLs
PublicDomainSprites
Member Pages
Links
Sandbox
DBS pacman
Edit
0
1
…
0
Tags
No tags
Notify
RSS
Backlinks
Source
Print
Export (PDF)
''============================ BEGIN SPRITE DRAW CODE
call clear 64 , 64
call save "empty"
call boxfil 25 , 25 , 64 - 25 , 64 - 25 , blue , black
call save "pil"
call boxfil 10 , 10 , 54 , 54 , cyan , black
call save "super"
call boxfil 0 , 0 , 64 , 64 , gray , black
darkgray = mix( gray , .5 , black )
call drawline 0 , 8 , 64 , 8 , 5 , drakgray , black
call drawline 0 , 56 , 64 , 56 , 5 , darkgray , black
call drawline 32 , 0 , 32 , 8 , 5 , darkgray , black
call drawline 32 , 56 , 32 , 64 , 5 , darkgray , black
call drawline 8 , 8 , 8 , 56 , 5 , darkkgray , black
call drawline 56 , 8 , 56 , 56 , 5 , darkgray , black
call save "wall"
call clear 64 , 64
call elipsefil 31 , 31 , 20 , 20 , red , black
call save "warning"
call elipsefil 16 , 31 , 10 , 10 , white , black
call elipsefil 16 , 31 , 6 , 6 , black , black
call elipsefil 64 - 16 , 31 , 10 , 10 , white , black
call elipsefil 64 - 16 , 31 , 6 , 6 , black , black
call save "hunt"
call clear 64 , 64
call elipsefil 31 , 31 , 20 , 20 , green , black
call save "caught"
call elipsefil 16 , 31 , 10 , 10 , white , black
call elipsefil 16 , 31 , 6 , 6 , black , black
call elipsefil 64 - 16 , 31 , 10 , 10 , white , black
call elipsefil 64 - 16 , 31 , 6 , 6 , black , black
call save "flee"
call clear 64 , 64
call elipsefil 31 , 31 , 25 , 25 , yellow , black
call elipsefil 16 , 31 , 10 , 10 , white , black
call elipsefil 16 , 31 , 6 , 6 , black , black
call elipsefil 64 - 16 , 31 , 10 , 10 , white , black
call elipsefil 64 - 16 , 31 , 6 , 6 , black , black
call save "hunt"
''=========================== END SPRITE DRAW CODE
Javascript Required
You need to enable Javascript in your browser to edit pages.
help on how to format text
Turn off "Getting Started"
Home
...
Loading...
call clear 64 , 64
call save "empty"
call boxfil 25 , 25 , 64 - 25 , 64 - 25 , blue , black
call save "pil"
call boxfil 10 , 10 , 54 , 54 , cyan , black
call save "super"
call boxfil 0 , 0 , 64 , 64 , gray , black
darkgray = mix( gray , .5 , black )
call drawline 0 , 8 , 64 , 8 , 5 , drakgray , black
call drawline 0 , 56 , 64 , 56 , 5 , darkgray , black
call drawline 32 , 0 , 32 , 8 , 5 , darkgray , black
call drawline 32 , 56 , 32 , 64 , 5 , darkgray , black
call drawline 8 , 8 , 8 , 56 , 5 , darkkgray , black
call drawline 56 , 8 , 56 , 56 , 5 , darkgray , black
call save "wall"
call clear 64 , 64
call elipsefil 31 , 31 , 20 , 20 , red , black
call save "warning"
call elipsefil 16 , 31 , 10 , 10 , white , black
call elipsefil 16 , 31 , 6 , 6 , black , black
call elipsefil 64 - 16 , 31 , 10 , 10 , white , black
call elipsefil 64 - 16 , 31 , 6 , 6 , black , black
call save "hunt"
call clear 64 , 64
call elipsefil 31 , 31 , 20 , 20 , green , black
call save "caught"
call elipsefil 16 , 31 , 10 , 10 , white , black
call elipsefil 16 , 31 , 6 , 6 , black , black
call elipsefil 64 - 16 , 31 , 10 , 10 , white , black
call elipsefil 64 - 16 , 31 , 6 , 6 , black , black
call save "flee"
call clear 64 , 64
call elipsefil 31 , 31 , 25 , 25 , yellow , black
call elipsefil 16 , 31 , 10 , 10 , white , black
call elipsefil 16 , 31 , 6 , 6 , black , black
call elipsefil 64 - 16 , 31 , 10 , 10 , white , black
call elipsefil 64 - 16 , 31 , 6 , 6 , black , black
call save "hunt"
''=========================== END SPRITE DRAW CODE