Intercepting magic
ZXNet echo conference «code.zx»
From 500:812/08.00 → To Kirill Smelkow 13 February 1998
I was reading CODE.ZX here, and noticed the letter
where 10-02-98 at 20:30, Kirill Smelkow wrote
for All, about "Intercepting magic"...
┬┐ ┬┌┐ ┬┌┌┐┬ ┬ ┌┐
├┴┐││┬ ├┤├ │ │ ││, Kirill!
┴─┘│└┘ ┘┴└┘┴┘┴┘└┘
KS> People, please tell me how
KS> on scorpion you can hang your program on magic.
Here's a program for intercepting Reset and Magic for
scorpion...:)
Place your program between the prog and end_prg labels!
LD A,16
LD BC,8189
OUT(C),A
LD B,127
OUT(C),A
LD HL,60149
PUSH HL
PUSH HL
LD A,195
LD HL,49152
LD DE,49153
LD BC,16383
LD(HL),243
LDIR
POP HL
DEC HL
DEC HL
DEC HL
LD(HL),A
POP HL
L24613 LD (HL),B
INC HL
DJNZ L24613
LD(HL),B
LD (65533),A
LD (56682),A
LD (65280),A
LD DE,49264
LD (65281),DE
LD HL,L24655
LD BC,16
LDIR
XOR A
LD BC,8189
OUT(C),A
LD B,127
LD A,16
OUT(C),A
RET
prog DI
L24656 LD HL,16384
LD DE,16385
LD BC,6143
LD(HL),A
LDIRINC A
JR L24656
end_prg
That's all... I hope there is nothing unclear here.
With best wishes,
SPbZXNet (500:812/08.00), Ivan/VSPG.
SysOp of Impart-BBS (812)466-4113, [Team ASpect]
-+- SMM version 1.05