diff --git a/Script/Script45102.txt b/Script/Script45102.txt new file mode 100644 index 0000000..cc840c5 --- /dev/null +++ b/Script/Script45102.txt @@ -0,0 +1,126 @@ +RemapObj::init: + lap param[$1] + aTop pColor + lap param[$2] + aTop pPercent + pushi $3 ; z + push2 + lsp param[$1] + push + callk kernel_110, $6 + bnot + ret + +RemapObj::dispose: + push2 + push0 + pTos pColor + callk kernel_110, $4 + bnot + pushi $95 ; 149, dispose + push0 + super Obj, $4 + bnot + ret + +Remaps::add: + link $1 + pushi $a1 ; 161, firstEqual + push2 + pushi $330 ; 816, pColor + lsp param[$1] + self $8 + bnot + sat temp[$0] + bnt code_00c1 + lsp param[$2] + pushi $331 ; 817, pPercent + push0 + send $4 + bnot + ne? + bnt code_00a8 + pushi $3 ; z + lofsa string_004b ; "Remaps::add ( %d, %d ): color overwrite" + push + lsp param[$1] + lsp param[$2] + callk kernel_132, $6 + bnot +code_00a8: pushi $332 ; 818, pCount + push1 + pushi $332 ; 818, pCount + push0 + lat temp[$0] + send $4 + bnot + push + ldi $1 + add + push + lat temp[$0] + send $6 + bnot + jmp code_00e1 + +code_00c1: pushi $94 ; 148, init + push2 + lsp param[$1] + lsp param[$2] + pushi $8d ; 141, new + push0 + class RemapObj + send $4 + bnot + sat temp[$0] + send $8 + bnot + pushi $9f ; 159, add + push1 + lst temp[$0] + super List, $6 + bnot +code_00e1: ret + +Remaps::delete: + link $1 + pushi $a1 ; 161, firstEqual + push2 + pushi $330 ; 816, pColor + lsp param[$1] + self $8 + bnot + sat temp[$0] + bnt code_0127 + pushi $332 ; 818, pCount + push1 + pushi $332 ; 818, pCount + push0 + send $4 + bnot + push + ldi $1 + sub + push + lat temp[$0] + send $6 + bnot + pushi $332 ; 818, pCount + push0 + lat temp[$0] + send $4 + bnot + not + bnt code_0127 + pushi $95 ; 149, dispose + push0 + lat temp[$0] + send $4 + bnot + pushi $58 ; 88, 'X', delete + push1 + lst temp[$0] + super List, $6 + bnot +code_0127: ret + diff --git a/Script/Script58000.txt b/Script/Script58000.txt new file mode 100644 index 0000000..8107fae --- /dev/null +++ b/Script/Script58000.txt @@ -0,0 +1,146 @@ +export58000_0 = Teleport + +Teleport::init: + link $6 + pushi $94 ; 148, init + push0 + &rest $1 + super StaticRoom, $4 + bnot + ldi $afd4 ; -20524 + sat temp[$3] + ldi $0 + sat temp[$4] + sat temp[$5] + pushi $20 ; 32, ' ', name + push1 + lofsa string_004e ; "teleport" + push + pushi $8d ; 141, new + push0 + class File + send $4 + bnot + sat temp[$0] + send $6 + bnot + pushi $248 ; 584, open + push1 + push1 + lat temp[$0] + send $6 + bnot + bnt code_0105 + pushi $8d ; 141, new + push0 + class Str + send $4 + bnot + sat temp[$1] + pushi $27a ; 634, readString + push2 + push + pushi $a ; 10, inTop + lat temp[$0] + send $8 + bnot + pushi $4b ; 75, 'K', at + push1 + push0 + lat temp[$1] + send $6 + bnot + sat temp[$4] + push1 + push + calle export60027_0, $2 + bnot + push + ldi $4e ; 78, 'N', width + eq? + bt code_007c + lag global[$69] +code_007c: sat temp[$5] + bnt code_008b + pushi $4b ; 75, 'K', at + push2 + push0 + pushi $20 ; 32, ' ', name + lat temp[$1] + send $8 + bnot +code_008b: lst temp[$4] + ldi $3f ; 63, '?', xStep + eq? + bnt code_00d3 + pushi $4b ; 75, 'K', at + push2 + push0 + push0 + lat temp[$1] + send $8 + bnot + pushi $d ; 13, seenRect + lofsa string_0057 ; "Teleport to which room:" + push + pushi $87 ; 135, left + lsg global[$59] + lsg global[$5d] + pushi $76 ; 118, 'v', textLeft + lst temp[$1] + pushi $6 ; maxScale + pushi $77 ; 119, 'w', textTop + lofsa string_006f ; "OK" + push + push1 + pushi $77 ; 119, 'w', textTop + lofsa string_0072 ; "Cancel" + push + push0 + calle export60029_0, $1a + bnot + bnt code_00fc + pushi $ff ; 255, asInteger + push0 + lat temp[$1] + send $4 + bnot + sat temp[$3] + jmp code_00fc + +code_00d3: lat temp[$5] + bnt code_00ed + lsg global[$35] + ldi $ea33 ; -5581 + eq? + bnt code_00e6 + ldi $ea31 ; -5583 + sat temp[$3] + jmp code_00fc + +code_00e6: ldi $309 ; 777, pHairColor + sat temp[$3] + jmp code_00fc + +code_00ed: pushi $ff ; 255, asInteger + push0 + lat temp[$1] + send $4 + bnot + sat temp[$2] + bnt code_00fc + sat temp[$3] +code_00fc: pushi $95 ; 149, dispose + push0 + lat temp[$1] + send $4 + bnot +code_0105: pushi $95 ; 149, dispose + push0 + lat temp[$0] + send $4 + bnot + lat temp[$3] + sag global[$36] + ret + diff --git a/Script/Script58002.txt b/Script/Script58002.txt new file mode 100644 index 0000000..d7e3633 --- /dev/null +++ b/Script/Script58002.txt @@ -0,0 +1,470 @@ +PolyRect::checkPolyKludge: + link $5 + pushi $e8 ; 232, intersects + push1 + lsp param[$1] + self $6 + bnot + bnt code_01ac + push1 + pushi $87 ; 135, left + push0 + lap param[$1] + send $4 + bnot + push + pToa left + sub + push + callk kernel_61, $2 + bnot + sat temp[$1] + push1 + pushi $88 ; 136, right + push0 + lap param[$1] + send $4 + bnot + push + pToa right + sub + push + callk kernel_61, $2 + bnot + sat temp[$2] + push1 + pushi $89 ; 137, top + push0 + lap param[$1] + send $4 + bnot + push + pToa top + sub + push + callk kernel_61, $2 + bnot + sat temp[$3] + push1 + pushi $8a ; 138, bottom + push0 + lap param[$1] + send $4 + bnot + push + pToa bottom + sub + push + callk kernel_61, $2 + bnot + sat temp[$4] + lst temp[$1] + ldi $2 + lt? + bt code_01a7 + lst temp[$2] + ldi $2 + lt? + bt code_01a7 + lst temp[$3] + ldi $2 + lt? + bt code_01a7 + lst temp[$4] + ldi $2 + lt? +code_01a7: bnt code_01ac + ldi $1 + ret + +code_01ac: ldi $0 + ret + +WObjectList::add: + link $1 + pushi $a3 ; 163, contains + push1 + lsp param[$1] + self $6 + bnot + bnt code_01bd + ret + +code_01bd: pushi $9f ; 159, add + push1 + lsp param[$1] + super List, $6 + bnot + lag global[$1] + bnt code_0246 + pushi $c5 ; 197, pRoom + push0 + send $4 + bnot + bnt code_0246 + pTos pRoom + pushi $c5 ; 197, pRoom + push0 + lag global[$1] + send $4 + bnot + eq? + bnt code_0246 + pushi $386 ; 902, hasBase + push1 + class BCarryable + push + lap param[$1] + send $6 + bnot + bnt code_0246 + pushi $2fb ; 763, pCombatGroup + push0 + lag global[$1] + send $4 + bnot + not + bnt code_0207 + pushi $2fb ; 763, pCombatGroup + push0 + lap param[$1] + send $4 + bnot + not +code_0207: bt code_0239 + pushi $2fb ; 763, pCombatGroup + push0 + lag global[$1] + send $4 + bnot + bnt code_0246 + pushi $2fb ; 763, pCombatGroup + push0 + lap param[$1] + send $4 + bnot + bnt code_0246 + pushi $128 ; 296, equalLong + push1 + pushi $2fb ; 763, pCombatGroup + push0 + lap param[$1] + send $4 + bnot + push + pushi $2fb ; 763, pCombatGroup + push0 + lag global[$1] + send $4 + bnot + send $6 + bnot +code_0239: bnt code_0246 + pushi $3 ; z + pushi $d ; 13, seenRect + push1 + lsp param[$1] + callk kernel_118, $6 + bnot +code_0246: ret + +WObjectList::delete: + link $1 + lag global[$1] + bnt code_026f + pushi $c5 ; 197, pRoom + push0 + send $4 + bnot + bnt code_026f + pTos pRoom + pushi $c5 ; 197, pRoom + push0 + lag global[$1] + send $4 + bnot + eq? + bnt code_026f + pushi $3 ; z + pushi $d ; 13, seenRect + push2 + lsp param[$1] + callk kernel_118, $6 + bnot +code_026f: pushi $58 ; 88, 'X', delete + push1 + lsp param[$1] + super List, $6 + bnot + ret + +RealmRoom::virtualize: + pushi $2bc ; 700, virtualize + push0 + &rest $1 + super ManagedRoom, $4 + bnot + pToa pWObjectList + not + bnt code_029c + pushi $c5 ; 197, pRoom + push1 + pushSelf + pushi $8d ; 141, new + push0 + class WObjectList + send $4 + bnot + aTop pWObjectList + send $6 + bnot +code_029c: pToa pRectList + not + bnt code_02ac + pushi $8d ; 141, new + push0 + class List + send $4 + bnot + aTop pRectList +code_02ac: ret + +RealmRoom::init: + pushi $94 ; 148, init + push0 + &rest $1 + super ManagedRoom, $4 + bnot + pToa pShowGameBar + bnt code_02f6 + pushi $1bf ; 447, isHidden + push0 + lag global[$6] + send $4 + bnot + bnt code_02ce + pushi $75 ; 117, 'u', show + push0 + lag global[$6] + send $4 + bnot +code_02ce: pushi $b5 ; 181, set + pushi $4 ; scaleX + push0 + push0 + pushi $27f ; 639, rename + pushi $13d ; 317, putArray + pToa plane + send $c + bnot + pushi $dd ; 221, moveBy + push2 + push0 + pushi $e3 ; 227, expand + pToa plane + send $8 + bnot + push1 + pTos plane + callk kernel_42, $2 + bnot + jmp code_0315 + +code_02f6: lag global[$cd] + bnt code_0301 + pushi $95 ; 149, dispose + push0 + send $4 + bnot +code_0301: pushi $1bf ; 447, isHidden + push0 + lag global[$6] + send $4 + bnot + not + bnt code_0315 + pushi $69 ; 105, 'i', hide + push0 + lag global[$6] + send $4 + bnot +code_0315: ret + +RealmRoom::dispose: + lag global[$1] + bnt code_032f + pushi $c5 ; 197, pRoom + push0 + send $4 + bnot + push + selfID + eq? + bnt code_032f + pushi $3c6 ; 966, deleteFromRoom + push0 + lag global[$1] + send $4 + bnot +code_032f: pushi $95 ; 149, dispose + push0 + class gDialogList + send $4 + bnot + pToa pWObjectList + bnt code_034c + pushi $a6 ; 166, release + push0 + pushi $95 ; 149, dispose + push0 + send $8 + bnot + ldi $0 + aTop pWObjectList +code_034c: pToa pRectList + bnt code_035b + pushi $95 ; 149, dispose + push0 + send $4 + bnot + ldi $0 + aTop pRectList +code_035b: pushi $95 ; 149, dispose + push0 + &rest $1 + super ManagedRoom, $4 + bnot + ret + +RealmRoom::delete: + pToa pWObjectList + bnt code_0374 + pushi $58 ; 88, 'X', delete + push1 + lsp param[$1] + &rest $2 + send $6 + bnot +code_0374: lsl local[$0] + lap param[$1] + eq? + bnt code_037f + ldi $0 + sal local[$0] +code_037f: ret + +RealmRoom::hide: + link $1 + pToa pWObjectList + bnt code_03b8 + pushi $a3 ; 163, contains + push1 + lsg global[$1] + send $6 + bnot + sat temp[$0] + bnt code_039d + pushi $58 ; 88, 'X', delete + push1 + lsg global[$1] + pToa pWObjectList + send $6 + bnot +code_039d: pushi $9d ; 157, eachElementDo + push1 + pushi $3a5 ; 933, hideContents + pToa pWObjectList + send $6 + bnot + lat temp[$0] + bnt code_03b8 + pushi $9f ; 159, add + push1 + lsg global[$1] + pToa pWObjectList + send $6 + bnot +code_03b8: pushi $95 ; 149, dispose + push0 + class gDialogList + send $4 + bnot + pushi $69 ; 105, 'i', hide + push0 + super ManagedRoom, $4 + bnot + ret + +RealmRoom::doit: + link $1 + pushi $45 ; 69, 'E', doit + push0 + super ManagedRoom, $4 + bnot + pToa pUpdateStates + bnt code_03db + ldi $0 + aTop pUpdateStates +code_03db: ret + +StaticRealmRoom::init: + pushi $141 ; 321, stop + push0 + class MusicMgr + send $4 + bnot + pushi $94 ; 148, init + push0 + &rest $1 + super RealmRoom, $4 + bnot + pushi $19a ; 410, setScale + pushi $4 ; scaleX + pushi $64 ; 100, 'd', moveDone + dup + pushi $be ; 190, seconds + push0 + self $c + bnot + ret + +StaticRealmRoom::show: + pushi $75 ; 117, 'u', show + push0 + &rest $1 + super RealmRoom, $4 + bnot + lag global[$6a] + bnt code_0414 + pushi $491 ; 1169, updatePingText + push0 + send $4 + bnot +code_0414: ret + +StaticRealmRoom::dispose: + link $1 + pToa modNum + sat temp[$0] + pushi $95 ; 149, dispose + push0 + super RealmRoom, $4 + bnot + lat temp[$0] + bnt code_0431 + pushi $9f ; 159, add + push1 + push + lag global[$69] + send $6 + bnot +code_0431: ret + +StaticRealmRoom::setInfo: + lap param[$1] + aTop modNum + ret + +StaticRealmRoom::cue: + ret + diff --git a/Script/Script58003.txt b/Script/Script58003.txt new file mode 100644 index 0000000..c33f335 --- /dev/null +++ b/Script/Script58003.txt @@ -0,0 +1,141 @@ +SortedList::add: + link $3 + pToa elements + not + bnt code_0043 + push1 + push0 + callk kernel_90, $2 + bnot + aTop elements +code_0043: ldi $0 + sat temp[$1] +code_0047: lst temp[$1] + lap param[$0] + lt? + bnt code_0088 + pushi $a7 ; 167, isDuplicate + push1 + lat temp[$1] + lspi param[$1] + self $6 + bnot + not + bnt code_0084 + pushi $342 ; 834, findSlot + push1 + lat temp[$1] + lspi param[$1] + self $6 + bnot + sat temp[$0] + bnt code_0079 + pushi $ad ; 173, addBefore + push2 + push + lat temp[$1] + lspi param[$1] + self $8 + bnot + jmp code_0084 + +code_0079: pushi $ab ; 171, addToEnd + push1 + lat temp[$1] + lspi param[$1] + self $6 + bnot +code_0084: +at temp[$1] + jmp code_0047 + +code_0088: selfID + ret + +SortedList::findSlot: + link $6 + ldi $0 + sat temp[$2] + pToa pSortSelector + sat temp[$3] + not + bnt code_009a + ldi $0 + ret + +code_009a: pToa elements + bnt code_0114 + pToa size + sat temp[$5] + ldi $0 + sat temp[$4] +code_00a7: lst temp[$4] + lat temp[$5] + lt? + bnt code_0114 + pushi $3 ; z + pushi $11 ; 17, bitmap + pTos elements + lst temp[$4] + callk kernel_90, $6 + bnot + sat temp[$0] + pushi $99 ; 153, respondsTo + push1 + lst temp[$3] + send $6 + bnot + not + bnt code_00cc + ldi $0 + jmp code_0110 + +code_00cc: pTos pSortDirection + ldi $1 + eq? + bnt code_00ef + lst temp[$3] + push0 + lat temp[$0] + send $4 + bnot + push + lst temp[$3] + push0 + lap param[$1] + send $4 + bnot + ge? + bnt code_00ef + lat temp[$0] + sat temp[$2] + jmp code_0114 + + jmp code_0110 + +code_00ef: pTos pSortDirection + ldi $ff ; 255, asInteger + eq? + bnt code_0110 + lst temp[$3] + push0 + lat temp[$0] + send $4 + bnot + push + lst temp[$3] + push0 + lap param[$1] + send $4 + bnot + le? + bnt code_0110 + lat temp[$0] + sat temp[$2] + jmp code_0114 + +code_0110: +at temp[$4] + jmp code_00a7 + +code_0114: lat temp[$2] + ret + diff --git a/Script/Script58004.txt b/Script/Script58004.txt new file mode 100644 index 0000000..30269ed --- /dev/null +++ b/Script/Script58004.txt @@ -0,0 +1,393 @@ +NetRoom::new: + link $1 + pushi $8d ; 141, new + push0 + super RealmRoom, $4 + bnot + sat temp[$0] + pushi $559 ; 1369, pPendingActionQ + push1 + pushi $8d ; 141, new + push0 + class List + send $4 + bnot + push + lat temp[$0] + send $6 + bnot + lat temp[$0] + ret + +NetRoom::doit: + link $3 + pushi $45 ; 69, 'E', doit + push0 + &rest $1 + super RealmRoom, $4 + bnot + push0 + callk kernel_121, $0 + bnot + aTop pExitScript + pToa pMakePile + bnt code_00d6 + ldi $0 + aTop pMakePile +code_00d6: pToa pDefunct + not + bnt code_0115 + pushi $5a ; 90, 'Z', size + push0 + pToa pPendingActionQ + send $4 + bnot + sat temp[$0] + bnt code_0115 + ldi $0 + sat temp[$1] +code_00eb: lst temp[$1] + lat temp[$0] + lt? + bnt code_010c + pushi $4b ; 75, 'K', at + push1 + lst temp[$1] + pToa pPendingActionQ + send $6 + bnot + sat temp[$2] + pushi $33b ; 827, addAction + push1 + push + class ActionQMgr + send $6 + bnot + +at temp[$1] + jmp code_00eb + +code_010c: pushi $a6 ; 166, release + push0 + pToa pPendingActionQ + send $4 + bnot +code_0115: lag global[$1] + bnt code_012d + pushi $c5 ; 197, pRoom + push0 + send $4 + bnot + push + selfID + eq? + bnt code_012d + pushi $45 ; 69, 'E', doit + push0 + class ActionQMgr + send $4 + bnot +code_012d: ret + +NetRoom::init: + link $1 + ldi $1 + aTop pMakePile + pTos pFlags + ldi $2 + eq? + bnt code_0142 + ldi $400 ; 1024, pEndurance + aTop style + jmp code_0146 + +code_0142: ldi $0 + aTop style +code_0146: pushi $94 ; 148, init + push0 + &rest $1 + super RealmRoom, $4 + bnot + pushi $55b ; 1371, generate + push0 + self $4 + bnot + pushi $9f ; 159, add + push1 + lofsa RoomExitHandler + push + lag global[$27] + send $6 + bnot + pushi $3c5 ; 965, addToRoom + push1 + pushSelf + lag global[$1] + send $6 + bnot + pToa pShowGameBar + bnt code_0182 + pushi $94 ; 148, init + push0 + push2 + pushi $ea3a ; -5574 + push0 + callk kernel_2, $4 + bnot + send $4 + bnot +code_0182: ret + +NetRoom::dispose: + pushi $95 ; 149, dispose + push0 + class gDialogList + send $4 + bnot + pushi $95 ; 149, dispose + push0 + pToa pPendingActionQ + send $4 + bnot + pToa pNumber + bnt code_01a5 + pushi $95 ; 149, dispose + push0 + send $4 + bnot + ldi $0 + aTop pNumber +code_01a5: pushi $95 ; 149, dispose + push0 + &rest $1 + super RealmRoom, $4 + bnot + ret + +NetRoom::show: + pToa pVisible + not + bnt code_01c2 + pushi $7 ; priority + push1 + push1 + pToa plane + send $6 + bnot + ldi $1 + aTop pVisible +code_01c2: pToa picture + bnt code_01ce + pushi $1bb ; 443, drawPic + push1 + push + self $6 + bnot +code_01ce: pushi $75 ; 117, 'u', show + push0 + pushi $57 ; 87, 'W', draw + push0 + pToa pScreen + send $8 + bnot + push1 + pTos plane + callk kernel_42, $2 + bnot + pToa pShowGameBar + bnt code_01f4 + pushi $94 ; 148, init + push0 + push2 + pushi $ea3a ; -5574 + push0 + callk kernel_2, $4 + bnot + send $4 + bnot +code_01f4: pushi $94 ; 148, init + push2 + pushSelf + pTos pCast + class GPolyBitmap + send $8 + bnot + pushi $491 ; 1169, updatePingText + push0 + lag global[$6a] + send $4 + bnot + ret + +NetRoom::isMatch: + lsp param[$0] + ldi $1 + gt? + bnt code_0221 + pushi $128 ; 296, equalLong + push1 + lsp param[$1] + pToa pNumber + send $6 + bnot + bnt code_0221 + lap param[$2] + not +code_0221: ret + +NetRoom::setInfo: + lap param[$0] + bnt code_0262 + lap param[$1] + aTop pNumber + lsp param[$0] + ldi $1 + gt? + bnt code_0262 + lap param[$2] + aTop picture + lsp param[$0] + ldi $2 + gt? + bnt code_0262 + lap param[$3] + aTop pRoomType + lsp param[$0] + ldi $3 ; z + gt? + bnt code_0262 + lap param[$4] + aTop pExits + lsp param[$0] + ldi $4 ; scaleX + gt? + bnt code_0262 + lap param[$5] + aTop pFlags + pushi $3 ; z + pushi $6 ; maxScale + pushi $9 ; inLeft + pTos pFlags + callk kernel_118, $6 + bnot +code_0262: ret + +NetRoom::generate: + ret + +RoomExitHandler::handleEvent: + pushi $2b ; 43, '+', type + push0 + lap param[$1] + send $4 + bnot + push + ldi $1 + eq? + bnt code_0300 + pushi $25b ; 603, verb + push0 + pushi $24f ; 591, curIcon + push0 + lag global[$6] + send $4 + bnot + send $4 + bnot + push + ldi $2 + eq? + bnt code_0300 + pushi $e ; 14, view + push0 + lag global[$b] + send $4 + bnot + push + ldi $270d ; 9997 + eq? + bnt code_0300 + pushi $f ; 15, loop + push0 + lag global[$b] + send $4 + bnot + push + ldi $9 ; inLeft + ge? + bnt code_0300 + push2 + pushi $1f ; 31, brBottom + pushi $7 ; priority + callk kernel_118, $4 + bnot + bnt code_02c8 + pushi $2b ; 43, '+', type + push1 + pushi $4000 ; 16384 + pushi $31 ; 49, '1', message + push1 + push2 + pushi $50 ; 80, 'P', claimed + push1 + push0 + lap param[$1] + send $12 + bnot + ldi $0 + ret + +code_02c8: pushi $2b ; 43, '+', type + push1 + pushi $4000 ; 16384 + pushi $31 ; 49, '1', message + push1 + pushi $33 ; 51, '3', play + pushi $50 ; 80, 'P', claimed + push1 + push0 + lap param[$1] + send $12 + bnot + pushi $f ; 15, loop + push0 + lag global[$b] + send $4 + bnot + push + ldi $11 ; 17, bitmap + eq? + bnt code_02f5 + pushi $50 ; 80, 'P', claimed + push1 + push1 + lap param[$1] + send $6 + bnot + jmp code_0300 + +code_02f5: pushi $c8 ; 200, handleEvent + push1 + lsp param[$1] + lag global[$1] + send $6 + bnot +code_0300: pushi $50 ; 80, 'P', claimed + push0 + lap param[$1] + send $4 + bnot + ret + +flushView::doit: + push2 + pushi $80 ; 128, lastKey + pushi $e ; 14, view + push0 + lap param[$1] + send $4 + bnot + push + callk kernel_1, $4 + bnot + ret +