|
Development Forum |
 |
|

Malkin
     Manager

|
4/6/2012 | |
Looking at the powerups, I came across a weird message.
What does "mesg wrt+ ownr 12345 40 5 0' mean? How would I go about finding out? The tools send a message to the norns, but how can I find out what that message is?
scrp 2 24 4 1
targ from
doif fmly = 4 and gnus = 1
targ ownr
mesg wrt+ ownr 12345 40 5 0
endi
targ ownr
endm
|
My TCR Norns |
 Prodigal Sock
Ghosthande
    

|
4/6/2012 | |
According to the CAOS Documentation:
MESG WRT+ (command) agent (agent) message_id (integer) param_1 (anything) param_2 (anything) delay (integer)
Send a message with parameters to another agent. Waits delay ticks before sending the message. The message_id is from the table of Message Numbers.
So it's sending a message to OWNR with an id of 12345 with parameters of 40 and 5, and no delay.
 |

Malkin
     Manager

|
4/6/2012 | |
How would I go about finding what the message is?
I assume I'm looking for something that's like
scrp 4 0 0 12345, yes?
My TCR Norns |
 Peppery One
Papriko
    
|
4/7/2012 | |
Why 4 0 0 12345? The script from your initial post had the ID 2 24 4 1. OWNR returns the agent that initially executed the script (the owner), so OWNR has the classifier 2 24 4 in this case.
The second script you are looking for would be 2 24 4 12345.
Lets play plants! Photosynthesis... Photosynthesis... Photosynthesis... |
 Sanely Insane
RisenAngel
     Manager

|
4/7/2012 | |
The script you're looking for isn't in the same .cos file as the Pick-Ups. It's in the .cos file named "stars and pickup panel."
~ The Realm ~
Risen Angel's Creatures Blog
|

Malkin
     Manager

|
4/7/2012 | |
Thanks for pointing out the cos file, Grendel Man, that would have taken me ages to find on my own! 
It doesn't appear that the pickups stimulate the norn at all? :/
scrp 2 0 0 12345
* explode any object into stars!!!!
* _p1_ number of stars
* _p2_ intensity of blast (between 1 and 5)
inst
snde "pkup"
setv va00 posx
setv va01 post
reps _p1_
setv va02 rand 0 3
mulv va02 10
new: simp 1 1 46 "andtheworldexplodedintostars" 5 40 9000
doif tmvt va00 va01 <> 1
kill targ
stop
endi
mvto va00 va01
doif _p2_ eq 1
setv vely rand -5 -15
setv velx rand -5 5
elif _p2_ eq 2
setv vely rand -10 -25
setv velx rand -10 10
elif _p2_ eq 3
setv vely rand -15 -35
setv velx rand -20 20
elif _p2_ eq 4
setv vely rand -25 -40
setv velx rand -30 30
elif _p2_ eq 5
setv vely rand -35 -55
setv velx rand -40 40
else
dbg: outs "stars got an invalid intensity!"
setv vely rand -20 -30
setv velx rand -30 30
endi
attr 192
accg 8
elas 40
pose rand 0 4
tick rand 30 40
repe
targ ownr
*run if ownr is a pick-up
doif fmly = 2 and gnus = 24 and spcs = 4
setv va01 ov01
doif va01 <= 4
sets va44 read "Pick-ups" va01
adds va44 read "Pick-ups" 0
enum 1 1 91
doif ov00 = va01
setv va66 ov02
mesg writ targ 1000
endi
next
addv va66 25
doif va01 = 4
setv va66 100
endi
adds va44 vtos va66
adds va44 "% "
adds va44 read "Pick-ups" 5
elif va01 = 7
*grendel + ettin selection
setv game "Grettin" 1
* now we can have more Norns, as we're not
* worried about a large number of Norns stopping
* there being any Grendels and Ettins
setv game "c3_max_norns" 14
sets va44 read "Pick-ups" va01
elif va01 = 8
*free movement
sets va44 read "Pick-ups" va01
elif va01 = 9
*norn pick-up
setv game "engine_creature_pickup_status" 3
rgam
sets va44 read "Pick-ups" va01
endi
*create the pick-up message box
* doif totl 1 2 22 > 0
* enum 1 2 22
* kill targ
* next
* endi
inst
doif totl 1 2 22 > 0
enum 1 2 22
kill targ
next
endi
new: comp 1 2 22 "pick-ups2" 6 24 8500
pat: dull 1 "pick-ups2" 24 30 80 0
part 1
pose va01
doif va01 = 4
pose 10
endi
attr 308
clac 0
pat: fixd 2 "pick-ups2" 28 110 60 0 "WhiteOnTransparentChars"
part 2
ptxt va44
pat: butt 3 "pick-ups2" 29 2 295 19 0 [] 2002 0
part 3
anim [0]
part 0
setv va50 wndw
setv va51 wndh
divv va50 2
subv va50 150
divv va51 2
subv va51 70
flto va50 va51
tick 120
kill ownr
endi
endm
|
My TCR Norns |
 Prodigal Sock
Ghosthande
    

|
4/7/2012 | |
Yeah I don't see any STIMs or anything. Which is silly--since, if we're talking about the same object here, Norns have instincts that tell them to seek out pick-ups.
 |