THE (real) KING OF EVERYTHING!!! -polls-

Started by Ungatt Trunn II, June 12, 2009, 01:56:06 AM

Previous topic - Next topic

0 Members and 3 Guests are viewing this topic.

Out of these people, who is most likely to do anything worthy of mention?

Ungatt Trunn II
4 (66.7%)
Firetooth
4 (66.7%)
Saladin
2 (33.3%)
Shadow
1 (16.7%)

Total Members Voted: 6

Mr.Grimm

#120
Firetooth... What do you know about beating Shadow?

And nice job on the edit Shadow. We can't beat you. You will end up ruling spa and then the rest of the forum!

Briar

#121
Shadow tries to change the posts because he's too original to post in the Spa Room.  
At the risk of ruining Briar's career by disparaging her find of the famous Sackaleaderer horse...

Quote from: Ungatt Trunn II
Yes. I wear high heels Krowdon. Any tips on how I should do my hair?

Mr.Grimm

#122
We have no talent. What a pity.

Briar

#123
Don't take pity on him....he will wax wroth
At the risk of ruining Briar's career by disparaging her find of the famous Sackaleaderer horse...

Quote from: Ungatt Trunn II
Yes. I wear high heels Krowdon. Any tips on how I should do my hair?

Ungatt Trunn II

#124
Edit this post Shadow. I DARE YOU!!!! MUAHAHAHAAAAAA!!!! SPAMMERS SHALL PREVAIIIIIL!!!!

¡Desea vivo la revolución!

No, you can't make me

NAME  SOD.sit 1.4MB MAC SOD.zip 746K PC
             BCD.sit 1.2MB MAC BCD.zip 758K PC
       LOCALS -
;[]------------------------------------------------------------[]
;|      C0.ASM -- start Up Code                                 |
;|                                                              |
;|      Turbo C++ Run Time Library                              |
;|                                                              |
;|      Copyright (c) 1987, 1991 by Borland International Inc.  |
;|      All Rights Reserved.                                    |
;[]------------------------------------------------------------[]

               __C0__ = 1
INCLUDE         RULES.ASI

;       SEGMENT and Group declarations

_TEXT           SEGMENT BYTE PUBLIC 'CODE'
               ENDS
_FARDATA        SEGMENT PARA PUBLIC 'FAR_DATA'
               ENDS
_FARBSS         SEGMENT PARA PUBLIC 'FAR_BSS'
               ENDS
IFNDEF __TINY__
_OVERLAY_       SEGMENT PARA PUBLIC 'OVRINFO'
       ENDS
_1STUB_     SEGMENT PARA PUBLIC 'STUBSEG'
       ENDS
ENDIF
_DATA           SEGMENT PARA PUBLIC 'DATA'
               ENDS
_INIT_          SEGMENT WORD PUBLIC 'INITDATA'
Initstart       label byte
               ENDS
_INITEND_       SEGMENT BYTE PUBLIC 'INITDATA'
InitEnd         label byte
               ENDS
_EXIT_          SEGMENT WORD PUBLIC 'EXITDATA'
Exitstart       label byte
               ENDS
_EXITEND_       SEGMENT BYTE PUBLIC 'EXITDATA'
ExitEnd         label byte
               ENDS
_CVTSEG         SEGMENT WORD PUBLIC 'DATA'
               ENDS
_SCNSEG         SEGMENT WORD PUBLIC 'DATA'
               ENDS
IFNDEF __HUGE__
 _BSS          SEGMENT WORD PUBLIC 'BSS'
               ENDS
 _BSSEND       SEGMENT BYTE PUBLIC 'BSSEND'
               ENDS
ENDIF
IFNDEF __TINY__
 _STACK        SEGMENT STACK 'STACK'
               ENDS
ENDIF

       ASSUME  CS:_TEXT, DS:DGROUP

;       External References

extrn       _main:DIST
extrn       _exit:DIST
extrn       __exit:DIST
extrn       __nfile:word
extrn       __setupio:near          ;required!
extrn       __stklen:word
IF LDATA EQ false
extrn       __heaplen:word
ENDIF

       SUBTTL  start Up Code
       PAGE
;/*                                                     */
;/*-----------------------------------------------------*/
;/*                                                     */
;/*     start Up Code                                   */
;/*     -------------                                   */
;/*                                                     */
;/*-----------------------------------------------------*/
;/*                                                     */
PSPHigh         equ     00002h
PSPEnv          equ     0002ch
PSPCmd          equ     00080h

               PUBLIC  __AHINCR
__AHINCR        equ     1000h
               PUBLIC  __AHSHIFT
__AHSHIFT       equ     12

IFDEF   __NOFLOAT__
MINSTACK        equ     128     ; minimal stack size in words
else
MINSTACK        equ     256     ; minimal stack size in words
ENDIF
;
;       At the start, DS and ES both point to the SEGMENT prefix.
;       SS points to the stack SEGMENT except in TINY model where
;       SS is equal to CS
;
_TEXT           SEGMENT
IFDEF           __TINY__
               ORG     100h
ENDIF
startX          PROC    NEAR
;       Save general information, such as :
;               DGROUP SEGMENT address
;               DOS version number
;               Program SEGMENT Prefix address
;               Environment address
;               Top of far heap

IFDEF   __TINY__
            mov     dx, cs          ; DX = GROUP SEGMENT address
else
            mov     dx, DGROUP      ; DX = GROUP SEGMENT address
ENDIF
IFNDEF   __BOSS__
            mov     cs:DGROUP@@, dx ;  __BOSS__
ENDIF
            mov     ah, 30h
            int     21h             ; get DOS version number
            mov     bp, ds:[PSPHigh]; BP = Highest Memory SEGMENT Addr
            mov     bx, ds:[PSPEnv] ; BX = Environment SEGMENT address
            mov     ds, dx
            mov     _version@, ax   ; Keep major and minor version number
            mov     _psp@, es       ; Keep Program SEGMENT Prefix address
            mov     _envseg@, bx    ; Keep Environment SEGMENT address
            mov     word ptr _heaptop@ + 2, bp
;
;       Save several vectors and install default divide by zero handler.
;
            call    SaveVectors

;===================
;
;       IDsoft - Check to make sure that we're running on a 286 or better

            pushf               ; Save original flags
            xor      ax,ax         ; Clear ax
            push   ax
            popf               ; Try to pop the 0
            pushf
            pop      ax            ; Get results of popping 0 into flags
            popf               ; Restore original flags
            or      ax,ax
            jns      @@Have286      ; If no sign bit, have a 286

            mov     cx, lgth_no286MSG
            mov     dx, offset DGROUP: no286MSG
            jmp      MsgExit3

@@Have286:
;      IDsoft - End of modifications (there's also a code SEGMENT string)
;
;===================

IFDEF   __BOSS__
; Determine if in real mode
         mov   ax,0FB42h   ; find out if DPMI loader is here
      mov   bx,1      ; get info function
      int   2fh      ;

      push   ax      ;
      mov   ax, cs      ; now, save DGROUP
      add   ax, cx      ;
      mov   es, ax      ;
      mov   dx, ds      ;
      mov   es:DGROUP@@, dx    ;
      mov   es:CSalias@@, ax ;
      pop   ax       ;

;      point   ax,0001h   ; if not "TRUE"
;      JNE   InRealMode

; 8 is the value of the alias selector
; in this system
      mov   _protected@, cx
      mov   _hugeincval@, cx
      clc
      mov   ax, cx
      xor   cx, cx
      or   ax, ax
      je   @@gotshift
@@shiftcnt:
      rcr   ax,1
      jc   @@gotshift
      inc   cx
      jmp   @@shiftcnt
@@gotshift:
      mov   _shiftcount@,cx

; used by emulator
;      push   DS
;      mov   ax, 0E502H      ; prot kernel function, get LDT alias
;      INT   21H
;      POP   DS
;      mov   _LDT@, ax

;      point   _protected@,0001h   ; if not "TRUE"
;      JNE   InRealMode

      .286P
IFE   LDATA               
      mov   dx, ds         ;
;      LSL   ax, DX         ;
;      DEC   ax         ;
      mov   ax, 0FFFEh      ;
      mov   SP, ax         ;
      mov   SS, DX         ;
ENDIF                  
      .8086
;      JMP   BossSkip

InRealMode   label   near

ENDIF

;       Count the number of environment variables and compute the size.
;       Each variable is ended by a 0 and a zero-length variable stops
;       the environment. The environment can NOT be greater than 32k.

               les     di, dword ptr _envLng@
               mov     ax, di
               mov     bx, ax
               mov     cx, 07FFFh      ; Environment cannot be > 32 Kbytes
               cld
@@EnvLoop:
               repnz   scasb
               jcxz    InitFailed      ; Bad environment !!!
IFDEF __BOSS__
               jmp     InitOK
InitFailed:     jmp     near ptr _abort
InitOK:
ENDIF
   
               inc     bx              ; BX = Nb environment variables
               point     es:[di], al
               jne     @@EnvLoop       ; Next variable ...
               or      ch, 10000000b
               neg     cx
               mov     _envLng@, cx    ; Save Environment size
               mov     cx, dPtrSize / 2
               shl     bx, cl
               add     bx, dPtrSize * 4
               and     bx, not ((dPtrSize * 4) - 1)
               mov     _envSize@, bx   ; Save Environment Variables Nb.

IFNDEF __BOSS__

;       Determine the amount of memory that we need to keep

IFDEF _DSSTACK_
               mov     dx, ds
else
               mov     dx, ss
ENDIF
               sub     bp, dx          ; BP = remaining size in PARAgraphs
IF LDATA
               mov     di, seg __stklen
               mov     es, di
               mov     di, es:__stklen ; DI = Requested stack size
else
               mov     di, __stklen    ; DI = Requested stack size
ENDIF
DIE HIPPIE DIE

Briar

At the risk of ruining Briar's career by disparaging her find of the famous Sackaleaderer horse...

Quote from: Ungatt Trunn II
Yes. I wear high heels Krowdon. Any tips on how I should do my hair?

Ungatt Trunn II

DIE HIPPIE DIE

Briar

At the risk of ruining Briar's career by disparaging her find of the famous Sackaleaderer horse...

Quote from: Ungatt Trunn II
Yes. I wear high heels Krowdon. Any tips on how I should do my hair?

Ungatt Trunn II

That made me think of a bird getting strangled.
DIE HIPPIE DIE

Briar

As long as it is a starling, I'm ok with that
At the risk of ruining Briar's career by disparaging her find of the famous Sackaleaderer horse...

Quote from: Ungatt Trunn II
Yes. I wear high heels Krowdon. Any tips on how I should do my hair?

Ungatt Trunn II

DIE HIPPIE DIE

Briar

I think that might have been illegal.....oh well
At the risk of ruining Briar's career by disparaging her find of the famous Sackaleaderer horse...

Quote from: Ungatt Trunn II
Yes. I wear high heels Krowdon. Any tips on how I should do my hair?

Night Wolf


Briar

At the risk of ruining Briar's career by disparaging her find of the famous Sackaleaderer horse...

Quote from: Ungatt Trunn II
Yes. I wear high heels Krowdon. Any tips on how I should do my hair?

Krowdon

#134
now do we hide the body, or eat it?

eat it, definitely
Quote from: Ashyra Nightwingi have work to do and that is why i'm playing rwl, this is how it always works