Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - OmerMor

Pages: 1 ... 25 26 [27] 28 29 ... 31
391
There are a couple of sites out there that host examples of this.

Here's one site with tons of oddities from Sierra and Lucasarts games:
http://home.comcast.net/~ervind/

392
Questionnaire has been updated with more questions -- twenty now -- and a skip cheat.

One of these games is not like the others. One of these games just doesn't belong.
A. Space Quest Ⅲ The Pirates of Pestulon
B. Freddy Pharkas Frontier Pharmacist
C. Monkey Island Ⅱ LeChuck's Revenge
D. King's Quest Ⅴ Absence Makes the Heart Go Yonder


The answer is (A) Space Quest 3.
Because it's the only game (beside Monkey Island 2) that involves pirates.
 :P

393
The Games and other Sierra Adventure stuff / Re: Fonts
« on: July 05, 2015, 04:04:53 PM »
Here's a humble start:
http://sciwiki.sierrahelp.com//index.php?title=Fonts

I'll add more later - but all of you can join the party... :-)

394
The Games and other Sierra Adventure stuff / Re: Fonts
« on: July 03, 2015, 10:04:11 AM »
Related note to troflip:
SCI Companion previews only a part of the font's character set. SV on the other hand shows the entire character set.
I know you can open the font for editing in SCI Companion and see all the characters, but for easier browsing, can you please show the complete fonts?

395
The Games and other Sierra Adventure stuff / Re: Fonts
« on: July 03, 2015, 10:00:24 AM »
Great initiative!

We should probably use the international versions of the games for a more complete character sets.
Other than the ones you mentioned here, there are many more. Maybe the wiki would be a better place to start a more comprehensive list? (Just noticed the wiki is down ATM)

396
SCI Syntax Help / Re: Errors in template game file open flags
« on: June 24, 2015, 03:02:33 PM »
You can deprecate both, and introduce new constants (e.g fOPEN_CREATE instead of fOPENCREATE). This will introduce a compilation error for anyone using these, and would force them to reevaluate their usage.

397
Or better yet: you've worked with AGDI. Won't they give you access to their graphic resources?

398
SCI Development Tools / Re: SCI1.1 Tempo Change commands?
« on: June 20, 2015, 12:46:34 AM »
Maybe it's the same issue as the pan and volume initialization, i.e. that you have to initialize them by setting them at the start of the midi in a strict order.
Try changing the tempo at the start, and also see if this also reproduce in ScummVm which is not as strict as Sierra's SCI.

399
SCI Syntax Help / Re: SCI1.1 Code Disambiguation
« on: June 17, 2015, 03:20:49 PM »
I just can't figure out what param13 represents, it's only used in the Graph(grFILL_BOX) command but it seems to take different values from SCI0's version of the command (it takes 7 values instead of SCI0's 8 )

Looking in scummvm, there seem to be a single implementation for SCI0 - SCI1.1, which takes 8 parameters, and they are:
0-3: rect
4: colorMark
5: color
6: priority
7: control

Code: [Select]
reg_t kGraphFillBoxAny(EngineState *s, int argc, reg_t *argv) {
Common::Rect rect = getGraphRect(argv);
int16 colorMask = argv[4].toUint16();
int16 color = adjustGraphColor(argv[5].toSint16());
int16 priority = argv[6].toSint16(); // yes, we may read from stack sometimes here
int16 control = argv[7].toSint16(); // sierra did the same

g_sci->_gfxPaint16->kernelGraphFillBox(rect, colorMask, color, priority, control);
return s->r_acc;
}

400
SCI Syntax Help / Re: SCI1.1 Picture transition speeds?
« on: June 17, 2015, 10:46:42 AM »
Nice!
Why don't you rename the parameters to something more meaningful than param#, e.g. pCallback?

401
SCI Development Tools / Re: Sound weirdness
« on: June 09, 2015, 08:39:01 AM »
Maybe there's a more general problem with un-initialized midi properties?
Have you checked how other midi events such as expression, portamento, breath, etc. are treated if no initialized at 0 time?

402
I see.
Thanks for addressing this so quickly!

403
Another example:
Hoyle's volume 3, 301.SCR.
Decompilation log:
Quote
Decompiling script 301
Restructured branches in BGPlayer_generateBoards
WARNING:  BGPlayer::handleEvent: Analyzing control flow: Unable to insert if node. Exit needs to predecessors.: 1 at 05d2
Falling back to disassembly for handleEvent
WARNING:  BGPlayer::dieMove: Analyzing control flow: Unable to insert if node. Exit needs to predecessors.: 1 at 079b
Falling back to disassembly for dieMove
Decompiled 25 of 27 functions successfully (92%).
Overall bytecount success rate: 90%.
Fell back to assembly for the remaining functions.

404
Decompiler bug:
there are some scripts that the decompiler fails on, and doesn't even manage to fallback to disassembly. I do manage to manually disassemble them by checking the "Disassemble only" check-box.

Example:
The Castle of Dr. Brain (all versions), 325.SCR.
Decompilation log:
Quote
Decompiling script 325
Decompiled 2 of 2 functions successfully (100%).
Overall bytecount success rate: 100%.

It seems like it was succesfull, but it actually wasn't. During decompilation it seemed to spend lots of time doing this:
Quote
word::dispatchEvent: Analyzing control flow Switch:0189

Disassembled script:
Code: [Select]
(version 2)
(include "sci.sh")
(exports
    0 word
)
(use "Main")
(use "dummyClient")
(use "PuzzleIcon")
(use "Class_255_0")
(use "n958")
(use "SysWindow")
(use "Sound")
(use "Obj")
(script 325)

(local
    local0[10] = (49 10 43 30 40 50 60 52 21 43 )
    local10[10] = (1 4 11 14 3 1 5 0 7 11 )
    local20[30] = (325 0 325 1 325 2 325 3 325 4 325 5 325 6 325 7 325 8 325 9 325 10 325 11 325 12 325 13 325 14 )
    local50[225]
    local275
    local276
    local277
    local278[100] = (9 3 0 12 12 14 5 14 3 3 12 12 5 0 13 0 6 10 6 2 3 12 9 12 9 9 14 4 13 14 13 7 7 5 7 9 9 6 9 13 2 12 2 6 1 13 1 6 1 2 1 5 4 6 4 1 13 13 8 13 14 12 14 3 2 2 2 6 10 7 5 12 4 13 4 9 7 3 7 0 9 4 14 4 8 1 3 6 8 5 13 0 13 1 8 1 0 3 0 11 )
    local378[44] = (0 14 4 14 6 5 6 2 10 3 13 3 11 2 8 2 12 6 12 11 4 0 0 0 5 11 5 8 11 8 9 10 10 5 13 5 8 3 8 5 1 7 4 7 )
    local422
    local423[16]
    local439[16] = (-1 1 2 4 8 16 32 64 128 256 512 1024 2048 4096 8192 16384 )
    local455
    local456 =     -1
    local457
    local458
    local459 =     -1
    local460 =     -100
    local461 =     -100
    local462

)
(procedure (localproc_0a0a param1 param2 param3 param4 param5)
    (var temp0, temp1, temp2, temp3)
    (asm
        pushi   9
        pushi   11
        pushi   22
        lsp     param3
        ldi     9
        mul     
        add     
        sat     temp0
        push   
        pushi   4
        lsp     param2
        ldi     11
        mul     
        add     
        sat     temp2
        push   
        lst     temp0
        ldi     8
        add     
        sat     temp1
        push   
        lst     temp2
        ldi     10
        add     
        sat     temp3
        push   
        pushi   1
        lsp     param4
        pushi   65535
        dup     
        callk   Graph, 18
        pushi   6
        pushi   12
        lst     temp0
        lst     temp2
        lst     temp1
        lst     temp3
        pushi   1
        callk   Graph, 12
        pushi   8
        lap     param1
        lea     @local50
        push   
        pushi   100
        pushi   5
        lsp     param2
        ldi     11
        mul     
        add     
        push   
        pushi   23
        lsp     param3
        ldi     9
        mul     
        add     
        push   
        pushi   105
        pushi   999
        pushi   102
        lsp     param5
        callk   Display, 16
        ret     
    )
)


(procedure (localproc_0a78 param1 param2 param3 param4)
    (asm
        pushi   2
        lsp     param1
        lsp     param2
        call    localproc_0a9e, 4
        bnt     code_0a9d
        pushi   1
        lsp     param1
        call    localproc_0c8a, 2
        push   
        lap     param3
        eq?     
        bnt     code_0a9d
        pushi   1
        lsp     param2
        call    localproc_0c8a, 2
        push   
        lap     param4
        eq?     
code_0a9d:ret     
    )
)


(procedure (localproc_0a9e param1 param2)
    (asm
        lsp     param1
        ldi     0
        eq?     
        push   
        lsp     param2
        ldi     0
        eq?     
        xor     
        bt      code_0abb
        pushi   1
        lsp     param1
        callk   Abs, 2
        push   
        pushi   1
        lsp     param2
        callk   Abs, 2
        eq?     
code_0abb:ret     
    )
)


(procedure (localproc_0abc)
    (var temp0, temp1)
    (asm
        ldi     0
        sat     temp0
code_0ac2:lst     temp0
        ldi     15
        lt?     
        bnt     code_0b0e
        ldi     0
        sat     temp1
code_0ace:lst     temp1
        ldi     15
        lt?     
        bnt     code_0b09
        lat     temp0
        lsli    local423
        lst     temp1
        ldi     1
        add     
        lali    local439
        and     
        not     
        bnt     code_0b04
        pushi   5
        lst     temp0
        ldi     15
        mul     
        push   
        lat     temp1
        add     
        push   
        lst     temp1
        lst     temp0
        ldi     2
        lsli    local0
        ldi     1
        lsli    local0
        call    localproc_0a0a, 10
code_0b04:+at     temp1
        jmp     code_0ace
code_0b09:+at     temp0
        jmp     code_0ac2
code_0b0e:ret     
    )
)


(procedure (localproc_0bc4)
    (var temp0[200])
    (asm
        lsl     local422
        ldi     1
        eq?     
        bnt     code_0be7
        pushi   7
        pushi   325
        pushi   19
        pushi   67
        pushi   65
        pushi   6
        pushi   25
        pushi   3
        calle   proc255_0, 14
        jmp     code_0c26
code_0be7:lsl     local422
        lal     local455
        ge?     
        bnt     code_0bfd
        pushi   1
        lofsa   sPlaySounds
        push   
        calle   proc5_15, 2
        jmp     code_0c26
code_0bfd:pushi   5
        lea     @temp0
        push   
        pushi   325
        pushi   20
        lsl     local422
        lsl     local455
        lal     local422
        sub     
        push   
        callk   Format, 10
        pushi   4
        lea     @temp0
        push   
        pushi   67
        pushi   65
        pushi   6
        calle   proc255_0, 8
code_0c26:ret     
    )
)


(procedure (localproc_0c27)
    (asm
        pushi   2
        pushi   325
        pushi   21
        calle   proc5_9, 4
        pushi   2
        pushi   325
        pushi   22
        calle   proc5_9, 4
        pushi   2
        pushi   325
        pushi   23
        calle   proc5_9, 4
        lsg     global114
        dup     
        ldi     0
        eq?     
        bnt     code_0c60
        pushi   2
        pushi   325
        pushi   24
        calle   proc5_9, 4
        ldi     18
        sal     local455
        jmp     code_0c88
code_0c60:dup     
        ldi     1
        eq?     
        bnt     code_0c79
        ldi     22
        sal     local455
        pushi   2
        pushi   325
        pushi   25
        calle   proc5_9, 4
        jmp     code_0c88
code_0c79:ldi     25
        sal     local455
        pushi   2
        pushi   325
        pushi   26
        calle   proc5_9, 4
code_0c88:toss   
        ret     
    )
)


(procedure (localproc_0c8a param1)
    (asm
        lsp     param1
        ldi     0
        eq?     
        bnt     code_0c97
        ldi     0
        jmp     code_0ca1
code_0c97:pushi   1
        lsp     param1
        callk   Abs, 2
        push   
        lap     param1
        div     
code_0ca1:ret     
    )
)


(procedure (localproc_0ca2 param1 param2 param3 param4 param5)
    (var temp0, temp1, temp2, temp3, temp4[4], temp8, temp9, temp10, temp11[100])
    (asm
        pushi   0
        lap     param1
        le?     
        bnt     code_0cd9
        pprev   
        ldi     14
        le?     
        bnt     code_0cd9
        pushi   0
        lap     param3
        le?     
        bnt     code_0cd9
        pprev   
        ldi     14
        le?     
        bnt     code_0cd9
        pushi   0
        lap     param2
        le?     
        bnt     code_0cd9
        pprev   
        ldi     14
        le?     
        bnt     code_0cd9
        pushi   0
        lap     param4
        le?     
        bnt     code_0cd9
        pprev   
        ldi     14
        le?     
code_0cd9:not     
        bnt     code_0ce3
        pushi   0
        call    localproc_0abc, 0
        ret     
code_0ce3:pushi   1
        lsp     param3
        lap     param1
        sub     
        push   
        call    localproc_0c8a, 2
        sat     temp0
        pushi   1
        lsp     param4
        lap     param2
        sub     
        push   
        call    localproc_0c8a, 2
        sat     temp1
        lat     temp0
        bnt     code_0d46
        lat     temp1
        bnt     code_0d46
        pushi   2
        pushi   1
        lsp     param3
        lap     param1
        sub     
        push   
        callk   Abs, 2
        push   
        pushi   1
        lsp     param4
        lap     param2
        sub     
        push   
        callk   Abs, 2
        push   
        calle   proc999_3, 4
        sat     temp10
        lsp     param3
        lsp     param1
        push   
        lat     temp0
        mul     
        add     
        ne?     
        bt      code_0d3e
        lsp     param4
        lsp     param2
        lst     temp10
        lat     temp1
        mul     
        add     
        ne?     
code_0d3e:bnt     code_0d46
        pushi   0
        call    localproc_0abc, 0
code_0d46:lap     param1
        sat     temp2
        lap     param2
        sat     temp3
        lsp     param5
        dup     
        ldi     1
        eq?     
        bnt     code_0d5e
        ldi     6
        lali    local0
        jmp     code_0d77
code_0d5e:dup     
        ldi     0
        eq?     
        bnt     code_0d6c
        ldi     2
        lali    local0
        jmp     code_0d77
code_0d6c:dup     
        ldi     2
        eq?     
        bnt     code_0d77
        ldi     8
        lali    local0
code_0d77:toss   
        sat     temp8
        lsp     param5
        dup     
        ldi     1
        eq?     
        bnt     code_0d8a
        ldi     5
        lali    local0
        jmp     code_0da3
code_0d8a:dup     
        ldi     0
        eq?     
        bnt     code_0d98
        ldi     1
        lali    local0
        jmp     code_0da3
code_0d98:dup     
        ldi     2
        eq?     
        bnt     code_0da3
        ldi     7
        lali    local0
code_0da3:toss   
        sat     temp9
code_0da6:lsp     param5
        ldi     2
        eq?     
        bnt     code_0ddd
        lat     temp3
        lsli    local423
        lst     temp2
        ldi     1
        add     
        lali    local439
        or     
        push   
        lat     temp3
        sali    local423
        pushi   5
        lst     temp3
        ldi     15
        mul     
        push   
        lat     temp2
        add     
        push   
        lst     temp2
        lst     temp3
        lst     temp8
        lst     temp9
        call    localproc_0a0a, 10
        jmp     code_0e48
code_0ddd:lsp     param5
        ldi     0
        eq?     
        bnt     code_0e30
        lat     temp3
        lsli    local423
        lst     temp2
        ldi     1
        add     
        lali    local439
        and     
        bnt     code_0e15
        pushi   5
        lst     temp3
        ldi     15
        mul     
        push   
        lat     temp2
        add     
        push   
        lst     temp2
        lst     temp3
        ldi     8
        lsli    local0
        ldi     7
        lsli    local0
        call    localproc_0a0a, 10
        jmp     code_0e48
code_0e15:pushi   5
        lst     temp3
        ldi     15
        mul     
        push   
        lat     temp2
        add     
        push   
        lst     temp2
        lst     temp3
        lst     temp8
        lst     temp9
        call    localproc_0a0a, 10
        jmp     code_0e48
code_0e30:pushi   5
        lst     temp3
        ldi     15
        mul     
        push   
        lat     temp2
        add     
        push   
        lst     temp2
        lst     temp3
        lst     temp8
        lst     temp9
        call    localproc_0a0a, 10
code_0e48:lst     temp2
        lap     param3
        eq?     
        bnt     code_0e55
        lst     temp3
        lap     param4
        eq?     
code_0e55:bt      code_0e69
        lst     temp2
        lat     temp0
        add     
        sat     temp2
        lst     temp3
        lat     temp1
        add     
        sat     temp3
        jmp     code_0da6
code_0e69:ret     
    )
)


(procedure (localproc_0e6a param1 param2 param3 param4)
    (var temp0, temp1)
    (asm
        ldi     0
        sat     temp0
code_0e70:lst     temp0
        ldi     25
        lt?     
        bnt     code_0f9a
        pushi   4
        lat     temp0
        mul     
        sat     temp1
        lsp     param1
        lap     param3
        eq?     
        bnt     code_0e95
        lsp     param2
        lap     param4
        eq?     
        bnt     code_0e95
        ldi     65535
        ret     
        jmp     code_0f95
code_0e95:lsp     param2
        lat     temp1
        lali    local278
        eq?     
        bnt     code_0f16
        lsp     param1
        lst     temp1
        ldi     1
        add     
        lali    local278
        eq?     
        bnt     code_0f16
        lsp     param4
        lst     temp1
        ldi     2
        add     
        lali    local278
        eq?     
        bnt     code_0f16
        lsp     param3
        lst     temp1
        ldi     3
        add     
        lali    local278
        eq?     
        bnt     code_0f16
        pushi   0
        lat     temp1
        lali    local278
        sub     
        push   
        lat     temp1
        sali    local278
        pushi   0
        lst     temp1
        ldi     1
        add     
        lali    local278
        sub     
        push   
        lst     temp1
        ldi     1
        add     
        sali    local278
        pushi   0
        lst     temp1
        ldi     2
        add     
        lali    local278
        sub     
        push   
        lst     temp1
        ldi     2
        add     
        sali    local278
        pushi   0
        lst     temp1
        ldi     3
        add     
        lali    local278
        sub     
        push   
        lst     temp1
        ldi     3
        add     
        sali    local278
        ldi     1
        ret     
        jmp     code_0f95
code_0f16:pushi   0
        lap     param2
        sub     
        push   
        lat     temp1
        lali    local278
        eq?     
        bnt     code_0f5d
        pushi   0
        lap     param1
        sub     
        push   
        lst     temp1
        ldi     1
        add     
        lali    local278
        eq?     
        bnt     code_0f5d
        pushi   0
        lap     param4
        sub     
        push   
        lst     temp1
        ldi     2
        add     
        lali    local278
        eq?     
        bnt     code_0f5d
        pushi   0
        lap     param3
        sub     
        push   
        lst     temp1
        ldi     3
        add     
        lali    local278
        eq?     
        bnt     code_0f5d
        ldi     2
        ret     
        jmp     code_0f95
code_0f5d:lsp     param2
        lat     temp1
        lali    local378
        eq?     
        bnt     code_0f95
        lsp     param1
        lst     temp1
        ldi     1
        add     
        lali    local378
        eq?     
        bnt     code_0f95
        lsp     param4
        lst     temp1
        ldi     2
        add     
        lali    local378
        eq?     
        bnt     code_0f95
        lsp     param3
        lst     temp1
        ldi     3
        add     
        lali    local378
        eq?     
        bnt     code_0f95
        ldi     3
        ret     
code_0f95:+at     temp0
        jmp     code_0e70
code_0f9a:ldi     0
        ret     
    )
)


(procedure (localproc_0f9d param1)
    (var temp0, temp1)
    (asm
        pushi   #x
        pushi   0
        lap     param1
        send    4
        sat     temp0
        pushi   #y
        pushi   0
        lap     param1
        send    4
        sat     temp1
        lal     local457
        not     
        bnt     code_0fb9
        ret     
code_0fb9:pushi   #message
        pushi   0
        lap     param1
        send    4
        push   
        dup     
        ldi     1
        eq?     
        bnt     code_0fdf
        pushi   187
        pushi   #x
        lsg     gCursorNumber
        pushi   1
        lst     temp0
        lst     temp1
        ldi     9
        sub     
        push   
        lag     gGame
        send    12
        jmp     code_1171
code_0fdf:dup     
        ldi     8
        eq?     
        bnt     code_1012
        lst     temp0
        ldi     9
        eq?     
        bt      code_0ff3
        lst     temp1
        ldi     26
        eq?     
code_0ff3:not     
        bnt     code_1171
        pushi   187
        pushi   4
        lsg     gCursorNumber
        pushi   1
        lst     temp0
        ldi     11
        sub     
        push   
        lst     temp1
        ldi     9
        sub     
        push   
        lag     gGame
        send    12
        jmp     code_1171
code_1012:dup     
        ldi     2
        eq?     
        bnt     code_1046
        lst     temp0
        ldi     163
        eq?     
        bt      code_1027
        lst     temp1
        ldi     26
        eq?     
code_1027:not     
        bnt     code_1171
        pushi   187
        pushi   4
        lsg     gCursorNumber
        pushi   1
        lst     temp0
        ldi     11
        add     
        push   
        lst     temp1
        ldi     9
        sub     
        push   
        lag     gGame
        send    12
        jmp     code_1171
code_1046:dup     
        ldi     5
        eq?     
        bnt     code_106d
        lst     temp1
        ldi     152
        ne?     
        bnt     code_1171
        pushi   187
        pushi   #x
        lsg     gCursorNumber
        pushi   1
        lst     temp0
        lst     temp1
        ldi     9
        add     
        push   
        lag     gGame
        send    12
        jmp     code_1171
code_106d:dup     
        ldi     4
        eq?     
        bnt     code_10a2
        lst     temp0
        ldi     163
        eq?     
        bt      code_1083
        lst     temp1
        ldi     152
        eq?     
code_1083:not     
        bnt     code_1171
        pushi   187
        pushi   4
        lsg     gCursorNumber
        pushi   1
        lst     temp0
        ldi     11
        add     
        push   
        lst     temp1
        ldi     9
        add     
        push   
        lag     gGame
        send    12
        jmp     code_1171
code_10a2:dup     
        ldi     6
        eq?     
        bnt     code_10d6
        lst     temp0
        ldi     9
        eq?     
        bt      code_10b7
        lst     temp1
        ldi     152
        eq?     
code_10b7:not     
        bnt     code_1171
        pushi   187
        pushi   4
        lsg     gCursorNumber
        pushi   1
        lst     temp0
        ldi     11
        sub     
        push   
        lst     temp1
        ldi     9
        add     
        push   
        lag     gGame
        send    12
        jmp     code_1171
code_10d6:dup     
        ldi     7
        eq?     
        bnt     code_1124
        lst     temp0
        ldi     9
        eq?     
        bnt     code_1105
        lst     temp1
        ldi     26
        ne?     
        bnt     code_1105
        pushi   187
        pushi   #x
        lsg     gCursorNumber
        pushi   1
        pushi   163
        lst     temp1
        ldi     9
        sub     
        push   
        lag     gGame
        send    12
        jmp     code_1171
code_1105:lst     temp0
        ldi     9
        ne?     
        bnt     code_1171
        pushi   187
        pushi   #x
        lsg     gCursorNumber
        pushi   1
        lst     temp0
        ldi     11
        sub     
        push   
        lst     temp1
        lag     gGame
        send    12
        jmp     code_1171
code_1124:dup     
        ldi     3
        eq?     
        bnt     code_1171
        lst     temp1
        ldi     152
        ne?     
        bnt     code_1154
        lst     temp0
        ldi     163
        eq?     
        bnt     code_1154
        pushi   187
        pushi   #x
        lsg     gCursorNumber
        pushi   1
        pushi   9
        lst     temp1
        ldi     9
        add     
        push   
        lag     gGame
        send    12
        jmp     code_1171
code_1154:lst     temp0
        ldi     163
        ne?     
        bnt     code_1171
        pushi   187
        pushi   #x
        lsg     gCursorNumber
        pushi   1
        lst     temp0
        ldi     11
        add     
        push   
        lst     temp1
        lag     gGame
        send    12
code_1171:toss   
        ret     
    )
)


(procedure (localproc_1173 param1)
    (var temp0, temp1)
    (asm
        pushi   #x
        pushi   0
        lap     param1
        send    4
        sat     temp0
        pushi   #y
        pushi   0
        lap     param1
        send    4
        sat     temp1
        lst     temp0
        ldi     0
        gt?     
        bnt     code_11a6
        lst     temp1
        ldi     20
        gt?     
        bnt     code_11a6
        lst     temp0
        ldi     168
        lt?     
        bnt     code_11a6
        lst     temp1
        ldi     161
        lt?     
code_11a6:ret     
    )
)

(instance public word of PuzzleBar
    (properties
        puzzleHeight 169
        bottomHeight 0
        solvedFlag 10
    )

    (method (init param1)
        (var temp0)
        (asm
            pushi   1
            pushi   0
            calle   proc5_5, 2
            not     
            bnt     code_0031
            ldi     0
            sat     temp0
code_001e:  lst     temp0
            ldi     10
            lt?     
            bnt     code_0031
            lat     temp0
            lsli    local10
            sali    local0
            +at     temp0
            jmp     code_001e
code_0031:  lofsa   wordWindow
            aTop    window
            pushi   #back
            pushi   1
            ldi     9
            lsli    local0
            lofsa   wordWindow
            send    6
            pushi   7
            pushi   132
            pushi   50
            pushi   51
            pushi   54
            pushi   56
            pushi   104
            pushi   967
            calle   proc958_0, 14
            pushi   #init
            pushi   0
            &rest   param1
            super   PuzzleBar, 4
            pushi   #show
            pushi   0
            self    4
            lag     global114
            sal     local459
            ret     
        )
    )


    (method (show param1)
        (asm
            pushi   #show
            pushi   0
            &rest   param1
            super   PuzzleBar, 4
            pushi   1
            pushi   10
            calle   proc5_5, 2
            bnt     code_008e
            pushi   #init
            pushi   0
            pushi   2
            pushi   377
            pushi   1
            callk   ScriptID, 4
            send    4
code_008e:  ret     
        )
    )


    (method (dispatchEvent pEvent)
        (var temp0, temp1[2], temp3, temp4, temp5, temp6, temp7, temp8, temp9, temp10, temp11, temp12, temp13, temp14, temp15, temp16, temp17, temp18, temp19, temp20, temp21, temp22, temp23, temp24, temp25[24], temp49, temp50)
        (asm
            pushi   #type
            pushi   0
            lap     pEvent
            send    4
            sat     temp0
            pushi   #x
            pushi   0
            lap     pEvent
            send    4
            sat     temp4
            pushi   #y
            pushi   0
            lap     pEvent
            send    4
            sat     temp5
            pushi   1
            lsp     pEvent
            call    localproc_1173, 2
            not     
            bnt     code_0181
            ldi     0
            sal     local457
code_0181:  lst     temp0
            ldi     64
            and     
            bnt     code_01cc
            pushi   #message
            pushi   0
            lap     pEvent
            send    4
            push   
            dup     
            ldi     5
            eq?     
            bnt     code_01b7
            lal     local457
            not     
            bnt     code_01cb
            ldi     1
            sal     local457
            pushi   #setCursor
            pushi   4
            lsg     gCursorNumber
            pushi   1
            pushi   9
            pushi   26
            lag     gGame
            send    12
            jmp     code_01cb
code_01b7:  dup     
            ldi     1
            eq?     
            bnt     code_01cb
            lst     temp5
            ldi     26
            lt?     
            bnt     code_01cb
            ldi     0
            sal     local457
code_01cb:  toss   
code_01cc:  lal     local457
            not     
            bnt     code_01df
            pushi   #firstTrue
            pushi   2
            pushi   196
            lsp     pEvent
            self    8
            sat     temp3
code_01df:  ldi     1
            sat     temp20
            lst     temp4
            ldi     5
            sub     
            push   
            ldi     11
            div     
            sat     temp6
            lst     temp5
            ldi     23
            sub     
            push   
            ldi     9
            div     
            sat     temp7
            pushi   0
            lat     temp6
            le?     
            bnt     code_065a
            pprev   
            ldi     14
            le?     
            bnt     code_065a
            pushi   0
            lat     temp7
            le?     
            bnt     code_065a
            pprev   
            ldi     14
            le?     
            bnt     code_065a
            lst     temp7
            ldi     15
            mul     
            push   
            lat     temp6
            add     
            sat     temp8
            lst     temp0
            ldi     4
            and     
            bt      code_022d
            lst     temp0
            ldi     64
            and     
code_022d:  bnt     code_02a6
            lal     local457
            not     
            bnt     code_0244
            lst     temp5
            ldi     26
            ge?     
            bnt     code_0244
            ldi     1
            sal     local457
code_0244:  lst     temp4
            ldi     9
            sub     
            push   
            ldi     11
            mod     
            not     
            bnt     code_025b
            lst     temp5
            ldi     26
            sub     
            push   
            ldi     9
            mod     
            not     
code_025b:  not     
            bnt     code_0264
            ldi     1
            sal     local462
code_0264:  lal     local462
            bnt     code_029f
            pushi   187
            pushi   4
            lsg     gCursorNumber
            pushi   1
            pushi   #nsTop
            lst     temp6
            ldi     11
            mul     
            add     
            sat     temp49
            push   
            pushi   26
            lst     temp7
            ldi     9
            mul     
            add     
            sat     temp50
            push   
            lag     gGame
            send    12
            ldi     0
            sal     local462
            pushi   #x
            pushi   1
            lst     temp49
            pushi   3
            pushi   1
            lst     temp50
            lap     pEvent
            send    12
code_029f:  pushi   1
            lsp     pEvent
            call    localproc_0f9d, 2
code_02a6:  pushi   #message
            pushi   0
            lap     pEvent
            send    4
            push   
            ldi     13
            eq?     
            bnt     code_02b8
            ldi     1
            sat     temp0
code_02b8:  lst     temp0
            dup     
            ldi     0
            eq?     
            bnt     code_0334
            lst     temp8
            lal     local275
            ne?     
            bnt     code_0322
            pushi   5
            lst     temp8
            lst     temp6
            lst     temp7
            ldi     4
            lsli    local0
            ldi     3
            lsli    local0
            call    localproc_0a0a, 10
            lal     local277
            lsli    local423
            lsl     local276
            ldi     1
            add     
            lali    local439
            and     
            bnt     code_030b
            pushi   5
            lsl     local275
            lsl     local276
            lsl     local277
            ldi     8
            lsli    local0
            ldi     7
            lsli    local0
            call    localproc_0a0a, 10
            jmp     code_0322
code_030b:  pushi   5
            lsl     local275
            lsl     local276
            lsl     local277
            ldi     2
            lsli    local0
            ldi     1
            lsli    local0
            call    localproc_0a0a, 10
code_0322:  lat     temp8
            sal     local275
            lat     temp6
            sal     local276
            lat     temp7
            sal     local277
            jmp     code_0656
code_0334:  dup     
            ldi     1
            eq?     
            bnt     code_0656
            lst     temp4
            ldi     5
            sub     
            push   
            ldi     11
            div     
            sat     temp12
            lst     temp5
            ldi     23
            sub     
            push   
            ldi     9
            div     
            sat     temp13
            lat     temp12
            sat     temp16
            lat     temp13
            sat     temp17
            pushi   5
            lst     temp13
            ldi     15
            mul     
            push   
            lat     temp12
            add     
            push   
            lst     temp12
            lst     temp13
            ldi     6
            lsli    local0
            ldi     5
            lsli    local0
            call    localproc_0a0a, 10
            ldi     0
            sat     temp19
            sat     temp18
code_037b:  pushi   #type
            pushi   0
            pushi   #new
            pushi   0
            class   Event
            send    4
            sat     temp9
            send    4
            push   
            ldi     2
            ne?     
            bnt     code_0586
            pushi   #type
            pushi   0
            lat     temp9
            send    4
            push   
            ldi     256
            ne?     
            bnt     code_0586
            pushi   #message
            pushi   0
            lat     temp9
            send    4
            push   
            ldi     13
            ne?     
            bnt     code_0586
            pushi   #localize
            pushi   0
            lat     temp9
            send    4
            pushi   1
            lst     temp9
            callk   MapKeyToDir, 2
            lal     local457
            bnt     code_03ce
            pushi   1
            lst     temp9
            callk   MapKeyToDir, 2
            pushi   1
            lst     temp9
            call    localproc_0f9d, 2
code_03ce:  pushi   #x
            pushi   0
            lat     temp9
            send    4
            sat     temp10
            pushi   #y
            pushi   0
            lat     temp9
            send    4
            sat     temp11
            lst     temp10
            ldi     5
            sub     
            push   
            ldi     11
            div     
            sat     temp14
            lst     temp11
            ldi     23
            sub     
            push   
            ldi     9
            div     
            sat     temp15
            lst     temp20
            ldi     1
            eq?     
            bnt     code_043f
            lst     temp14
            lat     temp12
            ne?     
            bt      code_040b
            lst     temp15
            lat     temp13
            ne?     
code_040b:  bnt     code_043f
            pushi   2
            lst     temp14
            lat     temp12
            sub     
            push   
            lst     temp15
            lat     temp13
            sub     
            push   
            call    localproc_0a9e, 4
            bnt     code_043f
            ldi     0
            sat     temp20
            lst     temp14
            lat     temp12
            sub     
            sat     temp18
            lst     temp15
            lat     temp13
            sub     
            sat     temp19
            lat     temp14
            sat     temp16
            lat     temp15
            sat     temp17
            jmp     code_057c
code_043f:  pushi   0
            lat     temp14
            le?     
            bnt     code_0458
            pprev   
            ldi     14
            le?     
            bnt     code_0458
            pushi   0
            lat     temp15
            le?     
            bnt     code_0458
            pprev   
            ldi     14
            le?     
code_0458:  not     
            bnt     code_0461
            ldi     0
            jmp     code_057c
code_0461:  pushi   4
            lst     temp14
            lat     temp16
            sub     
            push   
            lst     temp15
            lat     temp17
            sub     
            push   
            lst     temp18
            lst     temp19
            call    localproc_0a78, 8
            bnt     code_04a6
            lst     temp14
            lat     temp16
            eq?     
            bnt     code_0487
            lst     temp15
            lat     temp17
            eq?     
code_0487:  not     
            bnt     code_04a6
            pushi   6
            lst     temp16
            lst     temp17
            lst     temp14
            lst     temp15
            pushi   1
            pushi   1
            call    localproc_0ca2, 12
            lat     temp14
            sat     temp16
            lat     temp15
            sat     temp17
            jmp     code_057c
code_04a6:  pushi   4
            lst     temp16
            lat     temp14
            sub     
            push   
            lst     temp17
            lat     temp15
            sub     
            push   
            lst     temp18
            lst     temp19
            call    localproc_0a78, 8
            bnt     code_0507
            lst     temp14
            lat     temp16
            eq?     
            bnt     code_04cc
            lst     temp15
            lat     temp17
            eq?     
code_04cc:  not     
            bnt     code_0507
            lst     temp14
            lat     temp12
            eq?     
            bnt     code_04e4
            lst     temp15
            lat     temp13
            eq?     
            bnt     code_04e4
            ldi     1
            sat     temp20
code_04e4:  pushi   6
            lst     temp14
            lat     temp18
            add     
            push   
            lst     temp15
            lat     temp19
            add     
            push   
            lst     temp16
            lst     temp17
            pushi   0
            pushi   2
            call    localproc_0ca2, 12
            lat     temp14
            sat     temp16
            lat     temp15
            sat     temp17
            jmp     code_057c
code_0507:  lst     temp20
            ldi     0
            eq?     
            bnt     code_057c
            lst     temp14
            lat     temp16
            eq?     
            bnt     code_051c
            lst     temp15
            lat     temp17
            eq?     
code_051c:  not     
            bnt     code_057c
            pushi   2
            lst     temp14
            lat     temp12
            sub     
            sat     temp21
            push   
            lst     temp15
            lat     temp13
            sub     
            sat     temp22
            push   
            call    localproc_0a9e, 4
            bnt     code_057c
            pushi   1
            lst     temp21
            call    localproc_0c8a, 2
            sat     temp23
            pushi   1
            lst     temp22
            call    localproc_0c8a, 2
            sat     temp24
            pushi   6
            lst     temp12
            lst     temp13
            lst     temp16
            lst     temp17
            pushi   0
            pushi   3
            call    localproc_0ca2, 12
            pushi   6
            lst     temp12
            lst     temp13
            lst     temp14
            lst     temp15
            pushi   1
            pushi   4
            call    localproc_0ca2, 12
            lat     temp23
            sat     temp18
            lat     temp24
            sat     temp19
            lat     temp14
            sat     temp16
            lat     temp15
            sat     temp17
code_057c:  pushi   #dispose
            pushi   0
            lat     temp9
            send    4
            jmp     code_037b
code_0586:  pushi   #dispose
            pushi   0
            lat     temp9
            send    4
            pushi   4
            lst     temp12
            lst     temp13
            lst     temp14
            lst     temp15
            call    localproc_0e6a, 8
            push   
            dup     
            ldi     1
            eq?     
            bnt     code_05c7
            pushi   #play
            pushi   0
            lofsa   rightSound
            send    4
            +al     local422
            pushi   0
            call    localproc_0bc4, 0
            pushi   6
            lst     temp12
            lst     temp13
            lst     temp16
            lst     temp17
            pushi   2
            pushi   5
            call    localproc_0ca2, 12
            jmp     code_0655
code_05c7:  dup     
            ldi     2
            eq?     
            bnt     code_05f4
            pushi   #play
            pushi   0
            lofsa   oldSound
            send    4
            pushi   2
            pushi   325
            pushi   15
            calle   proc5_9, 4
            pushi   6
            lst     temp12
            lst     temp13
            lst     temp16
            lst     temp17
            pushi   2
            pushi   5
            call    localproc_0ca2, 12
            jmp     code_0655
code_05f4:  dup     
            ldi     3
            eq?     
            bnt     code_0626
            pushi   #play
            pushi   0
            lofsa   squawkSound
            send    4
            pushi   6
            lst     temp12
            lst     temp13
            lst     temp16
            lst     temp17
            pushi   0
            pushi   6
            call    localproc_0ca2, 12
            pushi   2
            pushi   325
            pushi   16
            calle   proc5_9, 4
            pushi   0
            call    localproc_0abc, 0
            jmp     code_0655
code_0626:  dup     
            ldi     0
            eq?     
            bnt     code_0655
            pushi   #play
            pushi   0
            lofsa   wrongSound
            send    4
            pushi   6
            lst     temp12
            lst     temp13
            lst     temp16
            lst     temp17
            pushi   0
            pushi   6
            call    localproc_0ca2, 12
            pushi   2
            pushi   325
            pushi   17
            calle   proc5_9, 4
            pushi   0
            call    localproc_0abc, 0
code_0655:  toss   
code_0656:  toss   
            jmp     code_068f
code_065a:  lsl     local276
            lal     local460
            ne?     
            bt      code_066b
            lsl     local277
            lal     local461
            ne?     
code_066b:  bnt     code_068f
            pushi   6
            lsl     local276
            lsl     local277
            lsl     local276
            lsl     local277
            pushi   0
            pushi   7
            call    localproc_0ca2, 12
            lal     local276
            sal     local460
            lal     local277
            sal     local461
code_068f:  pushi   #claimed
            pushi   1
            pushi   0
            lap     pEvent
            send    6
            lal     local457
            not     
            bnt     code_06b6
            pushi   #dispatchEvent
            pushi   1
            lsp     pEvent
            super   PuzzleBar, 6
            bnt     code_06b0
            ldi     1
            ret     
            jmp     code_06c0
code_06b0:  ldi     0
            ret     
            jmp     code_06c0
code_06b6:  pushi   #dispose
            pushi   0
            lap     pEvent
            send    4
            ldi     0
            ret     
code_06c0:  ret     
        )
    )


    (method (buyClue)
        (var temp0, temp1)
        (asm
            pushi   #buyClue
            pushi   0
            super   PuzzleBar, 4
            bnt     code_012d
            ldi     0
            sat     temp0
code_009f:  lst     temp0
            ldi     25
            lt?     
            bnt     code_012d
            pushi   4
            lat     temp0
            mul     
            sat     temp1
            lsli    local278
            ldi     0
            ge?     
            bnt     code_0128
            pushi   6
            lst     temp1
            ldi     1
            add     
            lsli    local278
            lat     temp1
            lsli    local278
            push   
            ldi     3
            add     
            lsli    local278
            lst     temp1
            ldi     2
            add     
            lsli    local278
            pushi   1
            pushi   8
            call    localproc_0ca2, 12
            pushi   1
            pushi   0
            callk   Wait, 2
            pushi   1
            pushi   60
            callk   Wait, 2
            pushi   6
            lst     temp1
            ldi     1
            add     
            lsli    local278
            lat     temp1
            lsli    local278
            push   
            ldi     3
            add     
            lsli    local278
            lst     temp1
            ldi     2
            add     
            lsli    local278
            pushi   2
            pushi   8
            call    localproc_0ca2, 12
            pushi   1
            pushi   60
            callk   Wait, 2
            +al     local422
            pushi   0
            call    localproc_0bc4, 0
            pushi   0
            lat     temp1
            lali    local278
            sub     
            push   
            lat     temp1
            sali    local278
            ret     
code_0128:  +at     temp0
            jmp     code_009f
code_012d:  ret     
        )
    )


    (method (showHelp)
        (asm
            pushi   0
            call    localproc_0c27, 0
            pushi   0
            call    localproc_0bc4, 0
            ret     
        )
    )


    (method (animateOnce)
        (asm
            pushi   2
            pushi   #elements
            pushi   0
            lag     gCast
            send    4
            push   
            pushi   1
            callk   Animate, 4
            lag     gTheNewDialog
            bnt     code_0151
            pushi   #check
            pushi   0
            send    4
code_0151:  ldi     1
            ret     
        )
    )

)
(instance rightSound of Sound
    (properties
        flags $0001
        number 50
    )
)
(instance wrongSound of Sound
    (properties
        flags $0001
        number 56
    )
)
(instance oldSound of Sound
    (properties
        flags $0001
        number 54
    )
)
(instance squawkSound of Sound
    (properties
        flags $0001
        number 104
    )
)
(instance rewardSound of Sound
    (properties
        flags $0001
        number 51
    )
)
(instance wordWindow of SysWindow
    (properties
        top 19
        left 79
        bottom 180
        right 247
    )

    (method (open param1)
        (var temp0, temp1, temp2[15], temp17, temp18, temp19, temp20)
        (asm
            pushi   #open
            pushi   0
            super   SysWindow, 4
            ldi     5
            sat     temp18
            ldi     23
            sat     temp19
            ldi     0
            sat     temp20
            ldi     0
            sat     temp0
code_0855:  lst     temp0
            ldi     30
            lt?     
            bnt     code_099e
            pushi   3
            lea     @temp2
            push   
            lat     temp0
            lsli    local20
            push   
            ldi     1
            add     
            lsli    local20
            &rest   param1
            callk   Format, 6
            ldi     0
            sat     temp1
code_0876:  lst     temp1
            ldi     15
            lt?     
            bnt     code_0945
            pushi   2
            lea     @temp2
            push   
            lst     temp1
            callk   StrAt, 4
            push   
            pushi   15
            lst     temp0
            ldi     2
            div     
            mul     
            push   
            lat     temp1
            add     
            sali    local50
            sat     temp17
            pushi   10
            lea     @temp17
            push   
            pushi   100
            lst     temp18
            lst     temp19
            pushi   105
            pushi   999
            pushi   102
            ldi     1
            lsli    local0
            pushi   103
            ldi     2
            lsli    local0
            callk   Display, 20
            lst     temp0
            ldi     2
            div     
            lsli    local423
            lst     temp1
            ldi     1
            add     
            lali    local439
            and     
            bnt     code_08f1
            pushi   5
            lst     temp0
            ldi     2
            div     
            push   
            ldi     15
            mul     
            push   
            lat     temp1
            add     
            push   
            lst     temp1
            lst     temp0
            ldi     2
            div     
            push   
            ldi     8
            lsli    local0
            ldi     7
            lsli    local0
            call    localproc_0a0a, 10
code_08f1:  lst     temp18
            ldi     11
            add     
            sat     temp18
            lst     temp20
            ldi     0
            eq?     
            bnt     code_0940
            lst     temp1
            ldi     14
            ne?     
            bnt     code_0940
            pushi   8
            pushi   4
            pushi   22
            lst     temp18
            ldi     2
            sub     
            push   
            pushi   156
            lst     temp18
            ldi     2
            sub     
            push   
            ldi     0
            lsli    local0
            pushi   65535
            dup     
            callk   Graph, 16
            pushi   6
            pushi   12
            pushi   23
            lst     temp18
            ldi     3
            sub     
            push   
            pushi   156
            lst     temp18
            ldi     1
            sub     
            push   
            pushi   1
            callk   Graph, 12
code_0940:  +at     temp1
            jmp     code_0876
code_0945:  ldi     1
            sat     temp20
            ldi     5
            sat     temp18
            lst     temp19
            ldi     9
            add     
            sat     temp19
            lst     temp0
            ldi     28
            ne?     
            bnt     code_0994
            pushi   8
            pushi   4
            lst     temp19
            ldi     2
            sub     
            push   
            pushi   4
            lst     temp19
            ldi     2
            sub     
            push   
            pushi   168
            ldi     0
            lsli    local0
            pushi   65535
            dup     
            callk   Graph, 16
            pushi   6
            pushi   12
            lst     temp19
            ldi     3
            sub     
            push   
            pushi   5
            lst     temp19
            ldi     1
            sub     
            push   
            pushi   168
            pushi   1
            callk   Graph, 12
code_0994:  lst     temp0
            ldi     2
            add     
            sat     temp0
            jmp     code_0855
code_099e:  lal     local458
            not     
            bt      code_09ab
            lsl     local459
            lag     global114
            ne?     
code_09ab:  bnt     code_09b8
            pushi   0
            call    localproc_0c27, 0
            ldi     1
            sal     local458
code_09b8:  pushi   0
            call    localproc_0bc4, 0
            pushi   #setCursor
            pushi   4
            lsg     gCursorNumber
            pushi   1
            pushi   9
            pushi   26
            lag     gGame
            send    12
            ret     
        )
    )

)
(instance sPlaySounds of Script
    (properties)

    (method (changeState newState)
        (asm
            lap     newState
            aTop    state
            push   
            dup     
            ldi     0
            eq?     
            bnt     code_0b27
            pushi   #play
            pushi   1
            pushSelf
            lofsa   rewardSound
            send    6
            jmp     code_0b87
code_0b27:  dup     
            ldi     1
            eq?     
            bnt     code_0b43
            pushi   3
            pushi   325
            pushi   18
            lsl     local422
            calle   proc5_14, 6
            ldi     1
            aTop    cycles
            jmp     code_0b87
code_0b43:  dup     
            ldi     2
            eq?     
            bnt     code_0b6a
            pushi   #number
            pushi   1
            pushi   967
            pushi   102
            pushi   1
            pushi   1
            pushi   162
            pushi   1
            pushi   1
            pushi   161
            pushi   1
            pushi   127
            pushi   42
            pushi   1
            pushSelf
            lag     gCMusic2
            send    30
            jmp     code_0b87
code_0b6a:  dup     
            ldi     3
            eq?     
            bnt     code_0b87
            pushi   #solvePuzzle
            pushi   0
            pushi   539
            pushi   0
            lofsa   word
            send    8
            ldi     0
            aTop    client
            pushi   #dispose
            pushi   0
            self    4
code_0b87:  toss   
            ret     
        )
    )

)

405
I can open fine LB2 - both the floppy and cd versions.

Pages: 1 ... 25 26 [27] 28 29 ... 31

SMF 2.0.14 | SMF © 2017, Simple Machines
Simple Audio Video Embedder

Page created in 0.152 seconds with 21 queries.