0 Members and 3 Guests are viewing this topic.
Call FindVarNameArc ;CDEF98 returns: HL=Data Start; A=Flash Page; BC=Size; DE=VatEntry locationpush af ;F5push de ;D5push bc ;C5ld de,3 ;110300Call CreateTempList ;CD274B Creates a temp list of size DE. Returns BC=Size, DE=pointer to datapop hl ;E1Call SetXXXXDE ;CDEB4A Converts HL to an FP number at address pointed to by DE. DE is incremented by 9pop hl ;E1ld l,(hl) ;6E This is the var typeld l,0 ;2600Call SetXXXXDE ;CDEB4A Converts HL to an FP number at address pointed to by DE. DE is incremented by 9pop af ;F1ld hl,0 ;2600ld l,a ;6Fjp SetXXXXDE ;CDEB4A Converts HL to an FP number at address pointed to by DE. DE is incremented by 9
Call LocateStr ;CDB74E Gets pointers to the next parsed stringinc de ;13 points to second byte of the stringld a,(de) ;1Acp $EB ;FEEB the little L token for listsjr nz,3 ;2003ld a,5Dh ;3E5D The byte starting listsld (de),a ;12dec de ;1Bex de,hl ;EBld b,c ;41ld de,OP1 ;117884Call TokenToASCII ;CDCF4B Used to convert tokens to ASCII (in case lowercase is involved)xor a ;AFld (de),a ;12 this puts a 0 at the end of where the string was converted to (meaning OP1)inc de ;13ld (de),a ;12push bc ;C5 This is the ASCII length of the var namebcall(_CheckFindSym) ;EFF142ld a,b ;78pop bc ;C1jp c,ERRBadName ;DC8D55 If the var doesn't exist, goes to error handlerex de,hl ;EBor a ;B7jr nz,5 ;2005 It skips 5 bytes, not sure of the mnemonic syntax ld c,(hl) ;4E inc hl ;23 ld b,(hl) ;46 inc hl ;23 ret ;C9add hl,bc ;09ld bc,9 ;010900add hl,bc ;09ld b,a ;47ld a,l ;7Cadd a,a ;87or a ;B7jr nz,3 ;2003 Again, not sure of the syntax, sorry inc b ;04 ld hl,40h ;2640ld a,b ;78out (6),a ;D306 Erm, writes a to port 6. I think that is out (*),ald c,(hl) ;4Einc hl ;23ld b,a ;47ld a,l ;7Cadd a,a ;87or l ;B5jr nz,6 ;2006 inc b ;04 ld hl,40h ;2640 ld a,b ;78 out (6),a ;D306ld a,b ;78ld b,(hl) ;46inc hl ;23push hl ;E5add hl,bc ;09ld hl,(998Dh) ;228D99 Some spot in AppBackUpScreen to save the end of the file. It isn't used yet.pop hl ;E1push bc ;C5 I know this can be optimised by using HL and popping later... I should do thatin a,(6) ;DB06ld c,a ;4Fld a,(9B71h) ;3A719B This has the return app page (set at the begginning of the hook)out (6),a ;D306ld a,c ;79pop bc ;C1ret ;C9