Firelights: Character approaches and starting world map.
This commit is contained in:
parent
03cb4609eb
commit
02d36190c2
@ -0,0 +1,3 @@
|
||||
accessing
|
||||
name
|
||||
^ name
|
@ -0,0 +1,3 @@
|
||||
accessing
|
||||
patient
|
||||
^ self approaches at: 'Patient'
|
@ -0,0 +1,10 @@
|
||||
accessing
|
||||
printOn: aStream
|
||||
super initialize.
|
||||
aStream
|
||||
nextPutAll: '- Name: ', self name; cr;
|
||||
nextPutAll: '- Pronouns: ', self pronouns; cr;
|
||||
nextPutAll: '- Approaches'; cr;
|
||||
nextPutAll: ' - Strong: ', self strong asString; cr;
|
||||
nextPutAll: ' - Patient: ', self patient asString; cr;
|
||||
nextPutAll: ' - Quick: ', self quick asString; cr
|
@ -0,0 +1,3 @@
|
||||
accessing
|
||||
pronouns
|
||||
^ pronouns
|
@ -0,0 +1,3 @@
|
||||
as yet unclassified
|
||||
quick: anInteger
|
||||
self approaches at: 'Quick' put: anInteger.
|
@ -0,0 +1,3 @@
|
||||
accessing
|
||||
quick
|
||||
^ self approaches at: 'Quick'
|
@ -0,0 +1,3 @@
|
||||
accessing
|
||||
strong
|
||||
^ self approaches at: 'Strong'
|
@ -0,0 +1,6 @@
|
||||
accessing
|
||||
uiViewFor: aView
|
||||
<gtView>
|
||||
^ aView text
|
||||
title: 'Character Info';
|
||||
text: [ self printString ]
|
3
RoloLudo.package/FirelightsGame.class/instance/deck.st
Normal file
3
RoloLudo.package/FirelightsGame.class/instance/deck.st
Normal file
@ -0,0 +1,3 @@
|
||||
accessing
|
||||
deck
|
||||
^ deck ifNil: [ deck := DeckOfCards initialize]
|
@ -0,0 +1,3 @@
|
||||
accessing
|
||||
worldMap
|
||||
^ wordMap ifNil: [ wordMap := OrderedCollection new ]
|
@ -0,0 +1,6 @@
|
||||
accessing
|
||||
worldMapDraw
|
||||
| currentPlace |
|
||||
currentPlace := self deck draw.
|
||||
self worldMap add: currentPlace.
|
||||
^ currentPlace
|
Loading…
Reference in New Issue
Block a user